EXIT-PROCEDURE Terminate procedure

EXIT-PROCEDURE terminates the current procedure and returns job control to the calling level.

The specification ERROR=*YES initiates error handling if SUBCODE1 is not zero.

EXIT-PROCEDURE

ERROR = *NO (...) / *YES(...)
	*NO(...)
			SUBCODE2 = 0 / < integer 0..255>
			,MAINCODE = CMD0001 / <alphanum-name 7..7>
	*YES(...)
			SUBCODE1 = 64 / <integer 0..255>
			,SUBCODE2 = 0 / <integer 0..255>
			,MAINCODE = SDP0018 / <alphanum-name 7..7>
,RESUME-PROGRAM = *NO / *YES

Return codes

If execution of the EXIT-PROCEDURE command itself results in an error, control is not returned to the caller; instead, one of the following return codes is passed:

(SC2)	SC1	Maincode	Meaning
	0	CMD0001	No error
	1	CMD0202	Syntax error
	3	CMD2203	Incorrect syntax file
	32	CMD0221	System error (internal error)
	130	SDP0099	No further address space available