On Wed, 17 Jan 2007 07:51:54 +0100, Miran Cotic <[EMAIL PROTECTED]> wrote:
>You can use two jobs attached bellow: > >//S1 EXEC PGM=GIMSMP,REGION=0M,TIME=NOLIMIT >//SMPCSI DD DISP=SHR,DSN=ZOS17.GLOBAL.CSI >//SMPLOG DD DUMMY >//SMPLOGA DD DUMMY >//SMPPUNCH DD DSN=SYSPROG.SMPPUNCH,DISP=SHR >//SMPOUT DD SYSOUT=* >//SMPRPT DD SYSOUT=* >//SMPLIST DD SYSOUT=* >//SYSPRINT DD SYSOUT=* >//SMPCNTL DD * > SET BDY(MVST100) . > BUILDMCS FORFMID( > XXXXXXX > ) . >/* > >and > >//S1 EXEC PGM=GIMSMP,REGION=0M,TIME=NOLIMIT >//SMPCSI DD DISP=SHR,DSN=ZOS18.GLOBAL.CSI >//SMPLOG DD DUMMY >//SMPLOGA DD DUMMY >//SMPLIST DD SYSOUT=X >//SMPRPT DD SYSOUT=X >//SMPOUT DD SYSOUT=X >//SYSPRINT DD SYSOUT=X >//SMPCNTL DD * > SET BOUNDARY (GLOBAL) > . > RECEIVE > SYSMODS > . >//SMPPTFIN DD DISP=SHR, >// DSN=SYSPROG.SMPPUNCH >//* > There is more to it than that. Read up on the BUILDMCS command in the SMP/E commands manual - but here are some comments: 1) The dlib zone should be used and not the target zone (unless ACCJCLLIN was not specified for the dlib zone). 2) The target and dlib zones should be at the same service level. That means either accepting all PTFs in apply status or restoring some. You have to decide which is better depending on what you are trying to accomplish. Usually accepting is what you want but not if one of the applied PTFs is PE'd. 3) This process does nothing for the global zone (sysmods in receive status that have not been applied). See GZONEMERGE or you will need to re-receive any sysmods you want to carry forward. 4) RECEIVE in the second example is only part of the process. You have to APPLY and ACCEPT the function (output of SMPPUNCH) from the first job. 5) Before you can do number 4 (APPLY/ACCEPT) you need to allocate target / dlib data sets. If you use DDDEFs in your original zone the easiest way to get them over is UNLOAD DDDEF and take that UCLIN output (also written to SMPPUNCH) and use it as input in another job pointing to your new zones. That of course needs to be done for the global, target and DLIB zones. That's all I can think of off right now. Regards, Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - GITO mailto:[EMAIL PROTECTED] z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/ Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html ---------------------------------------------------------------------- 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
