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 <[email protected]> on behalf 
of Janko Kalinic <[email protected]>
Sent: Monday, March 11, 2019 11:20:06 AM
To: [email protected]
Subject: Re: TSO TEST EQUATE

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,
//             COND=((0,LT,PDSMAIN.ASM),
//             (0,LT,SUBS.ASM),
//             (0,LT,PARSE.ASM),
//             (0,LT,DIALOG.ASM)),
//             PARM='TEST,MAP,RENT,REUS,REFR,NCAL'

On Mon, Mar 11, 2019 at 10:12 AM Seymour J Metz <[email protected]> wrote:

> Did you assemble and bind (link) with TEST?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> ________________________________________
> From: IBM Mainframe Assembler List <[email protected]> on
> behalf of Janko Kalinic <[email protected]>
> Sent: Monday, March 11, 2019 10:47 AM
> To: [email protected]
> Subject: TSO TEST EQUATE
>
> I can not access symbols in a DSECT after I establish addressability to the
> DSECT as documented below.
>
> Regards,
> John  K
>
> <snip from TSO/E Programming Guide>
>
> 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 access the data associated with NAME, you would
> first
> have to determine the address to be used as a base address for the DSECT.
> (This is the address in the register on the assembler USING instruction.)
> If the address is in register 7, you can enter:  equate datatbl 7r%  This
> establishes addressability to the DSECT, allowing the symbol NAME and all
> other symbols in the DSECT to be accessed using the symbol.
>
> </snip>
>

Reply via email to