COBCH1430 PERFORM only allowed in TRY CATCH or SYNC block with PERFORMTYPE(MF)

The program has been compiled using the PERFORM-TYPE directive with a parameter other than the default of MF, and contains an out-of-line perform statement within a TRY or SYNC block. This is not supported.

Resolution:

Either edit the code to remove out-of-line perform statements within TRY and SYNC blocks and then recompile as before, or recompile using the default PERFORM-TYPE(MF) setting.

Example:

In the following example, remove the $set statement to invoke the default perform-type(mf) directive.

      $set perform-type(osvs)
           try
               perform p1
           catch e as type System.Exception
               display "In catch"
           end-try
           goback.

       p1.
           display "In performed paragraph"