The job just worked using &&work files. It failed all morning with &&work. Any
ideas? Does an LE program require a lot of storage? It looks like our PUBLIC
volumes have plenty of space. Thanks all.
Think Spring !!!
Bob Pelletier
Connecticut Student Loan Foundation
Rocky Hill, Connecticut
Hi All. Once again I look to the group for help. I am at a total loss and have
test extensively. This is the issue:
If I use the following && JCL the job fails consistently with an 0C4:
//WORK01 DD DISP=NEW,UNIT=SYSDA,SPACE=(CYL,(4300,5)),
// LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=&&WORK01
//WORK02 DD DISP=NEW,UNIT=SYSDA,SPACE=(CYL,(4300,5)),
// LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=&&WORK02
//WORK03 DD DISP=NEW,UNIT=SYSDA,SPACE=(CYL,(900,5)),
// LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=&&WORK03
//WORK04 DD DISP=NEW,UNIT=SYSDA,SPACE=(CYL,(900,5)),
// LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=&&WORK04
I have 4 PUBLIC volumes.
If I use this JCL which uses permanent datasets the job works everytime:
//WORK01 DD DISP=(NEW,CATLG),UNIT=SYSDA,SPACE=(CYL,(5,5)),
// LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=TRAM1.WORK1,
// VOL=SER=BACK09
//WORK02 DD DISP=(NEW,CATLG),UNIT=SYSDA,SPACE=(CYL,(5,5)),
// LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=TRAM1.WORK2,
// VOL=SER=BACK09
//WORK03 DD DISP=(NEW,CATLG),UNIT=SYSDA,SPACE=(CYL,(5,5)),
// LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=TRAM1.WORK3,
// VOL=SER=BACK09
//WORK04 DD DISP=(NEW,CATLG),UNIT=SYSDA,SPACE=(CYL,(5,5)),
// LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=TRAM1.WORK4,
// VOL=SER=BACK09
Can anyone offer suggestions as to why &&work is not working. We are OS390
V2R10 and the program is written LE. I do not have the source because it was
given to us by the agency we feed the data too. In advance thanks all.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html