DBA Data[Home] [Help]

APPS.OKL_ACCOUNTING_UTIL_W dependencies on OKL_ACCOUNTING_UTIL

Line 1: package body okl_accounting_util_w as

1: package body okl_accounting_util_w as
2: /* $Header: OKLEAUTB.pls 120.4 2007/01/31 07:20:51 nikshah ship $ */
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');

Line 25: procedure rosetta_table_copy_in_p0(t out nocopy okl_accounting_util.seg_num_array_type, a0 JTF_NUMBER_TABLE) as

21: if n=b then return a; end if;
22: return n;
23: end;
24:
25: procedure rosetta_table_copy_in_p0(t out nocopy okl_accounting_util.seg_num_array_type, a0 JTF_NUMBER_TABLE) as
26: ddindx binary_integer; indx binary_integer;
27: begin
28: if a0 is not null and a0.count > 0 then
29: if a0.count > 0 then

Line 43: procedure rosetta_table_copy_out_p0(t okl_accounting_util.seg_num_array_type, a0 out nocopy JTF_NUMBER_TABLE) as

39: end loop;
40: end if;
41: end if;
42: end rosetta_table_copy_in_p0;
43: procedure rosetta_table_copy_out_p0(t okl_accounting_util.seg_num_array_type, a0 out nocopy JTF_NUMBER_TABLE) as
44: ddindx binary_integer; indx binary_integer;
45: begin
46: if t is null or t.count = 0 then
47: a0 := JTF_NUMBER_TABLE();

Line 66: procedure rosetta_table_copy_in_p1(t out nocopy okl_accounting_util.seg_array_type, a0 JTF_VARCHAR2_TABLE_100) as

62: end if;
63: end if;
64: end rosetta_table_copy_out_p0;
65:
66: procedure rosetta_table_copy_in_p1(t out nocopy okl_accounting_util.seg_array_type, a0 JTF_VARCHAR2_TABLE_100) as
67: ddindx binary_integer; indx binary_integer;
68: begin
69: if a0 is not null and a0.count > 0 then
70: if a0.count > 0 then

Line 84: procedure rosetta_table_copy_out_p1(t okl_accounting_util.seg_array_type, a0 out nocopy JTF_VARCHAR2_TABLE_100) as

80: end loop;
81: end if;
82: end if;
83: end rosetta_table_copy_in_p1;
84: procedure rosetta_table_copy_out_p1(t okl_accounting_util.seg_array_type, a0 out nocopy JTF_VARCHAR2_TABLE_100) as
85: ddindx binary_integer; indx binary_integer;
86: begin
87: if t is null or t.count = 0 then
88: a0 := JTF_VARCHAR2_TABLE_100();

Line 107: procedure rosetta_table_copy_in_p2(t out nocopy okl_accounting_util.seg_desc_array_type, a0 JTF_VARCHAR2_TABLE_100) as

103: end if;
104: end if;
105: end rosetta_table_copy_out_p1;
106:
107: procedure rosetta_table_copy_in_p2(t out nocopy okl_accounting_util.seg_desc_array_type, a0 JTF_VARCHAR2_TABLE_100) as
108: ddindx binary_integer; indx binary_integer;
109: begin
110: if a0 is not null and a0.count > 0 then
111: if a0.count > 0 then

Line 125: procedure rosetta_table_copy_out_p2(t okl_accounting_util.seg_desc_array_type, a0 out nocopy JTF_VARCHAR2_TABLE_100) as

121: end loop;
122: end if;
123: end if;
124: end rosetta_table_copy_in_p2;
125: procedure rosetta_table_copy_out_p2(t okl_accounting_util.seg_desc_array_type, a0 out nocopy JTF_VARCHAR2_TABLE_100) as
126: ddindx binary_integer; indx binary_integer;
127: begin
128: if t is null or t.count = 0 then
129: a0 := JTF_VARCHAR2_TABLE_100();

Line 148: procedure rosetta_table_copy_in_p3(t out nocopy okl_accounting_util.error_message_type, a0 JTF_VARCHAR2_TABLE_2000) as

144: end if;
145: end if;
146: end rosetta_table_copy_out_p2;
147:
148: procedure rosetta_table_copy_in_p3(t out nocopy okl_accounting_util.error_message_type, a0 JTF_VARCHAR2_TABLE_2000) as
149: ddindx binary_integer; indx binary_integer;
150: begin
151: if a0 is not null and a0.count > 0 then
152: if a0.count > 0 then

Line 166: procedure rosetta_table_copy_out_p3(t okl_accounting_util.error_message_type, a0 out nocopy JTF_VARCHAR2_TABLE_2000) as

162: end loop;
163: end if;
164: end if;
165: end rosetta_table_copy_in_p3;
166: procedure rosetta_table_copy_out_p3(t okl_accounting_util.error_message_type, a0 out nocopy JTF_VARCHAR2_TABLE_2000) as
167: ddindx binary_integer; indx binary_integer;
168: begin
169: if t is null or t.count = 0 then
170: a0 := JTF_VARCHAR2_TABLE_2000();

Line 189: procedure rosetta_table_copy_in_p26(t out nocopy okl_accounting_util.overlap_attrib_tbl_type, a0 JTF_VARCHAR2_TABLE_100

185: end if;
186: end if;
187: end rosetta_table_copy_out_p3;
188:
189: procedure rosetta_table_copy_in_p26(t out nocopy okl_accounting_util.overlap_attrib_tbl_type, a0 JTF_VARCHAR2_TABLE_100
190: , a1 JTF_VARCHAR2_TABLE_100
191: , a2 JTF_VARCHAR2_TABLE_200
192: ) as
193: ddindx binary_integer; indx binary_integer;

Line 212: procedure rosetta_table_copy_out_p26(t okl_accounting_util.overlap_attrib_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100

208: end loop;
209: end if;
210: end if;
211: end rosetta_table_copy_in_p26;
212: procedure rosetta_table_copy_out_p26(t okl_accounting_util.overlap_attrib_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
213: , a1 out nocopy JTF_VARCHAR2_TABLE_100
214: , a2 out nocopy JTF_VARCHAR2_TABLE_200
215: ) as
216: ddindx binary_integer; indx binary_integer;

Line 252: ddp_seg_array_type okl_accounting_util.seg_array_type;

248: , p_seg_array_type out nocopy JTF_VARCHAR2_TABLE_100
249: )
250:
251: as
252: ddp_seg_array_type okl_accounting_util.seg_array_type;
253: ddindx binary_integer; indx binary_integer;
254: begin
255:
256: -- copy data to the local IN or IN-OUT args, if any

Line 261: okl_accounting_util.get_segment_array(p_concate_segments,

257:
258:
259:
260: -- here's the delegated call to the old PL/SQL routine
261: okl_accounting_util.get_segment_array(p_concate_segments,
262: p_delimiter,
263: ddp_seg_array_type);
264:
265: -- copy data back from the local variables to OUT or IN-OUT args, if any

Line 268: okl_accounting_util_w.rosetta_table_copy_out_p1(ddp_seg_array_type, p_seg_array_type);

264:
265: -- copy data back from the local variables to OUT or IN-OUT args, if any
266:
267:
268: okl_accounting_util_w.rosetta_table_copy_out_p1(ddp_seg_array_type, p_seg_array_type);
269: end;
270:
271: procedure get_error_message(p_all_message out nocopy JTF_VARCHAR2_TABLE_2000
272: )

Line 275: ddp_all_message okl_accounting_util.error_message_type;

271: procedure get_error_message(p_all_message out nocopy JTF_VARCHAR2_TABLE_2000
272: )
273:
274: as
275: ddp_all_message okl_accounting_util.error_message_type;
276: ddindx binary_integer; indx binary_integer;
277: begin
278:
279: -- copy data to the local IN or IN-OUT args, if any

Line 282: okl_accounting_util.get_error_message(ddp_all_message);

278:
279: -- copy data to the local IN or IN-OUT args, if any
280:
281: -- here's the delegated call to the old PL/SQL routine
282: okl_accounting_util.get_error_message(ddp_all_message);
283:
284: -- copy data back from the local variables to OUT or IN-OUT args, if any
285: okl_accounting_util_w.rosetta_table_copy_out_p3(ddp_all_message, p_all_message);
286: end;

Line 285: okl_accounting_util_w.rosetta_table_copy_out_p3(ddp_all_message, p_all_message);

281: -- here's the delegated call to the old PL/SQL routine
282: okl_accounting_util.get_error_message(ddp_all_message);
283:
284: -- copy data back from the local variables to OUT or IN-OUT args, if any
285: okl_accounting_util_w.rosetta_table_copy_out_p3(ddp_all_message, p_all_message);
286: end;
287:
288: procedure get_error_msg(p_all_message out nocopy JTF_VARCHAR2_TABLE_2000
289: )

Line 292: ddp_all_message okl_accounting_util.error_message_type;

288: procedure get_error_msg(p_all_message out nocopy JTF_VARCHAR2_TABLE_2000
289: )
290:
291: as
292: ddp_all_message okl_accounting_util.error_message_type;
293: ddindx binary_integer; indx binary_integer;
294: begin
295:
296: -- copy data to the local IN or IN-OUT args, if any

Line 299: okl_accounting_util.get_error_msg(ddp_all_message);

295:
296: -- copy data to the local IN or IN-OUT args, if any
297:
298: -- here's the delegated call to the old PL/SQL routine
299: okl_accounting_util.get_error_msg(ddp_all_message);
300:
301: -- copy data back from the local variables to OUT or IN-OUT args, if any
302: okl_accounting_util_w.rosetta_table_copy_out_p3(ddp_all_message, p_all_message);
303: end;

Line 302: okl_accounting_util_w.rosetta_table_copy_out_p3(ddp_all_message, p_all_message);

298: -- here's the delegated call to the old PL/SQL routine
299: okl_accounting_util.get_error_msg(ddp_all_message);
300:
301: -- copy data back from the local variables to OUT or IN-OUT args, if any
302: okl_accounting_util_w.rosetta_table_copy_out_p3(ddp_all_message, p_all_message);
303: end;
304:
305: function get_curr_con_rate(p_from_curr_code VARCHAR2
306: , p_to_curr_code VARCHAR2

Line 324: ddrosetta_retval := okl_accounting_util.get_curr_con_rate(p_from_curr_code,

320: ddp_con_date := rosetta_g_miss_date_in_map(p_con_date);
321:
322:
323: -- here's the delegated call to the old PL/SQL routine
324: ddrosetta_retval := okl_accounting_util.get_curr_con_rate(p_from_curr_code,
325: p_to_curr_code,
326: ddp_con_date,
327: p_con_type);
328:

Line 367: okl_accounting_util.get_curr_con_rate(p_api_version,

363:
364:
365:
366: -- here's the delegated call to the old PL/SQL routine
367: okl_accounting_util.get_curr_con_rate(p_api_version,
368: p_init_msg_list,
369: x_return_status,
370: x_msg_count,
371: x_msg_data,

Line 396: ddp_segment_array okl_accounting_util.seg_num_name_type;

392: , p0_a2 out nocopy JTF_VARCHAR2_TABLE_100
393: )
394:
395: as
396: ddp_segment_array okl_accounting_util.seg_num_name_type;
397: ddindx binary_integer; indx binary_integer;
398: begin
399:
400: -- copy data to the local IN or IN-OUT args, if any

Line 403: okl_accounting_util.get_accounting_segment(ddp_segment_array);

399:
400: -- copy data to the local IN or IN-OUT args, if any
401:
402: -- here's the delegated call to the old PL/SQL routine
403: okl_accounting_util.get_accounting_segment(ddp_segment_array);
404:
405: -- copy data back from the local variables to OUT or IN-OUT args, if any
406: okl_accounting_util_w.rosetta_table_copy_out_p0(ddp_segment_array.seg_num, p0_a0);
407: okl_accounting_util_w.rosetta_table_copy_out_p1(ddp_segment_array.seg_name, p0_a1);

Line 406: okl_accounting_util_w.rosetta_table_copy_out_p0(ddp_segment_array.seg_num, p0_a0);

402: -- here's the delegated call to the old PL/SQL routine
403: okl_accounting_util.get_accounting_segment(ddp_segment_array);
404:
405: -- copy data back from the local variables to OUT or IN-OUT args, if any
406: okl_accounting_util_w.rosetta_table_copy_out_p0(ddp_segment_array.seg_num, p0_a0);
407: okl_accounting_util_w.rosetta_table_copy_out_p1(ddp_segment_array.seg_name, p0_a1);
408: okl_accounting_util_w.rosetta_table_copy_out_p2(ddp_segment_array.seg_desc, p0_a2);
409: end;
410:

Line 407: okl_accounting_util_w.rosetta_table_copy_out_p1(ddp_segment_array.seg_name, p0_a1);

403: okl_accounting_util.get_accounting_segment(ddp_segment_array);
404:
405: -- copy data back from the local variables to OUT or IN-OUT args, if any
406: okl_accounting_util_w.rosetta_table_copy_out_p0(ddp_segment_array.seg_num, p0_a0);
407: okl_accounting_util_w.rosetta_table_copy_out_p1(ddp_segment_array.seg_name, p0_a1);
408: okl_accounting_util_w.rosetta_table_copy_out_p2(ddp_segment_array.seg_desc, p0_a2);
409: end;
410:
411: procedure get_period_info(p_date date

Line 408: okl_accounting_util_w.rosetta_table_copy_out_p2(ddp_segment_array.seg_desc, p0_a2);

404:
405: -- copy data back from the local variables to OUT or IN-OUT args, if any
406: okl_accounting_util_w.rosetta_table_copy_out_p0(ddp_segment_array.seg_num, p0_a0);
407: okl_accounting_util_w.rosetta_table_copy_out_p1(ddp_segment_array.seg_name, p0_a1);
408: okl_accounting_util_w.rosetta_table_copy_out_p2(ddp_segment_array.seg_desc, p0_a2);
409: end;
410:
411: procedure get_period_info(p_date date
412: , p_period_name out nocopy VARCHAR2

Line 431: okl_accounting_util.get_period_info(ddp_date,

427:
428:
429:
430: -- here's the delegated call to the old PL/SQL routine
431: okl_accounting_util.get_period_info(ddp_date,
432: p_period_name,
433: p_start_date,
434: p_end_date,
435: p_ledger_id);

Line 458: ddp_attrib_tbl okl_accounting_util.overlap_attrib_tbl_type;

454: , x_valid out nocopy number
455: )
456:
457: as
458: ddp_attrib_tbl okl_accounting_util.overlap_attrib_tbl_type;
459: ddp_start_date date;
460: ddp_end_date date;
461: ddx_valid boolean;
462: ddindx binary_integer; indx binary_integer;

Line 467: okl_accounting_util_w.rosetta_table_copy_in_p26(ddp_attrib_tbl, p1_a0

463: begin
464:
465: -- copy data to the local IN or IN-OUT args, if any
466:
467: okl_accounting_util_w.rosetta_table_copy_in_p26(ddp_attrib_tbl, p1_a0
468: , p1_a1
469: , p1_a2
470: );
471:

Line 482: okl_accounting_util.check_overlaps(p_id,

478:
479:
480:
481: -- here's the delegated call to the old PL/SQL routine
482: okl_accounting_util.check_overlaps(p_id,
483: ddp_attrib_tbl,
484: p_start_date_attribute_name,
485: ddp_start_date,
486: p_end_date_attribute_name,

Line 521: ddp_attrib_tbl okl_accounting_util.overlap_attrib_tbl_type;

517: , x_new_version out nocopy VARCHAR2
518: )
519:
520: as
521: ddp_attrib_tbl okl_accounting_util.overlap_attrib_tbl_type;
522: ddp_end_date date;
523: ddindx binary_integer; indx binary_integer;
524: begin
525:

Line 527: okl_accounting_util_w.rosetta_table_copy_in_p26(ddp_attrib_tbl, p0_a0

523: ddindx binary_integer; indx binary_integer;
524: begin
525:
526: -- copy data to the local IN or IN-OUT args, if any
527: okl_accounting_util_w.rosetta_table_copy_in_p26(ddp_attrib_tbl, p0_a0
528: , p0_a1
529: , p0_a2
530: );
531:

Line 540: okl_accounting_util.get_version(ddp_attrib_tbl,

536:
537:
538:
539: -- here's the delegated call to the old PL/SQL routine
540: okl_accounting_util.get_version(ddp_attrib_tbl,
541: p_cur_version,
542: p_end_date_attribute_name,
543: ddp_end_date,
544: p_view,

Line 585: okl_accounting_util.convert_to_functional_currency(p_khr_id,

581:
582:
583:
584: -- here's the delegated call to the old PL/SQL routine
585: okl_accounting_util.convert_to_functional_currency(p_khr_id,
586: p_to_currency,
587: ddp_transaction_date,
588: p_amount,
589: x_contract_currency,

Line 636: okl_accounting_util.convert_to_functional_currency(p_khr_id,

632:
633:
634:
635: -- here's the delegated call to the old PL/SQL routine
636: okl_accounting_util.convert_to_functional_currency(p_khr_id,
637: p_to_currency,
638: ddp_transaction_date,
639: p_amount,
640: x_return_status,

Line 687: okl_accounting_util.convert_to_contract_currency(p_khr_id,

683:
684:
685:
686: -- here's the delegated call to the old PL/SQL routine
687: okl_accounting_util.convert_to_contract_currency(p_khr_id,
688: p_from_currency,
689: ddp_transaction_date,
690: p_amount,
691: x_contract_currency,

Line 738: okl_accounting_util.convert_to_contract_currency(p_khr_id,

734:
735:
736:
737: -- here's the delegated call to the old PL/SQL routine
738: okl_accounting_util.convert_to_contract_currency(p_khr_id,
739: p_from_currency,
740: ddp_transaction_date,
741: p_amount,
742: x_return_status,

Line 776: ddrosetta_retval := okl_accounting_util.get_valid_gl_date(ddp_gl_date,

772: ddp_gl_date := rosetta_g_miss_date_in_map(p_gl_date);
773:
774:
775: -- here's the delegated call to the old PL/SQL routine
776: ddrosetta_retval := okl_accounting_util.get_valid_gl_date(ddp_gl_date,
777: p_ledger_id);
778:
779: -- copy data back from the local variables to OUT or IN-OUT args, if any
780:

Line 785: end okl_accounting_util_w;

781:
782: return ddrosetta_retval;
783: end;
784:
785: end okl_accounting_util_w;