Format/length: | I4 |
The system function
RET(program-name)
may be used to
receive the return code from a non-Natural program called via a
CALL
statement.
RET(program-name)
can be
used in an IF
statement and within the arithmetic statements
ADD
,
COMPUTE
,
DIVIDE
,
MULTIPLY
and
SUBTRACT
.
Example:
DEFINE DATA LOCAL 1 #RETURN (I4) ... END-DEFINE ... ... CALL 'PROG1' IF RET('PROG1') > #RETURN WRITE 'ERROR OCCURRED IN PROGRAM 1' END-IF ...