/* REXX */ /* read input stack */ Do i = 1 by 1 While txt \== '' txt = linein() jcl.i = txt End /* submit input */ If i > 2 then Do jcl.0 = i - 2 jid = submit('jcl.') Say 'Job 'jid' submitted' End Exit 0