The JSON-STATUS special register is used to indicate either that a JSON PARSE statement executed successfully or that a nonexception condition occurred during the JSON parse operation.
The JSON-STATUS special register has the implicit definition:
01 JSON-STATUS PICTURE S9(9) USAGE BINARY VALUE 0.
When used in nested programs, this special register is implicitly defined with the global attribute in the outermost program.
During execution of a JSON PARSE statement, nonexception conditions result in reason codes in the JSON-STATUS special register, but do not terminate execution of the statement. At termination of a JSON PARSE statement, JSON-STATUS contains either zero, indicating successful completion of the JSON parse operation, or a nonzero status value, representing one or more nonexception conditions that occurred prior to the exception condition. JSON-STATUS reason codes are detailed in Nonexception conditions and corresponding values of JSON-STATUS.