Something strange is bombed on the open Message IEC141I the dataset it in the message is sys1.vtoc The DCB whose DSCB I am trying to access is a VB have that DCB on the open type=j
Sent from my iPhone > On May 3, 2016, at 2:35 PM, J R <jayare...@hotmail.com> wrote: > > Do the RDJFCB first, *then* move the 44X'4' to JFCBDSNM. > > Sent from my iPhone > >> On May 3, 2016, at 14:30, michelbutz <michealb...@comcast.net> wrote: >> >> 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 > > ---------------------------------------------------------------------- > 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