jagadishan perumal wrote:
>I would like to Publish some message as a bulletin in mainframe(Should be
like message trailer - constantly moving from left to right). This message
should be like a information through which the mainframe users can know the
maintanance activity carried by the mainframe support group.
Perhaps possible, but you did not said on what application and on
what 'mainframe'.
If you want to do this in ISPF, it is possible, but as others kindly noted, the
session's keyboard will be locked during the 'constantly moving' display.
Sample *working* REXX:
/*REXX*/
"ISPEXEC LIBDEF ISPPLIB DATASET ID('....REXX.PANELS')"
"ISPEXEC LIBDEF ISPMLIB DATASET ID('...REXX.MESSAGES')"
ADDRESS "ISPEXEC"
"CONTROL DISPLAY LOCK"
"SETMSG MSG(POP000)"
"DISPLAY"
DO X = 1 TO 99999999 /* my zToy is a fast and furious toy ;) */
END
In MESSAGE dataset, member POP000:
POP000 'MESSAGE TO BE SHOWN' .TYPE=NOTIFY .WINDOW=NORESP
' '
You can expand the loop or modify the member POP000 to contains something
else (perhaps shifting to left the data inside quote one character at a stage)
and then repeat that display and loop thing.
But see that line: 'CONTROL DISPLAY LOCK' - The user still cannot type
anything at all.
This is one possible working way to do something 'constantly moving'.
HTH!
Groete / Greetings
Elardus Engelbrecht
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
