DBA Data[Home] [Help]

APPS.AP_ISP_UTILITIES_PKG dependencies on FND_LOG

Line 4: --added the below FND_LOG related variables, in order

1: PACKAGE BODY AP_ISP_UTILITIES_PKG AS
2: /* $Header: apisputb.pls 120.50.12020000.6 2013/05/20 07:19:20 rseeta ship $ */
3:
4: --added the below FND_LOG related variables, in order
5: --to enable LOGGING for this package.
6: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

Line 6: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

2: /* $Header: apisputb.pls 120.50.12020000.6 2013/05/20 07:19:20 rseeta ship $ */
3:
4: --added the below FND_LOG related variables, in order
5: --to enable LOGGING for this package.
6: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

Line 7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

3:
4: --added the below FND_LOG related variables, in order
5: --to enable LOGGING for this package.
6: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

4: --added the below FND_LOG related variables, in order
5: --to enable LOGGING for this package.
6: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

5: --to enable LOGGING for this package.
6: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_ISP_UTILITIES_PKG.';

Line 10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

6: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_ISP_UTILITIES_PKG.';
14:

Line 11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

7: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_ISP_UTILITIES_PKG.';
14:
15: g_inv_sysdate CONSTANT DATE := TRUNC(SYSDATE);

Line 12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

8: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
9: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_ISP_UTILITIES_PKG.';
14:
15: g_inv_sysdate CONSTANT DATE := TRUNC(SYSDATE);
16:

Line 94: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);

90: EXCEPTION
91: WHEN NO_DATA_FOUND THEN
92: debug_info := 'no data found for the invoice id = '|| p_invoice_id;
93: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
94: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);
95: END IF;
96:
97: -- don't do anything if invoice doesn't exist
98: return;

Line 104: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

100: debug_info := l_api_name || ': invoice_type = '|| l_invoice_type_lookup_code ||
101: ', set_of_books_id = ' || l_set_of_books_id ||
102: ', gl_date = ' || l_gl_date;
103: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
104: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
105: END IF;
106:
107:
108: --------------------------------------------------------------------------

Line 122: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, debug_info);

118: -- Use Default Doc Category
119: ---------------------------------------------------------------------
120: debug_info := 'Use Default Category, Seq:Always';
121: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
122: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, debug_info);
123: END IF;
124:
125: --Contract Payments: Modified the IF condition to look at the invoice_type
126: --rather than the sign of the invoice_amount in deciding which category to

Line 143: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, debug_info);

139: END IF;
140:
141: debug_info := '-----> l_doc_category_code = ' || l_doc_category_code ;
142: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
143: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, debug_info);
144: END IF;
145:
146: ---------------------------------------------------------------------------
147: -- Step 4

Line 155: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, debug_info);

151: IF ((l_doc_category_code IS NOT NULL) )THEN
152:
153: debug_info := 'Valid Category ->Check if valid Sequence assigned';
154: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
155: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, debug_info);
156: END IF;
157:
158: BEGIN
159: SELECT SEQ.DB_SEQUENCE_NAME,

Line 186: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, debug_info);

182: -- Get Doc Sequence Val
183: ----------------------------------------------------------------------
184: debug_info := 'Get Next Val';
185: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
186: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, debug_info);
187: END IF;
188:
189: l_return_code := FND_SEQNUM.GET_SEQ_VAL(
190: 200,

Line 205: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

201: || ' p_db_sequence_id = '||to_char(p_db_sequence_id )
202: ||' p_db_seq_name = '||p_db_seq_name
203: ||' p_db_sequence_value = '||to_char(p_db_sequence_value);
204: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
205: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
206: END IF;
207:
208: END IF; -- end of check l_current_invoice_status/doc_category_code
209: END IF; -- p_sequence_numbering = 'N'

Line 217: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);

213: EXCEPTION
214: WHEN OTHERS THEN
215:
216: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
217: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);
218: END IF;
219:
220: IF (SQLCODE < 0) THEN
221: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 222: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, SQLERRM);

218: END IF;
219:
220: IF (SQLCODE < 0) THEN
221: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
222: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, SQLERRM);
223: END IF;
224: END IF;
225:
226: END get_doc_sequence;

Line 283: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);

279: EXCEPTION
280: WHEN NO_DATA_FOUND THEN
281: debug_info := 'no data found for the invoice id = '|| p_invoice_id;
282: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
283: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);
284: END IF;
285:
286: return;
287: END;

Line 293: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

289: ', vendor_site_id = ' || l_vendor_site_id || ', org_id = ' ||
290: l_org_id || ', invoice_type = '|| l_invoice_type_lookup_code ||
291: ', invoice_date = ' || l_invoice_date;
292: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
293: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
294: END IF;
295:
296: BEGIN
297: -- bug8711412

Line 307: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);

303: EXCEPTION
304: WHEN NO_DATA_FOUND THEN
305: debug_info := 'no ap options found for the vendor_site_id = '|| l_vendor_site_id;
306: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
307: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);
308: END IF;
309:
310: return;
311: END;

Line 314: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

310: return;
311: END;
312: debug_info := l_api_name || ': terms_date_basis = ' || l_terms_date_basis;
313: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
314: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
315: END IF;
316:
317: --------------------------------------------------------------
318: -- Step 1

Line 324: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

320: --------------------------------------------------------------
321: IF (l_po_header_id is NOT NULL) Then
322: debug_info := 'Get term_id from header po_number';
323: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
324: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
325: END IF;
326:
327: SELECT terms_id
328: INTO p_terms_id

Line 335: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

331: AND type_lookup_code in ('BLANKET', 'PLANNED', 'STANDARD');
332:
333: debug_info := l_api_name || ': p_terms_id = ' || p_terms_id;
334: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
335: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
336: END IF;
337: END IF;
338:
339: -- no term from header level po_number, try lines level po_number

Line 343: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

339: -- no term from header level po_number, try lines level po_number
340: IF (p_terms_id is null ) THEN
341: debug_info := 'Get term_id from lines po_numbers';
342: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
343: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
344: END IF;
345: BEGIN
346: SELECT p.terms_id
347: INTO p_terms_id

Line 365: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

361: -- no term from line level PO, try line level receipt
362: IF (p_terms_id is null) THEN
363: debug_info := 'Get term_id from lines receipt';
364: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
365: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
366: END IF;
367: BEGIN
368: SELECT p.terms_id
369: INTO p_terms_id

Line 384: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

380: NULL;
381: WHEN TOO_MANY_ROWS THEN
382: debug_info := 'too many rows';
383: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
384: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
385: END IF;
386: p_terms_id := null;
387: END;
388:

Line 399: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

395: (l_invoice_type_lookup_code <> 'PAYMENT REQUEST') ) Then
396:
397: debug_info := 'Get term_id from supplier site';
398: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
399: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
400: END IF;
401:
402: SELECT terms_id
403: INTO p_terms_id

Line 412: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

408: (l_invoice_type_lookup_code = 'PAYMENT REQUEST') ) Then
409:
410: debug_info := 'Get term_id from financials options';
411: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
412: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
413: END IF;
414:
415: SELECT terms_id
416: INTO p_terms_id

Line 424: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

420: END IF;
421:
422: debug_info := 'getting term active date';
423: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
424: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
425: END IF;
426:
427: SELECT start_date_active, end_date_active
428: INTO l_start_date_active, l_end_date_active

Line 434: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

430: WHERE term_id = p_terms_id;
431:
432: debug_info := 'terms id derived: '|| p_terms_id;
433: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
434: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
435: END IF;
436:
437: --------------------------------------------------------------------------
438: -- Step 2

Line 466: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);

462: -----------------------------------------------------------------------------
463: debug_info := 'Check calendar based payment terms';
464:
465: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
466: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
467: END IF;
468:
469: --Bug:4115712
470: IF (p_terms_id IS NOT NULL) THEN

Line 488: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);

484:
485: EXCEPTION
486: WHEN OTHERS THEN
487: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
488: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);
489: END IF;
490:
491: IF (SQLCODE < 0) THEN
492: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 493: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, SQLERRM);

489: END IF;
490:
491: IF (SQLCODE < 0) THEN
492: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
493: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, SQLERRM);
494: END IF;
495: END IF;
496:
497: END get_payment_terms;

Line 573: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.CANCEL_SINGLE_INVOICE(+)');

569: P_calling_sequence;
570:
571: l_api_name := 'cancel_single_invoice';
572: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
573: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.CANCEL_SINGLE_INVOICE(+)');
574: END IF;
575:
576: l_debug_info := 'calling ap_cancel_pkg.ap_cancel_single_invoice()...';
577: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 578: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

574: END IF;
575:
576: l_debug_info := 'calling ap_cancel_pkg.ap_cancel_single_invoice()...';
577: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
578: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
579: END IF;
580:
581:
582: --5126689, since a supplier can now cancel an invoice we need to set

Line 617: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

613: p_token,
614: l_curr_calling_sequence);
615: l_debug_info := 'ap_cancel_single_invoice() called ';
616: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
617: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
618: END IF;
619: -- commit
620: -- ISP:CodeCleanup Bug 5256954
621: -- commit;

Line 691: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.discard_inv_line(+)');

687: p_calling_sequence;
688:
689: l_api_name := 'discard_inv_line';
690: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
691: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.discard_inv_line(+)');
692: END IF;
693:
694: l_debug_info := 'get invoice line info...';
695: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 696: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

692: END IF;
693:
694: l_debug_info := 'get invoice line info...';
695: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
696: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
697: END IF;
698:
699: select invoice_id, line_number,
700: po_line_location_id,

Line 724: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

720:
721: l_debug_info := 'invoice_id = ' || l_line_rec.invoice_id ||
722: ', line_number = '|| l_line_rec.line_number;
723: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
724: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
725: END IF;
726:
727: if ( ap_invoice_lines_pkg.discard_inv_line(p_line_rec => l_line_rec,
728: p_calling_mode => p_calling_mode,

Line 742: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

738: end if;
739:
740: l_debug_info := 'discard_inv_line called ';
741: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
742: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
743: END IF;
744:
745: -- return l_result;
746: -- commit;

Line 805: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.invoke_ap_workflow(+)');

801: p_calling_sequence;
802:
803: l_api_name := 'invoke_ap_workflow';
804: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
805: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.invoke_ap_workflow(+)');
806: END IF;
807:
808: --
809: -- Creating a workflow process

Line 813: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

809: -- Creating a workflow process
810: --
811: l_debug_info := 'creating a workflow process...';
812: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
813: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
814: END IF;
815:
816: WF_ENGINE.createProcess('APINVLDP',p_item_key, 'DISPUTE_MAIN');
817:

Line 820: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

816: WF_ENGINE.createProcess('APINVLDP',p_item_key, 'DISPUTE_MAIN');
817:
818: l_debug_info := 'workflow process created. ';
819: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
820: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
821: END IF;
822:
823:
824: --

Line 829: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

825: -- Initializing attributes
826: --
827: l_debug_info := 'setting workflow process attributes... ';
828: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
829: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
830: END IF;
831:
832: WF_ENGINE.setItemAttrText('APINVLDP',p_item_key, 'INVOICE_ID', p_invoice_id);
833: WF_ENGINE.setItemAttrText('APINVLDP',p_item_key, 'ORG_ID', p_org_id);

Line 837: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

833: WF_ENGINE.setItemAttrText('APINVLDP',p_item_key, 'ORG_ID', p_org_id);
834: l_debug_info := 'invoke_ap_workflow: invoice_id = ' || p_invoice_id ||
835: ', org_id = ' || p_org_id;
836: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
837: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
838: END IF;
839:
840:
841: SELECT

Line 871: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

867: ', invoice_number = '|| l_invoice_number ||
868: ', invoice_date = '|| l_invoice_date ||
869: ', supplier_role = '|| l_supplier_role;
870: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
871: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
872: END IF;
873:
874: -- l_iteration := substr(p_item_key, instr(p_item_key,'_')+1, length(p_item_key));
875: l_iteration := to_number(substr(p_item_key, instr(p_item_key,'_')+1));

Line 885: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

881: WF_ENGINE.setItemAttrText('APINVLDP',p_item_key, 'SUPPLIER_ROLE', l_supplier_role);
882:
883: l_debug_info := 'workflow process attributes set. ';
884: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
885: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
886: END IF;
887:
888:
889: --

Line 894: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

890: -- Starting the process
891: --
892: l_debug_info := 'workflow process starting... ';
893: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
894: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
895: END IF;
896:
897: WF_ENGINE.startProcess('APINVLDP', p_item_key);
898: l_debug_info := 'workflow process started. ';

Line 900: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

896:
897: WF_ENGINE.startProcess('APINVLDP', p_item_key);
898: l_debug_info := 'workflow process started. ';
899: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
900: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
901: END IF;
902:
903:
904:

Line 908: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

904:
905: WF_ENGINE.launchProcess('APINVLDP',p_item_key, 'DISPUTE_MAIN');
906: l_debug_info := 'workflow process launched. ';
907: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
908: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
909: END IF;
910:
911: commit;
912:

Line 962: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.override_tax(+)');

958: p_calling_sequence;
959:
960: l_api_name := 'override_tax';
961: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
962: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.override_tax(+)');
963: END IF;
964:
965: l_debug_info := 'calling AP_ETAX_SERVICES_PKG.Override_Tax: '
966: ||' P_invoice_id = ' || p_invoice_id

Line 971: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

967: ||', P_calling_mode = ' || p_calling_mode
968: ||', P_override_status = ' || p_override_status
969: ||', P_event_id = ' || P_event_id;
970: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
971: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
972: END IF;
973:
974: l_result := AP_ETAX_SERVICES_PKG.Override_Tax(
975: P_Invoice_id => p_invoice_id,

Line 986: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

982:
983: l_debug_info := 'AP_ETAX_SERVICES_PKG.override_tax called: '||
984: ' error_code = ' || p_error_code;
985: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
986: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
987: END IF;
988:
989: -- return l_result;
990: -- ISP:CodeCleanup Bug 5256954

Line 1040: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.populate_payment_terms(+)');

1036: p_calling_sequence;
1037:
1038: l_api_name := 'populate_payment_terms';
1039: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1040: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.populate_payment_terms(+)');
1041: END IF;
1042:
1043: get_payment_terms (p_invoice_id => p_invoice_id,
1044: p_terms_id => l_terms_id,

Line 1062: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1058:
1059: l_debug_info := 'invoice header record updated with terms id: '||
1060: l_terms_id ||', terms_date = '|| l_terms_date;
1061: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1062: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1063: END IF;
1064:
1065: -- commit;
1066:

Line 1114: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.populate_doc_sequence(+)');

1110: p_calling_sequence;
1111:
1112: l_api_name := 'populate_doc_sequence';
1113: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1114: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.populate_doc_sequence(+)');
1115: END IF;
1116:
1117: get_doc_sequence(
1118: p_invoice_id => p_invoice_id,

Line 1130: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1126: l_debug_info := 'got the doc category code and sequence: '||
1127: l_doc_category_code ||', doc_seq_value = '|| l_db_sequence_value
1128: || ', doc_seq_id = ' || l_db_sequence_id;
1129: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1130: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1131: END IF;
1132:
1133: update ap_invoices_all
1134: set doc_category_code = l_doc_category_code,

Line 1143: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1139: l_debug_info := 'invoice header record updated with doc category code: '||
1140: l_doc_category_code ||', doc_seq_value = '|| l_db_sequence_value
1141: || ', doc_seq_id = ' || l_db_sequence_id;
1142: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1143: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1144: END IF;
1145:
1146: EXCEPTION
1147: WHEN OTHERS THEN

Line 1206: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.update_invoice_header(+)');

1202: l_api_name := 'update_invoice_header';
1203:
1204:
1205: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1206: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.update_invoice_header(+)');
1207: END IF;
1208:
1209: l_debug_info := 'Step 1. update invoice amount: invoice_id = ';
1210: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1211: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1207: END IF;
1208:
1209: l_debug_info := 'Step 1. update invoice amount: invoice_id = ';
1210: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1211: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1212: END IF;
1213:
1214: BEGIN
1215: -- Bug 5407726 ISP Code cleanup XBuild9

Line 1232: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, l_debug_info);

1228: EXCEPTION
1229: WHEN NO_DATA_FOUND THEN
1230: l_debug_info := 'no lines found for the invoice id = '|| p_invoice_id;
1231: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
1232: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, l_debug_info);
1233: END IF;
1234: END;
1235:
1236: --Bug 9239655

Line 1275: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1271:
1272: l_debug_info := 'Step 2. populate document sequence: invoice_id = '||
1273: p_invoice_id || ', sequence_numbering = ' || p_sequence_numbering;
1274: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1275: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1276: END IF;
1277:
1278: populate_doc_sequence(
1279: p_invoice_id => p_invoice_id,

Line 1286: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1282:
1283:
1284: l_debug_info := 'Step 3. populate payment terms';
1285: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1286: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1287: END IF;
1288:
1289: populate_payment_terms(
1290: p_invoice_id => p_invoice_id,

Line 1295: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1291: p_calling_sequence => l_curr_calling_sequence);
1292:
1293: l_debug_info := 'invoice header updated. ';
1294: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1295: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1296: END IF;
1297:
1298:
1299: -- Bug 5470344 XBuild11 Code cleanup

Line 1625: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.update_invoice_header2(+)');

1621:
1622: l_api_name := 'update_invoice_header2';
1623:
1624: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1625: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.update_invoice_header2(+)');
1626: END IF;
1627:
1628: -- Bug 6859035. Accounting date and period name are not getting
1629: -- stamped properly in invoice header and lines. In all the cases

Line 1647: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1643:
1644: BEGIN
1645: l_debug_info := 'Updating gl date and period name at header and line level.';
1646: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1647: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1648: END IF;
1649:
1650: SELECT ai.invoice_date, org_id
1651: INTO l_invoice_date, l_org_id

Line 1703: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1699: AND ai.invoice_id = p_invoice_id;
1700:
1701: l_debug_info := 'Derived type_1099 from Supplier: ' || l_type_1099;
1702: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1703: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1704: END IF;
1705: -- Bug 9531531 End
1706:
1707: -- Bug 10040759 Begin

Line 1736: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1732: EXCEPTION
1733: WHEN NO_DATA_FOUND THEN
1734: l_debug_info := 'No invoice found to update gl date and period. type_1099 = ' || l_type_1099; -- Bug 9531531 Added type_1099
1735: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1736: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1737: END IF;
1738: END ;
1739: -- End bug 6859035
1740:

Line 1743: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1739: -- End bug 6859035
1740:
1741: l_debug_info := 'Step 1. update invoice amount: invoice_id = ';
1742: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1743: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1744: END IF;
1745:
1746: BEGIN
1747:

Line 1761: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, l_debug_info);

1757: EXCEPTION
1758: WHEN NO_DATA_FOUND THEN
1759: l_debug_info := 'no lines found for the invoice id = '|| p_invoice_id;
1760: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
1761: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, l_debug_info);
1762: END IF;
1763: END;
1764:
1765: --Bug 9239655

Line 1887: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1883:
1884: -- end Bug 16361038
1885: l_debug_info := 'Creating Pay Schedules ';
1886: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1887: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1888: END IF;
1889:
1890:
1891: -- B# 8649741 : get payment_priority from Sites table, do not use 99 as default

Line 1907: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, l_debug_info);

1903: WHEN NO_DATA_FOUND THEN
1904: l_payment_priority := 99 ;
1905: l_debug_info := 'no Site row found for the Invoice_id = '|| p_invoice_id ;
1906: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
1907: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, l_debug_info);
1908: END IF;
1909: END;
1910: -- B# 8649741 : end
1911:

Line 1925: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1921: X_Sched_Hold_count => l_Sched_Hold_count);
1922:
1923: l_debug_info := 'Call Workflow for Unmatched Invoices ';
1924: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1925: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1926: END IF;
1927:
1928: IF (AP_ISP_UTILITIES_PKG.get_po_number_switcher(p_invoice_id) = 'UNMATCHED') THEN
1929: SELECT asu.distribution_set_id

Line 2029: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.match_invoice_lines(+)');

2025:
2026:
2027: l_api_name := 'match_invoice_lines';
2028: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2029: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.match_invoice_lines(+)');
2030: END IF;
2031:
2032:
2033: OPEN invoice_lines_cur;

Line 2075: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2071: CLOSE invoice_lines_cur;
2072:
2073: l_debug_info := 'invoice matched. ';
2074: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2075: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2076: END IF;
2077: -- ISP:CodeCleanup Bug 5256954
2078: -- commit;
2079:

Line 2138: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||

2134: p_calling_sequence;
2135:
2136: l_api_name := 'get_sec_attr_value';
2137: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2138: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||
2139: l_api_name,'AP_ISP_UTILITIES_PKG.get_sec_attr_value(+)');
2140: END IF;
2141:
2142: -- we are assuming the attr_code is ICX_SUPPLIER_ORG_ID

Line 2153: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2149: AND awusav.attribute_application_id = 177;
2150:
2151: l_debug_info := 'securing attribute count = ' || l_sec_attr_cnt;
2152: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2153: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2154: END IF;
2155:
2156: IF ( l_sec_attr_cnt = 1 ) THEN
2157: SELECT nvl(to_char(asav.number_value), nvl(asav.varchar2_value, to_char(asav.date_value)))

Line 2167: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2163: END IF;
2164:
2165: l_debug_info := 'securing attribute value = '|| p_attr_value;
2166: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2167: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2168: END IF;
2169:
2170: IF ( p_attr_value is not null ) THEN
2171: IF ( p_attr_code = 'ICX_SUPPLIER_ORG_ID' ) THEN

Line 2182: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2178: END IF;
2179: END IF;
2180: l_debug_info := 'securing attribute value1 = '|| p_attr_value1;
2181: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2182: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2183: END IF;
2184:
2185: EXCEPTION
2186: WHEN OTHERS THEN

Line 2319: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2315: l_max_dist_amount := 0;
2316:
2317: l_debug_info := 'Get PO Matched info from the invoice distributions';
2318: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2319: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2320: END IF;
2321:
2322:
2323: SELECT sum(quantity_invoiced),sum(amount)

Line 2336: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2332: WHERE line_location_id = p_line_location_id;
2333:
2334: l_debug_info := 'Populate the pl/sql table with proration data';
2335: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2336: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2337: END IF;
2338:
2339: OPEN po_dists;
2340:

Line 2383: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2379: CLOSE po_dists;
2380:
2381: l_debug_info := 'Correct proration rounding error';
2382: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2383: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2384: END IF;
2385:
2386: IF ((l_sum_prorated_quantity <> p_quantity_change OR l_sum_prorated_amount <> p_amount_change)
2387: and l_rounding_index is not null) THEN

Line 2402: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2398: END IF;
2399:
2400: l_debug_info := 'Create l_po_ap_line_loc_rec object and populate the data';
2401: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2402: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2403: END IF;
2404: l_po_ap_line_loc_rec := PO_AP_LINE_LOC_REC_TYPE.create_object(
2405: p_po_line_location_id => p_line_location_id,
2406: p_uom_code => p_ap_uom,

Line 2419: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2415:
2416:
2417: l_debug_info := 'Create l_po_ap_dist_rec object';
2418: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2419: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2420: END IF;
2421:
2422: l_po_ap_dist_rec := PO_AP_DIST_REC_TYPE.create_object();
2423:

Line 2477: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2473:
2474:
2475: l_debug_info := 'Call the PO_AP_INVOICE_MATCH_GRP to update the Po Distributions and Po Line Locations';
2476: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2477: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2478: END IF;
2479:
2480: PO_AP_INVOICE_MATCH_GRP.Update_Document_Ap_Values(
2481: P_Api_Version => 1.0,

Line 2490: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2486:
2487: IF (p_return_status <> 'S') THEN
2488: l_debug_info := 'PO API returned unsuccessfully, raise the exception';
2489: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2490: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2491: END IF;
2492: l_debug_info := l_msg_data;
2493: RAISE api_call_failed;
2494: END IF;