How To allow the U11RMS step to stop when HSM uncatalog errors occur?
Article ID: 53324
Updated On:
Products
Issue/Introduction
PTF RO02225 allows you to stop the U11RMS step when HSM uncatalog errors occur. In addition, you can now echo messages to the joblog that previously only printed in the U11RMS step. You also have the ability to add the IDCAMS message table to the U11OPT table to perform a certain action on the IDCAMS message: PRINT, NOPRINT (to suppress from the RMS report) and ABEND.
Environment
Component: 11
Resolution
Prior to PTF RO02225, the output of the U11RMS step only displays a message when the HSM uncatalog fails. This would later result in the job failing on the migrated dataset. With this PTF, you can optionally code a table entry in the CA 11 options module (U11OPT) that if the HSM uncatalog is unsuccessful, allows the U11RMS step to abend. The U11RMS step will abend with an U0999 abend. If there is an entry that matches for the ABEND action for the L7@TARCH and L7@TIDCM tables, you will see the following message along with the U0999 abend:
U11-UCS-01 USER TABLE SPECIFIED ABEND - ARCHDEL RC=xxxx
CA 11 uses the IBM ARCHDEL macro to uncatalog HSM migrated datasets. One reason for the bad ARCHDEL RC is that the HSM processing is on hold. An optional table now is added to the U11OPT options that will allow you to indicate what action to take if the ARCHDEL macro gets a specific RETURN code. The HSMVOL parm in the CA 11 configuration file must match the volume in the catalog, for example: HSMVOL=MIGRAT
Below is an example of the change to the installation U11OPT module:
TITLE 'U11OPT - CA-11 OPTION TABLE'
U11OPTBL SVC=xxx,
...
TARCH=YES, <- Add ARCHDEL table
TYPE=CSECT
*
*
* TARCH TABLE HAS ACTIONS TO TAKE FOR ARCHDEL ERROR
*
L7@TARCH START
L7@TARCH ENTRY,RC=74,CC=12,ACTION=ABEND
L7@TARCH ENTRY,RC=100,CC=4,ACTION=ABEND
L7@TARCH END
*
L7@TARCH DSECT
END,
In this example when ARCHDEL error RC=74,CC=12 or RC=100,CC=4 occurs the U11RMS step will abend.
PTF RO02225 now also gives you the ability to echo messages to the job log that before would only print in the U11RMS step. Below is an example of the change to echo message "U11-117":
TITLE 'U11OPT - CA-11 OPTION TABLE'
U11OPTBL SVC=xxx,
...
TEMSG=YES, <- Add Echo table
TYPE=CSECT
*
* TEMSG TABLE HAS RMSRPT MSGS TO ECHO TO JOB LOG
*
L7@TEMSG START
L7@TEMSG ENTRY,MSGID='U11-117',ACTION=ECHO
L7@TEMSG END
*
L7@TEMSG DSECT
END,
Another optional table that is now available to be added to the U11OPT table is the IDCAMS message table. This can be used to perform a certain action on IDCAMS message: PRINT, NOPRINT (to suppress from the RMS report) and ABEND. The current CA 11 logic only prints messages from IDCAMS that beginning with "IDC".
All other messages issued by the IDCAMs utility are suppressed. This logic is the same as specifying the following two entries below:
TITLE 'U11OPT - CA-11 OPTION TABLE'
U11OPTBL SVC=xxx,
...
TIDCM=YES, <- Add IDCAMS table
TYPE=CSECT
*
* TIDCM TABLE HAS ACTIONS TO TAKE FOR IDCAMS MSGS
*
L7@TIDCM START
L7@TIDCM ENTRY,MSGID='IDC',ACTION=PRINT,
ENV=ANY
L7@TIDCM ENTRY,MSGID=ANY,ACTION=NOPRINT,
ENV=ANY
L7@TIDCM END
*
L7@TIDCM DSECT
END,
NOTE:
Once RO02225 has been applied, and U11OPT has been modified to add the desired entries for TARCH=YES and L7@TARCH, you will need to assemble and link U11OPT using AL7UOPT job provided in SAMPJCL library for CA 11. After U11OPT has been successfully assembled and linked you will need to cycle DBAS to bring in the new U11OPT. If you have PTF QO92310 applied to your system, you may perform the REFRESH command to pick up the changes instead of having to cycle DBAS.
Feedback
