View previous topic :: View next topic
|
Author |
Message |
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 ? |
|
Back to top |
|
|
raghunathns
Active User
Joined: 08 Dec 2005 Posts: 127 Location: rochester
|
|
|
|
WTO |
|
Back to top |
|
|
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 |
|
Back to top |
|
|
UmeySan
Active Member
Joined: 22 Aug 2006 Posts: 771 Location: Germany
|
|
|
|
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 |
|
Back to top |
|
|
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 |
|
Back to top |
|
|
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 |
|
Back to top |
|
|
UmeySan
Active Member
Joined: 22 Aug 2006 Posts: 771 Location: Germany
|
|
|
|
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 |
|
Back to top |
|
|
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... |
|
Back to top |
|
|
UmeySan
Active Member
Joined: 22 Aug 2006 Posts: 771 Location: Germany
|
|
|
|
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 |
|
Back to top |
|
|
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!! |
|
Back to top |
|
|
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 |
|
Back to top |
|
|
UmeySan
Active Member
Joined: 22 Aug 2006 Posts: 771 Location: Germany
|
|
|
|
Hi !
If you are using a simulator software like MicroFokusWorkbench you coud do that in interaktive trace.
Regards, UmeySan |
|
Back to top |
|
|
|