SYS.SUBPTXT2 dependencies on DIUTIL

Line 4: status diutil.ub4;

1: procedure subptxt2(name varchar2, subname varchar2, usr varchar2,
2: dbname varchar2, dbowner varchar2,
3: txt in out varchar2) is
4: status diutil.ub4;
5:
6: begin -- main
7: diutil.subptxt(name, subname, usr, dbname, dbowner, txt, status);
8: if (status <> diutil.s_ok) then

Line 7: diutil.subptxt(name, subname, usr, dbname, dbowner, txt, status);

3: txt in out varchar2) is
4: status diutil.ub4;
5:
6: begin -- main
7: diutil.subptxt(name, subname, usr, dbname, dbowner, txt, status);
8: if (status <> diutil.s_ok) then
9: if (status = diutil.s_subpNotFound) then
10: txt := '$$$ s_subpNotFound';
11: elsif (status = diutil.s_stubTooLong) then

Line 8: if (status <> diutil.s_ok) then

4: status diutil.ub4;
5:
6: begin -- main
7: diutil.subptxt(name, subname, usr, dbname, dbowner, txt, status);
8: if (status <> diutil.s_ok) then
9: if (status = diutil.s_subpNotFound) then
10: txt := '$$$ s_subpNotFound';
11: elsif (status = diutil.s_stubTooLong) then
12: txt := '$$$ s_stubTooLong';

Line 9: if (status = diutil.s_subpNotFound) then

5:
6: begin -- main
7: diutil.subptxt(name, subname, usr, dbname, dbowner, txt, status);
8: if (status <> diutil.s_ok) then
9: if (status = diutil.s_subpNotFound) then
10: txt := '$$$ s_subpNotFound';
11: elsif (status = diutil.s_stubTooLong) then
12: txt := '$$$ s_stubTooLong';
13: elsif (status = diutil.s_logic) then

Line 11: elsif (status = diutil.s_stubTooLong) then

7: diutil.subptxt(name, subname, usr, dbname, dbowner, txt, status);
8: if (status <> diutil.s_ok) then
9: if (status = diutil.s_subpNotFound) then
10: txt := '$$$ s_subpNotFound';
11: elsif (status = diutil.s_stubTooLong) then
12: txt := '$$$ s_stubTooLong';
13: elsif (status = diutil.s_logic) then
14: txt := '$$$ s_logic';
15: elsif (status = diutil.s_notInPackage) then

Line 13: elsif (status = diutil.s_logic) then

9: if (status = diutil.s_subpNotFound) then
10: txt := '$$$ s_subpNotFound';
11: elsif (status = diutil.s_stubTooLong) then
12: txt := '$$$ s_stubTooLong';
13: elsif (status = diutil.s_logic) then
14: txt := '$$$ s_logic';
15: elsif (status = diutil.s_notInPackage) then
16: txt := '$$$ s_notInPackage';
17: else txt := '$$$ s_other';

Line 15: elsif (status = diutil.s_notInPackage) then

11: elsif (status = diutil.s_stubTooLong) then
12: txt := '$$$ s_stubTooLong';
13: elsif (status = diutil.s_logic) then
14: txt := '$$$ s_logic';
15: elsif (status = diutil.s_notInPackage) then
16: txt := '$$$ s_notInPackage';
17: else txt := '$$$ s_other';
18: end if;
19: end if;