DECLARE
    IN_TABLE_NAME           VARCHAR2(30);
    IN_USER_NAME            VARCHAR2(30);
    OUT_ERROR_MESSAGE       VARCHAR2(1024);
    RC                      NUMBER;
BEGIN
    IN_TABLE_NAME           := UPPER('&TBL');
    OUT_ERROR_MESSAGE       := NULL;
    RC                      := NULL;
    CMXUT.REVALIDATE_BO (IN_TABLE_NAME, IN_USER_NAME, OUT_ERROR_MESSAGE, RC);
    DBMS_OUTPUT.PUT_LINE ( 'OUT_ERROR_MESSAGE= ' || SUBSTR(OUT_ERROR_MESSAGE,1,200));
    DBMS_OUTPUT.PUT_LINE ('OUT_ERROR_MESSAGE = ' || OUT_ERROR_MESSAGE);
    DBMS_OUTPUT.PUT_LINE ('RC = ' || TO_CHAR(RC));
    IF RC < 0 THEN
       ROLLBACK;
    ELSE
       COMMIT;
    END IF;
END;