REXX + DB2 question

Hi! I have a Rexx script where I run DB2 applications by DSN+CALL commands: ret_codes.='' do i=1 to . q1 = RUN PROGRAM(pgmname) PLAN(planname) q2 = PARM('parm_txt') queue (q1)(q2) queue END DSN SYSTEM(DB2X) ret_codes.pgm.i=pgmname ret_codes.plan.i=planname

Re: REXX + DB2 question

Sorry, but WHEN command works only after CALL/LOADGO TSO commands, not after CALL DSN subcommand. Karol Filipowicz 2011/2/10 Steve Comstock st...@trainersfriend.com On 2/9/2011 2:07 AM, karolf Gazeta.pl wrote: Hi! I have a Rexx script where I run DB2 applications by DSN+CALL commands

Re: REXX : how to determine the member name of a DD card

Hi! You can go from TCB to TIOT and then from TIOT to JFCB. In TIOT there is a table of all DD statements of the job, In each table entry there is pointer to approp. JFCB. In JFCB there are entries( one on more) for all DSN-s on this DD statement (1 where concatenation occurs), possibly. with

Re: Question about main program name

Thanks, it works; on PRB+96 there is last (TCB) pgmname. But it is undocumented! KF 2010/5/31, Rick Fochtman rfocht...@ync.net: --snip--- Hi! I've a function checking the name of calling main program. It examines JSTBPGMN