MODULE ICQDEF IDENT "ICQDEF-1-X"; /*++ /* Facility: /* ICQ/OSCAR Server for OpenVMS /* /* Abstract: /* An interface module defined OSCAR primitives, constants. This story is based on /* http://iserverd1.khstu.ru/oscar/ /* /* /* Author: /* Ruslan R. Laishev /* /* Creation Date: 25-JAN-2008 /* /* Modification History: /* /* /*-- AGGREGATE nodectx STRUCTURE PREFIX srvctx$ TAG "icq"; lknode LONGWORD UNSIGNED; /* Lock id of the resources with the 'node'-value block END nodectx; AGGREGATE node STRUCTURE PREFIX node$ TAG "icq"; lf LONGWORD UNSIGNED; /* Server load factor END node; AGGREGATE quemsg STRUCTURE PREFIX quemsg$ TAG "icq"; END quemsg; /* END_MODULE ICQDEF;