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.27.12010000.3 2009/01/23 10:03:35 manjayar 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.27.12010000.3 2009/01/23 10:03:35 manjayar 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 141: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, debug_info);

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

299: EXCEPTION
300: WHEN NO_DATA_FOUND THEN
301: debug_info := 'no ap options found for the org id = '|| l_org_id;
302: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
303: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);
304: END IF;
305:
306: return;
307: END;

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

306: return;
307: END;
308: debug_info := l_api_name || ': terms_date_basis = ' || l_terms_date_basis;
309: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
310: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name, debug_info);
311: END IF;
312:
313: --------------------------------------------------------------
314: -- Step 1

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

480:
481: EXCEPTION
482: WHEN OTHERS THEN
483: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
484: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, debug_info);
485: END IF;
486:
487: IF (SQLCODE < 0) THEN
488: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN

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

485: END IF;
486:
487: IF (SQLCODE < 0) THEN
488: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
489: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, SQLERRM);
490: END IF;
491: END IF;
492:
493: END get_payment_terms;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1048:
1049: l_debug_info := 'invoice header record updated with terms id: '||
1050: l_terms_id ||', terms_date = '|| l_terms_date;
1051: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1052: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1053: END IF;
1054:
1055: -- commit;
1056:

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

1100: p_calling_sequence;
1101:
1102: l_api_name := 'populate_doc_sequence';
1103: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1104: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.populate_doc_sequence(+)');
1105: END IF;
1106:
1107: get_doc_sequence(
1108: p_invoice_id => p_invoice_id,

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

1116: l_debug_info := 'got the doc category code and sequence: '||
1117: l_doc_category_code ||', doc_seq_value = '|| l_db_sequence_value
1118: || ', doc_seq_id = ' || l_db_sequence_id;
1119: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1120: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1121: END IF;
1122:
1123: update ap_invoices_all
1124: set doc_category_code = l_doc_category_code,

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

1129: l_debug_info := 'invoice header record updated with doc category code: '||
1130: l_doc_category_code ||', doc_seq_value = '|| l_db_sequence_value
1131: || ', doc_seq_id = ' || l_db_sequence_id;
1132: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1133: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1134: END IF;
1135:
1136: EXCEPTION
1137: WHEN OTHERS THEN

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

1183:
1184: l_api_name := 'update_invoice_header';
1185:
1186: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1187: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.update_invoice_header(+)');
1188: END IF;
1189:
1190: l_debug_info := 'Step 1. update invoice amount: invoice_id = ';
1191: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

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

1188: END IF;
1189:
1190: l_debug_info := 'Step 1. update invoice amount: invoice_id = ';
1191: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1192: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1193: END IF;
1194:
1195: BEGIN
1196: -- Bug 5407726 ISP Code cleanup XBuild9

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

1207: EXCEPTION
1208: WHEN NO_DATA_FOUND THEN
1209: l_debug_info := 'no lines found for the invoice id = '|| p_invoice_id;
1210: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
1211: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, l_debug_info);
1212: END IF;
1213: END;
1214:
1215: -- don't do anything if lines don't exist

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

1225:
1226: l_debug_info := 'Step 2. populate document sequence: invoice_id = '||
1227: p_invoice_id || ', sequence_numbering = ' || p_sequence_numbering;
1228: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1229: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1230: END IF;
1231:
1232: populate_doc_sequence(
1233: p_invoice_id => p_invoice_id,

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

1236:
1237:
1238: l_debug_info := 'Step 3. populate payment terms';
1239: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1240: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1241: END IF;
1242:
1243: populate_payment_terms(
1244: p_invoice_id => p_invoice_id,

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

1245: p_calling_sequence => l_curr_calling_sequence);
1246:
1247: l_debug_info := 'invoice header updated. ';
1248: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1249: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1250: END IF;
1251:
1252:
1253: -- Bug 5470344 XBuild11 Code cleanup

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

1512:
1513: l_api_name := 'update_invoice_header2';
1514:
1515: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1516: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.update_invoice_header2(+)');
1517: END IF;
1518:
1519: -- Bug 6859035. Accounting date and period name are not getting
1520: -- stamped properly in invoice header and lines. In all the cases

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

1534:
1535: BEGIN
1536: l_debug_info := 'Updating gl date and period name at header and line level.';
1537: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1538: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1539: END IF;
1540:
1541: SELECT ai.invoice_date, org_id
1542: INTO l_invoice_date, l_org_id

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

1585: EXCEPTION
1586: WHEN NO_DATA_FOUND THEN
1587: l_debug_info := 'No invoice found to update gl date and period.';
1588: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1589: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1590: END IF;
1591: END ;
1592: -- End bug 6859035
1593:

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

1592: -- End bug 6859035
1593:
1594: l_debug_info := 'Step 1. update invoice amount: invoice_id = ';
1595: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1596: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1597: END IF;
1598:
1599: BEGIN
1600:

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

1610: EXCEPTION
1611: WHEN NO_DATA_FOUND THEN
1612: l_debug_info := 'no lines found for the invoice id = '|| p_invoice_id;
1613: IF (G_LEVEL_ERROR >= G_CURRENT_RUNTIME_LEVEL) THEN
1614: FND_LOG.STRING(G_LEVEL_ERROR,G_MODULE_NAME||l_api_name, l_debug_info);
1615: END IF;
1616: END;
1617:
1618: -- don't do anything if lines don't exist

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

1628:
1629:
1630: l_debug_info := 'Creating Pay Schedules ';
1631: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1632: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1633: END IF;
1634:
1635: AP_INVOICES_POST_PROCESS_PKG.insert_children (
1636: X_invoice_id => p_invoice_id,

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

1642: X_Sched_Hold_count => l_Sched_Hold_count);
1643:
1644: l_debug_info := 'Call Workflow for Unmatched Invoices ';
1645: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1646: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1647: END IF;
1648:
1649: IF (AP_ISP_UTILITIES_PKG.get_po_number_switcher(p_invoice_id) = 'UNMATCHED') THEN
1650: SELECT asu.distribution_set_id

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

1733:
1734:
1735: l_api_name := 'match_invoice_lines';
1736: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1737: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_ISP_UTILITIES_PKG.match_invoice_lines(+)');
1738: END IF;
1739:
1740:
1741: OPEN invoice_lines_cur;

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

1779: CLOSE invoice_lines_cur;
1780:
1781: l_debug_info := 'invoice matched. ';
1782: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1783: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1784: END IF;
1785: -- ISP:CodeCleanup Bug 5256954
1786: -- commit;
1787:

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

1842: p_calling_sequence;
1843:
1844: l_api_name := 'get_sec_attr_value';
1845: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1846: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||
1847: l_api_name,'AP_ISP_UTILITIES_PKG.get_sec_attr_value(+)');
1848: END IF;
1849:
1850: -- we are assuming the attr_code is ICX_SUPPLIER_ORG_ID

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

1857: AND awusav.attribute_application_id = 177;
1858:
1859: l_debug_info := 'securing attribute count = ' || l_sec_attr_cnt;
1860: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1861: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1862: END IF;
1863:
1864: IF ( l_sec_attr_cnt = 1 ) THEN
1865: SELECT nvl(to_char(asav.number_value), nvl(asav.varchar2_value, to_char(asav.date_value)))

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

1871: END IF;
1872:
1873: l_debug_info := 'securing attribute value = '|| p_attr_value;
1874: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1875: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1876: END IF;
1877:
1878: IF ( p_attr_value is not null ) THEN
1879: IF ( p_attr_code = 'ICX_SUPPLIER_ORG_ID' ) THEN

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

1886: END IF;
1887: END IF;
1888: l_debug_info := 'securing attribute value1 = '|| p_attr_value1;
1889: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1890: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1891: END IF;
1892:
1893: EXCEPTION
1894: WHEN OTHERS THEN

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

2013: l_max_dist_amount := 0;
2014:
2015: l_debug_info := 'Get PO Matched info from the invoice distributions';
2016: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2017: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2018: END IF;
2019:
2020:
2021: SELECT sum(quantity_invoiced),sum(amount)

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

2030: WHERE line_location_id = p_line_location_id;
2031:
2032: l_debug_info := 'Populate the pl/sql table with proration data';
2033: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2034: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2035: END IF;
2036:
2037: OPEN po_dists;
2038:

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

2077: CLOSE po_dists;
2078:
2079: l_debug_info := 'Correct proration rounding error';
2080: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2081: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2082: END IF;
2083:
2084: IF ((l_sum_prorated_quantity <> p_quantity_change OR l_sum_prorated_amount <> p_amount_change)
2085: and l_rounding_index is not null) THEN

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

2096: END IF;
2097:
2098: l_debug_info := 'Create l_po_ap_line_loc_rec object and populate the data';
2099: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2100: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2101: END IF;
2102: l_po_ap_line_loc_rec := PO_AP_LINE_LOC_REC_TYPE.create_object(
2103: p_po_line_location_id => p_line_location_id,
2104: p_uom_code => p_ap_uom,

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

2113:
2114:
2115: l_debug_info := 'Create l_po_ap_dist_rec object';
2116: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2117: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2118: END IF;
2119:
2120: l_po_ap_dist_rec := PO_AP_DIST_REC_TYPE.create_object();
2121:

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

2171:
2172:
2173: l_debug_info := 'Call the PO_AP_INVOICE_MATCH_GRP to update the Po Distributions and Po Line Locations';
2174: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2175: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2176: END IF;
2177:
2178: PO_AP_INVOICE_MATCH_GRP.Update_Document_Ap_Values(
2179: P_Api_Version => 1.0,

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

2184:
2185: IF (p_return_status <> 'S') THEN
2186: l_debug_info := 'PO API returned unsuccessfully, raise the exception';
2187: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2188: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2189: END IF;
2190: l_debug_info := l_msg_data;
2191: RAISE api_call_failed;
2192: END IF;