The sample JCL that follows contains the statements required to execute the COBOL SQL-Compatible Preprocessor, the COBOL compiler, the linkage editor, and the created (not executed) object module. Remember that your job stream instructions must satisfy the requirements of your installation. Verify your job stream before you run the job.
//jobname JOB ’job statement info’ //PP01 EXEC PGM=PPBMAIN, // PARM=’USERID(UID,UID),TDPID(TDPN),DATABASE(UID)’ //* //* * * * * * * * * * * * * * * * * * * * * * * * * * //* * //* COMPILE AND LINKEDIT FOR COBOL CICS. * //* * //* BEFORE SUBMITTING, CHECK THE TDPID, USERID * //* AND PASSWORD ABOVE. CHANGE THE MEMBER NAME * //* ON THE SYSPUNCH, SYSIN, COB.SYSIN, AND * //* LKED.SYSIN. * //* * //* * //* * //* * * * * * * * * * * * * * * * * * * * * * * * * * //* //STEPLIB DD DSN=DBC.APPLOAD,DISP=SHR // DD DSN=DBC.TRLOAD,DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(5,1)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000) //SYSPRINT DD SYSOUT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=133) //SYSTERM DD DUMMY //SYSPUNCH DD DSN=UID.CICS.COBPUN(MEMBER), // DISP=SHR //SYSLIB DD DSN=UID.SQLCOBPP.COBCOPY,DISP=SHR INCLUDE PDS //SYSIN DD DSN=UID.CICS.COBOL(MEMBER),DISP=SHR //PP02 EXEC DFHEITCL, // PARM.COB=’NOTRUNC,NODYNAM,LIB,APOST,NOXREF,SIZE=256,BUF=16K’ //TRN.SYSIN DD DSN=UID.CICS.COBPUN(MEMBER),DISP=SHR //COB.STEPLIB DD DSN=SYS1.VSCOLIB,DISP=SHR //COB.SYSLIB DD DSN=UID.SQLCOBPP.COBCOPY,DISP=SHR // DD DSN=CICS160.COBLIB,DISP=SHR //LKED.SYSLIB DD // DD DSN=DBC.CXILOAD,DISP=SHR // DD DSN=SYS1.VSCLLIB,DISP=SHR //LKED.SYSLMOD DD DSN=UID.CICS.LOAD,DISP=SHR //LKED.SYSIN DD * NAME MEMBER(R) /* //