PROCEDURE: SYS.DBMS_FEATURE_QOSM

Source

1 PROCEDURE dbms_feature_qosm
2       (is_used OUT number, aux_count OUT number, feature_info OUT clob)
3 AS
4   measure_only     number;
5 BEGIN
6   -- initialize
7   feature_info := NULL;
8   aux_count := NULL;
9 
10   -- get number of performance classes
11 
12   select count(*) into is_used from x$kywmpctab
13     where kywmpctabsp not like ':%';
14 
15   -- if QOSM is used
16   if (is_used >= 1) then
17 
18     -- number of Performance Classes
19     aux_count := is_used;
20 
21     -- check if QoSM is in measure only mode
22     select count(kywmpctabmonly) into measure_only from x$kywmpctab
23       where kywmpctabsp not like ':%' and kywmpctabmonly = 0;
24     if (measure_only = 0) then
25       feature_info := to_clob('QoSM is in measure only mode');
26     else
27       feature_info := to_clob('QoSM is in management mode');
28     end if;
29 
30   end if;
31 END;