I would like to invite anyone attending this week's SHARE conference in Phoenix
to come to my session entitled "Writing the Definitive Systems Programmer
Resume" (session 2, Wednesday, March 13, 2019: 1:45 PM-2:45 PM). This will
be the 12th time I have given this presentation at SHARE and i
?
IKJ57280I R6SAVE NOT IN INTERNAL SYMBOL TABLE FOR PDS86. PDSMAIN
On Mon, Mar 11, 2019 at 11:32 AM Tony Harminc wrote:
> On Mon, 11 Mar 2019 at 11:49, Janko Kalinic
> wrote:
>
> > test 'ad.cmdlib(pds86)' cp
> > IKJ57090A ENTER COMMAND FOR CP
> > xispmode
> > TEST
> > at pds86.pdsinit.ini
On Mon, 11 Mar 2019 at 12:32, Tony Harminc wrote:
> Where is R7 pointing at this point? You haven't executed any of your
> code yet, it appears. EQUATE doesn't save symbolic names and resolve
> them later; it will use the value of R7 at the time you issue the
> EQUATE subcommand.
I should perha
On Mon, 11 Mar 2019 at 11:49, Janko Kalinic wrote:
> test 'ad.cmdlib(pds86)' cp
> IKJ57090A ENTER COMMAND FOR CP
> xispmode
> TEST
> at pds86.pdsinit.initaddr
> TEST
> equate workarea 7r%
Where is R7 pointing at this point? You haven't executed any of your
code yet, it appears. EQUATE doesn't s
The load module is in a PDS.
test 'ad.cmdlib(pds86)' cp
IKJ57090A ENTER COMMAND FOR CP
xispmode
TEST
at pds86.pdsinit.initaddr
TEST
equate workarea 7r%
TEST
go
IKJ57024I AT PDS86.PDSINIT.INITADDR
TEST
l workarea
WORKAREA 00A7F400
TEST
l r6save
IKJ57280I ADDRESS R6SAVE NOT FOUND+
IKJ56703A REENTER
Could you post your session from the TEST command to the failing command?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Assembler List on behalf
of Janko Kalinic
Sent: Monday, March 11, 2019 11:20:06 AM
To: ASSEMBLER-LIST
Is your target load library a PDS/E or a PDS? I made a quick scan of the
binder book and couldn't find anything that said you couldn't use a PDS/E with
TEST, but I may have overlooked it.
Good Luck
-Original Message-
From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSE
Yes, and when I browse the load module I see the SYM records.
//ASM EXEC PGM=ASMA90,REGION=32M,
// PARM=(NORLD,RENT,TERM,OBJ,TEST,
// 'XREF(SHORT,UNREFS),SIZE(MAX,ABOVE)',
// 'SYSPARM(CSC-STL),FLAG(PAGE0)')
. . .
//LKED EXEC PGM=IEWL,REGION=32M,
//
Did you assemble the module with the TEST parameter as described in the
previous paragraph?
> -Original Message-
> From: IBM Mainframe Assembler List
> On Behalf Of Janko Kalinic
> Sent: Monday, March 11, 2019 7:47 AM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: TSO TEST EQUATE
>
>
Did you assemble and bind (link) with TEST?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Assembler List on behalf
of Janko Kalinic
Sent: Monday, March 11, 2019 10:47 AM
To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
Subject: TSO TE
I can not access symbols in a DSECT after I establish addressability to the
DSECT as documented below.
Regards,
John K
Symbols within DSECTs are available only if the DSECT name has been defined
with the EQUATE subcommand. For example, if NAME is a symbol in a DSECT
named DATATBL, then to acc
11 matches
Mail list logo