sample.rex 224 Bytes
Edit Raw Blame History



1

2

3

4

5

6

7

8

9


/*
 * Short-Description: Sample rexx script
 */

call rx3270Popup "Sample Rexx script running on pw3270 "||rx3270Version()||" (Status: "||rx3270QueryCState()||")"
ok = rx3270SetVisible(1)
ok = rx3270SendENTERKey()

return 0