DBA Data[Home] [Help]

APPS.OKC_AQ_PVT_W dependencies on OKC_AQ_PVT

Line 1: package body okc_aq_pvt_w as

1: package body okc_aq_pvt_w as
2: /* $Header: okc_aq_pvt_w_b.pls 120.0 2005/05/26 09:36:50 appldev noship $ */
3:
4: procedure rosetta_table_copy_in_p1(t out nocopy okc_aq_pvt.msg_tab_typ, a0 JTF_VARCHAR2_TABLE_200
5: , a1 JTF_VARCHAR2_TABLE_300

Line 2: /* $Header: okc_aq_pvt_w_b.pls 120.0 2005/05/26 09:36:50 appldev noship $ */

1: package body okc_aq_pvt_w as
2: /* $Header: okc_aq_pvt_w_b.pls 120.0 2005/05/26 09:36:50 appldev noship $ */
3:
4: procedure rosetta_table_copy_in_p1(t out nocopy okc_aq_pvt.msg_tab_typ, a0 JTF_VARCHAR2_TABLE_200
5: , a1 JTF_VARCHAR2_TABLE_300
6: ) as

Line 4: procedure rosetta_table_copy_in_p1(t out nocopy okc_aq_pvt.msg_tab_typ, a0 JTF_VARCHAR2_TABLE_200

1: package body okc_aq_pvt_w as
2: /* $Header: okc_aq_pvt_w_b.pls 120.0 2005/05/26 09:36:50 appldev noship $ */
3:
4: procedure rosetta_table_copy_in_p1(t out nocopy okc_aq_pvt.msg_tab_typ, a0 JTF_VARCHAR2_TABLE_200
5: , a1 JTF_VARCHAR2_TABLE_300
6: ) as
7: ddindx binary_integer; indx binary_integer;
8: begin

Line 10: t := okc_aq_pvt.msg_tab_typ();

6: ) as
7: ddindx binary_integer; indx binary_integer;
8: begin
9: if a0 is not null and a0.count=0 then
10: t := okc_aq_pvt.msg_tab_typ();
11: elsif a0 is not null and a0.count > 0 then
12: if a0.count > 0 then
13: t := okc_aq_pvt.msg_tab_typ();
14: t.extend(a0.count);

Line 13: t := okc_aq_pvt.msg_tab_typ();

9: if a0 is not null and a0.count=0 then
10: t := okc_aq_pvt.msg_tab_typ();
11: elsif a0 is not null and a0.count > 0 then
12: if a0.count > 0 then
13: t := okc_aq_pvt.msg_tab_typ();
14: t.extend(a0.count);
15: indx := a0.first;
16: ddindx := 1;
17: while true loop

Line 30: procedure rosetta_table_copy_out_p1(t okc_aq_pvt.msg_tab_typ, a0 out nocopy JTF_VARCHAR2_TABLE_200

26: end if;
27: end if;
28: end rosetta_table_copy_in_p1;
29:
30: procedure rosetta_table_copy_out_p1(t okc_aq_pvt.msg_tab_typ, a0 out nocopy JTF_VARCHAR2_TABLE_200
31: , a1 out nocopy JTF_VARCHAR2_TABLE_300
32: ) as
33: ddindx binary_integer; indx binary_integer;
34: begin

Line 62: end okc_aq_pvt_w;

58: end if;
59: end if;
60: end rosetta_table_copy_out_p1;
61:
62: end okc_aq_pvt_w;