STATUS CODE

This field is returned by certain file-related statements (for example, CREATE, OPEN, READ, etc.) that result in a false condition, thereby setting the next true/false status indicator to F. STATUS CODE is a token field and contains a value indicating the reason for the I/O command failure, such as:

FI_AOF - Record Already on File (following a WRITE or REWRITE)

FI_EOF - End of File (following a READNEXT)

FI_NOF - Record Not in File (following a READ)

STATUS CODE can be used to set the primary key to the system message file (--- MESSAGE) to obtain a descriptive I/O error message, as shown in the example below.

        OPEN     TGL ACCTMS       SHARE? Y  FAIL 0 CACHE? N
  F     ERROR    Unexpected Error OPEN TGL ACCTMS (see error message below)
  F     SET      --- MESSAGE ID                 =  --- STATUS CODE
  F     READ     --- MESSAGE  HOLD 0 FT 0 BY MESSAGE ID
  FT    SET      --- TEMP 80                    =  --- MESSAGE TXT
  FT    ERROR        TEMP 80

The descriptive message is the same message that would be generated by setting the FAIL (or FT) parameter on the I/O statement appropriately (where 0=nothing, 1=warning, 2=error, 3=cancel).