DBA Data[Home] [Help]

APPS.PO_PDOI_MAINPROC_UTL_PVT dependencies on PO_LOG

Line 5: PO_LOG.get_package_base('PO_PDOI_MAINPROC_UTL_PVT');

1: PACKAGE BODY PO_PDOI_MAINPROC_UTL_PVT AS
2: /* $Header: PO_PDOI_MAINPROC_UTL_PVT.plb 120.16.12020000.2 2013/02/10 16:28:43 vegajula ship $ */
3:
4: d_pkg_name CONSTANT VARCHAR2(50) :=
5: PO_LOG.get_package_base('PO_PDOI_MAINPROC_UTL_PVT');
6:
7: -- max line number for each document
8: g_max_line_num_tbl DBMS_SQL.number_table;
9:

Line 58: IF (PO_LOG.d_proc) THEN

54:
55: BEGIN
56: d_position := 0;
57:
58: IF (PO_LOG.d_proc) THEN
59: PO_LOG.proc_begin(d_module);
60: END IF;
61:
62: g_max_line_num_tbl.DELETE;

Line 59: PO_LOG.proc_begin(d_module);

55: BEGIN
56: d_position := 0;
57:
58: IF (PO_LOG.d_proc) THEN
59: PO_LOG.proc_begin(d_module);
60: END IF;
61:
62: g_max_line_num_tbl.DELETE;
63:

Line 70: IF (PO_LOG.d_proc) THEN

66: g_max_dist_num_tbl.DELETE;
67:
68: g_max_price_diff_num_tbl.DELETE;
69:
70: IF (PO_LOG.d_proc) THEN
71: PO_LOG.proc_end (d_module);
72: END IF;
73:
74: EXCEPTION

Line 71: PO_LOG.proc_end (d_module);

67:
68: g_max_price_diff_num_tbl.DELETE;
69:
70: IF (PO_LOG.d_proc) THEN
71: PO_LOG.proc_end (d_module);
72: END IF;
73:
74: EXCEPTION
75: WHEN OTHERS THEN

Line 121: IF (PO_LOG.d_proc) THEN

117:
118: BEGIN
119: d_position := 0;
120:
121: IF (PO_LOG.d_proc) THEN
122: PO_LOG.proc_begin(d_module, 'p_doc_subtype', p_doc_subtype);
123: END IF;
124:
125: IF (g_quotation_class_code_tbl.COUNT = 0 OR

Line 122: PO_LOG.proc_begin(d_module, 'p_doc_subtype', p_doc_subtype);

118: BEGIN
119: d_position := 0;
120:
121: IF (PO_LOG.d_proc) THEN
122: PO_LOG.proc_begin(d_module, 'p_doc_subtype', p_doc_subtype);
123: END IF;
124:
125: IF (g_quotation_class_code_tbl.COUNT = 0 OR
126: g_quotation_class_code_tbl.EXISTS(p_doc_subtype) = FALSE) THEN

Line 136: IF (PO_LOG.d_stmt) THEN

132: FROM po_document_types
133: WHERE document_type_code = PO_PDOI_CONSTANTS.g_DOC_TYPE_QUOTATION
134: AND document_subtype = p_doc_subtype;
135:
136: IF (PO_LOG.d_stmt) THEN
137: PO_LOG.stmt(d_module, d_position, 'l_quotation_class_code',
138: l_quotation_class_code);
139: END IF;
140:

Line 137: PO_LOG.stmt(d_module, d_position, 'l_quotation_class_code',

133: WHERE document_type_code = PO_PDOI_CONSTANTS.g_DOC_TYPE_QUOTATION
134: AND document_subtype = p_doc_subtype;
135:
136: IF (PO_LOG.d_stmt) THEN
137: PO_LOG.stmt(d_module, d_position, 'l_quotation_class_code',
138: l_quotation_class_code);
139: END IF;
140:
141: d_position := 20;

Line 147: IF (PO_LOG.d_proc) THEN

143: -- save the result in cache
144: g_quotation_class_code_tbl(p_doc_subtype) := l_quotation_class_code;
145: END IF;
146:
147: IF (PO_LOG.d_proc) THEN
148: PO_LOG.proc_return (d_module, g_quotation_class_code_tbl(p_doc_subtype));
149: END IF;
150:
151: RETURN g_quotation_class_code_tbl(p_doc_subtype);

Line 148: PO_LOG.proc_return (d_module, g_quotation_class_code_tbl(p_doc_subtype));

144: g_quotation_class_code_tbl(p_doc_subtype) := l_quotation_class_code;
145: END IF;
146:
147: IF (PO_LOG.d_proc) THEN
148: PO_LOG.proc_return (d_module, g_quotation_class_code_tbl(p_doc_subtype));
149: END IF;
150:
151: RETURN g_quotation_class_code_tbl(p_doc_subtype);
152:

Line 206: IF (PO_LOG.d_proc) THEN

202: l_po_header_id_no_dup_tbl DBMS_SQL.number_table;
203: BEGIN
204: d_position := 0;
205:
206: IF (PO_LOG.d_proc) THEN
207: PO_LOG.proc_begin(d_module, 'p_po_header_id_tbl', p_po_header_id_tbl);
208: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
209: END IF;
210:

Line 207: PO_LOG.proc_begin(d_module, 'p_po_header_id_tbl', p_po_header_id_tbl);

203: BEGIN
204: d_position := 0;
205:
206: IF (PO_LOG.d_proc) THEN
207: PO_LOG.proc_begin(d_module, 'p_po_header_id_tbl', p_po_header_id_tbl);
208: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
209: END IF;
210:
211: -- No need to calculate max line number for following two cases:

Line 208: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);

204: d_position := 0;
205:
206: IF (PO_LOG.d_proc) THEN
207: PO_LOG.proc_begin(d_module, 'p_po_header_id_tbl', p_po_header_id_tbl);
208: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
209: END IF;
210:
211: -- No need to calculate max line number for following two cases:
212: -- 1. the max line number has already been cached before;

Line 217: IF (PO_LOG.d_stmt) THEN

213: -- 2. same po_header_id appears more than once, then the max line
214: -- number only needs to be calculated once
215: FOR i IN 1..p_po_header_id_tbl.COUNT
216: LOOP
217: IF (PO_LOG.d_stmt) THEN
218: PO_LOG.stmt(d_module, d_position, 'index', i);
219: PO_LOG.stmt(d_module, d_position, 'calculated already?',
220: g_max_line_num_tbl.EXISTS(p_po_header_id_tbl(i)));
221: PO_LOG.stmt(d_module, d_position, 'duplicate id?',

Line 218: PO_LOG.stmt(d_module, d_position, 'index', i);

214: -- number only needs to be calculated once
215: FOR i IN 1..p_po_header_id_tbl.COUNT
216: LOOP
217: IF (PO_LOG.d_stmt) THEN
218: PO_LOG.stmt(d_module, d_position, 'index', i);
219: PO_LOG.stmt(d_module, d_position, 'calculated already?',
220: g_max_line_num_tbl.EXISTS(p_po_header_id_tbl(i)));
221: PO_LOG.stmt(d_module, d_position, 'duplicate id?',
222: l_po_header_id_no_dup_tbl.EXISTS(p_po_header_id_tbl(i)));

Line 219: PO_LOG.stmt(d_module, d_position, 'calculated already?',

215: FOR i IN 1..p_po_header_id_tbl.COUNT
216: LOOP
217: IF (PO_LOG.d_stmt) THEN
218: PO_LOG.stmt(d_module, d_position, 'index', i);
219: PO_LOG.stmt(d_module, d_position, 'calculated already?',
220: g_max_line_num_tbl.EXISTS(p_po_header_id_tbl(i)));
221: PO_LOG.stmt(d_module, d_position, 'duplicate id?',
222: l_po_header_id_no_dup_tbl.EXISTS(p_po_header_id_tbl(i)));
223: END IF;

Line 221: PO_LOG.stmt(d_module, d_position, 'duplicate id?',

217: IF (PO_LOG.d_stmt) THEN
218: PO_LOG.stmt(d_module, d_position, 'index', i);
219: PO_LOG.stmt(d_module, d_position, 'calculated already?',
220: g_max_line_num_tbl.EXISTS(p_po_header_id_tbl(i)));
221: PO_LOG.stmt(d_module, d_position, 'duplicate id?',
222: l_po_header_id_no_dup_tbl.EXISTS(p_po_header_id_tbl(i)));
223: END IF;
224:
225: IF (g_max_line_num_tbl.EXISTS(p_po_header_id_tbl(i))) THEN

Line 295: IF (PO_LOG.d_stmt) THEN

291: DELETE FROM po_session_gt
292: WHERE key = l_key
293: RETURNING num1, num2 BULK COLLECT INTO l_po_header_id_tbl, l_max_line_num_tbl;
294:
295: IF (PO_LOG.d_stmt) THEN
296: PO_LOG.stmt(d_module, d_position, 'l_po_header_id_tbl', l_po_header_id_tbl);
297: PO_LOG.stmt(d_module, d_position, 'l_max_line_num_tbl', l_max_line_num_tbl);
298: END IF;
299:

Line 296: PO_LOG.stmt(d_module, d_position, 'l_po_header_id_tbl', l_po_header_id_tbl);

292: WHERE key = l_key
293: RETURNING num1, num2 BULK COLLECT INTO l_po_header_id_tbl, l_max_line_num_tbl;
294:
295: IF (PO_LOG.d_stmt) THEN
296: PO_LOG.stmt(d_module, d_position, 'l_po_header_id_tbl', l_po_header_id_tbl);
297: PO_LOG.stmt(d_module, d_position, 'l_max_line_num_tbl', l_max_line_num_tbl);
298: END IF;
299:
300: FOR i IN 1..l_po_header_id_tbl.COUNT

Line 297: PO_LOG.stmt(d_module, d_position, 'l_max_line_num_tbl', l_max_line_num_tbl);

293: RETURNING num1, num2 BULK COLLECT INTO l_po_header_id_tbl, l_max_line_num_tbl;
294:
295: IF (PO_LOG.d_stmt) THEN
296: PO_LOG.stmt(d_module, d_position, 'l_po_header_id_tbl', l_po_header_id_tbl);
297: PO_LOG.stmt(d_module, d_position, 'l_max_line_num_tbl', l_max_line_num_tbl);
298: END IF;
299:
300: FOR i IN 1..l_po_header_id_tbl.COUNT
301: LOOP

Line 302: IF (PO_LOG.d_stmt) THEN

298: END IF;
299:
300: FOR i IN 1..l_po_header_id_tbl.COUNT
301: LOOP
302: IF (PO_LOG.d_stmt) THEN
303: PO_LOG.stmt(d_module, d_position, 'index', i);
304: END IF;
305:
306: IF (g_max_line_num_tbl.EXISTS(l_po_header_id_tbl(i))) THEN

Line 303: PO_LOG.stmt(d_module, d_position, 'index', i);

299:
300: FOR i IN 1..l_po_header_id_tbl.COUNT
301: LOOP
302: IF (PO_LOG.d_stmt) THEN
303: PO_LOG.stmt(d_module, d_position, 'index', i);
304: END IF;
305:
306: IF (g_max_line_num_tbl.EXISTS(l_po_header_id_tbl(i))) THEN
307: IF (l_max_line_num_tbl(i) > g_max_line_num_tbl(l_po_header_id_tbl(i))) THEN

Line 315: IF (PO_LOG.d_proc) THEN

311: g_max_line_num_tbl(l_po_header_id_tbl(i)) := l_max_line_num_tbl(i);
312: END IF;
313: END LOOP;
314:
315: IF (PO_LOG.d_proc) THEN
316: PO_LOG.proc_end (d_module);
317: END IF;
318:
319: EXCEPTION

Line 316: PO_LOG.proc_end (d_module);

312: END IF;
313: END LOOP;
314:
315: IF (PO_LOG.d_proc) THEN
316: PO_LOG.proc_end (d_module);
317: END IF;
318:
319: EXCEPTION
320: WHEN OTHERS THEN

Line 365: IF (PO_LOG.d_proc) THEN

361:
362: BEGIN
363: d_position := 0;
364:
365: IF (PO_LOG.d_proc) THEN
366: PO_LOG.proc_begin(d_module, 'p_po_header_id', p_po_header_id);
367: END IF;
368:
369: IF (g_max_line_num_tbl.EXISTS(p_po_header_id)) THEN

Line 366: PO_LOG.proc_begin(d_module, 'p_po_header_id', p_po_header_id);

362: BEGIN
363: d_position := 0;
364:
365: IF (PO_LOG.d_proc) THEN
366: PO_LOG.proc_begin(d_module, 'p_po_header_id', p_po_header_id);
367: END IF;
368:
369: IF (g_max_line_num_tbl.EXISTS(p_po_header_id)) THEN
370: g_max_line_num_tbl(p_po_header_id) := g_max_line_num_tbl(p_po_header_id) + 1;

Line 375: IF (PO_LOG.d_proc) THEN

371: ELSE
372: g_max_line_num_tbl(p_po_header_id) := 1;
373: END IF;
374:
375: IF (PO_LOG.d_proc) THEN
376: PO_LOG.proc_return (d_module, g_max_line_num_tbl(p_po_header_id));
377: END IF;
378:
379: RETURN g_max_line_num_tbl(p_po_header_id);

Line 376: PO_LOG.proc_return (d_module, g_max_line_num_tbl(p_po_header_id));

372: g_max_line_num_tbl(p_po_header_id) := 1;
373: END IF;
374:
375: IF (PO_LOG.d_proc) THEN
376: PO_LOG.proc_return (d_module, g_max_line_num_tbl(p_po_header_id));
377: END IF;
378:
379: RETURN g_max_line_num_tbl(p_po_header_id);
380: EXCEPTION

Line 421: IF (PO_LOG.d_proc) THEN

417: l_next_po_line_id NUMBER;
418: BEGIN
419: d_position := 0;
420:
421: IF (PO_LOG.d_proc) THEN
422: PO_LOG.proc_begin(d_module);
423: END IF;
424:
425: SELECT po_lines_s.nextval

Line 422: PO_LOG.proc_begin(d_module);

418: BEGIN
419: d_position := 0;
420:
421: IF (PO_LOG.d_proc) THEN
422: PO_LOG.proc_begin(d_module);
423: END IF;
424:
425: SELECT po_lines_s.nextval
426: INTO l_next_po_line_id

Line 429: IF (PO_LOG.d_proc) THEN

425: SELECT po_lines_s.nextval
426: INTO l_next_po_line_id
427: FROM DUAL;
428:
429: IF (PO_LOG.d_proc) THEN
430: PO_LOG.proc_return(d_module, l_next_po_line_id);
431: END IF;
432:
433: RETURN l_next_po_line_id;

Line 430: PO_LOG.proc_return(d_module, l_next_po_line_id);

426: INTO l_next_po_line_id
427: FROM DUAL;
428:
429: IF (PO_LOG.d_proc) THEN
430: PO_LOG.proc_return(d_module, l_next_po_line_id);
431: END IF;
432:
433: RETURN l_next_po_line_id;
434: END get_next_po_line_id;

Line 483: IF (PO_LOG.d_proc) THEN

479: l_key po_session_gt.key%TYPE;
480: BEGIN
481: d_position := 0;
482:
483: IF (PO_LOG.d_proc) THEN
484: PO_LOG.proc_begin(d_module, 'p_po_header_id_tbl', p_po_header_id_tbl);
485: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
486: PO_LOG.proc_begin(d_module, 'p_intf_line_id_tbl', p_intf_line_id_tbl);
487: PO_LOG.proc_begin(d_module, 'p_line_num_tbl', p_line_num_tbl);

Line 484: PO_LOG.proc_begin(d_module, 'p_po_header_id_tbl', p_po_header_id_tbl);

480: BEGIN
481: d_position := 0;
482:
483: IF (PO_LOG.d_proc) THEN
484: PO_LOG.proc_begin(d_module, 'p_po_header_id_tbl', p_po_header_id_tbl);
485: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
486: PO_LOG.proc_begin(d_module, 'p_intf_line_id_tbl', p_intf_line_id_tbl);
487: PO_LOG.proc_begin(d_module, 'p_line_num_tbl', p_line_num_tbl);
488: END IF;

Line 485: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);

481: d_position := 0;
482:
483: IF (PO_LOG.d_proc) THEN
484: PO_LOG.proc_begin(d_module, 'p_po_header_id_tbl', p_po_header_id_tbl);
485: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
486: PO_LOG.proc_begin(d_module, 'p_intf_line_id_tbl', p_intf_line_id_tbl);
487: PO_LOG.proc_begin(d_module, 'p_line_num_tbl', p_line_num_tbl);
488: END IF;
489:

Line 486: PO_LOG.proc_begin(d_module, 'p_intf_line_id_tbl', p_intf_line_id_tbl);

482:
483: IF (PO_LOG.d_proc) THEN
484: PO_LOG.proc_begin(d_module, 'p_po_header_id_tbl', p_po_header_id_tbl);
485: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
486: PO_LOG.proc_begin(d_module, 'p_intf_line_id_tbl', p_intf_line_id_tbl);
487: PO_LOG.proc_begin(d_module, 'p_line_num_tbl', p_line_num_tbl);
488: END IF;
489:
490: x_line_num_unique_tbl := PO_TBL_VARCHAR1();

Line 487: PO_LOG.proc_begin(d_module, 'p_line_num_tbl', p_line_num_tbl);

483: IF (PO_LOG.d_proc) THEN
484: PO_LOG.proc_begin(d_module, 'p_po_header_id_tbl', p_po_header_id_tbl);
485: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
486: PO_LOG.proc_begin(d_module, 'p_intf_line_id_tbl', p_intf_line_id_tbl);
487: PO_LOG.proc_begin(d_module, 'p_line_num_tbl', p_line_num_tbl);
488: END IF;
489:
490: x_line_num_unique_tbl := PO_TBL_VARCHAR1();
491: x_line_num_unique_tbl.EXTEND(p_line_num_tbl.COUNT);

Line 551: IF (PO_LOG.d_stmt) THEN

547: RETURNING num1 BULK COLLECT INTO l_index_tbl;
548:
549: FOR i IN 1..l_index_tbl.COUNT
550: LOOP
551: IF (PO_LOG.d_stmt) THEN
552: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
553: PO_LOG.stmt(d_module, d_position, 'line num is not unique',
554: p_line_num_tbl(l_index_tbl(i)));
555: END IF;

Line 552: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));

548:
549: FOR i IN 1..l_index_tbl.COUNT
550: LOOP
551: IF (PO_LOG.d_stmt) THEN
552: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
553: PO_LOG.stmt(d_module, d_position, 'line num is not unique',
554: p_line_num_tbl(l_index_tbl(i)));
555: END IF;
556:

Line 553: PO_LOG.stmt(d_module, d_position, 'line num is not unique',

549: FOR i IN 1..l_index_tbl.COUNT
550: LOOP
551: IF (PO_LOG.d_stmt) THEN
552: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
553: PO_LOG.stmt(d_module, d_position, 'line num is not unique',
554: p_line_num_tbl(l_index_tbl(i)));
555: END IF;
556:
557: x_line_num_unique_tbl(l_index_tbl(i)) := FND_API.g_FALSE;

Line 560: IF (PO_LOG.d_proc) THEN

556:
557: x_line_num_unique_tbl(l_index_tbl(i)) := FND_API.g_FALSE;
558: END LOOP;
559:
560: IF (PO_LOG.d_proc) THEN
561: PO_LOG.proc_end (d_module);
562: END IF;
563:
564: EXCEPTION

Line 561: PO_LOG.proc_end (d_module);

557: x_line_num_unique_tbl(l_index_tbl(i)) := FND_API.g_FALSE;
558: END LOOP;
559:
560: IF (PO_LOG.d_proc) THEN
561: PO_LOG.proc_end (d_module);
562: END IF;
563:
564: EXCEPTION
565: WHEN OTHERS THEN

Line 617: IF (PO_LOG.d_proc) THEN

613: l_po_line_id_no_dup_tbl DBMS_SQL.number_table;
614: BEGIN
615: d_position := 0;
616:
617: IF (PO_LOG.d_proc) THEN
618: PO_LOG.proc_begin(d_module, 'p_po_line_id_tbl', p_po_line_id_tbl);
619: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
620: END IF;
621:

Line 618: PO_LOG.proc_begin(d_module, 'p_po_line_id_tbl', p_po_line_id_tbl);

614: BEGIN
615: d_position := 0;
616:
617: IF (PO_LOG.d_proc) THEN
618: PO_LOG.proc_begin(d_module, 'p_po_line_id_tbl', p_po_line_id_tbl);
619: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
620: END IF;
621:
622: -- No need to calculate max shipment number for following two cases:

Line 619: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);

615: d_position := 0;
616:
617: IF (PO_LOG.d_proc) THEN
618: PO_LOG.proc_begin(d_module, 'p_po_line_id_tbl', p_po_line_id_tbl);
619: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
620: END IF;
621:
622: -- No need to calculate max shipment number for following two cases:
623: -- 1. the max shipment number has already been cached before;

Line 628: IF (PO_LOG.d_stmt) THEN

624: -- 2. same po_line_id appears more than once, then the max shipment
625: -- number only needs to be calculated once
626: FOR i IN 1..p_po_line_id_tbl.COUNT
627: LOOP
628: IF (PO_LOG.d_stmt) THEN
629: PO_LOG.stmt(d_module, d_position, 'index', i);
630: PO_LOG.stmt(d_module, d_position, 'already calculated?',
631: g_max_shipment_num_tbl.EXISTS(p_po_line_id_tbl(i)));
632: PO_LOG.stmt(d_module, d_position, 'duplicate id?',

Line 629: PO_LOG.stmt(d_module, d_position, 'index', i);

625: -- number only needs to be calculated once
626: FOR i IN 1..p_po_line_id_tbl.COUNT
627: LOOP
628: IF (PO_LOG.d_stmt) THEN
629: PO_LOG.stmt(d_module, d_position, 'index', i);
630: PO_LOG.stmt(d_module, d_position, 'already calculated?',
631: g_max_shipment_num_tbl.EXISTS(p_po_line_id_tbl(i)));
632: PO_LOG.stmt(d_module, d_position, 'duplicate id?',
633: l_po_line_id_no_dup_tbl.EXISTS(p_po_line_id_tbl(i)));

Line 630: PO_LOG.stmt(d_module, d_position, 'already calculated?',

626: FOR i IN 1..p_po_line_id_tbl.COUNT
627: LOOP
628: IF (PO_LOG.d_stmt) THEN
629: PO_LOG.stmt(d_module, d_position, 'index', i);
630: PO_LOG.stmt(d_module, d_position, 'already calculated?',
631: g_max_shipment_num_tbl.EXISTS(p_po_line_id_tbl(i)));
632: PO_LOG.stmt(d_module, d_position, 'duplicate id?',
633: l_po_line_id_no_dup_tbl.EXISTS(p_po_line_id_tbl(i)));
634: END IF;

Line 632: PO_LOG.stmt(d_module, d_position, 'duplicate id?',

628: IF (PO_LOG.d_stmt) THEN
629: PO_LOG.stmt(d_module, d_position, 'index', i);
630: PO_LOG.stmt(d_module, d_position, 'already calculated?',
631: g_max_shipment_num_tbl.EXISTS(p_po_line_id_tbl(i)));
632: PO_LOG.stmt(d_module, d_position, 'duplicate id?',
633: l_po_line_id_no_dup_tbl.EXISTS(p_po_line_id_tbl(i)));
634: END IF;
635:
636: IF (g_max_shipment_num_tbl.EXISTS(p_po_line_id_tbl(i))) THEN

Line 734: IF (PO_LOG.d_stmt) THEN

730: RETURNING num1, num2 BULK COLLECT INTO l_po_line_id_tbl, l_max_shipment_num_tbl;
731:
732: FOR i IN 1..l_po_line_id_tbl.COUNT
733: LOOP
734: IF (PO_LOG.d_stmt) THEN
735: PO_LOG.stmt(d_module, d_position, 'index', i);
736: IF (g_max_shipment_num_tbl.EXISTS(l_po_line_id_tbl(i))) THEN
737: PO_LOG.stmt(d_module, d_position, 'current max shipment num',
738: g_max_shipment_num_tbl(l_po_line_id_tbl(i)));

Line 735: PO_LOG.stmt(d_module, d_position, 'index', i);

731:
732: FOR i IN 1..l_po_line_id_tbl.COUNT
733: LOOP
734: IF (PO_LOG.d_stmt) THEN
735: PO_LOG.stmt(d_module, d_position, 'index', i);
736: IF (g_max_shipment_num_tbl.EXISTS(l_po_line_id_tbl(i))) THEN
737: PO_LOG.stmt(d_module, d_position, 'current max shipment num',
738: g_max_shipment_num_tbl(l_po_line_id_tbl(i)));
739: END IF;

Line 737: PO_LOG.stmt(d_module, d_position, 'current max shipment num',

733: LOOP
734: IF (PO_LOG.d_stmt) THEN
735: PO_LOG.stmt(d_module, d_position, 'index', i);
736: IF (g_max_shipment_num_tbl.EXISTS(l_po_line_id_tbl(i))) THEN
737: PO_LOG.stmt(d_module, d_position, 'current max shipment num',
738: g_max_shipment_num_tbl(l_po_line_id_tbl(i)));
739: END IF;
740: PO_LOG.stmt(d_module, d_position, 'max shipment num',
741: l_max_shipment_num_tbl(i));

Line 740: PO_LOG.stmt(d_module, d_position, 'max shipment num',

736: IF (g_max_shipment_num_tbl.EXISTS(l_po_line_id_tbl(i))) THEN
737: PO_LOG.stmt(d_module, d_position, 'current max shipment num',
738: g_max_shipment_num_tbl(l_po_line_id_tbl(i)));
739: END IF;
740: PO_LOG.stmt(d_module, d_position, 'max shipment num',
741: l_max_shipment_num_tbl(i));
742: END IF;
743:
744: IF (g_max_shipment_num_tbl.EXISTS(l_po_line_id_tbl(i))) THEN

Line 753: IF (PO_LOG.d_proc) THEN

749: g_max_shipment_num_tbl(l_po_line_id_tbl(i)) := l_max_shipment_num_tbl(i);
750: END IF;
751: END LOOP;
752:
753: IF (PO_LOG.d_proc) THEN
754: PO_LOG.proc_end (d_module);
755: END IF;
756:
757: EXCEPTION

Line 754: PO_LOG.proc_end (d_module);

750: END IF;
751: END LOOP;
752:
753: IF (PO_LOG.d_proc) THEN
754: PO_LOG.proc_end (d_module);
755: END IF;
756:
757: EXCEPTION
758: WHEN OTHERS THEN

Line 803: IF (PO_LOG.d_proc) THEN

799:
800: BEGIN
801: d_position := 0;
802:
803: IF (PO_LOG.d_proc) THEN
804: PO_LOG.proc_begin(d_module, 'p_po_line_id', p_po_line_id);
805: END IF;
806:
807: IF (g_max_shipment_num_tbl.EXISTS(p_po_line_id)) THEN

Line 804: PO_LOG.proc_begin(d_module, 'p_po_line_id', p_po_line_id);

800: BEGIN
801: d_position := 0;
802:
803: IF (PO_LOG.d_proc) THEN
804: PO_LOG.proc_begin(d_module, 'p_po_line_id', p_po_line_id);
805: END IF;
806:
807: IF (g_max_shipment_num_tbl.EXISTS(p_po_line_id)) THEN
808: g_max_shipment_num_tbl(p_po_line_id) := g_max_shipment_num_tbl(p_po_line_id) + 1;

Line 813: IF (PO_LOG.d_proc) THEN

809: ELSE
810: g_max_shipment_num_tbl(p_po_line_id) := 1;
811: END IF;
812:
813: IF (PO_LOG.d_proc) THEN
814: PO_LOG.proc_return(d_module, g_max_shipment_num_tbl(p_po_line_id));
815: END IF;
816:
817: RETURN g_max_shipment_num_tbl(p_po_line_id);

Line 814: PO_LOG.proc_return(d_module, g_max_shipment_num_tbl(p_po_line_id));

810: g_max_shipment_num_tbl(p_po_line_id) := 1;
811: END IF;
812:
813: IF (PO_LOG.d_proc) THEN
814: PO_LOG.proc_return(d_module, g_max_shipment_num_tbl(p_po_line_id));
815: END IF;
816:
817: RETURN g_max_shipment_num_tbl(p_po_line_id);
818:

Line 852: IF (PO_LOG.d_proc) THEN

848: l_next_line_loc_id NUMBER;
849: BEGIN
850: d_position := 0;
851:
852: IF (PO_LOG.d_proc) THEN
853: PO_LOG.proc_begin(d_module);
854: END IF;
855:
856: SELECT po_line_locations_s.nextval

Line 853: PO_LOG.proc_begin(d_module);

849: BEGIN
850: d_position := 0;
851:
852: IF (PO_LOG.d_proc) THEN
853: PO_LOG.proc_begin(d_module);
854: END IF;
855:
856: SELECT po_line_locations_s.nextval
857: INTO l_next_line_loc_id

Line 860: IF (PO_LOG.d_proc) THEN

856: SELECT po_line_locations_s.nextval
857: INTO l_next_line_loc_id
858: FROM DUAL;
859:
860: IF (PO_LOG.d_proc) THEN
861: PO_LOG.proc_return(d_module, l_next_line_loc_id);
862: END IF;
863:
864: RETURN l_next_line_loc_id;

Line 861: PO_LOG.proc_return(d_module, l_next_line_loc_id);

857: INTO l_next_line_loc_id
858: FROM DUAL;
859:
860: IF (PO_LOG.d_proc) THEN
861: PO_LOG.proc_return(d_module, l_next_line_loc_id);
862: END IF;
863:
864: RETURN l_next_line_loc_id;
865: END get_next_line_loc_id;

Line 912: IF (PO_LOG.d_proc) THEN

908: l_key po_session_gt.key%TYPE;
909: BEGIN
910: d_position := 0;
911:
912: IF (PO_LOG.d_proc) THEN
913: PO_LOG.proc_begin(d_module, 'p_po_line_id_tbl', p_po_line_id_tbl);
914: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
915: PO_LOG.proc_begin(d_module, 'p_intf_line_loc_id_tbl', p_intf_line_loc_id_tbl);
916: PO_LOG.proc_begin(d_module, 'p_shipment_num_tbl', p_shipment_num_tbl);

Line 913: PO_LOG.proc_begin(d_module, 'p_po_line_id_tbl', p_po_line_id_tbl);

909: BEGIN
910: d_position := 0;
911:
912: IF (PO_LOG.d_proc) THEN
913: PO_LOG.proc_begin(d_module, 'p_po_line_id_tbl', p_po_line_id_tbl);
914: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
915: PO_LOG.proc_begin(d_module, 'p_intf_line_loc_id_tbl', p_intf_line_loc_id_tbl);
916: PO_LOG.proc_begin(d_module, 'p_shipment_num_tbl', p_shipment_num_tbl);
917: END IF;

Line 914: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);

910: d_position := 0;
911:
912: IF (PO_LOG.d_proc) THEN
913: PO_LOG.proc_begin(d_module, 'p_po_line_id_tbl', p_po_line_id_tbl);
914: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
915: PO_LOG.proc_begin(d_module, 'p_intf_line_loc_id_tbl', p_intf_line_loc_id_tbl);
916: PO_LOG.proc_begin(d_module, 'p_shipment_num_tbl', p_shipment_num_tbl);
917: END IF;
918:

Line 915: PO_LOG.proc_begin(d_module, 'p_intf_line_loc_id_tbl', p_intf_line_loc_id_tbl);

911:
912: IF (PO_LOG.d_proc) THEN
913: PO_LOG.proc_begin(d_module, 'p_po_line_id_tbl', p_po_line_id_tbl);
914: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
915: PO_LOG.proc_begin(d_module, 'p_intf_line_loc_id_tbl', p_intf_line_loc_id_tbl);
916: PO_LOG.proc_begin(d_module, 'p_shipment_num_tbl', p_shipment_num_tbl);
917: END IF;
918:
919: x_shipment_num_unique_tbl := PO_TBL_VARCHAR1();

Line 916: PO_LOG.proc_begin(d_module, 'p_shipment_num_tbl', p_shipment_num_tbl);

912: IF (PO_LOG.d_proc) THEN
913: PO_LOG.proc_begin(d_module, 'p_po_line_id_tbl', p_po_line_id_tbl);
914: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
915: PO_LOG.proc_begin(d_module, 'p_intf_line_loc_id_tbl', p_intf_line_loc_id_tbl);
916: PO_LOG.proc_begin(d_module, 'p_shipment_num_tbl', p_shipment_num_tbl);
917: END IF;
918:
919: x_shipment_num_unique_tbl := PO_TBL_VARCHAR1();
920: x_shipment_num_unique_tbl.EXTEND(p_shipment_num_tbl.COUNT);

Line 977: IF (PO_LOG.d_stmt) THEN

973: RETURNING num1 BULK COLLECT INTO l_index_tbl;
974:
975: FOR i IN 1..l_index_tbl.COUNT
976: LOOP
977: IF (PO_LOG.d_stmt) THEN
978: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
979: PO_LOG.stmt(d_module, d_position, 'shipment num is not unique',
980: p_shipment_num_tbl(l_index_tbl(i)));
981: END IF;

Line 978: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));

974:
975: FOR i IN 1..l_index_tbl.COUNT
976: LOOP
977: IF (PO_LOG.d_stmt) THEN
978: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
979: PO_LOG.stmt(d_module, d_position, 'shipment num is not unique',
980: p_shipment_num_tbl(l_index_tbl(i)));
981: END IF;
982:

Line 979: PO_LOG.stmt(d_module, d_position, 'shipment num is not unique',

975: FOR i IN 1..l_index_tbl.COUNT
976: LOOP
977: IF (PO_LOG.d_stmt) THEN
978: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
979: PO_LOG.stmt(d_module, d_position, 'shipment num is not unique',
980: p_shipment_num_tbl(l_index_tbl(i)));
981: END IF;
982:
983: x_shipment_num_unique_tbl(l_index_tbl(i)) := FND_API.g_FALSE;

Line 986: IF (PO_LOG.d_proc) THEN

982:
983: x_shipment_num_unique_tbl(l_index_tbl(i)) := FND_API.g_FALSE;
984: END LOOP;
985:
986: IF (PO_LOG.d_proc) THEN
987: PO_LOG.proc_end (d_module);
988: END IF;
989:
990: EXCEPTION

Line 987: PO_LOG.proc_end (d_module);

983: x_shipment_num_unique_tbl(l_index_tbl(i)) := FND_API.g_FALSE;
984: END LOOP;
985:
986: IF (PO_LOG.d_proc) THEN
987: PO_LOG.proc_end (d_module);
988: END IF;
989:
990: EXCEPTION
991: WHEN OTHERS THEN

Line 1043: IF (PO_LOG.d_proc) THEN

1039: l_line_loc_id_no_dup_tbl DBMS_SQL.number_table;
1040: BEGIN
1041: d_position := 0;
1042:
1043: IF (PO_LOG.d_proc) THEN
1044: PO_LOG.proc_begin(d_module, 'p_line_loc_id_tbl', p_line_loc_id_tbl);
1045: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1046: END IF;
1047:

Line 1044: PO_LOG.proc_begin(d_module, 'p_line_loc_id_tbl', p_line_loc_id_tbl);

1040: BEGIN
1041: d_position := 0;
1042:
1043: IF (PO_LOG.d_proc) THEN
1044: PO_LOG.proc_begin(d_module, 'p_line_loc_id_tbl', p_line_loc_id_tbl);
1045: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1046: END IF;
1047:
1048: -- No need to calculate max dist number for following two cases:

Line 1045: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);

1041: d_position := 0;
1042:
1043: IF (PO_LOG.d_proc) THEN
1044: PO_LOG.proc_begin(d_module, 'p_line_loc_id_tbl', p_line_loc_id_tbl);
1045: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1046: END IF;
1047:
1048: -- No need to calculate max dist number for following two cases:
1049: -- 1. the max dist number has already been cached before;

Line 1054: IF (PO_LOG.d_stmt) THEN

1050: -- 2. same line_loc_id appears more than once, then the max dist
1051: -- number only needs to be calculated once
1052: FOR i IN 1..p_line_loc_id_tbl.COUNT
1053: LOOP
1054: IF (PO_LOG.d_stmt) THEN
1055: PO_LOG.stmt(d_module, d_position, 'index', i);
1056: PO_LOG.stmt(d_module, d_position, 'already calculated?',
1057: g_max_dist_num_tbl.EXISTS(p_line_loc_id_tbl(i)));
1058: PO_LOG.stmt(d_module, d_position, 'duplicate id?',

Line 1055: PO_LOG.stmt(d_module, d_position, 'index', i);

1051: -- number only needs to be calculated once
1052: FOR i IN 1..p_line_loc_id_tbl.COUNT
1053: LOOP
1054: IF (PO_LOG.d_stmt) THEN
1055: PO_LOG.stmt(d_module, d_position, 'index', i);
1056: PO_LOG.stmt(d_module, d_position, 'already calculated?',
1057: g_max_dist_num_tbl.EXISTS(p_line_loc_id_tbl(i)));
1058: PO_LOG.stmt(d_module, d_position, 'duplicate id?',
1059: l_line_loc_id_no_dup_tbl.EXISTS(p_line_loc_id_tbl(i)));

Line 1056: PO_LOG.stmt(d_module, d_position, 'already calculated?',

1052: FOR i IN 1..p_line_loc_id_tbl.COUNT
1053: LOOP
1054: IF (PO_LOG.d_stmt) THEN
1055: PO_LOG.stmt(d_module, d_position, 'index', i);
1056: PO_LOG.stmt(d_module, d_position, 'already calculated?',
1057: g_max_dist_num_tbl.EXISTS(p_line_loc_id_tbl(i)));
1058: PO_LOG.stmt(d_module, d_position, 'duplicate id?',
1059: l_line_loc_id_no_dup_tbl.EXISTS(p_line_loc_id_tbl(i)));
1060: END IF;

Line 1058: PO_LOG.stmt(d_module, d_position, 'duplicate id?',

1054: IF (PO_LOG.d_stmt) THEN
1055: PO_LOG.stmt(d_module, d_position, 'index', i);
1056: PO_LOG.stmt(d_module, d_position, 'already calculated?',
1057: g_max_dist_num_tbl.EXISTS(p_line_loc_id_tbl(i)));
1058: PO_LOG.stmt(d_module, d_position, 'duplicate id?',
1059: l_line_loc_id_no_dup_tbl.EXISTS(p_line_loc_id_tbl(i)));
1060: END IF;
1061:
1062: IF (g_max_dist_num_tbl.EXISTS(p_line_loc_id_tbl(i))) THEN

Line 1129: IF (PO_LOG.d_stmt) THEN

1125: RETURNING num1, num2 BULK COLLECT INTO l_line_loc_id_tbl, l_max_dist_num_tbl;
1126:
1127: FOR i IN 1..l_line_loc_id_tbl.COUNT
1128: LOOP
1129: IF (PO_LOG.d_stmt) THEN
1130: PO_LOG.stmt(d_module, d_position, 'index', i);
1131: IF (g_max_dist_num_tbl.EXISTS(l_line_loc_id_tbl(i))) THEN
1132: PO_LOG.stmt(d_module, d_position, 'current max dist num',
1133: g_max_dist_num_tbl(l_line_loc_id_tbl(i)));

Line 1130: PO_LOG.stmt(d_module, d_position, 'index', i);

1126:
1127: FOR i IN 1..l_line_loc_id_tbl.COUNT
1128: LOOP
1129: IF (PO_LOG.d_stmt) THEN
1130: PO_LOG.stmt(d_module, d_position, 'index', i);
1131: IF (g_max_dist_num_tbl.EXISTS(l_line_loc_id_tbl(i))) THEN
1132: PO_LOG.stmt(d_module, d_position, 'current max dist num',
1133: g_max_dist_num_tbl(l_line_loc_id_tbl(i)));
1134: END IF;

Line 1132: PO_LOG.stmt(d_module, d_position, 'current max dist num',

1128: LOOP
1129: IF (PO_LOG.d_stmt) THEN
1130: PO_LOG.stmt(d_module, d_position, 'index', i);
1131: IF (g_max_dist_num_tbl.EXISTS(l_line_loc_id_tbl(i))) THEN
1132: PO_LOG.stmt(d_module, d_position, 'current max dist num',
1133: g_max_dist_num_tbl(l_line_loc_id_tbl(i)));
1134: END IF;
1135: PO_LOG.stmt(d_module, d_position, 'max dist num',
1136: l_max_dist_num_tbl(i));

Line 1135: PO_LOG.stmt(d_module, d_position, 'max dist num',

1131: IF (g_max_dist_num_tbl.EXISTS(l_line_loc_id_tbl(i))) THEN
1132: PO_LOG.stmt(d_module, d_position, 'current max dist num',
1133: g_max_dist_num_tbl(l_line_loc_id_tbl(i)));
1134: END IF;
1135: PO_LOG.stmt(d_module, d_position, 'max dist num',
1136: l_max_dist_num_tbl(i));
1137: END IF;
1138:
1139: IF (g_max_dist_num_tbl.EXISTS(l_line_loc_id_tbl(i))) THEN

Line 1148: IF (PO_LOG.d_proc) THEN

1144: g_max_dist_num_tbl(l_line_loc_id_tbl(i)) := l_max_dist_num_tbl(i);
1145: END IF;
1146: END LOOP;
1147:
1148: IF (PO_LOG.d_proc) THEN
1149: PO_LOG.proc_end (d_module);
1150: END IF;
1151:
1152: EXCEPTION

Line 1149: PO_LOG.proc_end (d_module);

1145: END IF;
1146: END LOOP;
1147:
1148: IF (PO_LOG.d_proc) THEN
1149: PO_LOG.proc_end (d_module);
1150: END IF;
1151:
1152: EXCEPTION
1153: WHEN OTHERS THEN

Line 1200: IF (PO_LOG.d_proc) THEN

1196:
1197: BEGIN
1198: d_position := 0;
1199:
1200: IF (PO_LOG.d_proc) THEN
1201: PO_LOG.proc_begin(d_module, 'p_line_loc_id', p_line_loc_id);
1202: END IF;
1203:
1204: IF (g_max_dist_num_tbl.EXISTS(p_line_loc_id)) THEN

Line 1201: PO_LOG.proc_begin(d_module, 'p_line_loc_id', p_line_loc_id);

1197: BEGIN
1198: d_position := 0;
1199:
1200: IF (PO_LOG.d_proc) THEN
1201: PO_LOG.proc_begin(d_module, 'p_line_loc_id', p_line_loc_id);
1202: END IF;
1203:
1204: IF (g_max_dist_num_tbl.EXISTS(p_line_loc_id)) THEN
1205: g_max_dist_num_tbl(p_line_loc_id) := g_max_dist_num_tbl(p_line_loc_id) + 1;

Line 1210: IF (PO_LOG.d_proc) THEN

1206: ELSE
1207: g_max_dist_num_tbl(p_line_loc_id) := 1;
1208: END IF;
1209:
1210: IF (PO_LOG.d_proc) THEN
1211: PO_LOG.proc_return(d_module, g_max_dist_num_tbl(p_line_loc_id));
1212: END IF;
1213:
1214: RETURN g_max_dist_num_tbl(p_line_loc_id);

Line 1211: PO_LOG.proc_return(d_module, g_max_dist_num_tbl(p_line_loc_id));

1207: g_max_dist_num_tbl(p_line_loc_id) := 1;
1208: END IF;
1209:
1210: IF (PO_LOG.d_proc) THEN
1211: PO_LOG.proc_return(d_module, g_max_dist_num_tbl(p_line_loc_id));
1212: END IF;
1213:
1214: RETURN g_max_dist_num_tbl(p_line_loc_id);
1215: END get_next_dist_num;

Line 1248: IF (PO_LOG.d_proc) THEN

1244: l_next_dist_id NUMBER;
1245: BEGIN
1246: d_position := 0;
1247:
1248: IF (PO_LOG.d_proc) THEN
1249: PO_LOG.proc_begin(d_module);
1250: END IF;
1251:
1252: SELECT po_distributions_s.nextval

Line 1249: PO_LOG.proc_begin(d_module);

1245: BEGIN
1246: d_position := 0;
1247:
1248: IF (PO_LOG.d_proc) THEN
1249: PO_LOG.proc_begin(d_module);
1250: END IF;
1251:
1252: SELECT po_distributions_s.nextval
1253: INTO l_next_dist_id

Line 1256: IF (PO_LOG.d_proc) THEN

1252: SELECT po_distributions_s.nextval
1253: INTO l_next_dist_id
1254: FROM DUAL;
1255:
1256: IF (PO_LOG.d_proc) THEN
1257: PO_LOG.proc_return(d_module, l_next_dist_id);
1258: END IF;
1259:
1260: RETURN l_next_dist_id;

Line 1257: PO_LOG.proc_return(d_module, l_next_dist_id);

1253: INTO l_next_dist_id
1254: FROM DUAL;
1255:
1256: IF (PO_LOG.d_proc) THEN
1257: PO_LOG.proc_return(d_module, l_next_dist_id);
1258: END IF;
1259:
1260: RETURN l_next_dist_id;
1261: EXCEPTION

Line 1320: IF (PO_LOG.d_proc) THEN

1316: l_index_tbl DBMS_SQL.NUMBER_TABLE;
1317: BEGIN
1318: d_position := 0;
1319:
1320: IF (PO_LOG.d_proc) THEN
1321: PO_LOG.proc_begin(d_module, 'p_line_loc_id_tbl', p_line_loc_id_tbl);
1322: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1323: PO_LOG.proc_begin(d_module, 'p_intf_dist_id_tbl', p_intf_dist_id_tbl);
1324: PO_LOG.proc_begin(d_module, 'p_dist_num_tbl', p_dist_num_tbl);

Line 1321: PO_LOG.proc_begin(d_module, 'p_line_loc_id_tbl', p_line_loc_id_tbl);

1317: BEGIN
1318: d_position := 0;
1319:
1320: IF (PO_LOG.d_proc) THEN
1321: PO_LOG.proc_begin(d_module, 'p_line_loc_id_tbl', p_line_loc_id_tbl);
1322: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1323: PO_LOG.proc_begin(d_module, 'p_intf_dist_id_tbl', p_intf_dist_id_tbl);
1324: PO_LOG.proc_begin(d_module, 'p_dist_num_tbl', p_dist_num_tbl);
1325: END IF;

Line 1322: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);

1318: d_position := 0;
1319:
1320: IF (PO_LOG.d_proc) THEN
1321: PO_LOG.proc_begin(d_module, 'p_line_loc_id_tbl', p_line_loc_id_tbl);
1322: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1323: PO_LOG.proc_begin(d_module, 'p_intf_dist_id_tbl', p_intf_dist_id_tbl);
1324: PO_LOG.proc_begin(d_module, 'p_dist_num_tbl', p_dist_num_tbl);
1325: END IF;
1326:

Line 1323: PO_LOG.proc_begin(d_module, 'p_intf_dist_id_tbl', p_intf_dist_id_tbl);

1319:
1320: IF (PO_LOG.d_proc) THEN
1321: PO_LOG.proc_begin(d_module, 'p_line_loc_id_tbl', p_line_loc_id_tbl);
1322: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1323: PO_LOG.proc_begin(d_module, 'p_intf_dist_id_tbl', p_intf_dist_id_tbl);
1324: PO_LOG.proc_begin(d_module, 'p_dist_num_tbl', p_dist_num_tbl);
1325: END IF;
1326:
1327: x_dist_num_unique_tbl := PO_TBL_VARCHAR1();

Line 1324: PO_LOG.proc_begin(d_module, 'p_dist_num_tbl', p_dist_num_tbl);

1320: IF (PO_LOG.d_proc) THEN
1321: PO_LOG.proc_begin(d_module, 'p_line_loc_id_tbl', p_line_loc_id_tbl);
1322: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1323: PO_LOG.proc_begin(d_module, 'p_intf_dist_id_tbl', p_intf_dist_id_tbl);
1324: PO_LOG.proc_begin(d_module, 'p_dist_num_tbl', p_dist_num_tbl);
1325: END IF;
1326:
1327: x_dist_num_unique_tbl := PO_TBL_VARCHAR1();
1328: x_dist_num_unique_tbl.EXTEND(p_dist_num_tbl.COUNT);

Line 1382: IF (PO_LOG.d_stmt) THEN

1378: RETURNING num1 BULK COLLECT INTO l_index_tbl;
1379:
1380: FOR i IN 1..l_index_tbl.COUNT
1381: LOOP
1382: IF (PO_LOG.d_stmt) THEN
1383: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
1384: PO_LOG.stmt(d_module, d_position, 'dist number is not unique',
1385: p_dist_num_tbl(l_index_tbl(i)));
1386: END IF;

Line 1383: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));

1379:
1380: FOR i IN 1..l_index_tbl.COUNT
1381: LOOP
1382: IF (PO_LOG.d_stmt) THEN
1383: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
1384: PO_LOG.stmt(d_module, d_position, 'dist number is not unique',
1385: p_dist_num_tbl(l_index_tbl(i)));
1386: END IF;
1387:

Line 1384: PO_LOG.stmt(d_module, d_position, 'dist number is not unique',

1380: FOR i IN 1..l_index_tbl.COUNT
1381: LOOP
1382: IF (PO_LOG.d_stmt) THEN
1383: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
1384: PO_LOG.stmt(d_module, d_position, 'dist number is not unique',
1385: p_dist_num_tbl(l_index_tbl(i)));
1386: END IF;
1387:
1388: x_dist_num_unique_tbl(l_index_tbl(i)) := FND_API.g_FALSE;

Line 1391: IF (PO_LOG.d_proc) THEN

1387:
1388: x_dist_num_unique_tbl(l_index_tbl(i)) := FND_API.g_FALSE;
1389: END LOOP;
1390:
1391: IF (PO_LOG.d_proc) THEN
1392: PO_LOG.proc_end (d_module);
1393: END IF;
1394:
1395: EXCEPTION

Line 1392: PO_LOG.proc_end (d_module);

1388: x_dist_num_unique_tbl(l_index_tbl(i)) := FND_API.g_FALSE;
1389: END LOOP;
1390:
1391: IF (PO_LOG.d_proc) THEN
1392: PO_LOG.proc_end (d_module);
1393: END IF;
1394:
1395: EXCEPTION
1396: WHEN OTHERS THEN

Line 1455: IF (PO_LOG.d_proc) THEN

1451:
1452: BEGIN
1453: d_position := 0;
1454:
1455: IF (PO_LOG.d_proc) THEN
1456: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);
1457: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);
1458: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1459: END IF;

Line 1456: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);

1452: BEGIN
1453: d_position := 0;
1454:
1455: IF (PO_LOG.d_proc) THEN
1456: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);
1457: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);
1458: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1459: END IF;
1460:

Line 1457: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);

1453: d_position := 0;
1454:
1455: IF (PO_LOG.d_proc) THEN
1456: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);
1457: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);
1458: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1459: END IF;
1460:
1461: -- pick a new key for temp table

Line 1458: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);

1454:
1455: IF (PO_LOG.d_proc) THEN
1456: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);
1457: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);
1458: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1459: END IF;
1460:
1461: -- pick a new key for temp table
1462: l_key := PO_CORE_S.get_session_gt_nextval;

Line 1503: IF (PO_LOG.d_stmt) THEN

1499: WHERE key = l_key
1500: RETURNING char1, num1, num2 BULK COLLECT INTO
1501: l_entity_type_tbl, l_entity_id_tbl, l_max_price_diff_num_tbl;
1502:
1503: IF (PO_LOG.d_stmt) THEN
1504: PO_LOG.stmt(d_module, d_position, 'l_entity_type_tbl', l_entity_type_tbl);
1505: PO_LOG.stmt(d_module, d_position, 'l_entity_id_tbl', l_entity_id_tbl);
1506: PO_LOG.stmt(d_module, d_position, 'l_max_price_diff_num_tbl',
1507: l_max_price_diff_num_tbl);

Line 1504: PO_LOG.stmt(d_module, d_position, 'l_entity_type_tbl', l_entity_type_tbl);

1500: RETURNING char1, num1, num2 BULK COLLECT INTO
1501: l_entity_type_tbl, l_entity_id_tbl, l_max_price_diff_num_tbl;
1502:
1503: IF (PO_LOG.d_stmt) THEN
1504: PO_LOG.stmt(d_module, d_position, 'l_entity_type_tbl', l_entity_type_tbl);
1505: PO_LOG.stmt(d_module, d_position, 'l_entity_id_tbl', l_entity_id_tbl);
1506: PO_LOG.stmt(d_module, d_position, 'l_max_price_diff_num_tbl',
1507: l_max_price_diff_num_tbl);
1508: END IF;

Line 1505: PO_LOG.stmt(d_module, d_position, 'l_entity_id_tbl', l_entity_id_tbl);

1501: l_entity_type_tbl, l_entity_id_tbl, l_max_price_diff_num_tbl;
1502:
1503: IF (PO_LOG.d_stmt) THEN
1504: PO_LOG.stmt(d_module, d_position, 'l_entity_type_tbl', l_entity_type_tbl);
1505: PO_LOG.stmt(d_module, d_position, 'l_entity_id_tbl', l_entity_id_tbl);
1506: PO_LOG.stmt(d_module, d_position, 'l_max_price_diff_num_tbl',
1507: l_max_price_diff_num_tbl);
1508: END IF;
1509:

Line 1506: PO_LOG.stmt(d_module, d_position, 'l_max_price_diff_num_tbl',

1502:
1503: IF (PO_LOG.d_stmt) THEN
1504: PO_LOG.stmt(d_module, d_position, 'l_entity_type_tbl', l_entity_type_tbl);
1505: PO_LOG.stmt(d_module, d_position, 'l_entity_id_tbl', l_entity_id_tbl);
1506: PO_LOG.stmt(d_module, d_position, 'l_max_price_diff_num_tbl',
1507: l_max_price_diff_num_tbl);
1508: END IF;
1509:
1510: d_position := 40;

Line 1551: IF (PO_LOG.d_proc) THEN

1547: END LOOP;
1548:
1549: d_position := 60;
1550:
1551: IF (PO_LOG.d_proc) THEN
1552: PO_LOG.proc_end (d_module);
1553: END IF;
1554:
1555: EXCEPTION

Line 1552: PO_LOG.proc_end (d_module);

1548:
1549: d_position := 60;
1550:
1551: IF (PO_LOG.d_proc) THEN
1552: PO_LOG.proc_end (d_module);
1553: END IF;
1554:
1555: EXCEPTION
1556: WHEN OTHERS THEN

Line 1608: IF (PO_LOG.d_proc) THEN

1604:
1605: BEGIN
1606: d_position := 0;
1607:
1608: IF (PO_LOG.d_proc) THEN
1609: PO_LOG.proc_begin(d_module, 'p_entity_id', p_entity_id);
1610: PO_LOG.proc_begin(d_module, 'p_entity_type', p_entity_type);
1611: END IF;
1612:

Line 1609: PO_LOG.proc_begin(d_module, 'p_entity_id', p_entity_id);

1605: BEGIN
1606: d_position := 0;
1607:
1608: IF (PO_LOG.d_proc) THEN
1609: PO_LOG.proc_begin(d_module, 'p_entity_id', p_entity_id);
1610: PO_LOG.proc_begin(d_module, 'p_entity_type', p_entity_type);
1611: END IF;
1612:
1613: IF (p_entity_type IS NOT NULL AND p_entity_id IS NOT NULL) THEN

Line 1610: PO_LOG.proc_begin(d_module, 'p_entity_type', p_entity_type);

1606: d_position := 0;
1607:
1608: IF (PO_LOG.d_proc) THEN
1609: PO_LOG.proc_begin(d_module, 'p_entity_id', p_entity_id);
1610: PO_LOG.proc_begin(d_module, 'p_entity_type', p_entity_type);
1611: END IF;
1612:
1613: IF (p_entity_type IS NOT NULL AND p_entity_id IS NOT NULL) THEN
1614: IF (g_max_price_diff_num_tbl.EXISTS(p_entity_type) AND

Line 1622: IF (PO_LOG.d_proc) THEN

1618: ELSE
1619: g_max_price_diff_num_tbl(p_entity_type)(p_entity_id) := 1;
1620: END IF;
1621:
1622: IF (PO_LOG.d_proc) THEN
1623: PO_LOG.proc_return(d_module, g_max_price_diff_num_tbl(p_entity_type)(p_entity_id));
1624: END IF;
1625:
1626: RETURN g_max_price_diff_num_tbl(p_entity_type)(p_entity_id);

Line 1623: PO_LOG.proc_return(d_module, g_max_price_diff_num_tbl(p_entity_type)(p_entity_id));

1619: g_max_price_diff_num_tbl(p_entity_type)(p_entity_id) := 1;
1620: END IF;
1621:
1622: IF (PO_LOG.d_proc) THEN
1623: PO_LOG.proc_return(d_module, g_max_price_diff_num_tbl(p_entity_type)(p_entity_id));
1624: END IF;
1625:
1626: RETURN g_max_price_diff_num_tbl(p_entity_type)(p_entity_id);
1627: ELSE

Line 1628: IF (PO_LOG.d_proc) THEN

1624: END IF;
1625:
1626: RETURN g_max_price_diff_num_tbl(p_entity_type)(p_entity_id);
1627: ELSE
1628: IF (PO_LOG.d_proc) THEN
1629: PO_LOG.proc_return(d_module, 'NULL');
1630: END IF;
1631:
1632: RETURN NULL;

Line 1629: PO_LOG.proc_return(d_module, 'NULL');

1625:
1626: RETURN g_max_price_diff_num_tbl(p_entity_type)(p_entity_id);
1627: ELSE
1628: IF (PO_LOG.d_proc) THEN
1629: PO_LOG.proc_return(d_module, 'NULL');
1630: END IF;
1631:
1632: RETURN NULL;
1633: END IF;

Line 1692: IF (PO_LOG.d_proc) THEN

1688: l_price_diff_num_exist_tbl three_dimension_table_type;
1689: BEGIN
1690: d_position := 0;
1691:
1692: IF (PO_LOG.d_proc) THEN
1693: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);
1694: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);
1695: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1696: PO_LOG.proc_begin(d_module, 'p_intf_price_diff_id_tbl',

Line 1693: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);

1689: BEGIN
1690: d_position := 0;
1691:
1692: IF (PO_LOG.d_proc) THEN
1693: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);
1694: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);
1695: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1696: PO_LOG.proc_begin(d_module, 'p_intf_price_diff_id_tbl',
1697: p_intf_price_diff_id_tbl);

Line 1694: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);

1690: d_position := 0;
1691:
1692: IF (PO_LOG.d_proc) THEN
1693: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);
1694: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);
1695: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1696: PO_LOG.proc_begin(d_module, 'p_intf_price_diff_id_tbl',
1697: p_intf_price_diff_id_tbl);
1698: PO_LOG.proc_begin(d_module, 'p_price_diff_num_tbl', p_price_diff_num_tbl);

Line 1695: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);

1691:
1692: IF (PO_LOG.d_proc) THEN
1693: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);
1694: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);
1695: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1696: PO_LOG.proc_begin(d_module, 'p_intf_price_diff_id_tbl',
1697: p_intf_price_diff_id_tbl);
1698: PO_LOG.proc_begin(d_module, 'p_price_diff_num_tbl', p_price_diff_num_tbl);
1699: END IF;

Line 1696: PO_LOG.proc_begin(d_module, 'p_intf_price_diff_id_tbl',

1692: IF (PO_LOG.d_proc) THEN
1693: PO_LOG.proc_begin(d_module, 'p_entity_type_tbl', p_entity_type_tbl);
1694: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);
1695: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1696: PO_LOG.proc_begin(d_module, 'p_intf_price_diff_id_tbl',
1697: p_intf_price_diff_id_tbl);
1698: PO_LOG.proc_begin(d_module, 'p_price_diff_num_tbl', p_price_diff_num_tbl);
1699: END IF;
1700:

Line 1698: PO_LOG.proc_begin(d_module, 'p_price_diff_num_tbl', p_price_diff_num_tbl);

1694: PO_LOG.proc_begin(d_module, 'p_entity_id_tbl', p_entity_id_tbl);
1695: PO_LOG.proc_begin(d_module, 'p_draft_id_tbl', p_draft_id_tbl);
1696: PO_LOG.proc_begin(d_module, 'p_intf_price_diff_id_tbl',
1697: p_intf_price_diff_id_tbl);
1698: PO_LOG.proc_begin(d_module, 'p_price_diff_num_tbl', p_price_diff_num_tbl);
1699: END IF;
1700:
1701: x_price_diff_num_unique_tbl := PO_TBL_VARCHAR1();
1702: x_price_diff_num_unique_tbl.EXTEND(p_price_diff_num_tbl.COUNT);

Line 1747: IF (PO_LOG.d_stmt) THEN

1743: d_position := 30;
1744:
1745: FOR i IN 1..l_index_tbl.COUNT
1746: LOOP
1747: IF (PO_LOG.d_stmt) THEN
1748: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
1749: PO_LOG.stmt(d_module, d_position, 'price diff number is not unique',
1750: p_price_diff_num_tbl(l_index_tbl(i)));
1751: END IF;

Line 1748: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));

1744:
1745: FOR i IN 1..l_index_tbl.COUNT
1746: LOOP
1747: IF (PO_LOG.d_stmt) THEN
1748: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
1749: PO_LOG.stmt(d_module, d_position, 'price diff number is not unique',
1750: p_price_diff_num_tbl(l_index_tbl(i)));
1751: END IF;
1752:

Line 1749: PO_LOG.stmt(d_module, d_position, 'price diff number is not unique',

1745: FOR i IN 1..l_index_tbl.COUNT
1746: LOOP
1747: IF (PO_LOG.d_stmt) THEN
1748: PO_LOG.stmt(d_module, d_position, 'index', l_index_tbl(i));
1749: PO_LOG.stmt(d_module, d_position, 'price diff number is not unique',
1750: p_price_diff_num_tbl(l_index_tbl(i)));
1751: END IF;
1752:
1753: x_price_diff_num_unique_tbl(l_index_tbl(i)) := FND_API.g_FALSE;

Line 1769: IF (PO_LOG.d_stmt) THEN

1765: IF (l_price_diff_num_exist_tbl.EXISTS(p_entity_type_tbl(i)) AND
1766: l_price_diff_num_exist_tbl(p_entity_type_tbl(i)).EXISTS(p_entity_id_tbl(i)) AND
1767: l_price_diff_num_exist_tbl(p_entity_type_tbl(i))(p_entity_id_tbl(i)).EXISTS
1768: (p_price_diff_num_tbl(i))) THEN
1769: IF (PO_LOG.d_stmt) THEN
1770: PO_LOG.stmt(d_module, d_position, 'index', i);
1771: PO_LOG.stmt(d_module, d_position, 'price diff number is not unique',
1772: p_price_diff_num_tbl(i));
1773: END IF;

Line 1770: PO_LOG.stmt(d_module, d_position, 'index', i);

1766: l_price_diff_num_exist_tbl(p_entity_type_tbl(i)).EXISTS(p_entity_id_tbl(i)) AND
1767: l_price_diff_num_exist_tbl(p_entity_type_tbl(i))(p_entity_id_tbl(i)).EXISTS
1768: (p_price_diff_num_tbl(i))) THEN
1769: IF (PO_LOG.d_stmt) THEN
1770: PO_LOG.stmt(d_module, d_position, 'index', i);
1771: PO_LOG.stmt(d_module, d_position, 'price diff number is not unique',
1772: p_price_diff_num_tbl(i));
1773: END IF;
1774:

Line 1771: PO_LOG.stmt(d_module, d_position, 'price diff number is not unique',

1767: l_price_diff_num_exist_tbl(p_entity_type_tbl(i))(p_entity_id_tbl(i)).EXISTS
1768: (p_price_diff_num_tbl(i))) THEN
1769: IF (PO_LOG.d_stmt) THEN
1770: PO_LOG.stmt(d_module, d_position, 'index', i);
1771: PO_LOG.stmt(d_module, d_position, 'price diff number is not unique',
1772: p_price_diff_num_tbl(i));
1773: END IF;
1774:
1775: x_price_diff_num_unique_tbl(i) := FND_API.g_FALSE;

Line 1786: IF (PO_LOG.d_proc) THEN

1782: END LOOP;
1783:
1784: d_position := 50;
1785:
1786: IF (PO_LOG.d_proc) THEN
1787: PO_LOG.proc_end (d_module);
1788: END IF;
1789:
1790: EXCEPTION

Line 1787: PO_LOG.proc_end (d_module);

1783:
1784: d_position := 50;
1785:
1786: IF (PO_LOG.d_proc) THEN
1787: PO_LOG.proc_end (d_module);
1788: END IF;
1789:
1790: EXCEPTION
1791: WHEN OTHERS THEN

Line 1855: IF (PO_LOG.d_proc) THEN

1851:
1852: BEGIN
1853: d_position := 0;
1854:
1855: IF (PO_LOG.d_proc) THEN
1856: PO_LOG.proc_begin(d_module);
1857: END IF;
1858:
1859: FOR i IN 1..x_last_update_date_tbl.COUNT

Line 1856: PO_LOG.proc_begin(d_module);

1852: BEGIN
1853: d_position := 0;
1854:
1855: IF (PO_LOG.d_proc) THEN
1856: PO_LOG.proc_begin(d_module);
1857: END IF;
1858:
1859: FOR i IN 1..x_last_update_date_tbl.COUNT
1860: LOOP

Line 1872: IF (PO_LOG.d_proc) THEN

1868: x_program_id_tbl(i) := NVL(x_program_id_tbl(i), FND_GLOBAL.conc_program_id);
1869: x_program_update_date_tbl(i) := NVL(x_program_update_date_tbl(i), sysdate);
1870: END LOOP;
1871:
1872: IF (PO_LOG.d_proc) THEN
1873: PO_LOG.proc_end (d_module);
1874: END IF;
1875:
1876: EXCEPTION

Line 1873: PO_LOG.proc_end (d_module);

1869: x_program_update_date_tbl(i) := NVL(x_program_update_date_tbl(i), sysdate);
1870: END LOOP;
1871:
1872: IF (PO_LOG.d_proc) THEN
1873: PO_LOG.proc_end (d_module);
1874: END IF;
1875:
1876: EXCEPTION
1877: WHEN OTHERS THEN

Line 1918: IF (PO_LOG.d_proc) THEN

1914: l_next_set_process_id NUMBER;
1915: BEGIN
1916: d_position := 0;
1917:
1918: IF (PO_LOG.d_proc) THEN
1919: PO_LOG.proc_begin(d_module);
1920: END IF;
1921:
1922: SELECT po_items_interface_sets_s.nextval

Line 1919: PO_LOG.proc_begin(d_module);

1915: BEGIN
1916: d_position := 0;
1917:
1918: IF (PO_LOG.d_proc) THEN
1919: PO_LOG.proc_begin(d_module);
1920: END IF;
1921:
1922: SELECT po_items_interface_sets_s.nextval
1923: INTO l_next_set_process_id

Line 1926: IF (PO_LOG.d_proc) THEN

1922: SELECT po_items_interface_sets_s.nextval
1923: INTO l_next_set_process_id
1924: FROM DUAL;
1925:
1926: IF (PO_LOG.d_proc) THEN
1927: PO_LOG.proc_return(d_module, l_next_set_process_id);
1928: END IF;
1929:
1930: RETURN l_next_set_process_id;

Line 1927: PO_LOG.proc_return(d_module, l_next_set_process_id);

1923: INTO l_next_set_process_id
1924: FROM DUAL;
1925:
1926: IF (PO_LOG.d_proc) THEN
1927: PO_LOG.proc_return(d_module, l_next_set_process_id);
1928: END IF;
1929:
1930: RETURN l_next_set_process_id;
1931: END get_next_set_process_id;

Line 1962: IF (PO_LOG.d_proc) THEN

1958: l_precision NUMBER;
1959: BEGIN
1960: d_position := 0;
1961:
1962: IF (PO_LOG.d_proc) THEN
1963: PO_LOG.proc_begin(d_module, 'p_currency_code', p_currency_code);
1964: END IF;
1965:
1966: IF (x_precision_tbl.EXISTS(p_currency_code)) THEN

Line 1963: PO_LOG.proc_begin(d_module, 'p_currency_code', p_currency_code);

1959: BEGIN
1960: d_position := 0;
1961:
1962: IF (PO_LOG.d_proc) THEN
1963: PO_LOG.proc_begin(d_module, 'p_currency_code', p_currency_code);
1964: END IF;
1965:
1966: IF (x_precision_tbl.EXISTS(p_currency_code)) THEN
1967: d_position := 10;

Line 1969: IF (PO_LOG.d_proc) THEN

1965:
1966: IF (x_precision_tbl.EXISTS(p_currency_code)) THEN
1967: d_position := 10;
1968:
1969: IF (PO_LOG.d_proc) THEN
1970: PO_LOG.proc_return(d_module, x_precision_tbl(p_currency_code));
1971: END IF;
1972:
1973: return x_precision_tbl(p_currency_code);

Line 1970: PO_LOG.proc_return(d_module, x_precision_tbl(p_currency_code));

1966: IF (x_precision_tbl.EXISTS(p_currency_code)) THEN
1967: d_position := 10;
1968:
1969: IF (PO_LOG.d_proc) THEN
1970: PO_LOG.proc_return(d_module, x_precision_tbl(p_currency_code));
1971: END IF;
1972:
1973: return x_precision_tbl(p_currency_code);
1974: ELSE

Line 1985: IF (PO_LOG.d_proc) THEN

1981:
1982: -- set new value in hashtable
1983: x_precision_tbl(p_currency_code) := l_precision;
1984:
1985: IF (PO_LOG.d_proc) THEN
1986: PO_LOG.proc_return(d_module, l_precision);
1987: END IF;
1988:
1989: return l_precision;

Line 1986: PO_LOG.proc_return(d_module, l_precision);

1982: -- set new value in hashtable
1983: x_precision_tbl(p_currency_code) := l_precision;
1984:
1985: IF (PO_LOG.d_proc) THEN
1986: PO_LOG.proc_return(d_module, l_precision);
1987: END IF;
1988:
1989: return l_precision;
1990: END IF;