How to print value in register?

kris_madras · New User Joined: 04 Jul 2005 Posts: 45

Just practicing Mainframe Assembler and used the following instructions to calculate sum of values stored in 2 registers namely 4 and 5

AR 4,5
The sum is stored in register 4. Now I have used the following statements to print the results by using WTO Macro

ST 4,MSG1
WTO TEXT=MSG1
......................
....................

MSG1 DS CL3 (Sum shouldn't exceed 3 digits)

I am getting SOC-1 abend. Could anybody help me how to solve this problem? how can I display the values stored in a Register?

UmeySan · Posted: Wed Sep 13, 2006 2:17 pm Post subject:

Hi !

First you have to konvert the contense of the register to charakter format,
so that you can print or read it. St-Command only stores the content in
binary format. Use CVD command. Then move your WorkingField to the
WTO-Command to the specific offset. Then execute WTO.

MVC WTO01+XX(YY),WorkingField
WTO01 WTO 'THIS IS REG04: XXXXXXXX'

Greetings, UmeySan