On 6/21/20 10:42 PM, Patrik Schindler
wrote:
Am 22.06.2020 um 05:12 schrieb Drew Derbyshire <swhobbit@...>
I found what job installed it (MVS0130 on the original TK3 CD). Seeing what that job renamed, I knew what to rename back & what to delete.
How about a short summary for making it easier to others searching for this information? Thanks!
Where's the fun in THAT?? My two line description...?
Delete the imposters.? I had a custom program (I wrote it
recently, in 1983) handy, you'll probably want IEHPROGM:
//AHDELMEM JOB AHD,A.H.DERBYSHIRE,
// CLASS=S,
// MSGCLASS=R,
// NOTIFY=AHD
/*JOBPARM ROOM=TSO,LINES=300
//*
//DROP EXEC PGM=DELETMEM
//STEPLIB DD DSN=AHD.UTILITY.LINKLIB,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSLIB DD DSN=SYS2.CMDLIB,DISP=SHR
//SYSIN DD *
-DLM H
-DLM HELP
//
Rename the archived members back to their real names:
//AHDRHELP JOB AHD,DERBYSHIRE-IEBUPDATE,CLASS=A,
// MSGCLASS=R,
// NOTIFY=AHD
//RENAME EXEC PGM=IEHPROGM
//SYSPRINT DD SYSOUT=*
//MVSRES DD DISP=OLD,UNIT=3350,VOL=SER=MVSRES
//SYSIN DD *
RENAME DSNAME=SYS1.CMDLIB,VOL=3350=MVSRES,MEMBER=OLDH,NEWNAME=H
RENAME DSNAME=SYS1.CMDLIB,VOL=3350=MVSRES,MEMBER=OLDHELP,NEWNAME=HELP
--
Drew Derbyshire
The less you bother me the sooner you'll get results
