I am trying to purposely abend my program with completion code X'AAA' and reason code X'123'. I know I can abend my program with ABEND macro as below. Sorry for my limited knowledge on assembly and mvs, I thought whatever I load on Register 15 will come as reason code.
LA R2,REASON
LR R15,R2
ABEND X'AAA'
***DATA *****
REASON DC X'123'
LR R15,R2
ABEND X'AAA'
***DATA *****
REASON DC X'123'
Now my program is abending with
ABEND=S000 U2730 REASON=00000000
But I did not see the result I expected. I want to have reason code equivalent to X'123'. Any guidance would be greatly appreciated.
Thanks.