ImpactExpert for DB2 z/OS ----- Change Data ----------------------------------- EDIT SYS16200.T134620.RA000.HEINRIC.R0118781 Columns 00001 00072 Command ===> Scroll ===> CSR 000090 RECORD FIELD=(5,X'FFFFFFFFFF',,1) 000091 //*--------------------------------------------------------------------- 000092 //REPRO EXEC PGM=IDCAMS,COND=(0,LT) 000093 //SYSPRINT DD SYSOUT=* 000094 //SYSIN DD * 000095 REPRO INFILE(IN1) OUTFILE(OUT1) 000096 REPRO INFILE(IN2) OUTFILE(OUT2) 000097 //IN1 DD DISP=SHR,DSN=SETEST.BIX-RR.STATS.G0002V00 000098 //OUT1 DD DISP=SHR,DSN=SETEST.BIX-RR.STATS.GDG 000099 //IN2 DD DSN=*.CRESYSIN.SYSUT2, 000100 // DISP=(OLD,DELETE) 000101 //OUT2 DD DISP=SHR,DSN=SETEST.BIX-RR.CATSTTS.RESCUE 000102 //PDB2M040 EXEC PGM=PDB2M040,COND=(0,LT), 000103 // PARM=('&MSGLEV2','&DTLLEV2', 000104 // '&TODO','&SSID','&PLANNAME','&SRCTRG','&WTOMSG') 000105 //STEPLIB DD DISP=SHR,DSN=SE.PRODUCT.PTFQB.IQA0610.QB1A.LOAD 000106 // DD DISP=SHR,DSN=CEE.SCEERUN 000107 // DD DISP=SHR,DSN=DSNB10.SDSNEXIT.QB1A 000108 // DD DISP=SHR,DSN=DSNB10.SDSNLOAD 000109 //SYSOUT DD SYSOUT=* 000110 //ERRORLOG DD SYSOUT=* 000111 //BIXINPUT DD DISP=OLD,DSN=*.REPRO.IN1 000112 //PDB2OUT DD SYSOUT=*,RECFM=FBA 000113 //PDB2RUNI DD DISP=OLD,DSN=SETEST.BIX-RR.STATS.GDG 000114 //PDB2RUNO DD DISP=OLD,DSN=SETEST.BIX-RR.CATSTTS.RESCUE 000115 //PDB2IN DD * 000116 <PROD-SIM> 000117 <DB2-SYSTEM ALIAS-CREATOR="IQA061QB" 000118 CATALOG-CREATOR="SYSIBM" 000119 GTT-IX-BPOOL="BP0" 000120 > 000121 </DB2-SYSTEM> 000122 </PROD-SIM> 000123 //PDB2TSIN DD * 000124 IQAD06QB.IQASI004 000125 IQAD06QB.IQASI006 000126 IQAD06QB.IQASI007 000127 IQAD06QB.IQASI009 000128 // ****** **************************** Bottom of Data ****************************