Files
2025-09-08 13:41:14 +10:00

18 lines
546 B
Plaintext

//SQRNEWT JOB 1,NOTIFY=&SYSUID
//***************************************************/
//COBRUN EXEC IGYWCL
//COBOL.SYSIN DD DSN=&SYSUID..CBL(SQRNEWT),DISP=SHR
//LKED.SYSLMOD DD DSN=&SYSUID..LOAD(SQRNEWT),DISP=SHR
//***************************************************/
// IF (RC = 0) THEN
//***************************************************/
//RUN EXEC PGM=SQRNEWT
//STEPLIB DD DSN=&SYSUID..LOAD,DISP=SHR
//SYSOUT DD SYSOUT=*
//SYSIN DD *
15
/*
//SYSUDUMP DD DUMMY
//***************************************************/
// ENDIF