CBT Tape - File 183 STRING CSECT |
|
//STRINGCJ JOB (ACCT#),STRING_CSECT,
// NOTIFY=&SYSUID,
// CLASS=A,MSGCLASS=X,COND=(0,NE)
//*
//* Generate a complete @STRING Load-Module, link-edited
//* with programs which contain STRING (GENERATE,NO_CSECT)
//*
//HLASM EXEC PGM=ASMA90,PARM=(OBJECT,NODECK,NOESD,NORLD,NOXREF)
STRING GENERATE
END
//SYSPRINT DD SYSOUT=*
//SYSLIB DD DSN=CBTTAPE.FILE183.PDS,DISP=SHR STRING
// DD DSN=SYS1.MACLIB,DISP=SHR TIME
//SYSUT1 DD UNIT=VIO,SPACE=(CYL,2)
//SYSLIN DD UNIT=VIO,SPACE=(TRK,1),DISP=(,PASS),BLKSIZE=3200
//*
//LKED EXEC PGM=HEWLKED,PARM=(RENT,REFR)
//SYSLIN DD DSN=*.HLASM.SYSLIN,DISP=(OLD,DELETE)
//SYSLMOD DD DSN=CBTTAPE.FILE183.LOAD(@STRING),DISP=SHR
//SYSPRINT DD SYSOUT=*