The length of the request is 15 characters, not 16. You have told BPXWDYN that the X'00' is part of the request.
> -----Original Message----- > From: IBM Mainframe Assembler List [mailto:ASSEMBLER- > [email protected]] On Behalf Of David Staudacher > Sent: Sunday, December 24, 2017 3:52 AM > To: [email protected] > Subject: Re: Calling BPXWDYN to Return DSNAME for DDNAME > > >> "I have tested both versions in 1.13 and 2.3 systems successfully." > > Good to know Willie! Could you post the essentials of your successful INFO > > call to > return DSNAME for DDNAME? > > I'd like to see how it differs from mine, which failed. > > Willie: > Here are the essentials of my version which works. > The request parm *does not* have a halfword length prefix: > CALL BPXWDYN,(INFODD,INRTDSN),VL > [...] > INFODD DC C'INFO DD(DDNAME)',X'00' > INRTDSN DC AL2(45),C'INRTDSN',XL38'00' > > And here is the version which fails with a S0C4. > The request parm *does* have a halfword length prefix: > > CALL BPXWDYN,(INFODD,INRTDSN),VL > [...] > INFODD DC CALL BPXWDYN,(INFODD,INRTDSN),VL > [...] > INFODD DC AL2(16),C'INFO DD(DDNAME)',X'00' > INRTDSN DC AL2(45),C'INRTDSN',XL38'00' > > The manual says the above should work, but it doesn't. > Could you post the essentials of your successful INFO call using a request > parm with a > halfword lenth prefix? > I'd like to see how it differs from mine. > >
