Yeah, but that is AMODE 31. What about AMODE 24?
Frank M. Ramaekers Jr.
From: VSE-L [mailto:vse-l-bounces+framaekers=ailif...@lists.lehigh.edu] On Behalf Of Mick Poil
Sent: Thursday, January 4, 2018 10:08 AM
To: VSE Discussion List
Subject: Re: PDUMP of 31-bit
Frank,
This 31-bit CICS code works:
PROGA1 CSECT
PROGA1 AMODE 31
PROGA1 RMODE ANY
PDUMP AREA,AREA+29
EXEC CICS SEND TEXT FROM(AREA) FREEKB
EXEC CICS RETURN
AREA DC CL30'TRANSACTION TRA1 COMPLETE'
END
PSW 07DD2000 81F00090
GR 0-7 01F00108 01F00100 80587DC0 81F00030 01B87A70 016D40EF 016D50EE 016D60ED
8-F 016D70EC 00587648 01B87D6C 006C00D0 0052F000 006C0848 81F0006C 006C0848
AR 0-7 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000
8-F 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000
FP 0-3 4040404040404040 0000000000000000 4040404040404040 0000000000000000
4-7 4040404040404040 0000000000000000 4040404040404040 0000000000000000
8-B 0000000000000000 0000000000000000 0000000000000000 0000000000000000
C-F 0000000000000000 0000000000000000 0000000000000000 0000000000000000
FPC-REG 00000000
BEAR 0000000002B07106
PDUMP 01F000CA - 01F000E7
PDUMP 01F000CA - 01F000E7
01F000C0 E3D9 C1D5E2C1 C3E3C9D6 D540E3D9 C1F140C3 D6D4D7D3 D0 TRANSACTION TRA1 COMPL
01F000E0 C5E3C540 40404040 ETE
Contrary to the documentation. Thanks for the confirmation.
Frank M. Ramaekers Jr.
From: VSE-L [mailto:vse-l-bounces+framaekers=ailif...@lists.lehigh.edu]
On Behalf Of Mick Poil
Sent: Thursday, January 4, 2018 10:36 AM
To: VSE Discussion List
Subject: Re: PDUMP of 31-bit
If you are in AMODE 24, PDUMP only uses a 24-bit storage address.
I tried to PDUMP 01C009C8 to 01C009E5 after a SAM24, and it used 00C009C8 to 00C009E5.
Yes I understand “addresses”, but from a register?
Restrictions: The PDUMP macro cannot be used to process 31-bit addresses; these addresses must be specified in register notation. Also, the PDUMP macro cannot be used to dump data spaces; use the SDUMP or SDUMPX macro for this purpose.
Frank M. Ramaekers Jr.
From: VSE-L [mailto:vse-l-bounces+framaekers=ailif...@lists.lehigh.edu]
On Behalf Of Mick Poil
Sent: Thursday, January 4, 2018 10:56 AM
To: VSE Discussion List
Subject: Re: PDUMP of 31-bit
Thinking it through, PDUMP is working logically as the high-order 8 bits of either address could be complete crud on entry to the SVC routine when executing in 24-bit mode.The manual should explain it better.
RMODE ANY is supported. "Restrictions:" is incorrect when it says you must pass 31-bit addresses in registers. Both proven by the code above.
Yeah, can't seem to get SDUMP to work, although the console displays:
0S24I AN SDUMP OR SDUMPX MACRO WAS ISSUED
Using LIST= and it seems to be setup properly:
007406E0 007407D0 00740810
00740700 026D1700 026D2700 80000000
Frank M. Ramaekers Jr.
-----Original Message-----
From: VSE-L [mailto:vse-l-bounces+framaekers=ailif...@lists.lehigh.edu] On Behalf Of Chuck Arney
Sent: Thursday, January 4, 2018 9:54 AM
To: 'VSE Discussion List'
Subject: RE: PDUMP of 31-bit
Frank,
That would be my guess from your result, but I don't recall ever trying to use PDUMP for 31-bit storage.
I've used SDUMPX since it became available because it has much better support. Since you will have to change the program anyway I'd recommend forgetting PDUMP now days.
Chuck Arney
Arney Computer Systems
-----Original Message-----
From: VSE-L [mailto:vse-l-bounces+chuck=arneycom...@lists.lehigh.edu]
On Behalf Of Frank M. Ramaekers
Sent: Thursday, January 4, 2018 9:19 AM
To: 'VSE Discussion List (vs...@lists.lehigh.edu)' <vs...@lists.lehigh.edu>
Subject: PDUMP of 31-bit
The System Macros Reference states:
Restrictions: The PDUMP macro cannot be used to process 31-bit addresses; these addresses must be specified in register notation. Also, the PDUMP macro cannot be used to dump data spaces; use the SDUMP or SDUMPX macro for this purpose.
But if I PDUMP (6),(7) I get the following:
.
_______________________________________________
VSE-L mailing list
Yep, misread the docs….this time. J
Frank M. Ramaekers Jr.
From: VSE-L [mailto:vse-l-bounces+framaekers=ailif...@lists.lehigh.edu] On Behalf Of Mick Poil
Sent: Thursday, January 4, 2018 11:43 AM
To: VSE Discussion List