Yes, here you go...

  Active Usings: None                                                           
                                        
D-Loc    Object Code      Addr1    Addr2    Stmt  Source Statement              
            HLASM R6.0  2016/11/11 09.23
                        00000B50 00000040   7223 WKCHAR0  EQU   
WKMSGWK0,L'WKMSGWK0,C'X'     work area 0                
                        00000B90 00000040   7224 WKCHAR1  EQU   
WKMSGWK1,L'WKMSGWK1,C'X'     work area 1                
                        00000BD0 00000040   7225 WKCHAR2  EQU   
WKMSGWK2,L'WKMSGWK2,C'X'     work area 2                
                        00000C10 00000040   7226 WKCHAR3  EQU   
WKMSGWK3,L'WKMSGWK3,C'X'     work area 3                
                        00000C50 00000040   7227 WKCHAR4  EQU   
WKMSGWK4,L'WKMSGWK4,C'X'     work area 4                
                        00000C90 00000040   7228 WKCHAR5  EQU   
WKMSGWK5,L'WKMSGWK5,C'X'     work area 5                
                        00000CD0 00000040   7229 WKCHAR6  EQU   
WKMSGWK6,L'WKMSGWK6,C'X'     work area 6                
                        00000D10 00000040   7230 WKCHAR7  EQU   
WKMSGWK7,L'WKMSGWK7,C'X'     work area 7                
                        00000D50 00000040   7231 WKCHAR8  EQU   
WKMSGWK8,L'WKMSGWK8,C'X'     work area 8                
                        00000D90 00000040   7232 WKCHAR9  EQU   
WKMSGWK9,L'WKMSGWK9,C'X'     work area 9                
                        00000B50 00000100   7233 WKMISCTR EQU   
WKMSGWK0,256,C'X'  use 1st 4 wk fields for misc TR table

Chuck

Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration
EAS Information Technology

Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275
Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX: +1 (412) 490-9230
chuck.har...@thermofisher.com  | www.thermofisher.com

WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of this 
e-mail or the information herein by anyone other than the intended recipient, 
or an employee or agent of a system responsible for delivering the message to 
the intended recipient, is prohibited. If you are not the intended recipient, 
please inform the sender and delete all copies.

-----Original Message-----
From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On 
Behalf Of Thomas David Rivers
Sent: Wednesday, November 16, 2016 7:49 AM
To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
Subject: Addr2 field in listing for EQU statement?

In the HLASM documentation it indicates what
should be present in the Addr2 field of the listing.

In particular, it says:

   The field headed Addr2 contains the effective
   address of the last operand of any instruction
   referencing storage.
      - For a USING instruction, the Addr2 field
        contains the value of the second operand.
      - For a CSECT, START, LOCTR, or RSECT instruction,
        the Addr2 field contains the end address of
        the control section.
      - For an ORG instruction, the Addr2 field contains
        the next address as specified by the operand field.
      - For an EQU instruction, the Addr2 field contains
        the length assigned.

Note that last statement, where it indicates the Addr2
field contains the length assigned for an EQU instruction.

I can't seem to get HLASM to actually do that; and
I've tried a few variants.  For me, the Addr2 field
of any EQU instruction is always empty.

Does anyone have an example where the Addr2 field
of an EQU instruction is _not_ empty?

        - Many thanks -
        - Dave Rivers -

--
riv...@dignus.com                        Work: (919) 676-0847
Get your mainframe programming tools at http://www.dignus.com

Reply via email to