Version 6.3.8 for OpenVMS	SEARCH   CONTENTS   |   PDF PAGE   PDF BOOKS   |   HOME   UP   PREV   NEXT

There are two types of Natural exit codes:

• Startup errors, where exit codes 0 and 1 indicate success and all other exit codes indicate errors.

• Errors generated by the TERMINATE statement, where exit codes 0 to 255 are possible.

Special Considerations for Natural on OpenVMS

If Natural fails during startup or is terminated by the TERMINATE statement, you can query the exit code from within a DCL file. Natural does not return low return code values such as "12" (startup error "Parameter module not found"). Instead, Natural adds the value "268,435,456" to the Natural error code. If this value were not added, the image run-down handler would interpret the value "12" as a Natural internal access violation and a system access violation message would be printed.

Exception

If Natural is terminated by using the TERMINATE statement with value 0, Natural exits with exit code 1. This is because under OpenVMS the C runtime makes no difference between an exit (0) and an exit (1) statement. In both cases, 1 is returned.

You can retrieve this error code in a DCL command file by inquiring the status value $STATUS. The example below shows how to retrieve the Natural exit code.

Recommendation

The value of $STATUS does not explain whether this is a startup error or an error generated by the TERMINATE statement. For Natural, the exit codes 1 to 99 are reserved for the startup errors. For that reason, use exit codes 100 to 255 for TERMINATE, otherwise you cannot not clearly indicate the reason for the exit.

Example

$    SET NOON
$    NAT :== $NATBIN:NATURAL.EXE
$    DEFINE/USER NATINPUT  SYS$INPUT
$    DEFINE/USER NATOUTPUT SYS$OUTPUT
$
$    nat parm=unknown
$
$! Note:
$!   %X10000000 is hexadecimal and stands for the decimal number 268,435,456
$!
$    status_value = $STATUS .AND. .NOT. %X10000000
$
$    IF status_value .GE. 100
$    THEN
$      WRITE SYS$OUTPUT "NATURAL terminates by using TERMINATE statement"
$    ELSE 
$      IF status_value .EQ. 1
$      THEN
$        WRITE SYS$OUTPUT "NATURAL terminates successfully"
$      ELSE
$        WRITE SYS$OUTPUT "NATURAL terminates with startup error " + "''status_value'"
$      ENDIF
$    ENDIF
$
$    EXIT

Natural Startup Errors

The following exit codes may occur when starting Natural.

www.softwareag.com

Copyright © 1984-2010 Software AG, Darmstadt, Germany.

SEARCH   CONTENTS   |   PDF PAGE   PDF BOOKS   |   HOME   UP   PREV   NEXT