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
|
22 (X'16') |
2 |
TEPANMLY |
Preserved initial TEPAFLAG1, 2, and 3 values. |
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. |