Hello list, If a PDS module library define in lnklst has multiple extents, is it OK to use dynamic lnklst command to reduce the secondary extent number?
1.STOP LLA P LLA 2.Delete modules with too many extents SETPROG LNKLST,DEFINE,NAME=PROD01,COPYFROM=CURRENT SETPROG LNKLST,DELETE,NAME=PROD01,DSNAME=MODULE.NAME SETPROG LNKLST,ACTIVATE NAME=PROD01 SETPROG LNKLST,UPDATE,JOB=* 3.Use ISPF panel to change module.name to other name like: MODULE.NAME.OLD 4. Allocate new PDS and use ISPF 3.3 to copy all moudles from old PDS to new one 5.Add new PDS back to LNKLST SETPROG LNKLST,DEFINE,NAME=PROD02,COPYFROM=CURRENT SETPROG LNKLST,ADD,NAME=PROD02,DSNAME=MODULE.NAME,VOLUME=MODVOL,ATBOTTOM SETPROG LNKLST,ACTIVATE NAME=PROD02 SETPROG LNKLST,UPDATE,JOB=* 5.Start LLA S LLA If the module is share across several systems do: F LLA,REFRESH Delete module.name from lnklst PROGXX LNKLST DEFINE NAME(PROD01) COPYFROM(CURRENT) LNKLST DELETE NAME(PROD01) DSNAME(MODULE.NAME) LNKLST ACTIVATE NAME(PROD01) LNKLST UPDATE JOB(*) Add MODULE.NAME back to LNKLST PROGXX LNKLST DEFINE NAME(PROD02) COPYFROM(CURRENT) LNKLST ADD NAME(PROD02) DSNAME(MODULE.NAME) VOLUME(MODVOL) ATBOTTOM LNKLST ACTIVATE NAME(PROD02) LNKLST UPDATE JOB(*) Done! Is there a need to IPL? Is the DEB rebuilt? Regards Victor __________________________________________________ Do You Yahoo!? 雅虎免费G邮箱-中国第一绝无垃圾邮件骚扰超大邮箱 http://cn.mail.yahoo.com/?id=77071 __________________________________________________ Do You Yahoo!? 雅虎免费G邮箱-中国第一绝无垃圾邮件骚扰超大邮箱 http://cn.mail.yahoo.com/?id=77071 ---------------------------------------------------------------------- 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