Процедура Lic_FirstItem | ![]() |
![]() |
![]() |
Процедура Lic_FirstItem используется для получения списка идентификаторов модулей, указанных в лицензионном файле.
Процедура Lic_FirstItem позиционируется на первой записи
в списке модулей, указанных в лицензионном файле. Для получения
всего списка эта процедура используется в сочетании с функцией
Lic_NextItem.
procedure Lic_FirstItem;
#include my.vih //================================================== interface aIfc; ! Без таблиц create view as; //-------------------------------------------------- handleEvent cmInit: { flKassa := false; Lic_FirstItem; while Lic_NextItem(S, CntOfUser) do if S='KASSA' { flKassa := true; break; } if not flKassa { abort; exit; } } end; end.