z/OS DFSMS Installation Exits
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


Label Anomaly Exit (IFG019LA) Function-Specific Parameter List

z/OS DFSMS Installation Exits
SC23-6850-01

The following figure is the format of the function-specific parameter list for the Label Anomaly Exit. See Table 1 for a description of the main parameter list.

Table 1. Label Anomaly Exit Parameter List
Offset Length or Bit Pattern Name Description
00 (X'00')   TEPA Label anomaly exit parameter list
00 (X'00') 8 TEPAID Control block identifier
08 (X'08') 4 TEPALEN Length of parameter list
12 (X'0C') 1 TEPAVER Version of parameter list (1)
13 (X'0D') 3   Reserved
16 (X'10') 1 TEPAFLAG1 Flags. Bits that tell the reason for the problem on the tape. More than one bit can be on. If the exit does not find any bit on that represents a problem it was designed to handle, then it should return with the return code that causes no action.
1... .... TEPALTYPE Label type conflict
.1.. .... TEPADENS Density conflict
..1. .... TEPASERIAL Volume serial conflict
...1 .... TEPAVERS Label version conflict
.... 1... TEPAIOE I/O error while reading first block and RACF protection is not active
.... .1.. TEPANCAP Drive not capable, such as a 36-track tape on an 18-track drive
.... ..1. TEPACLEN Unsupported cartridge length
.... ...1 TEPACHKPT Writing a checkpoint to an unsecure volume
17 (X'11') 1 TEPAFLAG2 Flags. Bits that tell the reason for the problem on the tape. More than one bit can be on.
1... .... TEPAUSRVLAB ISO/ANSI user volume labels or VOL 2-9 labels are about to be overwritten.
.1.. .... TEPAVINFO Volume label information is needed to write the volume label.
..1. .... TEPANOCKPT Writing a non-checkpoint data set to checkpoint volume
...1 .... TEPANINIT Volume on a 3590 device is not formatted
.... 1... TEPAUCKPS When on, instructs O/C/EOV to unconditionally resolve checkpoint conflicts on this scratch volume
.... .1.. TEPAUCKPP When on, instructs O/C/EOV to unconditionally resolve checkpoint conflicts on this private volume
.... ..1. TEPATRKC Track conflict. A 36-track tape volume mounted on a 18-track only tape drive.
18 (X'12') 1 TEPAFLAG3 Flags. Bits that tell the reason for the problem on the tape. More than one bit can be on.
1... .... TEPABYRACF Bypass RACF RACDELETE option is active.
.1.. .... TEPAEXSKIP When on, instructs O/C/EOV to not do RACDELETE.
..1. .... TEPAABEND Job abends when return code is 8.
...1 .... TEPAOUTSEQ Unexpected tape volume sequence number – next volume to process has a sequence number that is not as expected based on the current volume's sequence number. Job abends with message IEC709I when return code is C.
.... 1... TEPARDFMLV Last tape volume missing – processed last volume specified but it had an EOV label, not an EOF label. Job abends with message IEC710I when return code is C.
.... .1.. TEPARDBMLV When reading backward, the last specified volume for the standard labeled data set is not the actual last volume because it does not end with an EOF label. Job abends with message IEC711I when return code is C.
.... ..1. TEPARDFMFV First volume missing when reading forward – the first volume in the list does not begin with logical volume sequence number 1. Job abends with message IEC712I when return code is C.
.... ...1   Reserved
19 (X'13') 1 TEPALVR Current ISO/ANSI version of the tape
20 (X'14') 2 TEPACSWST "CSW" status bytes that the system received when reading the label. Unit exception will show if the system read a tape mark,and the length of the label will be zero. The I/O errors will show one of these:
  • Drive incapable. (For example if it is a 36-track tape on an 18-track drive, then the system might still be able to move the actual volume serial from the sense bytes to the place in the input area, which will otherwise be blank.) If the system was not able to read the volume label because it is a 36-track tape on an 18-track drive, then the exit can give permission to rewrite the labels without getting all the volume label contents or reading the header labels. This means the exit is taking responsibility for the data sets being expired. The exit will provide the volume serial and the owner information. The system will still call RACF for the volume but without the header label information.
  • Data check
  • Other
Start of change22 (X'16')End of change Start of change2End of change Start of changeTEPANMLYEnd of change Start of changePreserved initial TEPAFLAG1, 2, and 3 values.End of change
1 TEPANMLY2  
...1 .... TEPASEQ IEC709I vols out of sequence
.... 1... TEPAFML IEC710I read forward missing last volume
.... .1.. TEPABML IEC711I read backward missing last volume
.... ..1. TEPAFMF IEC712I read forward missing first volume
5 TEPANMLY3  
30 (X'1E') 4 TEPAVOLLST Pointer to an optional volume list initialized by the exit. This is a list of the remaining volumes after the volume passed back from the exit in TEPMVOL, to the end of the multivolume data set being read. TEPMVOL contains the next volume in sequence to read in order to recover from an IEC709I, IEC710I, IEC711I or IEC712I condition. The exit selects a recovery option by returning a 04 return code, turning off the anomaly indicator in the parameter list, and supplying the next volume to read in TEPMVOL. This optional volume list ensures that all the remaining volumes will be processed in the same sequence order that they were created. This is an optional pointer to storage containing all zeros. The LABAN exit can initialize this storage with a list of the remaining volumes after the volume passed back from the exit in TEPMVOL, to the end or last volume of the multivolume data set being read. The exit does not need to indicate the end of the volume list. Instead a null volser (that is, with all zeros for six bytes) marks the end of the list.
34 (X'22') 6 TEPAPREVL Volume serial of previous volume. Defined only if caller is EOV and the current volume is for the same DD statement as the previous volume.

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014