What you have to do A. Copy panel DSNESP01 from blah.SDSNPFPE to a panel library of your choice (or create one specially) B. In the )INIT section of the copied panel add the following line .RESP = ENTER C. Put the rexx in the @spoofy attachment into a rexx or clist library (or create one specially) D. Amend @spoofy rexx as follows : There is a section Set_up that determines the name of the current DB2 SDSNCLST lib for a specific lpar/subsys this can be as complex or simple as you like. Code this to set the variable to whatever yours is This section also specs the panel lib where you put and changed DSNESP01 in A.B. above This is all that needs changing E. To run JCL in SPOOFY JCL attachment - you may need to change the names of the ISP libs to whatever they are called in your environment. All other instructions are given as comments which can be deleted when you know I run as a proc and only specify the SPOOFIN SPOOFOUT and SPOOFCTL in the job to keep things readable (see full JCL.txt for comments as to what is what) //* //* ==> DB2.TXG.JCL(SPOOFY) //* //DOIT EXEC SPOOFY //* //* YOU MUST HAVE A SPOOFOUT //* SPOOFIN //* SPOOFCTL //* //* DESCRIPTIONS BELOW //* //SPOOFOUT DD DISP=SHR,DSN=myuserid.SPUFI.TXT //* //SPOOFIN DD * -- -- COMMENT -- SELECT CURRENT DATE, CURRENT TIME FROM SYSIBM.SYSDUMMY1 ; SELECT * FROM SYSIBM.SYSDATABASE ; -- //* //* //SPOOFCTL DD * * COMMENT * THIS CAN BE INSTREAM OR IN A CARD IMAGE DATASET OR PDS MEMBER * SPUFSYS MUST BE SPECIFIED * SPUFSYS = 'PDB2' /* MUST BE SPECIFIED */ * SPUFISO = 'CS' /* ISOLATION */ SPUFNUMW = 33 /* WIDTH OF NUM COLS */ SPUFCHRW = 80 /* WIDTH OF CHAR COLS */ SPUFMAXL = 20 /* MAX LINES SELECTED */