Функция Lic_NextPlatform Назад В начало Вперед

Назначение

Функция Lic_NextPlatform используется для получения списка идентификаторов платформенных конфигураций, указанных в лицензионном файле. Функция позиционируется на следующей записи списка.

Для получения всего списка платформенных конфигураций эта функция используется в сочетании с функцией Lic_FirstPlatform.

Описание

function Lic_NextPlatform(ConfigID : pField) : boolean;

Параметры

ConfigID - Идентификатор платформенной конфигурации в текущей записи списка конфигураций в лицензионном файле.

Возвращаемое значение

Возвращает true, если удалось найти следующую запись. Если текущая запись оказалась последней, функция возвращает false.

Пример

#include my.vih

//==================================================
interface aIfc;
! Без таблиц
create view as;

//--------------------------------------------------
handleEvent
cmInit:
{
  flBtr := false;
  Lic_FirstPlatform;
  while Lic_NextPlatform(S) do
	if S='BTRIEVE'
	{
	 flBtr := true;
	 break;
}
  if not flBtr
  {
	abort; exit;
  }
}
end;
end.

Смотрите также

Lic_FirstPlatform