CREATE OR REPLACE PROCEDURE START_TRANSACTION
IS

V_VERSAO     VARCHAR2(1);

BEGIN
    SELECT MAX(SUBSTR(BANNER,7,1)) INTO V_VERSAO FROM V$VERSION
    WHERE BANNER LIKE 'Orac%';

    IF V_VERSAO <> '9' THEN
       COMMIT;
       SET TRANSACTION USE ROLLBACK SEGMENT RBS_TECNISA;
    END IF;
END;
/