APPS.LNS_FIN_UTILS_W dependencies on LNS_FIN_UTILS

Line 1: package body lns_fin_utils_w as

1: package body lns_fin_utils_w as
2: /* $Header: LNS_FIN_UTILSJ_B.pls 120.3.12020000.2 2012/07/19 20:57:18 scherkas ship $ */
3: procedure rosetta_table_copy_in_p0(t out nocopy lns_fin_utils.date_tbl, a0 JTF_DATE_TABLE) as
4: ddindx binary_integer; indx binary_integer;
5: begin

Line 2: /* $Header: LNS_FIN_UTILSJ_B.pls 120.3.12020000.2 2012/07/19 20:57:18 scherkas ship $ */

1: package body lns_fin_utils_w as
2: /* $Header: LNS_FIN_UTILSJ_B.pls 120.3.12020000.2 2012/07/19 20:57:18 scherkas ship $ */
3: procedure rosetta_table_copy_in_p0(t out nocopy lns_fin_utils.date_tbl, a0 JTF_DATE_TABLE) as
4: ddindx binary_integer; indx binary_integer;
5: begin
6: if a0 is not null and a0.count > 0 then

Line 3: procedure rosetta_table_copy_in_p0(t out nocopy lns_fin_utils.date_tbl, a0 JTF_DATE_TABLE) as

1: package body lns_fin_utils_w as
2: /* $Header: LNS_FIN_UTILSJ_B.pls 120.3.12020000.2 2012/07/19 20:57:18 scherkas ship $ */
3: procedure rosetta_table_copy_in_p0(t out nocopy lns_fin_utils.date_tbl, a0 JTF_DATE_TABLE) as
4: ddindx binary_integer; indx binary_integer;
5: begin
6: if a0 is not null and a0.count > 0 then
7: if a0.count > 0 then

Line 21: procedure rosetta_table_copy_out_p0(t lns_fin_utils.date_tbl, a0 out nocopy JTF_DATE_TABLE) as

17: end loop;
18: end if;
19: end if;
20: end rosetta_table_copy_in_p0;
21: procedure rosetta_table_copy_out_p0(t lns_fin_utils.date_tbl, a0 out nocopy JTF_DATE_TABLE) as
22: ddindx binary_integer; indx binary_integer;
23: begin
24: if t is null or t.count = 0 then
25: a0 := JTF_DATE_TABLE();

Line 44: procedure rosetta_table_copy_in_p2(t out nocopy lns_fin_utils.payment_schedule_tbl, a0 JTF_DATE_TABLE

40: end if;
41: end if;
42: end rosetta_table_copy_out_p0;
43:
44: procedure rosetta_table_copy_in_p2(t out nocopy lns_fin_utils.payment_schedule_tbl, a0 JTF_DATE_TABLE
45: , a1 JTF_DATE_TABLE
46: , a2 JTF_DATE_TABLE
47: , a3 JTF_VARCHAR2_TABLE_100
48: ) as

Line 69: procedure rosetta_table_copy_out_p2(t lns_fin_utils.payment_schedule_tbl, a0 out nocopy JTF_DATE_TABLE

65: end loop;
66: end if;
67: end if;
68: end rosetta_table_copy_in_p2;
69: procedure rosetta_table_copy_out_p2(t lns_fin_utils.payment_schedule_tbl, a0 out nocopy JTF_DATE_TABLE
70: , a1 out nocopy JTF_DATE_TABLE
71: , a2 out nocopy JTF_DATE_TABLE
72: , a3 out nocopy JTF_VARCHAR2_TABLE_100
73: ) as

Line 120: ddrosetta_retval := lns_fin_utils.isleapyear(p_year);

116:
117: -- copy data to the local IN or IN-OUT args, if any
118:
119: -- here's the delegated call to the old PL/SQL routine
120: ddrosetta_retval := lns_fin_utils.isleapyear(p_year);
121:
122: -- copy data back from the local variables to OUT or IN-OUT args, if any
123: if ddrosetta_retval is null
124: then ddrosetta_retval_bool := null;

Line 131: end lns_fin_utils_w;

127: else ddrosetta_retval_bool := 0;
128: end if;
129: end;
130:
131: end lns_fin_utils_w;