View previous topic :: View next topic
|
Author |
Message |
lind sh
New User
Joined: 04 Feb 2015 Posts: 32 Location: Tajikestan
|
|
|
|
Suppose I write the following code:
Code: |
*
DFHUEXIT TYPE=EP,ID=(XXMATT)
ME01XMAT CSECT
ME01XMAT AMODE 31
ME01XMAT RMODE ANY
*#
SAVE (14,12)
LR 12,15
USING ME01XMAT,12
LR 2,1
USING DFHUEPAR,2
**********************************************************
LA 5,UEPTRANID
WTO TEXT=(5)
WTO 'Exit point of XXMATT !!!'
**********************************************************
RETURN DS 0H
L 13,UEPEPSA
RETURN (14,12),RC=UERCNORM
SPACE
SAVE DS 18F
END ME01XMAT
|
I expect to see the transaction name on the console when any transaction attached. The last WTO display my message correctly but I can't see the value of point that UEPTRANID has it's address. |
|
Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
When using the format WTO TEXT=(5) then the area must include the length in the 1st half word.
Here is an example:
Code: |
MVC MYTRANS,UEPTRANID
LA 5,WTOTRANS
WTO TEXT=(5)
...
WTOTRANS EQU *
DC AL2(L'MYTRANS)
MYTRANS DS CL4
|
(Code not validated) |
|
Back to top |
|
|
lind sh
New User
Joined: 04 Feb 2015 Posts: 32 Location: Tajikestan
|
|
|
|
UEPTRANID contains the address of a location which it's content is the 4 byte transaction ID. |
|
Back to top |
|
|
|