|© 1998-2017 GSF Software LLC|
The SCRATCH utility command deletes PDS members and empties libraries in the TSO/E on-line and batch environments of MVS/ESA V5, OS/390 and z/OS. SCRATCH uses the same protection scheme as ISPF and the linkage-editor to prevent concurrent updates to the partitioned data set it updates. SCRATCH can be used to delete a single member, multiple members, or all the members in the specified PDS or PDSE.
SCRATCH helps application programmers, systems programmers and consultants delete members from specified libraries or reset them to empty status in a safe manner using DISP=SHR.
SCRATCH is an affordable product. A free, time-limited version is available for evaluation.
SCRATCH is a TSO/E command and standard TSO/E rules for command syntax apply. Below is a list of options and parameters which can be specified. Please refer to the sample JCL for coding examples.
|EXCLUDEMEMBERS(member filters 2)||n/a|
Al least one member name must be specified in the SCRATCH command, otherwise processing terminates. The user specifies which member (or members) should be scratched as follows:
When LLAREFRESH is specified, SCRATCH issues the LLACOPY macro for each member successfully scratched from the specified PDS. Furthermore, when COMPRESS and LLAREFRESH are both specified, SCRATCH also issues LLACOPY after the end of the compress operation for each member remaining in the PDS or PDSE. The LLAREFRESH option only applies to load-libraries and is ignored if the RECFM of the PDS or PDSE is not equal to U.
LLAREFRESH requires special authorisation, i.e. the SCRATCH command must be:
SCRATCH runs in four different modes:
The following sample job stream shows how to set up a TMP job step to execute several SCRATCH commands in a batch job.
//SCRATCH1 JOB (acct#),'SCRATCH PDS Members',CLASS=U,MSGCLASS=H //* //* Scratch PDS Members - Examples //* //SCRATCH EXEC PGM=IKJEFT01 //STEPLIB DD DSN=<SCRATCH Load Library>,DISP=SHR //SYSTSPRT DD SYSOUT=* //SYSTSIN DD * /* Scratch a single member */ SCRATCH 'GSFSOFT.FILE183.PDS(FASTPATH)' /* Scratch several members and compress */ SCRATCH 'GSFSOFT.FILE183.PDS' + MEMBERS(FASTPATH,COMPR*,ROUTE*) + COMPRESS /* Empty (reset) a load-library and compress it */ SCRATCH 'GSFSOFT.TEST.LOAD' MEMBERS(*) /* Delete specified load-modules and remove them from LLA */ SCRATCH 'STAGE.LINKLIB2' MEMBERS(ABC* *JKL*) XMEM(*123 ABC%%EE) LLA /*
SCRATCH can also run as a batch program with reduced JCL requirements. When running as a batch program, the following functions are not available: COMPRESS, SHR, OLD, LLAREFRESH, SETMSG, VOLUME. Other options can be specified in the PARM field as shown in the examples below.
The following sample job stream shows how to delete a single PDS member, or several members in a batch job.
//SCRATCH2 JOB (acct#),'SCRATCH PDS Member',CLASS=U,MSGCLASS=H //JOBLIB DD DSN=<SCRATCH Load Library>,DISP=SHR //* //* Scratch single PDS Member //* //SINGLE EXEC PGM=SCRATCH //SYSLIB DD DSN=GSFSOFT.FILE183.PDS(FASTPATH),DISP=SHR //* //* Scratch multiple PDS Members in TEST mode //* //MULTIPLE EXEC PGM=SCRATCH,PARM='MEM(ABC* *JKL*) XMEM(*PROD) TEST' //SYSLIB DD DSN=GSFSOFT.FILE183.PDS,DISP=SHR //* //* Empty a PDS or PDSE //* //RESET EXEC PGM=SCRATCH,PARM='MEM(*)' //SYSLIB DD DSN=GSFSOFT.FILE183.PDS,DISP=SHR //* //* Empty a PDS (alternate PARM) //* //RESET2 EXEC PGM=SCRATCH,PARM=RESET //SYSLIB DD DSN=GSFSOFT.FILE183.PDS,DISP=SHR
SCR006E LOCATE failed for dsname, return code is rc. SCR007E dsname is not a disk data set. SCR008E dsname not found on volume, OBTAIN RC=rc. SCR009E dsname is not a partitioned data set. SCR012W Member member was not found in the PDS directory. SCR013W Pattern member did not match any PDS directory entry. SCR017I Member member successfully deleted. SCR018I Member member successfully deleted per filter(filter) SCR019W Member member could not be deleted, STOW RC=nn SCR021W PDS successfully reset using STOW. SCR022W PDSE successfully reset using STOW. SCR051E Invalid PARM Address: xxxxxxxx SCR052E IKJTSOEV Failed, RETCODE=rc, REASON=reason, INFO=info SCR052E RDJFCB Failed for DDN=SYSLIB, RC=nn SCR073I PDS was successfully compressed - IEBCOPY RC=0 SCR074E COMPRESS failed for dsname, IKJEFTSR R15=rc, RETCODE=return-code, REASON=reason, ABEND=abend-code SCR075I <IEBCOPY SYSPRINT message> SCR091I SCRATCH successful for dsname, now nnn% full.
Search key-words: ibm mainframe main-frame mvs esa os/390 z/os os390 zOS TSO ISPF CLIST REXX IEHPROGM IEBUPDTE IDCAMS mass delete through JCL deleting deletion scratch scratching erase erasing except member exception including retrieve 1 2 3 4 5 6 7 8 9 members pds clearpds pdsclear pdse pdses DSORG=PO directory corrupt directories empty emptying reset resetting clear clearing remove removing select selecting selected exclude excluded library libraries dataset datasets file files enq spfedit sysiewlp load-library load-libraries loadlib lib load-module load-modules program library utility program object objects pdsempty pdsreset pds/e binder linkage editor linkedit link edit lked load object module modules generic delmbr scrmbr mbrdel mbrscr scrpds scratchm mscratch scrtch via wildcard wildcards wild-card wild-cards partially-qualified fully-qualified start pdsman pdsfast tips löschen over write overwrite dienstprogramm utilitario utilitaire need specific zero clean-up clean-out ieb ieh