29 lines
617 B
Plaintext
29 lines
617 B
Plaintext
//JOBINPUT JOB (INNOVA,DEV,TEAM),FAIZAN,CLASS=S,MSGCLASS=X
|
|
//STEP001 EXEC PGM=IDCAMS
|
|
//SYSPRINT DD SYSOUT=*
|
|
//SYSIN DD *
|
|
DEFINE GDG(NAME(DOESTAX.PROD.BE320.FTP.BX212) -
|
|
LIMIT(10) -
|
|
NOEMPTY -
|
|
SCRATCH)
|
|
//*
|
|
//STEP001 EXEC PGM=IDCAMS
|
|
//SYSPRINT DD SYSOUT=*
|
|
//SYSIN DD *
|
|
DEFINE GDG(NAME(DOESTAX.PROD.BE320.RPT) -
|
|
LIMIT(10) -
|
|
NOEMPTY -
|
|
SCRATCH)
|
|
//*
|
|
//STEP001 EXEC PGM=IDCAMS
|
|
//SYSPRINT DD SYSOUT=*
|
|
//SYSIN DD *
|
|
DEFINE GDG(NAME(DOESTAX.PROD.EXTRQ.RPT) -
|
|
LIMIT(10) -
|
|
NOEMPTY -
|
|
SCRATCH)
|
|
//*
|
|
|
|
|
|
|