PowerFORM Runtime V11.0 Reference

6.11 Obtaining the Return Code

• Format

  Check the FILE STATUS clause after execution.

• Function

  The return code is stored in the FILE STATUS clause. See Trouble Analysis and Recovery ,"Trouble Analysis and Action" for details on the return codes.

• Parameter

  None

• Example

  Check whether an error occurred on output.

  MOVE "SAMP" TO PRT-FORMAT.
  MOVE "S001" TO PRT-GROUP.
  WRITE record-name.
  IF PRT-STATUS = "CX" THEN.
  ~  Processing if the outputting error is occurred in the field group  S001  ~
  END-IF.
    ~  Program error processing  ~