Post by Admin on Jul 13, 2014 9:15:33 GMT 5.5
COBOL Compiler:
//STEP1 EXEC IGYWCLG
//COBOL.SYSIN DD DSN=XXXX.COB.SAMPLE.PGM(SAMP),DISP=SHR
//LKED.SYSLMOD DD DSN=XXXX.COB.LOAD(TEST2),DISP=SHR
//LKED.SYSLMOD DD DSN=XXXX.COB.LOAD(TEST2),DISP=SHR
//GO.DD1 DD DSN=XXXX.TEST.DSN,DISP=SHR
//GO.DD1 DD DSN=XXXX.OUT,DISP=SHR
//SYSPRINT DD SYSOUT=*
**************************** Bottom of Data ****************************ASSEMBLER Compiler:
//ASM EXEC PGM=ASMA90,REGION=1024K,PARM='NODECK,OBJECT'
//SYSPRINT DD SYSOUT=*
//SYSLIB DD DSN=SYS1.MACLIB,DISP=SHR
// DD DSN=SYS1.SISTMAC1,DISP=SHR
//SYSUT1 DD SPACE=(CYL,(20,5))
//SYSUT2 DD SPACE=(CYL,(10,1))
//SYSUT3 DD SPACE=(CYL,(2,1))
//SYSUT4 DD SPACE=(CYL,(2,1))
//SYSUT5 DD SPACE=(CYL,(2,1)),DCB=SYS1.MACLIB,
// DISP=(,PASS)
//SYSLIN DD DSN=&&OBJ(JCLSCAN),DISP=(,PASS),
// SPACE=(CYL,(1,1,1))
//SYSIN DD DSN="DATSET NAME",DISP=SHR
//*
//LKED EXEC PGM=HEWLH096,COND=(0,LT),
// PARM=('SIZE=(1000K,100K),NCAL,XREF,LET,LIST')
//SYSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLMOD DD DSN="LOAD DATSET",DISP=SHR
//SYSUT1 DD SPACE=(6160,(230,760))
//OBJECT DD DSN=*.ASM.SYSLIN,VOL=REF=*.ASM.SYSLIN,DISP=SHR
//SYSLIN DD *
INCLUDE OBJECT(*)
NAME JCLSCAN(R)