I never RESTORE/REJECT a usermod. I update the usermod with current FMID and
REWORK date and reAPPLY. Here's an example for a console usermod, which has
continued for years unchanged except the fields I mentioned.
FMID updated for 2.1 to HBB7790. REWORK updated to then-current date 20141710.
The only other change sometimes required is if an IBM PTF happens to hit the
same element. I would then install the PTF with BYPASS(ID)--the only time I
would ever do that; PRE the PTF in the usermod; RECEIVE the usermod with higher
REWORK date; then APPLY REDO the usermod. RESTORE/REJECT is not necessary.
//SYSIN DD *
SET BDY(GLOBAL) .
RECEIVE SYSMODS S(CONS001) .
SET BDY(MVST100) .
APPLY S(CONS001) REDO .
UCLIN .
REP SAMP(IEECMDPF) RMID(CONS001) .
ENDUCL .
//SMPPTFIN DD DATA,DLM=$$
++USERMOD(CONS001) REWORK(20141710)
/* This usermod assembles and links SAMPLIB member
IEECMDPF, which allows one to direct console
commands via SYSID prefix rather than ROUTE.
No changes are made to the sample, but UCLIN
sets the RMID in case a future PTF requires the
member to be reassembled.
*/ .
++VER(Z038) FMID(HBB7790) /* ZOS R21 */ .
++ JCLIN .
//ASM EXEC PGM=IEV90,PARM='DECK,NOOBJ,XREF(SHORT)'
//SYSIN DD DDNAME=SAMPLIB
//SAMPLIB DD DSN=SYS1.SAMPLIB(IEECMDPF),DISP=SHR
//SYSPUNCH DD DSN=SYS1.SYSPUNCH(IEECMDPF),DISP=SHR
//LINKEDIT EXEC PGM=IEWL,PARM='XREF,LIST,LET,NCAL,AC=1'
//SYSLMOD DD DSN=SYS1.LINKLIB,DISP=SHR
//SYSPUNCH DD DSN=SYS1.SYSPUNCH,DISP=SHR
//SYSLIN DD *
INCLUDE SYSPUNCH(IEECMDPF)
NAME IEECMDPF(R)
++SRC(IEECMDPF) DISTLIB(ASLIB01) TXLIB(SAMPLIB) .
$$
.
.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-302-7535 Office
[email protected]
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Hardee, Chuck
Sent: Friday, April 22, 2016 3:18 PM
To: [email protected]
Subject: (External):SMP/E question
Hello Everyone,
I am having an issue with doing a RESTORE/REJECT on some mods that were last
applied with the SMP/e that came with z/OS 1.13.
I am now on z/OS 2.2 and this is the first RESTORE/REJECT I am trying to
execute in order to reengineer a usermod.
Thanks,
Chuck
Charles (Chuck) Hardee<mailto:[email protected]>
Senior Systems Engineer/Database Administration EAS Information Technology
Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1
(412) 877-2809 | FAX: +1 (412) 490-9230
[email protected]<mailto:[email protected]> |
www.thermofisher.com
WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of this
e-mail or the information herein by anyone other than the intended recipient,
or an employee or agent of a system responsible for delivering the message to
the intended recipient, is prohibited. If you are not the intended recipient,
please inform the sender and delete all copies.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
[email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
