PROCEDURE: SYS.VALIDATE_ODM

Source

1 procedure validate_odm
2 AS
3    v_count NUMBER;
4    v_schema varchar2(30);
5 BEGIN
6   select username into v_schema from all_users where username = 'DMSYS';
7   select count(*) into v_count from all_objects where owner = 'DMSYS' and status = 'INVALID';
8 IF v_schema = 'DMSYS' and v_count = 0
9 THEN
10    sys.dbms_registry.valid('ODM');
11 ELSE
12    sys.dbms_registry.invalid('ODM');
13 END IF;
14 END validate_odm;