John, Thank you very much as it worked great. My nemesis grows weaker......
Regards, Claude -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of McKown, John Sent: Wednesday, May 21, 2008 11:34 AM To: [email protected] Subject: Re: SMP/E question on merging DDDEF entries. -snip- Do an UNLOAD DDDEF. //S1 EXEC PGM=GIMSMP, // PARM='PROCESS=WAIT', // DYNAMNBR=120 //* //SMPCSI DD DISP=SHR,DSN='SMPE18.GLOBAL.CSI' //SMPPUNCH DD DSN=TSH009.SMPE.DDDEF.SMPE18.ZZZZZZZZ, // DISP=(NEW,CATLG),SPACE=(TRK,(100,10),RLSE), // RECFM=FB,LRECL=80,BLKSIZE=0,DSORG=PS //* //SMPCNTL DD * SET BOUNDARY (oldtarg) . UNLOAD DDDEF . /* // Replace "oldtarg" with your source zone name. Change other DSNs as needed. Edit output DSN if necessary. Run the step: //S2 EXEC PGM=GIMSMP, // PARM='PROCESS=WAIT', // DYNAMNBR=120 //SMPCSI DD DSN=SMPE18.GLOBAL.CSI, // DISP=SHR //* //* //SMPPTFIN DD DUMMY, // DCB=(RECFM=FB,LRECL=80,BLKSIZE=32720) //SMPHOLD DD DUMMY, // DCB=(RECFM=FB,LRECL=80,BLKSIZE=32720) //SMPCNTL DD * SET BOUNDARY ( newtarg) . // DD DISP=SHR,DSN=TSH009.SMPE.DDDEF.SMPE18.ZZZZZZZZ -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
