Equivalent of DISPLAY in COBOL or SAY in Rexx

Sahoo · New User Joined: 08 Jun 2006 Posts: 53

Hi
What is the equivalent keyword of DISPLAY as in CObol and Say as in Rexx , in Assembler ?

raghunathns · Posted: Tue Aug 29, 2006 4:03 am

gokuldass · New User Joined: 18 Mar 2005 Posts: 48 Location: india

Hi,

How to use WTO to display the contents of register while on runtime.

REgards,
Gokuldass

UmeySan · Posted: Wed Sep 13, 2006 1:47 pm

Hi there !

First you have to convert the contents of the Register in a working Field.
So that you can Print ore Read it in Charakter Format.

Then move this field to the specific Point in your WTO-Command, starting at WTO+8Bytes.

MVC WTOCMD01+xx(YY),Field
WTOCMD01 WTO 'THIS IS REGISTER-03 xxxxxxx'

Hope that helps, UmeySan

gokuldass · New User Joined: 18 Mar 2005 Posts: 48 Location: india

Hi,

Thanks a lot..

I have one more doubt....

To use WTO any special library needs to be added ?

regards,
Gokuldass

futuredba · New User Joined: 08 Jan 2006 Posts: 22 Location: Delhi

Hi UmeySan,

The program is running error free but the expected string is not displayed anywhere..

Could u add something to it?

thanks

UmeySan · Posted: Thu Sep 14, 2006 4:33 pm

Hi !

@ futuredba
I think you forgot to convert the content of the register to dezimal and unpack it to charakter. Use CVD and UNPK first. Then move it into the WTO.

@ gokuldass
Normaly the WTO is in SYS1.MACLIB, so there's no need.
Check your mac-libs.

Regards, UmeySan

futuredba · New User Joined: 08 Jan 2006 Posts: 22 Location: Delhi

Hi UmeySan,

I was changing the content of reg to char value. then also it isnt displaying at my console. however the program is running error free.

I guess i m missing a DD stmt. The DD stmts i m using in my jcl are SYSLOUT DD SYSOUT=*
SYSPRINT DD SYSOUT=*
SYSOUT DD SYSOUT=*
SYSUDUMP DD SYSOUT=*

Do i need to add any more dd stmt????

Thanks in advance...

UmeySan · Posted: Thu Sep 14, 2006 6:04 pm

Hi !

@ futuredba

When your Job is on SDSF OutputQueue, please have a look at JESMSGLG.
WTO means WriteToOperator. It's not written to Sysout. It's written to Console. You can specify a RoutCode for routing the message to a specific OperatorConsole. Ask your SystemProgrammer for RouteCodeNumber. But That's normaly not needed. Normaly you only want to see a Message from your Programm during RunTime, that gives you Information about what's going on.

In some Systems you can use RouteCode=11 tu issue an WriteToProgrammer with the WTO command. In this case you can see the Messages under JESJCL in SDSF.

Regards, UmeySan

futuredba · New User Joined: 08 Jan 2006 Posts: 22 Location: Delhi

Hi UmeySan,

Ya, u are right... I was not knowing tht messages were printed at JESMSGLG...

Thanx a lot!!

gokuldass · New User Joined: 18 Mar 2005 Posts: 48 Location: india

Hi Guys,

Any of you know pc370 simulator version of Assembler? If yes, plz anyone help me on how to see the console / spool message just like in mainframe assembler..

I tried wto to print the register content.. but I could get the value at run time..

:-)

Regards,
Gokul

UmeySan · Posted: Fri Sep 15, 2006 12:20 pm

Hi !

If you are using a simulator software like MicroFokusWorkbench you coud do that in interaktive trace.

Regards, UmeySan