Example of password generation

All types of access are to be permitted to the CALL TABLE table COMPANY provided the correct password (ppp) is entered.
If the SEPA statements are entered in a separate file, this file and a start procedure could have the following structure:

Input file

1P0 NAME='COMPANY_SCH;COMPANY',SPACE='CALL_COMPANY.COMPANY',GEN
1P1 GP ppp,AR=Y,OR=Y,AU=Y,OU=Y,OD=Y
END

Start procedure

/BEGIN-PROCEDURE LOGGING=ALL
/OPTION MSG=FHL
/ASSIGN-SYSLST TO-FILE=LST.SEPA
/MOD-MSG-ATTRIBUTES TASK-LANGUAGE=D
/ASSIGN-SYSDTA TO-FILE=input-file
/START-SESAM-CDML-AUTHORIZATION
/SET-JOB-STEP
/ASSIGN-SYSLST TO-FILE=*PRIMARY
/END-PROCEDURE

where:

ppp	is the password
input-file	is the name of the input file for the SEPA statements