--******************************************************************************************************************** -- Created: 9-Mar-2021 22:28:29 by OpenVMS SDL EV3-3 -- Source: 02-SEP-1989 10:46:49 $1$DGA8085:[LIB_ADA.LIS]LMFITMDEF.SDL;1 --******************************************************************************************************************** with SYSTEM; use SYSTEM; with STARLET; use STARLET; with CONDITION_HANDLING; use CONDITION_HANDLING; package LMFITMDEF is -- module $LMFITMDEF --+ -- LMFITMDEF - LMF internal item-list definitions -- -- Items lists used by the internal routines LMF$LOAD and LMF$UNLOAD, -- which manipulate the on-disk and in-memory License databases. -- These routines now have a callable interface, and the caller needs -- access to these item codes. --- -- These are the item codes passed from the LMF utility to the callable -- routines in the item list. New codes should be added to the end. LMF_K_LDB : constant := 0; LMF_K_PRODUCER : constant := 1; LMF_K_PRODUCT : constant := 2; LMF_K_VERSION : constant := 3; LMF_K_ISSUER : constant := 4; LMF_K_COMMENT : constant := 5; LMF_K_AUTHORIZATION : constant := 6; LMF_K_UNITS : constant := 7; LMF_K_AVAILABILITY : constant := 8; LMF_K_ACTIVITY : constant := 9; LMF_K_TOKEN : constant := 10; LMF_K_TERMINATION : constant := 11; LMF_K_DATE : constant := 12; LMF_K_HARDWARE_ID : constant := 13; LMF_K_CHECKSUM : constant := 14; LMF_K_INCLUDE : constant := 15; LMF_K_EXCLUDE : constant := 16; LMF_K_OPTIONS : constant := 17; LMF_K_OUTPUT_NAME : constant := 18; LMF_K_EXTINCT_QUALIFIER : constant := 19; LMF_K_LOAD_QUALIFIER : constant := 20; LMF_K_CUST_TERMINATION : constant := 21; LMF_K_CUST_DATE : constant := 22; LMF_K_FULL_QUALIFIER : constant := 23; LMF_K_BRIEF_QUALIFIER : constant := 24; LMF_K_CREATION_DATE : constant := 25; LMF_K_LMF_VERSION_NUMBER : constant := 26; LMF_K_CREATING_USERNAME : constant := 27; LMF_K_LOG_QUALIFIER : constant := 28; end LMFITMDEF;