/* REXX *** */ /* echo the input parameters */ PARSE ARG parms nargs = WORDS(parms) Say 'There are 'nargs' parameters' DO i = 1 to nargs Say Right(i,4)'=>'WORD(parms,i) End i Exit 0