1 procedure validate_rul as
2 retnum NUMBER;
3 begin
4 -- make sure all the objects in EXFSYS schema are valid --
5 select 1 into retnum from all_objects where
6 owner = 'EXFSYS' and status != 'VALID' and rownum < 2;
7
8 sys.dbms_registry.invalid('RUL');
9 exception
10 when no_data_found then
11 sys.dbms_registry.valid('RUL');
12 end;