z/OS Using REXX and z/OS UNIX System Services
SA23-2283-00
/* rexx */
say 'This is pgm2'
say 'Using __argv stem, there are' __argv.0 'arguments. They are:'
do i = 1 to __argv.0
say ' Argument' i': "'__argv.i'"'
end
say 'Using arg(), there are' arg() 'arguments:'
do i = 1 to arg()
say ' Argument' i': "'arg(i)'"'
end