As you can see WS_LEN is 1668 HRTCPRD is the orignal control section either
a DC A(WS_LEN) generates a error and DC A(L'WS_LEN) does as well
Thanks
2772= DC CL8'&SYSDATE'
001658 F0F561F3F061F1F6 + DC CL8'05/30/16'
2773= DC CL8'&SYSTIME'
001660 F1F04BF0F9404040 + DC CL8'10.09'
01668 2774=WS_LEN EQU *-WS_DSECT
001668 00000 01670 2775 HRTCPRD RSECT
001668 00000000 2776 WS_LENGTH DC A(WS_LEN)
** ASMA032E Relocatable value or unresolved symbol found when absolut
** ASMA435I Record 698 in IBMUSER.HERCULES.SERVER(HRTCPRD) on volume:
00166C 00000001 2777 WS_LEN1 DC A(L'WS_LEN)
** ASMA019W Length of EQUated symbol WS_LEN undefined; default=1
** ASMA435I Record 699 in IBMUSER.HERCULES.SERVER(HRTCPRD) on volume:
2778 DROP R3,R4
i 2779 *YEXIT DC A(MYEXIT1,SUBTA
Active Usings: THREAD_DSECT,R5 EZASMGW,R7 MYTIE,R8 WS_DSECT,R13
R-Loc Object Code Addr1 Addr2 Stmt Source Statement
-----Original Message-----
From: IBM Mainframe Assembler List [mailto:[email protected]]
On Behalf Of Binyamin Dissen
Sent: Monday, May 30, 2016 11:47 AM
To: [email protected]
Subject: Re: EQUATE symbol
No such issue.
Show your code and the error message.
On Mon, 30 May 2016 10:39:27 -0400 michelbutz <[email protected]>
wrote:
:>Hi
:>
:>From habit I always do
:>WS_LEN. EQU *-WS_DSECT
:>
:>This time WS_LEN went over 1K and I got an :>Assembly error :> :>I am not
sure what type of symbol WS_LEN is :>I think it's a SETC :>That means I
probably couldn't do :>WS_LENGTH DC A(WS_LEN) :> :>Any help with this ( how
to get WS_LEN into a register) would be appreciated
--
Binyamin Dissen <[email protected]> http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
Should you use the mailblocks package and expect a response from me, you
should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems, especially
those from irresponsible companies.
