Cross-posted to IBM-MAIN and IBMTCP-L
At one time, I had a CLIST or REXX code that would take the screen layout and
turn it into the necessary USSMSG10 code. If anyone has that, I would
appreciate it.
Example of source:
ENTERPRISE DATA CENTER \ _ / .::o:::::.
SYSTEM PROGRAMMER (\o/) .:::'''':o:.
TEST SYSTEM --- / \ --- :o:_ _:::
HAPPY HOLIDAYS >*< `:}_>()<_{:'
>0<@< @ `'//\\'` @
>>>@<<* @ # // \\ # @
>@>*<0<<< __#_#____/'____'\____#_#_
>*>>@<<<@<< _________________________Y
>@>>0<<<*<<@< |=_- .-/\ /\ /\ /\--. =_-|
>*>>0<<@<<<@<<< |-_= | \ \\ \\ \\ \ |-_=-|
>@>>*<<@<>*<<0<*< |_=-=| / // // // / |_=-_|
\*/ >0>>*<<@<>0><<*<@<< |=_- |`-'`-'`-'`-' |=_=-|
___\\U//___ >*>>@><0<<*>>@><*<0<< | =_-| o o |_==_|
|\\ | | \\| >@>>0<*<<0>>@<<0<<<*<@<|=_- | ! ( ! |=-_=|
| \\| | _(UU)_ >((*))_>0><*<0><@<<<0<*<-,-=| ! ). ! |-_-=|
|\ \| || / //||.*.*.*.|>>@<<*<<@>><0<<<((=_| ! __(:')__ ! |=_==|
|\\_|_|&&_// ||*.*.*.*|_\\db//__ (\_/)-|/5\=5=55=5=/5\| _=_|
""""|'.'.'.|~~|.*.*.*| ____|_ =('Y')=//,------------.
|'.'.'.| 555555|____|>>>>>>| ( ~~~ )/(((((((())))))))
~~~~~~~~ '""""`------' `w---w` `------------'
Please note: For everyone's mutual protection, ALL SYSTEM USE, including
electronic mail, MAY BE MONITORED to protect against unauthorized use.
Enter your application name ===> ????????????????????????????????????????
Regards,
Mark Regan
z/OS Network Systems Programmer (z NetView, z/OS Communications Server)
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
