[Home] [Help]
1: package body ozf_utility_pvt_w as
2: /* $Header: ozfwutlb.pls 120.1 2006/04/04 08:30:06 sshivali noship $ */
3: rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4: rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5: rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
12: if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13: return d;
14: end;
15:
16: procedure rosetta_table_copy_in_p12(t out nocopy ozf_utility_pvt.operating_units_tbl, a0 JTF_NUMBER_TABLE) as
17: ddindx binary_integer; indx binary_integer;
18: begin
19: if a0 is not null and a0.count > 0 then
20: if a0.count > 0 then
30: end loop;
31: end if;
32: end if;
33: end rosetta_table_copy_in_p12;
34: procedure rosetta_table_copy_out_p12(t ozf_utility_pvt.operating_units_tbl, a0 out nocopy JTF_NUMBER_TABLE) as
35: ddindx binary_integer; indx binary_integer;
36: begin
37: if t is null or t.count = 0 then
38: a0 := JTF_NUMBER_TABLE();
53: end if;
54: end if;
55: end rosetta_table_copy_out_p12;
56:
57: procedure rosetta_table_copy_in_p59(t out nocopy ozf_utility_pvt.dependent_objects_tbl_type, a0 JTF_VARCHAR2_TABLE_300
58: , a1 JTF_VARCHAR2_TABLE_100
59: , a2 JTF_VARCHAR2_TABLE_100
60: , a3 JTF_VARCHAR2_TABLE_300
61: , a4 JTF_VARCHAR2_TABLE_100
80: end loop;
81: end if;
82: end if;
83: end rosetta_table_copy_in_p59;
84: procedure rosetta_table_copy_out_p59(t ozf_utility_pvt.dependent_objects_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_300
85: , a1 out nocopy JTF_VARCHAR2_TABLE_100
86: , a2 out nocopy JTF_VARCHAR2_TABLE_100
87: , a3 out nocopy JTF_VARCHAR2_TABLE_300
88: , a4 out nocopy JTF_VARCHAR2_TABLE_100
147: else ddp_pop_message := true;
148: end if;
149:
150: -- here's the delegated call to the old PL/SQL routine
151: ozf_utility_pvt.log_message(p_log_level,
152: p_module_name,
153: p_rcs_id,
154: ddp_pop_message);
155:
170:
171: -- copy data to the local IN or IN-OUT args, if any
172:
173: -- here's the delegated call to the old PL/SQL routine
174: ddrosetta_retval := ozf_utility_pvt.logging_enabled(p_log_level);
175:
176: -- copy data back from the local variables to OUT or IN-OUT args, if any
177: if ddrosetta_retval is null
178: then ddrosetta_retval_bool := null;
215: ddp_notification_creat_date := rosetta_g_miss_date_in_map(p_notification_creat_date);
216:
217:
218: -- here's the delegated call to the old PL/SQL routine
219: ozf_utility_pvt.create_log(x_return_status,
220: p_arc_log_used_by,
221: p_log_used_by_id,
222: p_msg_data,
223: p_msg_level,
264:
265:
266:
267: -- here's the delegated call to the old PL/SQL routine
268: ozf_utility_pvt.convert_currency(x_return_status,
269: p_from_currency,
270: p_to_currency,
271: ddp_conv_date,
272: p_from_amount,
305:
306:
307:
308: -- here's the delegated call to the old PL/SQL routine
309: ozf_utility_pvt.convert_timezone(p_init_msg_list,
310: x_return_status,
311: x_msg_count,
312: x_msg_data,
313: p_user_tz_id,
352:
353:
354:
355: -- here's the delegated call to the old PL/SQL routine
356: ozf_utility_pvt.convert_currency(p_set_of_books_id,
357: p_from_currency,
358: ddp_conversion_date,
359: p_conversion_type,
360: p_conversion_rate,
405:
406:
407:
408: -- here's the delegated call to the old PL/SQL routine
409: ozf_utility_pvt.calculate_functional_curr(p_from_amount,
410: ddp_conv_date,
411: p_tc_currency_code,
412: p_org_id,
413: x_to_amount,
460:
461:
462:
463: -- here's the delegated call to the old PL/SQL routine
464: ozf_utility_pvt.calculate_functional_currency(p_from_amount,
465: ddp_conv_date,
466: p_tc_currency_code,
467: p_ledger_id,
468: x_to_amount,
511:
512:
513:
514: -- here's the delegated call to the old PL/SQL routine
515: ozf_utility_pvt.convert_currency(p_from_currency,
516: p_to_currency,
517: p_conv_type,
518: p_conv_rate,
519: ddp_conv_date,
532:
533:
534: end;
535:
536: end ozf_utility_pvt_w;