WTO

Standard Form:

[label] WTO 'message'|('text',line-type)|TEXT=(text-addr,line-type)

[,ROUTCDE=]

[,MCSFLAG=]

[,DESC=]

[,CART=]

[,KEY=]

[,TOKEN=]

[,CONSID=]

[,CONSNAME=]

Execute Form:

[label] WTO TEXT=(text-addr,line-type)

[,ROUTCDE=]

[,MCSFLAG=]

[,DESC=]

[,CART=]

[,KEY=]

[,TOKEN=]

[,CONSID=]

[,CONSNAME=]

,MF=(E,label1)

List Form:

[label1] WTO 'message'|('text',line-type)|TEXT=(text-addr,line-type)

[,ROUTCDE=]

[,MCSFLAG=]

[,DESC=]

[,CART=]

[,KEY=]

[,TOKEN=]

[,CONSID=]

[,CONSNAME=]

,MF=L

Parameters

message
Message text to be displayed. It must be in quotes.
text
Message text to be displayed. It must be in quotes.
text-area
Address of message text to be displayed
label1
Label of either list form WTO instruction or parameter block

Comments

Examples

Example 1

WTO 'THIS IS A SIMPLE WTO MACRO INSTRUCTION'

Example 2

WTO MF=(E,MESSAGE)

MESSAGE WTO 'THIS IS A WTO-LIST MESSAGE',MF=L

Example 3

WTO MF=(E,MESSAGE)

MESSAGE EQU *

DC H'84' MESSAGE LENGTH PLUS 4

DC H'0'

DC CL80'THIS IS MY MESSAGE'