On Thu, 2 Jul 2009 20:47:47 -0400, Jeffery Swagger <jeff...@comcast.net> wrote:
>Yes, but this strikes me as incomplete.
>
>I did try an APPLY CHECK of the proposed USERMOD (minus the JCLIN) and
>it appeared to produce the desired result.
>In that a ++EXEC element would be created (target library SISPEXEC) with
>an ALIAS of ONLY copied from SISPSAMP.
>
>However, here's the problem. The shipped IBM element ++SAMP(ISRONLY) has
>no updates associated with it.
>This is telling me, and I could be wrong, that IBM could ship a PTF to
>ISRONLY, and then my ++EXEC is
>out-of-sync because IBM knows nothing of a ++EXEC(ISRONLY). Uh Oh
>
>It seems to me that a complete solution to this problem requires that
>the ++SAMP(ISRONLY) must have the RMID updated.
>That way, if there is an IBM PTF, then SMP/E will detect a MODID error.
>
You are correct. But that isn't part of the USERMOD MCS in this case, it
would be done with UCLIN via SMPCNTL input. See the archives for past
examples of doing this when assembling sample source.
But for completeness in this thread, here is what it would look like (leaving
out the JCLIN per Kurt):
//SMPPTFIN DD DATA,DLM=$$
++USERMOD (UMISPMZ) .
++VER (Z038) FMID(HIF5H02) .
++EXEC(ISRONLY) DISTLIB(AISPEXEC) ALIAS(ONLY)
SYSLIB(SISPEXEC) TXLIB(SISPSAMP).
$$
//SMPCNTL DD *
SET BOUNDARY (tgt_zone) .
APPLY
SELECT (UMISPMZ).
UCLIN .
REP SAMP(ISRONLY) RMID(UMISPMZ).
ENDUCL.
/*
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:mark.zel...@zurichna.com
z/OS 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
