PROCEDURE LASTLOG (A); EBCDIC ARRAY A [0];
Input
Must pass an EBCDIC array of at least 4 characters in length.
Output
If the LOGLIBRARY is not in use, the hexadecimal value 00000000 is returned. Otherwise the value returned is the last log pivot number, in COBOL PIC 9(8) COMPUTATIONAL format.