DEFINE TEMP-TABLE tt_table NO-UNDO LIKE ms_table.
    DEFINE VARIABLE rawField AS RAW NO-UNDO.
    DEFINE VARIABLE cUnequalFields AS CHARACTER NO-UNDO.

    FOR EACH oe_table NO-LOCK:
        BUFFER-COPY oe_table TO ms_table.
        BUFFER-COMPARE oe_table TO ms_table SAVE result in cUnequalFields.
        IF cUnequalFields <> '':U THEN DO:
            RAW-TRANSFER oe_table TO rawField.
            OUTPUT TO ./oe_table.bin.
            PUT control rawField.

            RAW-TRANSFER ms_table TO rawField.
            OUTPUT TO ./ms_table.bin.
            PUT control rawField.

            CREATE tt_table.
            BUFFER-COPY oe_table TO tt_table.
            RAW-TRANSFER tt_table TO rawField.
            OUTPUT TO ./tt_table.bin.
            PUT control rawField.

            RETURN ERROR.
        END.
    END.