I am still getting return code 4 in R15 CVSTAT is 8 I first move 44X'04' to JFCBDSNM I then do a READJFCB FILE Everything is okay I get R15 = 0 I then do OPEN FILE,TYPE=J R15 = 0 I then do ICM. R11,B'0111',DCBDEBA XC BUFLIST(BFLHLN+BFLELN),BUFLIST OI BFLHFL,BFLHDSCB MVI. BFLHNOE,1 LA. R6,DS1FMTID ST. R6,BFLEBUF OI. BFLEFL,BFLECHR MVI. BFLELTH,DSCBLTH
CVAFDIR ACCESS=READ,DSN=DSN,BUFLIST=BUFLIST,DEB=(R11) I get rerun code 4 in R15 and CVSTAT is 08 invalid DEB Sent from my iPhone > On May 3, 2016, at 1:56 PM, J R <n...@hotmail.com> wrote: > > Nope. > > Sent from my iPhone > >> On May 3, 2016, at 13:55, Staller, Allan <allan.stal...@wunderman.com> wrote: >> >> ITYM 44x'40' >> >> <snip> >> >> So, as I posted before: >> >> VTOC DSN is 44X'4' >> >> This email � including attachments � may contain confidential information. >> If you are not the intended recipient, do not copy, distribute or act on it. >> Instead, notify the sender immediately and delete the message. >> >> ---------------------------------------------------------------------- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN