IDENTIFICATION
DIVISION.
PROGRAM-ID. WELCOME.
AUTHOR. KK.
DATE-WRITTEN. 11-11-1111.
SECURITY.
A SAMPLE PROGRAM ON HELLO WORLD.
PROCEDURE
DIVISION.
0000-MAIN
SECTION.
DISPLAY "HELLO WORLD".
STOP RUN. STOP RUN.
Create a loadlib where the compiled cobol file is placed
i.e. executable.
Loadlib must be a pds
and block record must be undefined ‘U” instead of ‘FB”
//* Compile the cobol code JCL
//usernm JOB 'WIPRO
TRG','KK',NOTIFY=&SYSUID,
// MSGCLASS=X,MSGLEVEL=(2,0)
//STEP1 EXEC PROC=IGYWCL
//COBOL.SYSIN DD DSN=usernm.JAN.COBOLPGM(welcome),DISP=SHR
//LKED.SYSLMOD DD
DSN=usernm.JAN.COBOLPGM.LOADLIB(welcome),
// DISP=SHR
//* Run the welcome program using JCL
//usernm JOB 'Training','KK',NOTIFY=&SYSUID
//JOBLIB DD
DSN=Wusernm.JAN.COBOLPGM.LOADLIB,DISP=SHR
//STEP1 EXEC PGM=WELCOME
//
//* Check the output inside the
spool, i.e. using tso sdsf st
No comments:
Post a Comment