Validate License API
VL: Validate License API
Beginning with Elliott V8.5, a developer can use this API to get Elliott License information.
The format for this API follows:
VL,XX,NN
XX = LI Return License Number in SCREEN-ALPHA-FIELD
"DEMO" for demo mode
XX = NU Return maximum number of users in SCREEN-NUMERIC-FIELD
XX = EX Return maintenance expiration date in SCREEN-NUMERIC-FIELD
XX = VE Return version information in SCREEN-ALPHA-FIELD
XX = MF,NN Return the module flag ("Y" or "N") in SCREEN-ANSWER for module NN
XX = AF,NN Return the add-on flag ("Y" or "N") in SCREEN-ANSWER for add-on NN
Example:
MOVE "VL,MF,01" TO SCREEN-PARAMETERS
PERFORM SCREEN-ROUTINE
IF SCREEN-ANSWER = "Y"
DISPLAY "General Ledger is licensed"
END-IF