© serviceprofessionalgmbh

PROC 0 INFO()
/* SCREEN-Positionierung von &INFO in Kombination mit REXX ScreenRead */

WRITENR &INFO
END


Aufrufbeispiel in REXX

/* REXX
*/
say "1 = Stein"
say "2 = Schere"
say "3 = Papier"
say "4 = Brummen"
say
say "5 = Ende"
say
info_text = "AUSWAHL"
"SAYNR" info_text
parse external Auswahl
/* some code */