We do something similar for IEBCOPY. We add FTBIEBC as an alias. Not
sure it is the most efficient or best way, but it works:
//STEP005 EXEC SMPE,CSI=SMPE.ZOS110.GLOBAL.CSI
//SMPOUT DD SYSOUT=*
//SYSIN DD *
SET BDY (GLOBAL).
REJECT S(MSYS012) BYPASS(APPLYCHECK).
RECEIVE SYSMODS.
SET BDY (MVSTZN).
RESTORE S(MSYS012) .
APPLY SELECT(MSYS012).
/*
//SMPPTFIN DD DATA,DLM=ZZ
++USERMOD (MSYS012)
/* ADD ALIAS FTBIEBC TO IEBCOPY
*/.
++VER (Z038) FMID(HDZ1A10) .
++MOD(IEBCOPY) LKLIB(LINKLIB).
++ JCLIN.
//S1 EXEC LINKS,PARM='LET,LIST,MAP,NCAL',NAME=LINKLIB
//SYSLIN DD *
INCLUDE LINKLIB(IEBCOPY)
ORDER IEBCOMCA(P),IEBCOMCB(P) COMMON AREA
ORDER IEBDSCPY(P)
ORDER IEBESTIN
ORDER IEBESTAB
ORDER SNAPDCB,IEBDSCP2
ORDER IEBDSBAM,IEBDSPRM,IEBDSCLK
ORDER IEBCFAMS,IEBCFIOX
ORDER IEBCPMOD
ORDER IEBCRDC
ORDER IEBDRB
ORDER IEBDRD
ORDER IEBDSU
ORDER IEBDSWCP
ORDER IEBDV0,IEBDVD$C,IEBDVSQ
ORDER IEBDWR
ORDER IEBMCM
ORDER IEBRSAM
ORDER IEBSCN
ORDER IEBVCT
ORDER IEBVDM
ORDER IEBVTM
ORDER IEBVTT
ORDER IEBWSAM
ORDER IEBWSU
ORDER IEBIOE
ORDER IEBCMSG,IEBCMSG1
ORDER IEBCNVT
ORDER IEBPRINT
ORDER IGG019S9(P)
ORDER IGG019C9(P)
SETCODE AC(1)
MODE AMODE(24),RMODE(24)
ENTRY IEBDSCPY
ALIAS IEBDSCPY
ALIAS FTBIEBC
NAME IEBCOPY(R)
/*
ZZ
//
_________________________________________________________________
Dave Jousma
Assistant Vice President, Mainframe Services
[email protected]
1830 East Paris, Grand Rapids, MI 49546 MD RSCB1G
p 616.653.8429
f 616.653.8497
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On
Behalf Of Todd Last
Sent: Wednesday, July 08, 2009 10:36 AM
To: [email protected]
Subject: Re: SMPE usermod sample
I have a similar SMPE usermod question... I need to add an alias to
FTP (called Z062016). In the past I have relinked the module outside
of SMPE and then updated SMPE using a usermod. It isn't very clean
and it causes modid problems when I apply new TCPIP maintenance. I'm
wondering if someone can show me the correct way. This is what I
have done in the past...
This e-mail transmission contains information that is confidential and may be
privileged. It is intended only for the addressee(s) named above. If you
receive this e-mail in error, please do not read, copy or disseminate it in any
manner. If you are not the intended recipient, any disclosure, copying,
distribution or use of the contents of this information is prohibited. Please
reply to the message immediately by informing the sender that the message was
misdirected. After replying, please erase it from your computer system. Your
assistance in correcting this error is appreciated.
----------------------------------------------------------------------
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
