Re: BSAM READ AMODE 31 RMODE 31 does I/O area have to be fixed ?

2023-03-22 Thread Joseph Reichman
> CHSI ADATA_RECTYPE,ADATA_RECESD External sym dic. > BNE CKSRC > > > -Original Message- > From: IBM Mainframe Discussion List On Behalf Of > Binyamin Dissen > Sent: Wednesday, March 22, 2023 5:24 AM &g

Re: BSAM READ AMODE 31 RMODE 31

2023-03-22 Thread Joseph Reichman
essage- From: IBM Mainframe Discussion List On Behalf Of Binyamin Dissen Sent: Wednesday, March 22, 2023 5:24 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: BSAM READ AMODE 31 RMODE 31 Did you check the dump as I suggested? If so, post your new code. On Wed, 22 Mar 2023 03:54:37 -0400 Joseph Reic

Re: BSAM READ AMODE 31 RMODE 31

2023-03-22 Thread Binyamin Dissen
r J Metz wrote: :>> :>> :>> :>> ?You have to give READ the address of the buffer, not the address of a pointer to it. :>> :>> :>> :>> For 64-bit there is a different DECB format; I believe that's SF64. :>> :>> :>> :>> :>> :>

Re: BSAM READ AMODE 31 RMODE 31

2023-03-22 Thread Joseph Reichman
r ( in 64 bit that would 8 bytes ) > :>> Thanks > :>> > :>> > :>>> On Mar 20, 2023, at 3:46 PM, Seymour J Metz wrote: > :>>> > :>>> ?IMHO it's clearer to just use > :>>> > :>>> READ PDSDECB,SF,PDSDCB

Re: BSAM READ AMODE 31 RMODE 31

2023-03-21 Thread Binyamin Dissen
to it. :>> :>> For 64-bit there is a different DECB format; I believe that's SF64. :>> :>> :>> From: IBM Mainframe Discussion List on behalf of Joseph Reichman :>> Sent: Tuesday, March 21, 2023 11:22 AM :>>

Re: BSAM READ AMODE 31 RMODE 31

2023-03-21 Thread Joseph Reichman
me Discussion List on behalf of > Joseph Reichman > Sent: Tuesday, March 21, 2023 11:22 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: BSAM READ AMODE 31 RMODE 31 > > Still have problems > > With the read > > I tried last night and it worked let me explain &

Re: BSAM READ AMODE 31 RMODE 31

2023-03-21 Thread Joseph Reichman
; > For 64-bit there is a different DECB format; I believe that's SF64. > > > From: IBM Mainframe Discussion List on behalf of > Joseph Reichman > Sent: Tuesday, March 21, 2023 11:22 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject

Re: BSAM READ AMODE 31 RMODE 31

2023-03-21 Thread Seymour J Metz
23 11:22 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: BSAM READ AMODE 31 RMODE 31 Still have problems With the read I tried last night and it worked let me explain The address of the IO area I store in a full word IOBUFF When I did LA R7,IOBUFF And then did READ ADATADECB,SF,(R6),(R7),’S’,MF=

Re: BSAM READ AMODE 31 RMODE 31

2023-03-21 Thread Joseph Reichman
Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of > Joseph Reichman [reichman...@gmail.com] > Sent: Monday, March 20, 2023 9:20 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: BSAM READ AM

Re: BSAM READ AMODE 31 RMODE 31

2023-03-21 Thread Joseph Reichman
Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of > Joseph Reichman [reichman...@gmail.com] > Sent: Monday, March 20, 2023 9:20 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: BSAM

Re: BSAM READ AMODE 31 RMODE 31

2023-03-20 Thread Seymour J Metz
chman [reichman...@gmail.com] Sent: Monday, March 20, 2023 9:20 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: BSAM READ AMODE 31 RMODE 31 Hi I know Charles Mills answered my question nearly 4 weeks ago but I would just like to corroborate the I/O areas for the read can be 31 bit addressing onl

Re: BSAM READ AMODE 31 RMODE 31

2023-03-20 Thread Joseph Reichman
Behalf Of Seymour J Metz Sent: Monday, March 20, 2023 11:07 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: BSAM READ AMODE 31 RMODE 31 That doesn't explain why you had LA R7 in places where you didn't need a pointer, LAR7,SYSADATA MVC 0(IODSECTLEN,R6)

Re: BSAM READ AMODE 31 RMODE 31

2023-03-20 Thread Joseph Reichman
t; http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of > Joseph Reichman [reichman...@gmail.com] > Sent: Monday, March 20, 2023 10:10 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re:

Re: BSAM READ AMODE 31 RMODE 31

2023-03-20 Thread Seymour J Metz
: Re: BSAM READ AMODE 31 RMODE 31 Ok Thanks The reason I had the LA R7 I first had to get 24 bit storage for 1) dcb 2) decb though I realize it can live in 31 bit 3) decb it has to live in 31 bit 4) initial exit code has to be 24 bit Once moved I had to get the proper pointers 24 bit pointers f

Re: BSAM READ AMODE 31 RMODE 31

2023-03-20 Thread Joseph Reichman
Ok Thanks The reason I had the LA R7 I first had to get 24 bit storage for 1) dcb 2) decb though I realize it can live in 31 bit 3) decb it has to live in 31 bit 4) initial exit code has to be 24 bit Once moved I had to get the proper pointers 24 bit pointers for exlst , decb Let me corr

Re: BSAM READ AMODE 31 RMODE 31

2023-03-20 Thread Binyamin Dissen
First of all, the buffer address specified on READ MF=E is an RX address, not an indirect address. So the read will overlay from IOBBUFF. That could cause strange results, You would need L Rx,IOBUFF READ ADATADECB,SF,(R6),(Rx),'S',MF=E Also, I do not unders

BSAM READ AMODE 31 RMODE 31

2023-03-20 Thread Joseph Reichman
Hi I know Charles Mills answered my question nearly 4 weeks ago but I would just like to corroborate the I/O areas for the read can be 31 bit addressing only the dcb and decb need to be below the line I am running AMODE 31 RMODE 31 The DCB is below the line as well as the DECB