Providing Your Own Security Exit to The Command Line Interface

The command line interface, will by default, prompt you for the user ID and password to be used for the command. You can, however, provide this to the command line interface, by coding a COBOL GNT module with the name MFDASPWD. This program will be called and will be passed two linkage section items: user ID for 20 bytes and password for 20 bytes. Your exit program can then provide the user ID and password to be used, instead of prompting you for the information:

IDENTIFICATION DIVISION.
PROGRAM-ID. MFDASPWD.
ENVIRONMENT DIVISION.
DATA DIVISION. 
WORKING-STORAGE SECTION.    
01 Ws1          PIC X.
LINKAGE SECTION. 
01 LsUserid     PIC X(20).
01 LsPassword   PIC X(20).
PROCEDURE DIVISION USING LsUserid LsPassword.
P1.
     Move 'MFIUVE' to LsUserid
     Move 'MF081190' to LsPassword
   		GOBACK.

After compiling mfdaspwd.cbl, you must place mfdaspwd.gnt into the directory .

Keywords, enclosed in square brackets, are optional. Italicized keywords are user supplied data.