Pro2 Processor Library procedures are generated with the below code(example from sports database). There is a CREATE statement to create the record, an attempt to RAW-TRANSFER the data from the raw field into the buffer, then a LEAVE. That leaves an empty buffer in the procedure which could result in errors downstream. The code should be changed to delete the temp-table buffer as the last task before executing the LEAVE.
 

/* If here, Event is C or W. Get the Source Record */
CREATE bfrSrcOrder.
RAW-TRANSFER bfrQueue.rawdata TO bfrSrcOrder NO-ERROR.
IF ERROR-STATUS:ERROR THEN DO:
    /* Error in RAW Transfer SKIP and go to the next queue record */
    ASSIGN ostrStatus = "ERROR"
         ostrMsg = "Table sports.Order: "
         ostrMsg = ostrMsg + "Record " + strRecordID + " - "
         ostrMsg = ostrMsg + "RAW-TRANSFER failed. Cannot replicate.".
    DO intCount = 1 TO ERROR-STATUS:NUM-MESSAGES:
      ostrMsg = ostrMsg + "~n" + ERROR-STATUS:GET-MESSAGE(intCount).
    END.
    LEAVE ProcBlock.
END.

The exact cause is not known at this time.

 

Fixed version(s): Pro2 6.6, Pro2 6.5.3

The information provided here may reference versions that are not generally available at the time of writing. If any questions, then please contact Technical Support.

Modify the processor library template being used to generate code that deletes the empty temp-table buffer before the LEAVE executes:

/* If here, Event is C or W. Get the Source Record */
CREATE bfrSrcOrder.
RAW-TRANSFER bfrQueue.rawdata TO bfrSrcOrder NO-ERROR.
IF ERROR-STATUS:ERROR THEN DO:
    /* Error in RAW Transfer SKIP and go to the next queue record */
    ASSIGN ostrStatus = "ERROR"
         ostrMsg = "Table sports.Order: "
         ostrMsg = ostrMsg + "Record " + strRecordID + " - "
         ostrMsg = ostrMsg + "RAW-TRANSFER failed. Cannot replicate.".
    DO intCount = 1 TO ERROR-STATUS:NUM-MESSAGES:
      ostrMsg = ostrMsg + "~n" + ERROR-STATUS:GET-MESSAGE(intCount).
    END.
    DELETE bfrSrcOrder.
    LEAVE ProcBlock.
END.