1 PROCEDURE ODCIColInfoFlagsDump(op NUMBER) IS
2 BEGIN
3 IF (bitand(op, ODCIConst.CompFilterByCol) = ODCIConst.CompFilterByCol) THEN
4 dbms_output.put_line('ColInfoFlags : Filter By Column');
5 END IF;
6
7 IF (bitand(op, ODCIConst.CompOrderByCol) = ODCIConst.CompOrderByCol) THEN
8 IF (bitand(op, ODCIConst.CompOrderDscCol) = ODCIConst.CompOrderDscCol)
9 THEN
10 dbms_output.put_line('ColInfoFlags : Order By Desc Column');
11 ELSE
12 dbms_output.put_line('ColInfoFlags : Order By Asc Column');
13 END IF;
14 END IF;
15
16 IF (bitand(op, ODCIConst.CompUpdatedCol)=ODCIConst.CompUpdatedCol) THEN
17 dbms_output.put_line('ColInfoFlags : Updated Column');
18 END IF;
19
20 IF (bitand(op, ODCIConst.CompRenamedCol) = ODCIConst.CompRenamedCol) THEN
21 dbms_output.put_line('ColInfoFlags : Renamed Column');
22 END IF;
23
24 IF (bitand(op,ODCIConst.CompRenamedTopADT)=ODCIConst.CompRenamedTopADT) THEN
25 dbms_output.put_line('ColInfoFlags : Renamed Top ADT');
26 END IF;
27
28 END;