Return Codes From PARTREL

Control returns to the instruction following the last instruction generated by the PARTREL macro. Register 15 contains the applicable PARTREL return code.

If an error occurs, PARTREL issues message IEC614I, consisting of failure-related status information.

If an error results from a CVAF function, the subfunction return code field contains the CVAF return code, and the subfunction reason code field contains the CVAF status code (CVSTAT).
If an error results from the execution of an EXCP channel program, the subfunction return code and reason code fields contain either:
- The ECB completion code and the CSW channel status, if the ECB completion code is not X'41' and the channel status is not zero.
- The sense bytes (two) from the IOB, if the ECB completion code is X'41' and there is no channel status.
If an error results from an RACF® invocation, the subfunction return code and reason code fields contain the RACF return code and reason code.

Table 1 describes the conditions indicated by the PARTREL return code.

Exception: This is a cumulative list of DADSM partial release return codes. Some of these codes might not apply to the PARTREL macro.

Table 1. DADSM PARTREL Return Codes
Return Code	Description
0(X'00')	Sucessful
2(X'02')	Unable to find extent in format-1 or format-8 DSCB.
3(X'03')	Exceeded maximum number of format-3 pointers in format-9 DSCB.
4(X'04')	Unable to find extent in format-3 DSCB.
8(X'08')	Either the required SYSZTIOT or SYSDSN ENQ failed, or an unrelated DEB indicates that another DCB is open to the data set.
12(X'0C')	Invalid parameter list.
16(X'10')	One of the following conditions occurred: A permanent I/O error occurred. CVAF provided an unexpected return code. An installation exit rejected the request. An I/O error occurred while the tracks to be released were being erased (for ERASE-on-SCRATCH).
20(X'14')	DSN, or DSN pointer is invalid.
24(X'18')	Invalid UCB pointer.
28(X'1C')	Specified DSORG is not supported.
32(X'20')	No room in the VTOC.
36(X'24')	Invalid TIOT=NOENQ request; caller does not have exclusive use of SYSDSN.
40(X'28')	An error occurred while SMS was processing the request.
44(X'2C')	CLOSE is the caller, user rejected the partial release using the PREEXIT routine.
48(X'30')	An error occurred during conversion from CCHH to relative track address.
52(X'34')	An error occurred during conversion from relative track address to CCHH.
56(X'38')	An error occurred during conversion from new extent descriptor table to old extent descriptor table.
60(X'3C')	An error occurred during sort conversion of the extent descriptor table.
64(X'40')	An error occurred during conversion from format-7 to extent descriptor table.
68(X'44')	An error occurred during conversion from format-5 to extent descriptor table.
72(X'48')	Input DSCB is not a format-5 or a format-7 DSCB.
76(X'4C')	An error occurred during conversion from extent descriptor table to format-7.
80(X'50')	An error occurred during conversion from extent descriptor table to format-5.
84(X'54')	VSAM standard format data set incorrectly specified. If the data set is VSAM, it must be extended format.
88(X'58')	VSAMTRKS address parameter must be specified when VSAMTYPE is specified.
92(X'5C')	The name of the specified VSAM data set is not a VSAM cluster data component.
96(X'60')	Catalog call to partial release failed.
100(X'64')	Request was directed to a VSAM data set defined with guaranteed space.
104(X'68')	Unexpected reason code received back from a call to catalog services.
108X'6C')	Unable to find enough F0s to complete the PARTREL request.
112(X'70')	DAPCCHH passed is in cylinder-managed space, but is not on a multi-cylinder unit boundary.