Thanks to Michael,

Who found my stupid coding error. The OPEN used the wrong label. sigh!

Tony Thigpen

Michael Stein wrote on 11/9/22 11:33:
On Wed, Nov 09, 2022 at 10:49:53AM -0500, Tony Thigpen wrote:
I am trying to migrate a simple CCW to tape test program from zVSE to z/OS
to help a customer. EXCP on z/OS is new to me. The program is reading the
label so I have BLP in the JCL and am running authorized and within the
correct initiator for BLP.

The OPEN and CLOSE using BLP works, but when I try a simple read, I get:

SYSTEM COMPLETION CODE=200  REASON CODE=00000313

abend S200 reason 313

https://www.ibm.com/docs/en/zos/2.1.0?topic=scc-200#m015062

3nn Page translation error.
n1n EXCP encountered an error during the front end processing.
nn3 Data extent block (DEB)

Sounds like EXCP didn't like things when it was first issued, possibly
the first EXCP issued (ie: none worked).

I'd suggest looking at a dump and seeing if the IOB->DCB->DEB pointers
look ok.
One think I am worried about is that I read into an area within the program,
not a GETMAINed area, but I compiled with NORENT

What is the RMODE?  I don't remember but perhaps the IOB & DCB addresses
have to fit in 24 bits...

I'd look at the dump.  Does it show the DCB is open (DEB exists?)?

Does the IOB look ok in the dump?
----------------------------------------------------------------------
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

Reply via email to