Процедура Lic_FirstContour Назад В начало Вперед

Назначение

Процедура Lic_FirstContour используется для получения списка идентификаторов контуров, указанных в лицензионном файле.

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

Описание

procedure Lic_FirstContour;

Пример

#include my.vih

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

//--------------------------------------------------
handleEvent
cmInit:
{
  flKBUH := false;
  Lic_FirstContour;
  while Lic_NextContour(S, CntOfUser) do
	if S='K_BUH'
	{
	flKBUH := true;
	break;
}
  if not flKBUH
  {
	abort; exit;
  }
}
end;
end.

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