/* REXX */ PARSE ARG parm1,parm2 /* PARSE ARG allows more than 1 template. */ SAY 'First parameter: ' parm1 SAY 'Second parameter:' parm2 PARSE SOURCE . zorg . IF zorg = 'COMMAND' /* Command invocation is always 1 string. */ THEN DO PARSE ARG parm1 ',' parm2 parm1 = STRIP(parm1,'L',"'") parm2 = STRIP(parm2,'T',"'") SAY 'First parameter: ' parm1 SAY 'Second parameter:' parm2 END EXIT 0