DBA Data[Home] [Help]

APPS.AP_MATCHING_PKG dependencies on FND_LOG

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

9: G_MSG_MEDIUM CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM;
10: G_MSG_LOW CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW;
11: G_LINES_PER_FETCH CONSTANT NUMBER := 1000;
12:
13: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
14: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
15: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
16: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

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

10: G_MSG_LOW CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW;
11: G_LINES_PER_FETCH CONSTANT NUMBER := 1000;
12:
13: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
14: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
15: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
16: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
18: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

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

11: G_LINES_PER_FETCH CONSTANT NUMBER := 1000;
12:
13: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
14: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
15: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
16: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
18: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
19: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

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

12:
13: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
14: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
15: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
16: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
18: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
19: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
20: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_MATCHING_PKG.';

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

13: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
14: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
15: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
16: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
18: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
19: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
20: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_MATCHING_PKG.';
21:

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

14: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
15: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
16: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
18: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
19: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
20: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_MATCHING_PKG.';
21:
22: --LOCAL PROCEDURES

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

15: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
16: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
18: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
19: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
20: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_MATCHING_PKG.';
21:
22: --LOCAL PROCEDURES
23: PROCEDURE Get_Info(X_Invoice_ID IN NUMBER,

Line 293: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

289: -- Update the calling sequence (for error message).
290: current_calling_sequence := 'AP_MATCHING_PKG.base_credit_po_match<-'||X_calling_sequence;
291:
292: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
293: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
294: 'AP_MATCHING_PKG.base_credit_po_match(+)');
295: END IF;
296:
297: l_debug_info := 'Get Invoice and System Options information';

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

295: END IF;
296:
297: l_debug_info := 'Get Invoice and System Options information';
298: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
299: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
300: END IF;
301:
302: get_info(X_Invoice_Id => x_invoice_id,
303: X_Invoice_Line_Number => x_invoice_line_number,

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

316: --derive the invoice_distribution_id, base_amount, ccid.
317:
318: l_debug_info := 'Get PO information';
319: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
320: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
321: END IF;
322:
323: --bugfix:5565310
324: l_po_line_location_id := x_po_line_location_id;

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

349: x_derived_ccid => l_code_combination_id ) ;
350:
351: l_debug_info := 'Get PO Tax Attributes';
352: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
353: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
354: END IF;
355:
356: g_dflt_tax_class_code := null; /*bug12428818*/
357:

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

411: l_debug_info := 'g_intended_use,g_product_type,g_product_category,g_product_fisc_class '||
412: g_intended_use||','||g_product_type||','||g_product_category||','||g_product_fisc_class;
413:
414: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
415: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
416: END IF;
417:
418: l_debug_info := 'g_user_defined_fisc_class,g_assessable_value,g_dflt_tax_class_code '||
419: g_user_defined_fisc_class||','||g_assessable_value||','||g_dflt_tax_class_code;

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

418: l_debug_info := 'g_user_defined_fisc_class,g_assessable_value,g_dflt_tax_class_code '||
419: g_user_defined_fisc_class||','||g_assessable_value||','||g_dflt_tax_class_code;
420:
421: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
422: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
423: END IF;
424:
425: IF g_source = 'ISP'
426: and x_invoice_line_number IS NOT NULL THEN

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

432:
433: l_debug_info := 'l_full_mtch_amt '||l_full_mtch_amt;
434:
435: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
436: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
437: END IF;
438:
439:
440: SELECT AMOUNT

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

445:
446: l_debug_info := 'l_line_amt '||l_line_amt;
447:
448: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
449: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
450: END IF;
451:
452: --End Bug#13505998
453:

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

494:
495: l_debug_info := 'Create Matched Invoice Line';
496:
497: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
498: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
499: END IF;
500: Insert_Invoice_Line(X_Invoice_ID => x_invoice_id,
501: X_Invoice_Line_Number => g_max_invoice_line_number + 1,
502: X_Line_Type_Lookup_Code => 'ITEM',

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

516: END IF;
517:
518: l_debug_info := 'Create Matched Invoice Distributions';
519: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
520: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
521: END IF;
522: Insert_Invoice_Distributions( X_Invoice_ID => x_invoice_id,
523: X_Invoice_Line_Number => nvl(x_invoice_line_number,
524: g_max_invoice_line_number),

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

536: l_debug_info := 'If the line is matched down to 1 po distribution then need to
537: update the line with po_distribution_id, award_id,requester_id,
538: ,projects related information and generate_dists';
539: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
540: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
541: END IF;
542:
543: UPDATE ap_invoice_lines ail
544: SET (generate_dists ,

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

617: ELSE
618:
619: l_debug_info := 'Update the generate_dists to D after the distributions are created';
620: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
621: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
622: END IF;
623:
624: UPDATE ap_invoice_lines ail
625: SET (generate_dists ,

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

680: END IF;
681:
682: l_debug_info := 'Create Retainage Distributions';
683: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
684: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
685: END IF;
686:
687: Ap_Retainage_Pkg.Create_Retainage_Distributions
688: (x_invoice_id => x_invoice_id,

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

692: and g_invoice_type_lookup_code <> 'PREPAYMENT') THEN
693:
694: l_debug_info := 'Calculate the maximum amount that can be recouped from this invoice line';
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: l_line_amt_net_retainage := x_amount + nvl(l_retained_amount,0);
700:

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

708: END IF;
709:
710: l_debug_info := 'Automatically recoup any available prepayments against the same po line';
711: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
712: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
713: END IF;
714:
715: l_success := AP_Matching_Utils_Pkg.Ap_Recoup_Invoice_Line(
716: P_Invoice_Id => x_invoice_id ,

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

729: END IF;
730:
731: l_debug_info := 'Update Quantity/Amount Billed/Financed on the Po Shipments and Distributions';
732: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
733: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
734: END IF;
735:
736: Update_PO_Shipments_Dists(X_Dist_Tab => x_dist_tab,
737: X_Po_Line_Location_Id => x_po_line_location_id,

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

744: IF (x_freight_amount IS NOT NULL or x_misc_amount IS NOT NULL) THEN
745:
746: l_debug_info := 'Call the procedure to create charge lines';
747: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
748: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
749: END IF;
750:
751: --Due to the way PL/SQL binding is done for global variables, need
752: --pass the local instead of global variable for this as global variable

Line 771: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.base_credit_po_match(-)');

767: --Clean up the PL/SQL table
768: X_DIST_TAB.DELETE;
769:
770: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
771: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.base_credit_po_match(-)');
772: END IF;
773:
774: EXCEPTION
775: WHEN OTHERS THEN

Line 822: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Info(+)');

818: l_api_name := 'Get_Info';
819:
820: current_calling_sequence := 'Get_Info<-'||X_Calling_Sequence;
821: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
822: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Info(+)');
823: END IF;
824:
825: SELECT ai.gl_date,
826: ai.batch_id,

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

993: END IF;
994:
995: l_debug_info := 'select period for accounting date';
996: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
997: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
998: END IF;
999:
1000: --get_current_gl_date will return NULL if the date passed to it doesn't fall in a
1001: --open period.

Line 1050: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Info(-)');

1046:
1047: g_login_id := FND_PROFILE.VALUE('LOGIN_ID');
1048:
1049: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1050: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Info(-)');
1051: END IF;
1052:
1053:
1054: EXCEPTION

Line 1208: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Dist_Proration_Info(+)');

1204: l_api_name := 'Get_Dist_Proration_Info';
1205:
1206: current_calling_sequence := 'Get_Dist_Proration_Info<-'||x_calling_sequence;
1207: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1208: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Dist_Proration_Info(+)');
1209: END IF;
1210:
1211: IF(X_Match_Mode IN ('STD-PS','CR-PS')) THEN
1212:

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

1211: IF(X_Match_Mode IN ('STD-PS','CR-PS')) THEN
1212:
1213: l_debug_info := 'Get Total Quantity for Proration';
1214: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1215: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1216: END IF;
1217:
1218: Get_Total_Proration_Quantity
1219: ( X_PO_Line_Location_Id => x_po_line_location_id,

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

1225: l_debug_info := 'g_min_acct_unit, x_match_amount, x_overbill_flag, x_match_mode, x_match_quantity, x_po_line_location_id'||
1226: g_min_acct_unit||','||x_match_amount||','||x_overbill_flag||','||x_match_mode||','||x_match_quantity||','||x_po_line_location_id;
1227:
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: OPEN PO_Distributions_Cursor(l_total_quantity);
1233: LOOP

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

1233: LOOP
1234:
1235: l_debug_info := 'Fetch record from Po_Distributions_Cursor l_total_quantity is '||l_total_quantity;
1236: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1237: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1238: END IF;
1239:
1240: FETCH PO_Distributions_Cursor INTO l_po_distribution_id,
1241: l_amount_invoiced,

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

1255: --IF (l_amount_invoiced <> 0) THEN --Bug6321189
1256:
1257: l_debug_info := 'Populate the PL/SQL table x_dist_tab with the distribution information';
1258: IF(G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1259: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1260: END IF;
1261:
1262:
1263:

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

1370: IF (x_dist_tab.exists(i)) THEN
1371:
1372: l_debug_info := 'Populate Project related information';
1373: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1374: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1375: END IF;
1376:
1377: --If no project info in the PL/SQL by now,
1378: --then project info was null on po distribution

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

1448: END IF;
1449:
1450: l_debug_info := 'Populate award information';
1451: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1452: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1453: END IF;
1454:
1455: IF (x_dist_tab(i).award_id IS NULL ) THEN
1456: IF (l_accrue_on_receipt_flag = 'N' and g_allow_pa_override = 'Y')THEN

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

1463: END IF; /*(x_dist_tab(i).award_id IS NULL) */
1464:
1465: l_debug_info := 'Populate awt information';
1466: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1467: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1468: END IF;
1469:
1470: IF (g_system_allow_awt_flag = 'Y' and g_site_allow_awt_flag = 'Y') THEN
1471:

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

1536:
1537: l_debug_info := 'Overlaying Segments for this account was unsuccessful due to '||
1538: l_reason_unbuilt_flex;
1539: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1540: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1541: END IF;
1542:
1543: --Did not handle this exception explicitly as OTHERS handler
1544: --should be sufficient for this case.

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

1595: IF (g_build_prepay_accts_flag = 'Y') THEN
1596:
1597: l_debug_info := 'Calling build_prepay_account to build the prepayment account';
1598: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1599: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1600: END IF;
1601: -- Bug 5465722
1602: ap_matching_pkg.build_prepay_account(
1603: P_base_ccid => x_dist_tab(i).po_ccid,

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

1615: /*OPEN ISSUE 3 */
1616: l_debug_info := 'Flexbuild of prepayment account failed due to '
1617: ||l_reason_unbuilt_flex;
1618: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1619: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1620: END IF;
1621:
1622: RAISE FLEX_OVERLAY_FAILED;
1623:

Line 1651: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Dist_Proration_Info(-)');

1647:
1648: END IF;
1649:
1650: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1651: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Dist_Proration_Info(-)');
1652: END IF;
1653:
1654:
1655:

Line 1713: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Total_Proration_Quantity(+)');

1709: l_api_name := 'Get_Total_Proration_Quantity';
1710: current_calling_sequence := 'Get_Total_Proration_Quantity<-'||x_calling_sequence;
1711:
1712: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1713: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Total_Proration_Quantity(+)');
1714: END IF;
1715:
1716: l_debug_info := 'Get total quantity for proration';
1717: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

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

1714: END IF;
1715:
1716: l_debug_info := 'Get total quantity for proration';
1717: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1718: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1719: END IF;
1720:
1721:
1722: SELECT SUM(DECODE(X_Match_Mode,

Line 1757: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Total_Proration_Quantity(-)');

1753: x_total_quantity := 1;
1754: END IF;
1755:
1756: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1757: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Total_Proration_Quantity(-)');
1758: END IF;
1759:
1760:
1761: EXCEPTION

Line 1805: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Invoice_Line(+)');

1801: l_api_name := 'Insert_Invoice_Line';
1802: current_calling_sequence := 'Insert_Invoice_Line<-'||x_calling_sequence;
1803:
1804: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1805: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Invoice_Line(+)');
1806: END IF;
1807:
1808:
1809:

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

1810: IF (X_LINE_TYPE_LOOKUP_CODE = 'ITEM') THEN
1811:
1812: l_debug_info := 'Inserting Item Line Matched to a PO';
1813: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1814: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1815: END IF;
1816:
1817: --Bug#13505998
1818: l_full_mtch_amt :=

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

1821:
1822: l_debug_info := 'l_full_mtch_amt '||l_full_mtch_amt;
1823:
1824: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1825: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1826: END IF;
1827: --End Bug#13505998
1828:
1829: -- bug 5061826

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

2229: ELSIF (x_line_type_lookup_code IN ('FREIGHT','MISCELLANEOUS')) THEN
2230:
2231: l_debug_info := 'Inserting Charge Line';
2232: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2233: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2234: END IF;
2235:
2236: INSERT INTO AP_INVOICE_LINES (
2237: INVOICE_ID,

Line 2566: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Invoice_Line(-)');

2562:
2563: g_max_invoice_line_number := g_max_invoice_line_number + 1;
2564:
2565: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2566: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Invoice_Line(-)');
2567: END IF;
2568:
2569:
2570: EXCEPTION WHEN OTHERS THEN

Line 2611: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Invoice_Distributions(+)');

2607: l_api_name := 'Insert_Invoice_Distributions';
2608:
2609: current_calling_sequence := 'Insert_Invoice_Distributions <-'||x_calling_sequence;
2610: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2611: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Invoice_Distributions(+)');
2612: END IF;
2613:
2614: l_debug_info := 'Insert Invoice Distributions';
2615: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

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

2612: END IF;
2613:
2614: l_debug_info := 'Insert Invoice Distributions';
2615: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2616: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2617: END IF;
2618:
2619: -- Bug 6837035 Retrieve the profile value to check if the DFF info should be
2620: -- copied onto distributions for imported lines.

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

2624: IF (x_dist_tab.exists(i)) THEN
2625:
2626: l_debug_info := 'Insert invoice distribution corresponding to po_distribution : '||x_dist_tab(i).po_distribution_id;
2627: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2628: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2629: END IF;
2630:
2631: INSERT INTO ap_invoice_distributions (
2632: batch_id,

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

2983:
2984: --Bugfix:4674635
2985: l_debug_info := 'Call the AP_EXTENDED_MATCH to populate global attributes';
2986: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2987: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2988: END IF;
2989:
2990: IF (AP_EXTENDED_WITHHOLDING_PKG.AP_EXTENDED_WITHHOLDING_ACTIVE) THEN
2991: AP_EXTENDED_WITHHOLDING_PKG.AP_EXTENDED_MATCH(

Line 3017: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Invoice_Distributions(-)');

3013:
3014: END LOOP;
3015:
3016: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3017: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Invoice_Distributions(-)');
3018: END IF;
3019:
3020:
3021: EXCEPTION

Line 3067: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_PO_Shipments_Dists(+)');

3063:
3064: current_calling_sequence := 'Update_Po_Shipments_Dists<-'||x_calling_sequence;
3065:
3066: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3067: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_PO_Shipments_Dists(+)');
3068: END IF;
3069:
3070: l_debug_info := 'Create l_po_ap_dist_rec object';
3071: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

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

3068: END IF;
3069:
3070: l_debug_info := 'Create l_po_ap_dist_rec object';
3071: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3072: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3073: END IF;
3074:
3075: l_po_ap_dist_rec := PO_AP_DIST_REC_TYPE.create_object();
3076:

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

3075: l_po_ap_dist_rec := PO_AP_DIST_REC_TYPE.create_object();
3076:
3077: l_debug_info := 'Create l_po_ap_line_loc_rec object and populate the data';
3078: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3079: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3080: END IF;
3081:
3082: IF (g_invoice_type_lookup_code <> 'PREPAYMENT') THEN
3083:

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

3112: END IF;
3113:
3114: l_debug_info := 'Populate the Po_Ap_Dist_Rec with the distribution information';
3115: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3116: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3117: END IF;
3118:
3119: FOR i in nvl(x_dist_tab.first,0)..nvl(x_dist_tab.last,0) LOOP
3120:

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

3153: END LOOP;
3154:
3155: l_debug_info := 'Call the PO_AP_INVOICE_MATCH_GRP to update the Po Distributions and Po Line Locations';
3156: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3157: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3158: END IF;
3159:
3160: PO_AP_INVOICE_MATCH_GRP.Update_Document_Ap_Values(
3161: P_Api_Version => 1.0,

Line 3169: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_PO_Shipments_Dists(-)');

3165: X_Msg_Data => l_msg_data);
3166:
3167:
3168: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3169: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_PO_Shipments_Dists(-)');
3170: END IF;
3171:
3172: EXCEPTION
3173: WHEN OTHERS THEN

Line 3211: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Create_Charge_Lines(+)');

3207:
3208: current_calling_sequence := 'Create_Charge_Lines<-'||X_Calling_Sequence;
3209:
3210: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3211: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Create_Charge_Lines(+)');
3212: END IF;
3213:
3214: IF (X_Freight_Amount IS NOT NULL) THEN
3215:

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

3214: IF (X_Freight_Amount IS NOT NULL) THEN
3215:
3216: l_debug_info := 'Create Freight Line';
3217: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3218: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3219: END IF;
3220:
3221: Insert_Invoice_Line(
3222: X_Invoice_Id => x_invoice_id,

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

3230:
3231:
3232: l_debug_info := 'Create Allocation Rules for the freight line';
3233: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3234: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3235: END IF;
3236:
3237: AP_ALLOCATION_RULES_PKG.Insert_Percentage_Alloc_Rule(
3238: X_Invoice_id => x_invoice_id,

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

3248: IF (X_Misc_Amount IS NOT NULL) THEN
3249:
3250: l_debug_info := 'Create Misc Line';
3251: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3252: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3253: END IF;
3254:
3255: Insert_Invoice_Line(
3256: X_Invoice_Id => x_invoice_id,

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

3263: X_Calling_Sequence => current_calling_sequence);
3264:
3265: l_debug_info := 'Create Allocation Rules for the misc line';
3266: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3267: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3268: END IF;
3269:
3270: AP_ALLOCATION_RULES_PKG.Insert_Percentage_Alloc_Rule(
3271: X_Invoice_id => x_invoice_id,

Line 3280: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Create_Charge_Lines(-)');

3276:
3277: END IF;
3278:
3279: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3280: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Create_Charge_Lines(-)');
3281: END IF;
3282:
3283: EXCEPTION
3284: WHEN OTHERS THEN

Line 3352: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Price_Quantity_Correct_Inv_PO(+)');

3348:
3349: current_calling_sequence := 'Price_Quantity_Correct_Inv_PO<-'||x_calling_sequence;
3350:
3351: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3352: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Price_Quantity_Correct_Inv_PO(+)');
3353: END IF;
3354:
3355: l_debug_info := 'Calling Get_Info';
3356: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

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

3353: END IF;
3354:
3355: l_debug_info := 'Calling Get_Info';
3356: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3357: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3358: END IF;
3359:
3360: Get_Info(x_invoice_id => x_invoice_id,
3361: x_invoice_line_number => x_invoice_line_number,

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

3370: END IF;
3371:
3372: l_debug_info := 'Calling Get_Corr_Dist_Proration_Info';
3373: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3374: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3375: END IF;
3376:
3377: Get_Corr_Dist_Proration_Info(
3378: x_corrected_invoice_id => x_corrected_invoice_id,

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

3394: IF (x_invoice_line_number IS NULL) THEN
3395:
3396: l_debug_info := 'Calling Insert_Corr_Invoice_Line';
3397: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3398: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3399: END IF;
3400:
3401: Insert_Corr_Invoice_Line(x_invoice_id => x_invoice_id,
3402: x_invoice_line_number => g_max_invoice_line_number +1,

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

3416: l_item_line_number := g_max_invoice_line_number;
3417:
3418: l_debug_info := 'Calling Insert_Corr_Invoice_Dists';
3419: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3420: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3421: END IF;
3422:
3423: Insert_Corr_Invoice_Dists(x_invoice_id => x_invoice_id,
3424: x_invoice_line_number => nvl(x_invoice_line_number,

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

3434: IF(x_invoice_line_number IS NOT NULL) THEN
3435:
3436: l_debug_info := 'Updating Invoice Line Attributes after matching';
3437: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3438: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3439: END IF;
3440:
3441: UPDATE ap_invoice_lines ail
3442: SET (generate_dists ,

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

3495: END IF;
3496:
3497: l_debug_info := 'Create Retainage Distributions';
3498: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3499: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3500: END IF;
3501:
3502: Ap_Retainage_Pkg.Create_Retainage_Distributions
3503: (x_invoice_id => x_invoice_id,

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

3507: and g_invoice_type_lookup_code <> 'PREPAYMENT') THEN
3508:
3509: l_debug_info := 'Calculate the maximum amount that can be recouped from this invoice line';
3510: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3511: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3512: END IF;
3513:
3514: l_line_amt_net_retainage := x_correction_amount + nvl(l_retained_amount,0);
3515:

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

3523: END IF;
3524:
3525: l_debug_info := 'Automatically recoup any available prepayments against the same po line';
3526: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3527: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3528: END IF;
3529:
3530: l_success := AP_Matching_Utils_Pkg.Ap_Recoup_Invoice_Line(
3531: P_Invoice_Id => x_invoice_id ,

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

3545:
3546:
3547: l_debug_info := 'Calling Update_Corr_Po_Shipments_Dists';
3548: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3549: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3550: END IF;
3551: Update_Corr_Po_Shipments_Dists(x_corr_dist_tab => x_corr_dist_tab,
3552: x_po_line_location_id => x_po_line_location_id,
3553: x_quantity => x_correction_quantity,

Line 3563: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Price_Quantity_Correct_Inv_PO(-)');

3559: --Clean up the PL/SQL tables
3560: x_corr_dist_tab.delete;
3561:
3562: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3563: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Price_Quantity_Correct_Inv_PO(-)');
3564: END IF;
3565:
3566:
3567: EXCEPTION

Line 3707: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Corr_Dist_Proration_Info(+)');

3703: l_api_name := 'Get_Corr_Dist_Proration_Info';
3704:
3705: current_calling_sequence := 'Get_Corr_Dist_Proration_Info<-'||x_calling_sequence;
3706: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3707: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Corr_Dist_Proration_Info(+)');
3708: END IF;
3709:
3710:
3711: /* Bug 5176411, Changed the index for x_corr_dist_tab from l_po_dist_id to

Line 3903: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Corr_Dist_Proration_Info(-)');

3899:
3900: END IF;
3901:
3902: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3903: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Corr_Dist_Proration_Info(-)');
3904: END IF;
3905:
3906:
3907: EXCEPTION

Line 3956: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_Corr_Po_Distributions(+)');

3952:
3953: current_calling_sequence := 'Update_Corr_Po_Shipments_Dists<-'||x_calling_sequence;
3954:
3955: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3956: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_Corr_Po_Distributions(+)');
3957: END IF;
3958:
3959: l_debug_info := 'Create l_po_ap_dist_rec object';
3960: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

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

3957: END IF;
3958:
3959: l_debug_info := 'Create l_po_ap_dist_rec object';
3960: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3961: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3962: END IF;
3963:
3964: l_po_ap_dist_rec := PO_AP_DIST_REC_TYPE.create_object();
3965:

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

3964: l_po_ap_dist_rec := PO_AP_DIST_REC_TYPE.create_object();
3965:
3966: l_debug_info := 'Create l_po_ap_line_loc_rec object and populate the data';
3967: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3968: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3969: END IF;
3970:
3971: IF (x_correction_type = 'QTY_CORRECTION') THEN
3972:

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

4004: l_debug_info := 'Call PO api to update po_distributions and po_shipments table'
4005: ||' with quantity/amount billed information.';
4006:
4007: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4008: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4009: END IF;
4010:
4011: FOR i in nvl(x_corr_dist_tab.first,0)..nvl(x_corr_dist_tab.last,0) LOOP
4012:

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

4045: END LOOP;
4046:
4047: l_debug_info := 'Call the PO_AP_INVOICE_MATCH_GRP to update the Po Distributions and Po Line Locations';
4048: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4049: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4050: END IF;
4051:
4052: PO_AP_INVOICE_MATCH_GRP.Update_Document_Ap_Values(
4053: P_Api_Version => 1.0,

Line 4061: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_Corr_Po_Shipments_Dists(-)');

4057: X_Msg_Data => l_msg_data);
4058:
4059:
4060: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4061: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_Corr_Po_Shipments_Dists(-)');
4062: END IF;
4063:
4064:
4065: EXCEPTION

Line 4101: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_Corr_Po_Line_Locations(+)');

4097: l_api_name := 'Update_Corr_Po_Line_Locations';
4098: current_calling_sequence := ' Update_Corr_Po_Line_Locations<-'||x_calling_sequence;
4099:
4100: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4101: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_Corr_Po_Line_Locations(+)');
4102: END IF;
4103:
4104: l_debug_info := 'Call PO api to update the po_line_location with quantity/amount billed
4105: information';

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

4104: l_debug_info := 'Call PO api to update the po_line_location with quantity/amount billed
4105: information';
4106:
4107: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4108: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4109: END IF;
4110:
4111: IF (x_correction_type = 'QTY_CORRECTION') THEN
4112:

Line 4123: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_Corr_Po_Line_Locations(-)');

4119:
4120: END IF;
4121:
4122: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4123: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Update_Corr_Po_Line_Locations(-)');
4124: END IF;
4125:
4126:
4127: EXCEPTION

Line 4169: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Corr_Invoice_Line(+)');

4165:
4166: current_calling_sequence := 'Insert_Corr_Invoice_Line<-'||x_calling_sequence;
4167:
4168: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4169: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Corr_Invoice_Line(+)');
4170: END IF;
4171:
4172: INSERT INTO AP_INVOICE_LINES(INVOICE_ID,
4173: LINE_NUMBER,

Line 4500: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Corr_Invoice_Line(-)');

4496: g_max_invoice_line_number := g_max_invoice_line_number + 1;
4497:
4498:
4499: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4500: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Corr_Invoice_Line(-)');
4501: END IF;
4502:
4503:
4504: EXCEPTION

Line 4551: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Corr_Invoice_Dists(+)');

4547:
4548: current_calling_sequence := 'Insert_Corr_Invoice_Dists<-'||x_calling_sequence;
4549:
4550: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4551: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Corr_Invoice_Dists(+)');
4552: END IF;
4553:
4554: FOR i in NVL(x_corr_dist_tab.FIRST,0) .. NVL(x_corr_dist_tab.LAST,0) LOOP
4555:

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

4895:
4896: --Bugfix:4674635
4897: l_debug_info := 'Call the AP_EXTENDED_MATCH to populate global attributes';
4898: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4899: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4900: END IF;
4901:
4902: IF (AP_EXTENDED_WITHHOLDING_PKG.AP_EXTENDED_WITHHOLDING_ACTIVE) THEN
4903: AP_EXTENDED_WITHHOLDING_PKG.AP_EXTENDED_MATCH(

Line 4919: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Corr_Invoice_Dists(-)');

4915:
4916: END LOOP;
4917:
4918: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4919: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Insert_Corr_Invoice_Dists(-)');
4920: END IF;
4921:
4922:
4923: EXCEPTION

Line 4970: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Quick_Match_Line_Generation(+)');

4966:
4967: current_calling_sequence := 'Quick_Match_PO_RCV<-'||x_calling_sequence;
4968:
4969: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4970: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Quick_Match_Line_Generation(+)');
4971: END IF;
4972:
4973: l_debug_info := 'Call Get_Info';
4974: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

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

4971: END IF;
4972:
4973: l_debug_info := 'Call Get_Info';
4974: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4975: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4976: END IF;
4977:
4978: Get_Info(x_invoice_id => x_invoice_id,
4979: x_calling_sequence => current_calling_sequence);

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

4981: IF g_invoice_type_lookup_code = 'RETAINAGE RELEASE' THEN
4982:
4983: l_debug_info := 'Call Generate_Release_Lines';
4984: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4985: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4986: END IF;
4987:
4988: Generate_Release_Lines (p_po_header_id => x_po_header_id,
4989: p_invoice_id => x_invoice_id,

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

4993: ELSE
4994:
4995: l_debug_info := 'Call Get_Shipment_List_For_QM';
4996: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4997: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4998: END IF;
4999:
5000: Get_Shipment_List_For_QM(X_Invoice_Id => x_invoice_id,
5001: X_Po_Header_Id => x_po_header_id,

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

5005: X_Calling_Sequence => current_calling_sequence);
5006:
5007: l_debug_info := 'Call Generate_Lines_For_Quickmatch';
5008: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5009: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
5010: END IF;
5011:
5012: Generate_Lines_for_Quickmatch(X_Invoice_Id => x_invoice_id,
5013: X_Match_Option => x_match_option,

Line 5024: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Quick_Match_Line_Generation(-)');

5020:
5021: END IF;
5022:
5023: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
5024: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Quick_Match_Line_Generation(-)');
5025: END IF;
5026:
5027: EXCEPTION
5028: WHEN others then

Line 5327: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Shipment_List_For_QuickMatch(+)');

5323:
5324: current_calling_sequence:= 'Get_Shipment_List_For_QuickMatch<-'||x_calling_sequence;
5325:
5326: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
5327: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Shipment_List_For_QuickMatch(+)');
5328: END IF;
5329:
5330: IF (x_match_option = 'P') THEN
5331:

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

5334: LOOP
5335:
5336: l_debug_info := 'Fetch next record of PO_Shipment_List_Cursor';
5337: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5338: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
5339: END IF;
5340:
5341: FETCH PO_Shipment_List_Cursor INTO l_po_line_location_id,
5342: l_po_line_id,

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

5463: -- bug 7577673: end
5464:
5465: l_debug_info := 'l_po_line_location_id is '||l_po_line_location_id;
5466: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5467: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
5468: END IF;
5469:
5470: --Bug9559298
5471: IF(l_price_override = 0) THEN

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

5490: X_Shipment_Table(l_index).amount := l_amount;
5491:
5492: l_debug_info := 'X_Shipment_Table('||l_index||').amount is'||X_Shipment_Table(l_index).amount;
5493: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5494: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
5495: END IF;
5496: X_Shipment_Table(l_index).inventory_item_id := l_item_id;
5497: X_Shipment_Table(l_index).item_description := l_item_description;
5498: X_Shipment_Table(l_index).asset_category_id := l_asset_category_id;

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

5570: LOOP
5571:
5572: l_debug_info := 'Fetch next record of Receipt_Shipment_List_Cursor';
5573: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5574: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
5575: END IF;
5576:
5577: FETCH Receipt_Shipment_List_Cursor INTO l_po_line_id,
5578: l_po_release_id,

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

5698: (l_receipt_uom_lookup_code is not null)) THEN
5699: l_debug_info := 'Call PO_UOM_S.PO_UOM_CONVERT to get the conversion
5700: factor between receipt uom and po uom';
5701: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5702: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
5703: END IF;
5704:
5705: l_conversion_factor := PO_UOM_S.PO_UOM_CONVERT(l_receipt_uom_lookup_code,
5706: l_po_uom_lookup_code,

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

5920:
5921: /*bug10630400 begin*/
5922: l_debug_info := 'Inside shipment loop number'||i;
5923: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5924: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
5925: END IF; /*bug10630400 end*/
5926:
5927: IF X_Shipment_Table.exists(i) then /*bug10630400 - begin*/
5928: l_base_amount := ap_utilities_pkg.ap_round_currency(

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

5948:
5949: /*bug10630400 begin*/
5950: l_debug_info := 'In foreign currency final rounding inv base- '||l_invoice_base_amount;
5951: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5952: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
5953: END IF; /*bug10630400 end*/
5954:
5955: x_shipment_table(l_rounded_index).base_amount := x_shipment_table(l_rounded_index).base_amount +
5956: (l_invoice_base_amount - l_sum_line_base_amount);

Line 5964: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Shipment_List_For_QuickMatch(-)');

5960:
5961: END IF;
5962:
5963: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
5964: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Get_Shipment_List_For_QuickMatch(-)');
5965: END IF;
5966:
5967:
5968: EXCEPTION

Line 6007: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Generate_Lines_For_QuickMatch(+)');

6003:
6004: l_api_name := 'Generate_Lines_For_QuickMatch';
6005: current_calling_sequence := 'Generate_Lines_For_QuickMatch<-'||x_calling_sequence;
6006: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
6007: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Generate_Lines_For_QuickMatch(+)');
6008: END IF;
6009:
6010: FOR i IN NVL(x_shipment_table.first,0) .. NVL(x_shipment_table.last,0) LOOP
6011:

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

6020:
6021: l_debug_info := 'l_full_mtch_amt '||l_full_mtch_amt;
6022:
6023: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6024: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
6025: END IF;
6026: --End Bug#13505998
6027:
6028: INSERT INTO AP_INVOICE_LINES_ALL

Line 6355: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Generate_Lines_For_QuickMatch(-)');

6351:
6352: END LOOP;
6353:
6354: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
6355: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_MATCHING_PKG.Generate_Lines_For_QuickMatch(-)');
6356: END IF;
6357:
6358:
6359:

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

6403: current_calling_sequence := 'Generate_Release_Lines<-'||x_calling_sequence;
6404:
6405: l_debug_info := 'Generate_Release_Lines (+)';
6406: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6407: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
6408: END IF;
6409:
6410: l_release_amount_rtot := p_release_amount;
6411:

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

6436: l_debug_info := 'Call Release API: '||
6437: 'line_location_id: ' || l_line_locations.line_location_id||
6438: 'release_amount: ' || l_shipment_release_amount;
6439: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6440: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
6441: END IF;
6442:
6443: ap_retainage_release_pkg.create_release
6444: (x_invoice_id => p_invoice_id,

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

6451: Close c_line_locations;
6452:
6453: l_debug_info := 'Generate_Release_Lines (-)';
6454: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6455: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
6456: END IF;
6457:
6458: EXCEPTION
6459: WHEN others then

Line 6502: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_curr_calling_sequence);

6498:
6499: l_curr_calling_sequence := 'Ap_Matching_Pkg.Build_Prepay_Account<-'
6500: || P_calling_sequence;
6501: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6502: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_curr_calling_sequence);
6503: END IF;
6504:
6505:
6506: SELECT set_of_books_id

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

6523: G_flex_segment_num);
6524:
6525: l_debug_info := 'G_Flex_Segment_Num: '||G_Flex_Segment_Num;
6526: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6527: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
6528: END IF;
6529:
6530: -- Get the segments of the two given accounts
6531: IF (NOT FND_FLEX_EXT.GET_SEGMENTS('SQLGL', 'GL#',

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

6538: P_reason_unbuilt_flex := 'INVALID ACCOUNT';
6539:
6540: l_debug_info := 'Charge Account is Invalid -> '||FND_MESSAGE.GET;
6541: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6542: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
6543: END IF;
6544:
6545: RETURN ;
6546:

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

6556: P_reason_unbuilt_flex := 'INVALID ACCOUNT';
6557:
6558: l_debug_info := 'Overlay Account is Invalid -> '||FND_MESSAGE.GET;
6559: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6560: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
6561: END IF;
6562:
6563: RETURN ;
6564:

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

6575: FOR i IN 1.. l_num_of_segments LOOP
6576:
6577: l_debug_info := 'Overlaying Account Segment -> '||to_char(i);
6578: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6579: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
6580: END IF;
6581:
6582: -- Account segment overlay
6583: IF (i = G_flex_segment_num) THEN

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

6601: P_reason_unbuilt_flex := 'INVALID ACCOUNT';
6602:
6603: l_debug_info := 'Account Based on Overlayed Segments can not be build -> '||FND_MESSAGE.GET;
6604: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6605: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
6606: END IF;
6607:
6608: END IF;
6609:

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

6618: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
6619:
6620: l_debug_info := 'Exception occured in Building Prepay Account> '||FND_MESSAGE.GET;
6621: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
6622: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
6623: END IF;
6624: END IF;
6625: APP_EXCEPTION.RAISE_EXCEPTION;
6626: