The sample JCL shown below contains the statements required to execute the PL/I SQL-Compatible Preprocessor, the PL/I 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=PPIMAIN, // PARM=’USERID(UID,UID),TDPID(TDPE),NOPUNCH’ //* //* * * * * * * * * * * * * * * * * * * * * * * * * * //* * //* COMPILE AND LINKEDIT FOR PL/I CICS. * //* * //* BEFORE SUBMITTING, CHECK THE TDPID, USERNAME * //* AND PASSWORK ABOVE. CHANGE THE MEMBER NAME * //* ON THE SYSPUNCH, SYSIN, PLI.SYSIN, AND * //* LKED.SYSIN. * //* * //* THIS JOB CALLS THE PROCEDURE PLIPROC. * //* * //* * * * * * * * * * * * * * * * * * * * * * * * * * //* //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.PLIPUN(MEMBER), // DISP=SHR //SYSLIB DD DSN=UID.SQLPLIPP.PLICOPY,DISP=SHR //SYSIN DD DSN=UID.CICS.PLISQL(MEMBER),DISP=SHR //PP02 EXEC DFHEITPL //TRN.SYSIN DD DSN=UID.CICS.PLIPUN(MEMBER),DISP=SHR //PLI.SYSLIB DD DSN=UID.SQLPLIPP.PLICOPY,DISP=SHR //PLI.SYSUT1 DD UNIT=SYSDA,DCB=BLKSIZE=1024,SPACE=(1024,(200,20)) //PLI.SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,2)) //PLI.SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,2)) //PLI.SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(1,2)) //LKED.SYSLIB DD // DD // DD DSN=DBC.CXILOAD,DISP=SHR // DD DSN=SYS1.VSCLLIB,DISP=SHR //LKED.SYSLMOD DD DSN=UID.CICS.LOADA,DISP=SHR //LKED.SYSIN DD * NAME MEMBER(R) /* //