IGYWCG is a two-step cataloged procedure to compile, load, and run a program.
The COBOL job step produces an object module that is input to the loader. If the COBOL program refers to any data sets, you must supply the DD statements that define these data sets. You must supply the following DD statement, indicating the location of the source program, in the input stream:
//COBOL.SYSIN DD * (or appropriate parameters)
If the program uses copybooks, you must also supply a DD statement for SYSLIB or other libraries that you specify in COPY statements. For example:
//COBOL.SYSLIB DD DISP=SHR,DSN=DEPT88.BOBS.COBLIB
//IGYWCG PROC LNGPRFX='IGY.V4R1M0',SYSLBLK=3200, // LIBPRFX='CEE' //* //* COMPILE, LOAD AND RUN A COBOL PROGRAM //* //* PARAMETER DEFAULT VALUE USAGE //* LNGPRFX IGY.V4R1M0 PREFIX FOR LANGUAGE DATA SET NAMES //* SYSLBLK 3200 BLKSIZE FOR OBJECT DATA SET //* LIBPRFX CEE PREFIX FOR LIBRARY DATA SET NAMES //* //* CALLER MUST SUPPLY //COBOL.SYSIN DD . . . //* //COBOL EXEC PGM=IGYCRCTL,REGION=2048K //STEPLIB DD DSNAME=&LNGPRFX..SIGYCOMP, (1) // DISP=SHR //SYSPRINT DD SYSOUT=* //SYSLIN DD DSNAME=&&LOADSET,UNIT=SYSDA, (2) // DISP=(MOD,PASS),SPACE=(TRK,(3,3)), // DCB=(BLKSIZE=&SYSLBLK) //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) (3) //SYSUT6 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //GO EXEC PGM=LOADER,COND=(8,LT,COBOL),REGION=2048K //SYSLIB DD DSNAME=&LIBPRFX..SCEELKED, (4) // DISP=SHR //SYSLOUT DD SYSOUT=* //SYSLIN DD DSNAME=&&LOADSET,DISP=(OLD,DELETE) //STEPLIB DD DSNAME=&LIBPRFX..SCEERUN, (1) // DISP=SHR //SYSPRINT DD SYSOUT=* //CEEDUMP DD SYSOUT=* //SYSUDUMP DD SYSOUT=*