DECLARE
    OUT_ERROR_MESSAGE       VARCHAR2( 1024 );
    OUT_RETURN_CODE         NUMBER;
    OUT_TMP_TABLE_LIST      VARCHAR2(32000);
    IN_LOCK_GROUP_STR       VARCHAR2(100) := NULL;
BEGIN
    BEGIN
       EXECUTE IMMEDIATE 'DROP TABLE TEST_RECALC_BO';
    EXCEPTION WHEN OTHERS THEN
       DBMS_OUTPUT.PUT_LINE('SQLERRM = '|| SQLERRM);
    END;
    EXECUTE IMMEDIATE 'CREATE TABLE TEST_RECALC_BO AS SELECT ROWID_OBJECT FROM C_CONSUMER';'
    CMXBV.RECALCULATE_BO ('C_CUSTOMER', 'TEST_RECALC_BO', 'TNEFF', IN_LOCK_GROUP_STR, OUT_TMP_TABLE_LIST, OUT_ERROR_MESSAGE, OUT_RETURN_CODE);
    DBMS_OUTPUT.PUT_LINE ('RETURN CODE = ' || OUT_RETURN_CODE);
    DBMS_OUTPUT.PUT_LINE ('MESSAGE IS = ' || OUT_ERROR_MESSAGE);
    IF OUT_RETURN_CODE < 0 THEN
       ROLLBACK;
    ELSE
       COMMIT;
    END IF;
    CMXUT.DROP_TABLE_IN_LIST(OUT_TMP_TABLE_LIST, OUT_ERROR_MESSAGE, OUT_RETURN_CODE); --Clean up temporary tables
END;