CLIST

REXX

/* ANY COMMENT

/* ANY COMMENT */

WRITE

SAY

WRITENR &ZUSER

SAY ZUSER "IS AUTHORIZED"

PROC n

ARG   or

PARSE ARG

&VAR

VAR

SET X = &SUBSTR(3:8,&A)

X = SUBSTR(A,3,6)    or

PARSE VAR X 3 A 9

&STR()

""     or     ''

&STR(&X)

X

&X&Y

X || Y

PRFX&MIDVAR.SUFFIX

"PRFX"MIDVAR"SUFFIX"

CONTROL CONLIST SYMLIST LIST

TRACE RESULTS

CONTROL END(ENDO)

(no equivalent)

ISPEXEC ispf service

ADDRESS ISPEXEC "ispf service"

WHEN (&A = &B)

WHEN A = B THEN

&NOP (as statement)

NOP

+ and - as continuation characters

, (comma)

SET A = &B &C

A = B C

SET A = &B.&C

A = B || C

SET A = &B.C

A = B"C"

READDVAL

PULL

OPENFILE, GETFILE, PUTFILE, CLOSEFILE

"EXECIO * ..."   with PUSH, PULL

(a TSO command)

"a TSO command"

AND, &&

&

OR

|

GE, GT, EQ, NE, LE, LT

>=, >, =, ¬=, <= <

(¬=, /=, \=, <>, ><  are all valid ways of coding "not equal")