eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AP_APPROVAL_MATCHED_PKG dependencies on AP_DEBUG_PKG

Line 481: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

477: g_debug_mode := 'Y';
478: END IF;
479:
480: IF (g_debug_mode = 'Y') THEN
481: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
482: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
483: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice line number: '||
484: TO_CHAR(p_inv_line_number));
485: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||

Line 482: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));

478: END IF;
479:
480: IF (g_debug_mode = 'Y') THEN
481: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
482: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
483: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice line number: '||
484: TO_CHAR(p_inv_line_number));
485: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
486: p_base_currency_code);

Line 483: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice line number: '||

479:
480: IF (g_debug_mode = 'Y') THEN
481: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
482: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
483: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice line number: '||
484: TO_CHAR(p_inv_line_number));
485: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
486: p_base_currency_code);
487: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||

Line 485: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||

481: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
482: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
483: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice line number: '||
484: TO_CHAR(p_inv_line_number));
485: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
486: p_base_currency_code);
487: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||
488: p_inv_currency_code);
489: AP_Debug_Pkg.Print(g_debug_mode, 'sys gain ccid: '||

Line 487: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||

483: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice line number: '||
484: TO_CHAR(p_inv_line_number));
485: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
486: p_base_currency_code);
487: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||
488: p_inv_currency_code);
489: AP_Debug_Pkg.Print(g_debug_mode, 'sys gain ccid: '||
490: TO_CHAR(p_sys_xrate_gain_ccid));
491: AP_Debug_Pkg.Print(g_debug_mode, 'sys loss ccid: '||

Line 489: AP_Debug_Pkg.Print(g_debug_mode, 'sys gain ccid: '||

485: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
486: p_base_currency_code);
487: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||
488: p_inv_currency_code);
489: AP_Debug_Pkg.Print(g_debug_mode, 'sys gain ccid: '||
490: TO_CHAR(p_sys_xrate_gain_ccid));
491: AP_Debug_Pkg.Print(g_debug_mode, 'sys loss ccid: '||
492: TO_CHAR(p_sys_xrate_loss_ccid));
493: END IF;

Line 491: AP_Debug_Pkg.Print(g_debug_mode, 'sys loss ccid: '||

487: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||
488: p_inv_currency_code);
489: AP_Debug_Pkg.Print(g_debug_mode, 'sys gain ccid: '||
490: TO_CHAR(p_sys_xrate_gain_ccid));
491: AP_Debug_Pkg.Print(g_debug_mode, 'sys loss ccid: '||
492: TO_CHAR(p_sys_xrate_loss_ccid));
493: END IF;
494:
495:

Line 549: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

545: IF l_cnt = 0 then --bug 9242891
546:
547: l_debug_info := 'Open Distribution_Cur';
548: IF (g_debug_mode = 'Y') THEN
549: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
550: END IF;
551:
552: --bug 9242891
553: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 563: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

559: ELSE --bug 9242891
560:
561: l_debug_info := 'Open Retainage_Distribution_Cur';
562: IF (g_debug_mode = 'Y') THEN
563: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
564: END IF;
565:
566: --bug 9242891
567: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 603: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

599: EXIT WHEN Distribution_Cur%NOTFOUND;
600: ELSE --bug 9242891
601: l_debug_info := 'Fetch Retainage_Distribution_Cur';
602: IF (g_debug_mode = 'Y') THEN
603: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
604: END IF;
605:
606: --bug 9242891
607: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 648: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

644: +-----------------------------------------------------------------*/
645:
646: IF (g_debug_mode = 'Y') THEN
647: l_debug_info := 'Calculate IPV and ERV';
648: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
649: END IF;
650:
651: /*-----------------------------------------------------------------+
652: | Step 1 - Open check variance cursor to check if ERV already |

Line 716: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

712: l_curr_calling_sequence);
713:
714: IF (g_debug_mode = 'Y') THEN
715: l_debug_info := 'After calling Calculate_variance' || l_debug_info;
716: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
717: AP_Debug_Pkg.Print(g_debug_mode, l_debug_context );
718: END IF;
719:
720: /*--------------------------------------------------------------+

Line 717: AP_Debug_Pkg.Print(g_debug_mode, l_debug_context );

713:
714: IF (g_debug_mode = 'Y') THEN
715: l_debug_info := 'After calling Calculate_variance' || l_debug_info;
716: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
717: AP_Debug_Pkg.Print(g_debug_mode, l_debug_context );
718: END IF;
719:
720: /*--------------------------------------------------------------+
721: | Step 3.1: Calculate extra_po_erv for the ITEM distribution |

Line 738: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info);

734: IF (g_debug_mode = 'Y') THEN
735: l_debug_info := l_debug_loc ||
736: 'receipt match line when accrue on receipt is N' ||
737: 'calculate po_erv';
738: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info);
739: END IF;
740:
741: -- Amount Based Matching
742: IF l_match_basis = 'QUANTITY' THEN

Line 797: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

793:
794: IF (g_debug_mode = 'Y') THEN
795: l_debug_info := 'Exec_Matched_Variance_Checks - variance exists ' ||
796: 'calling get_erv_ccid ';
797: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
798: END IF;
799:
800: IF ( NVL(l_erv,0 ) <> 0 ) THEN
801:

Line 856: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

852: -- Case A.1 - There is no existing IPV line - insert
853: -----------------------------------------------------------
854: IF (g_debug_mode = 'Y') THEN
855: l_debug_info := 'Non reversal dist line - Insert IPV line';
856: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
857: END IF;
858:
859: l_related_id := l_invoice_distribution_id;
860:

Line 1073: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1069: -- Case A.2 - There is an existing IPV line - update
1070: ------------------------------------------------------------
1071: IF (g_debug_mode = 'Y') THEN
1072: l_debug_info := 'Non reversal line - UPDATE exist ipv line';
1073: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1074: END IF;
1075:
1076: -----------------------------------------------------------
1077: -- Update the existing IPV line for newly calculated IPV

Line 1109: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1105: -----------------------------------------------------------
1106:
1107: IF (g_debug_mode = 'Y') THEN
1108: l_debug_info := 'Non reversal dist line - Insert ERV line';
1109: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1110: END IF;
1111:
1112: l_related_id := l_invoice_distribution_id;
1113:

Line 1326: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1322: -----------------------------------------------------------
1323:
1324: IF (g_debug_mode = 'Y') THEN
1325: l_debug_info := 'Non reversal dist line-process exist ERV line';
1326: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1327: END IF;
1328:
1329: -------------------------------------------------------------
1330: -- UPDATE the existing ERV line for newly calculated ERV

Line 1438: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1434: END; --bug 9242891
1435:
1436: IF (g_debug_mode = 'Y') THEN
1437:
1438: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1439:
1440: --bug 9242891
1441: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1442: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

Line 1460: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1456: +-----------------------------------------------------------------*/
1457:
1458: IF (g_debug_mode = 'Y') THEN
1459: l_debug_info := 'Process ERV ACCT INVALID hold for the invoice';
1460: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1461: END IF;
1462:
1463: /* Bug 5230770. We should not process any invalid acct holds since it
1464: does not make any sense with SLA

Line 1633: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1629: g_debug_mode := 'Y';
1630: END IF;
1631:
1632: IF (g_debug_mode = 'Y') THEN
1633: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1634: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
1635: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
1636: p_base_currency_code);
1637: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||

Line 1634: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));

1630: END IF;
1631:
1632: IF (g_debug_mode = 'Y') THEN
1633: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1634: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
1635: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
1636: p_base_currency_code);
1637: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||
1638: p_inv_currency_code);

Line 1635: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||

1631:
1632: IF (g_debug_mode = 'Y') THEN
1633: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1634: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
1635: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
1636: p_base_currency_code);
1637: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||
1638: p_inv_currency_code);
1639: END IF;

Line 1637: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||

1633: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1634: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
1635: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
1636: p_base_currency_code);
1637: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||
1638: p_inv_currency_code);
1639: END IF;
1640:
1641: /*-----------------------------------------------------------------+

Line 1648: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1644: +-----------------------------------------------------------------*/
1645:
1646: IF (g_debug_mode = 'Y') THEN
1647: l_debug_info := 'Open Distribution_Cur';
1648: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1649: END IF;
1650:
1651: OPEN Distribution_Cur;
1652: LOOP

Line 1676: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1672: +-----------------------------------------------------------------*/
1673:
1674: IF (g_debug_mode = 'Y') THEN
1675: l_debug_info := 'Exec_Qty_Variance_Check- call Calculate_QV';
1676: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1677: END IF;
1678:
1679: AP_FUNDS_CONTROL_PKG.Calc_QV(
1680: p_invoice_id,

Line 1705: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1701: +-----------------------------------------------------------------*/
1702:
1703: IF (g_debug_mode = 'Y') THEN
1704: l_debug_info := 'Set inv dist qv if right dist_line_num to be updated ';
1705: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1706: END IF;
1707:
1708: IF (l_distribution_line_number = l_update_dist_num AND
1709: l_invoice_line_number = l_update_line_num ) THEN

Line 1721: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1717: IF (g_debug_mode = 'Y') THEN
1718: l_debug_info := 'Exec_Qty_Variance_Checks-update line with dist_line_num'
1719: || '=' || to_char(l_distribution_line_number)
1720: || 'line_number' || to_char(l_invoice_line_number);
1721: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1722: END IF;
1723:
1724: UPDATE ap_invoice_distributions
1725: SET quantity_variance = decode(nvl(quantity_variance,0)+l_qv,0,

Line 1758: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1754:
1755: IF (g_debug_mode = 'Y') THEN
1756: l_debug_info := 'Exec_Qty_Variance_Checks-finish update the distribution'
1757: || 'for each distribution line';
1758: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1759: END IF;
1760:
1761: END LOOP;
1762: CLOSE Distribution_Cur;

Line 1896: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1892: g_debug_mode := 'Y';
1893: END IF;
1894:
1895: IF (g_debug_mode = 'Y') THEN
1896: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1897: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
1898: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
1899: p_base_currency_code);
1900: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||

Line 1897: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));

1893: END IF;
1894:
1895: IF (g_debug_mode = 'Y') THEN
1896: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1897: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
1898: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
1899: p_base_currency_code);
1900: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||
1901: p_inv_currency_code);

Line 1898: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||

1894:
1895: IF (g_debug_mode = 'Y') THEN
1896: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1897: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
1898: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
1899: p_base_currency_code);
1900: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||
1901: p_inv_currency_code);
1902: END IF;

Line 1900: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||

1896: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1897: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
1898: AP_Debug_Pkg.Print(g_debug_mode, 'base currency code: '||
1899: p_base_currency_code);
1900: AP_Debug_Pkg.Print(g_debug_mode, 'invoice currency code: '||
1901: p_inv_currency_code);
1902: END IF;
1903:
1904: /*-----------------------------------------------------------------+

Line 1911: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1907: +-----------------------------------------------------------------*/
1908:
1909: IF (g_debug_mode = 'Y') THEN
1910: l_debug_info := 'Open Distribution_Cur';
1911: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1912: END IF;
1913:
1914: OPEN Distribution_Cur;
1915: LOOP

Line 1936: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1932: +-----------------------------------------------------------------*/
1933:
1934: IF (g_debug_mode = 'Y') THEN
1935: l_debug_info := 'Exec_Amt_Variance_Check- call Calculate_AV';
1936: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1937: END IF;
1938:
1939: AP_FUNDS_CONTROL_PKG.Calc_AV(
1940: p_invoice_id,

Line 1961: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1957: +-----------------------------------------------------------------*/
1958:
1959: IF (g_debug_mode = 'Y') THEN
1960: l_debug_info := 'Set inv dist av if right dist_line_num to be updated ';
1961: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1962: END IF;
1963:
1964: IF (l_distribution_line_number = l_update_dist_num AND
1965: l_invoice_line_number = l_update_line_num ) THEN

Line 1977: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

1973: IF (g_debug_mode = 'Y') THEN
1974: l_debug_info := 'Exec_Amt_Variance_Checks-update line with dist_line_num'
1975: || '=' || to_char(l_distribution_line_number)
1976: || 'line_number' || to_char(l_invoice_line_number);
1977: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
1978: END IF;
1979:
1980: UPDATE ap_invoice_distributions
1981: SET amount_variance = decode(nvl(amount_variance,0)+l_av,0,

Line 2014: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2010:
2011: IF (g_debug_mode = 'Y') THEN
2012: l_debug_info := 'Exec_Amt_Variance_Checks-finish update the distribution'
2013: || 'for each distribution line';
2014: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2015: END IF;
2016:
2017: END LOOP;
2018: CLOSE Distribution_Cur;

Line 2336: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2332: -----------------------------------------
2333: l_debug_info := 'Open Matched_Cur';
2334: -----------------------------------------
2335: IF (g_debug_mode = 'Y') THEN
2336: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2337: END IF;
2338: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2339: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2340: END IF;

Line 2349: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2345: ---------------------------------------
2346: l_debug_info := 'Fetch Matched_Cur';
2347: ---------------------------------------
2348: IF (g_debug_mode = 'Y') THEN
2349: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2350: END IF;
2351: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2352: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2353: END IF;

Line 2472: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2468: ---------------------------------------
2469: l_debug_info := 'Check PO closed code';
2470: ---------------------------------------
2471: IF (g_debug_mode = 'Y') THEN
2472: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2473: END IF;
2474: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2475: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2476: END IF;

Line 2541: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2537: -----------------------------------------------------------------
2538: l_debug_info := 'Process FINAL MATCHING hold for shipment match';
2539: -----------------------------------------------------------------
2540: IF (g_debug_mode = 'Y') THEN
2541: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2542: END IF;
2543: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2544: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2545: END IF;

Line 2564: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2560: ------------------------------------------------
2561: l_debug_info := 'Check for Currency Difference';
2562: ------------------------------------------------
2563: IF (g_debug_mode = 'Y') THEN
2564: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2565: END IF;
2566: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2567: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2568: END IF;

Line 2580: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2576: ----------------------------------------------------------------------
2577: l_debug_info := 'Process CURRENCY DIFFERENCE hold for shipment match';
2578: ----------------------------------------------------------------------
2579: IF (g_debug_mode = 'Y') THEN
2580: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2581: END IF;
2582: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2583: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2584: END IF;

Line 2603: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2599: -----------------------------------------
2600: l_debug_info := 'Check PO Approval Flag';
2601: -----------------------------------------
2602: IF (g_debug_mode = 'Y') THEN
2603: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2604: END IF;
2605: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2606: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2607: END IF;

Line 2623: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2619: ------------------------------------------------------------------
2620: l_debug_info := 'Process PO NOT APPROVED hold for shipment match';
2621: ------------------------------------------------------------------
2622: IF (g_debug_mode = 'Y') THEN
2623: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2624: END IF;
2625: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2626: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2627: END IF;

Line 2646: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2642: ------------------------------------------
2643: l_debug_info := 'Check Receipt Exception';
2644: ------------------------------------------
2645: IF (g_debug_mode = 'Y') THEN
2646: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2647: END IF;
2648: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2649: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2650: END IF;

Line 2667: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2663: -------------------------------------------------------------
2664: l_debug_info := 'Calculate Invoice Shipment Quantity Billed';
2665: -------------------------------------------------------------
2666: IF (g_debug_mode = 'Y') THEN
2667: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2668: END IF;
2669: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2670: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2671: END IF;

Line 2690: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2686: -----------------------------------------
2687: l_debug_info := 'Check Quantity Ordered';
2688: -----------------------------------------
2689: IF (g_debug_mode = 'Y') THEN
2690: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2691: END IF;
2692: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2693: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2694: END IF;

Line 2710: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2706: ----------------------------------------------------------
2707: l_debug_info := 'Process QTY ORD hold for shipment match';
2708: ----------------------------------------------------------
2709: IF (g_debug_mode = 'Y') THEN
2710: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2711: END IF;
2712: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2713: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2714: END IF;

Line 2747: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2743: --------------------------------------------------------------
2744: l_debug_info := 'Process MAX QTY ORD hold for shipment match';
2745: --------------------------------------------------------------
2746: IF (g_debug_mode = 'Y') THEN
2747: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2748: END IF;
2749: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2750: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2751: END IF;

Line 2770: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2766: ------------------------------------------
2767: l_debug_info := 'Check Quantity Received ';
2768: ------------------------------------------
2769: IF (g_debug_mode = 'Y') THEN
2770: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2771: END IF;
2772: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2773: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2774: END IF;

Line 2813: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2809: ----------------------------------------------------------
2810: l_debug_info := 'Process QTY REC hold for shipment match';
2811: ----------------------------------------------------------
2812: IF (g_debug_mode = 'Y') THEN
2813: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2814: END IF;
2815: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2816: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2817: END IF;

Line 2836: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2832: --------------------------------------------------
2833: l_debug_info := 'Check Maximum Quantity Received';
2834: --------------------------------------------------
2835: IF (g_debug_mode = 'Y') THEN
2836: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2837: END IF;
2838: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2839: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2840: END IF;

Line 2858: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2854: --------------------------------------------------------------
2855: l_debug_info := 'Process MAX QTY REC hold for shipment match';
2856: --------------------------------------------------------------
2857: IF (g_debug_mode = 'Y') THEN
2858: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2859: END IF;
2860: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2861: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2862: END IF;

Line 2881: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2877: ------------------------------
2878: l_debug_info := 'Check Price';
2879: ------------------------------
2880: IF (g_debug_mode = 'Y') THEN
2881: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2882: END IF;
2883: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2884: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2885: END IF;

Line 2908: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2904: -------------------------------------------
2905: l_debug_info := 'Check Quantity Inspected';
2906: -------------------------------------------
2907: IF (g_debug_mode = 'Y') THEN
2908: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2909: END IF;
2910: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2911: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2912: END IF;

Line 2932: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2928: ----------------------------------------------------------
2929: l_debug_info := 'Process QUALITY hold for shipment match';
2930: ----------------------------------------------------------
2931: IF (g_debug_mode = 'Y') THEN
2932: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2933: END IF;
2934: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2935: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2936: END IF;

Line 2968: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2964: -----------------------------------------
2965: l_debug_info := 'Check Amount Ordered';
2966: -----------------------------------------
2967: IF (g_debug_mode = 'Y') THEN
2968: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2969: END IF;
2970: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2971: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2972: END IF;

Line 2988: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

2984: ----------------------------------------------------------
2985: l_debug_info := 'Process AMT ORD hold for shipment match';
2986: ----------------------------------------------------------
2987: IF (g_debug_mode = 'Y') THEN
2988: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
2989: END IF;
2990: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2991: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2992: END IF;

Line 3025: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3021: --------------------------------------------------------------
3022: l_debug_info := 'Process MAX AMT ORD hold for shipment match';
3023: --------------------------------------------------------------
3024: IF (g_debug_mode = 'Y') THEN
3025: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3026: END IF;
3027: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3028: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3029: END IF;

Line 3048: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3044: ------------------------------------------
3045: l_debug_info := 'Check Amount Received ';
3046: ------------------------------------------
3047: IF (g_debug_mode = 'Y') THEN
3048: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3049: END IF;
3050: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3051: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3052: END IF;

Line 3086: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3082: ----------------------------------------------------------
3083: l_debug_info := 'Process AMT REC hold for shipment match';
3084: ----------------------------------------------------------
3085: IF (g_debug_mode = 'Y') THEN
3086: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3087: END IF;
3088: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3089: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3090: END IF;

Line 3109: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3105: --------------------------------------------------
3106: l_debug_info := 'Check Maximum Amount Received';
3107: --------------------------------------------------
3108: IF (g_debug_mode = 'Y') THEN
3109: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3110: END IF;
3111: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3112: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3113: END IF;

Line 3131: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3127: --------------------------------------------------------------
3128: l_debug_info := 'Process MAX AMT REC hold for shipment match';
3129: --------------------------------------------------------------
3130: IF (g_debug_mode = 'Y') THEN
3131: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3132: END IF;
3133: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3134: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3135: END IF;

Line 3179: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3175: -----------------------------------------------------------
3176: l_debug_info := 'Check for Milestone Hold for Quantity Ordered';
3177: -----------------------------------------------------------
3178: IF (g_debug_mode = 'Y') THEN
3179: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3180: END IF;
3181: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3182: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3183: END IF;

Line 3215: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3211: ----------------------------------------------------------
3212: l_debug_info := 'Process MILESTONE hold for shipment match';
3213: ----------------------------------------------------------
3214: IF (g_debug_mode = 'Y') THEN
3215: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3216: END IF;
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;

Line 3241: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3237: ------------------------------------------
3238:
3239:
3240: IF (g_debug_mode = 'Y') THEN
3241: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3242: END IF;
3243: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3244: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3245: END IF;

Line 3284: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3280: ----------------------------------------------------------
3281: l_debug_info := 'Process QTY REC hold for shipment match';
3282: ----------------------------------------------------------
3283: IF (g_debug_mode = 'Y') THEN
3284: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3285: END IF;
3286: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3287: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3288: END IF;

Line 3321: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3317: -----------------------------------------
3318: l_debug_info := 'Check Amount Ordered';
3319: -----------------------------------------
3320: IF (g_debug_mode = 'Y') THEN
3321: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3322: END IF;
3323: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3324: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3325: END IF;

Line 3345: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3341: ----------------------------------------------------------
3342: l_debug_info := 'Process AMT ORD hold for shipment match';
3343: ----------------------------------------------------------
3344: IF (g_debug_mode = 'Y') THEN
3345: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3346: END IF;
3347: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3348: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3349: END IF;

Line 3371: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3367: ------------------------------------------
3368: l_debug_info := 'Check Amount Received ';
3369: ------------------------------------------
3370: IF (g_debug_mode = 'Y') THEN
3371: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3372: END IF;
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;

Line 3407: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3403: ----------------------------------------------------------
3404: l_debug_info := 'Process AMT REC hold for shipment match';
3405: ----------------------------------------------------------
3406: IF (g_debug_mode = 'Y') THEN
3407: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3408: END IF;
3409: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3410: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3411: END IF;

Line 3439: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3435: ---------------------------------------
3436: -- BUG 3486887 : Added parameter p_origin_doc_id=> p_invoice_id in Close_PO()
3437:
3438: IF (g_debug_mode = 'Y') THEN
3439: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3440: END IF;
3441: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3442: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3443: END IF;

Line 3468: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3464: --------------------------------------------------
3465: l_debug_info := 'Check for ship amount tolerance';
3466: --------------------------------------------------
3467: IF (g_debug_mode = 'Y') THEN
3468: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3469: END IF;
3470: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3471: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3472: END IF;

Line 3511: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3507: l_debug_info := 'l_max_ship_amt_exceeded: '||l_max_ship_amt_exceeded||' l_org_id: '||
3508: l_org_id;
3509: ------------------------------------------------------------------------------------
3510: IF (g_debug_mode = 'Y') THEN
3511: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3512: END IF;
3513: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3514: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3515: END IF;

Line 3522: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3518: --------------------------------------------------
3519: l_debug_info := 'Calling FV_AP_MATCH_PKG.Shipment_Tolerance';
3520: --------------------------------------------------
3521: IF (g_debug_mode = 'Y') THEN
3522: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3523: END IF;
3524: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3525: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3526: END IF;

Line 3541: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3537: l_debug_info := 'l_fv_tol_check: '||l_fv_tol_check||' l_max_ship_amt_exceeded: '||
3538: l_max_ship_amt_exceeded;
3539: ----------------------------------------------------------------------------
3540: IF (g_debug_mode = 'Y') THEN
3541: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3542: END IF;
3543: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3544: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3545: END IF;

Line 3572: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3568: -----------------------------------------------------------------------
3569: l_debug_info := 'Process MAX SHIP AMOUNT Hold for this shipment match';
3570: -----------------------------------------------------------------------
3571: IF (g_debug_mode = 'Y') THEN
3572: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3573: END IF;
3574: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3575: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3576: END IF;

Line 3595: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3591: -----------------------------------------------------------
3592: l_debug_info := 'Compare erv with exchange rate tolerance';
3593: -----------------------------------------------------------
3594: IF (g_debug_mode = 'Y') THEN
3595: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3596: END IF;
3597: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3598: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3599: END IF;

Line 3634: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3630: -----------------------------------------------------------------------
3631: l_debug_info := 'Process MAX RATE AMOUNT Hold for this shipment match';
3632: -----------------------------------------------------------------------
3633: IF (g_debug_mode = 'Y') THEN
3634: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3635: END IF;
3636: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3637: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3638: END IF;

Line 3657: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3653: --------------------------------------------------
3654: l_debug_info := 'Check for total amount tolerance';
3655: --------------------------------------------------
3656: IF (g_debug_mode = 'Y') THEN
3657: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3658: END IF;
3659: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3660: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3661: END IF;

Line 3702: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

3698: -----------------------------------------------------------------------
3699: l_debug_info := 'Process MAX TOTAL AMOUNT Hold for this shipment match';
3700: -----------------------------------------------------------------------
3701: IF (g_debug_mode = 'Y') THEN
3702: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
3703: END IF;
3704: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3705: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3706: END IF;

Line 4213: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4209: -----------------------------------------------
4210: l_debug_info := 'Open Final_Match_Release_Cur';
4211: -----------------------------------------------
4212: IF (g_debug_mode = 'Y') THEN
4213: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4214: END IF;
4215:
4216: OPEN Final_Match_Release_Cur;
4217: LOOP

Line 4223: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4219: ------------------------------------------------
4220: l_debug_info := 'Fetch Final_Match_Release_Cur';
4221: ------------------------------------------------
4222: IF (g_debug_mode = 'Y') THEN
4223: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4224: END IF;
4225:
4226: FETCH Final_Match_Release_Cur
4227: INTO l_line_location_id,

Line 4250: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4246: -----------------------------------------
4247: l_debug_info := 'Open Final_Match_Cur';
4248: -----------------------------------------
4249: IF (g_debug_mode = 'Y') THEN
4250: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4251: END IF;
4252:
4253: OPEN Final_Match_Cur;
4254: LOOP

Line 4295: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4291: ------------------------------------------------
4292: l_debug_info := 'Start Final Match Processing';
4293: ------------------------------------------------
4294: IF (g_debug_mode = 'Y') THEN
4295: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4296: END IF;
4297:
4298: Get_Shipment_Qty_Delivered(
4299: l_line_location_id,

Line 4316: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4312:
4313: -- BUG 3486887 : Added parameter p_origin_doc_id=> p_invoice_id in Close_PO()
4314:
4315: IF (g_debug_mode = 'Y') THEN
4316: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4317: END IF;
4318:
4319: IF (NOT(PO_ACTIONS.Close_PO(
4320: p_docid => l_po_header_id,

Line 4340: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4336: -----------------------------------------------
4337: l_debug_info := 'Process PO Close retrun code';
4338: -----------------------------------------------
4339: IF (g_debug_mode = 'Y') THEN
4340: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4341: END IF;
4342:
4343: IF (l_return_code IN ('SUBMISSION_FAILED', 'STATE_FAILED')) THEN
4344:

Line 4349: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4345: -------------------------------------------------
4346: l_debug_info := 'PO Closed with failure';
4347: -------------------------------------------------
4348: IF (g_debug_mode = 'Y') THEN
4349: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4350: END IF;
4351:
4352: l_cant_po_close_exists := 'Y';
4353: ELSE

Line 4358: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4354: -------------------------------------------------
4355: l_debug_info := 'Get PO Closed Code after success';
4356: -------------------------------------------------
4357: IF (g_debug_mode = 'Y') THEN
4358: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4359: END IF;
4360:
4361: Get_PO_Closed_Code(
4362: l_line_location_id,

Line 4371: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4367: -------------------------------------------------------------
4368: l_debug_info := 'Update Inv Dist/Line Final_Match_Flag to D';
4369: -------------------------------------------------------------
4370: IF (g_debug_mode = 'Y') THEN
4371: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4372: END IF;
4373:
4374: -- Start Bug 3489536
4375:

Line 4411: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4407: -------------------------------------------------------------
4408: l_debug_info := 'Error l_po_closed_code not finally closed';
4409: -------------------------------------------------------------
4410: IF (g_debug_mode = 'Y') THEN
4411: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4412: END IF;
4413:
4414: Raise Error;
4415:

Line 4435: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4431: --------------------------------------------------------------
4432: l_debug_info := 'Process the CANT CLOSE PO hold status';
4433: --------------------------------------------------------------
4434: IF (g_debug_mode = 'Y') THEN
4435: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4436: END IF;
4437:
4438: AP_APPROVAL_PKG.Process_Inv_Hold_Status(
4439: p_invoice_id,

Line 4457: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4453: ----------------------------------------
4454: l_debug_info := 'CLOSE Final_Match_Cur';
4455: ----------------------------------------
4456: IF (g_debug_mode = 'Y') THEN
4457: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4458: END IF;
4459:
4460: CLOSE Final_Match_Cur;
4461:

Line 4472: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4468: ------------------------------------------------------------------------
4469: l_debug_info := 'Process CANT TRY PO CLOSE hold status for the invoice';
4470: ------------------------------------------------------------------------
4471: IF (g_debug_mode = 'Y') THEN
4472: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4473: END IF;
4474:
4475: AP_APPROVAL_PKG.Process_Inv_Hold_Status(
4476: p_invoice_id,

Line 4544: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info);

4540: p_calling_sequence;
4541:
4542: IF g_debug_mode = 'Y' THEN
4543: l_debug_info := 'Check if Rec Exception Exists';
4544: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info);
4545: END IF;
4546:
4547: /*-----------------------------------------------------------------+
4548: | Query is done at invoice line level for release 11.6 trying to |

Line 4588: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info);

4584: END IF;
4585:
4586: IF g_debug_mode = 'Y' THEN
4587: l_debug_info := 'Process Invoice Hold Status for REC EXCEPTION';
4588: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info);
4589: END IF;
4590:
4591: AP_APPROVAL_PKG.Process_Inv_Hold_Status(
4592: p_invoice_id,

Line 4693: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4689: ---------------------------------------------------------
4690: l_debug_info := 'Check if invoice is a price correction';
4691: ---------------------------------------------------------
4692: IF (g_debug_mode = 'Y') THEN
4693: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4694: END IF;
4695:
4696: /*-----------------------------------------------------------------+
4697: | To check if the match is a base match only or has corrections |

Line 4779: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4775: --------------------------------------
4776: l_debug_info := 'Process PRICE hold ';
4777: --------------------------------------
4778: IF (g_debug_mode = 'Y') THEN
4779: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4780: END IF;
4781:
4782: AP_APPROVAL_PKG.Process_Inv_Hold_Status(
4783: p_invoice_id,

Line 4885: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4881: ---------------------------------------------------------------
4882: l_debug_info := 'calculate average price for a invoice ';
4883: ---------------------------------------------------------------
4884: IF (g_debug_mode = 'Y') THEN
4885: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4886: END IF;
4887:
4888: IF ( p_match_option = 'P' ) THEN
4889:

Line 4895: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4891: l_debug_info := 'CHECK_AVERAGE_PRICE <- match to PO';
4892: ---------------------------------------------------------------
4893:
4894: IF (g_debug_mode = 'Y') THEN
4895: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4896: END IF;
4897:
4898: SELECT sum( decode( nvl(AIL.unit_price,0) * nvl(AIL.quantity_invoiced,0),
4899: 0, nvl(AIL.amount, 0),

Line 4931: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

4927: l_debug_info := 'CHECK_AVERAGE_PRICE <- match to receipt';
4928: ---------------------------------------------------------------
4929:
4930: IF (g_debug_mode = 'Y') THEN
4931: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
4932: END IF;
4933:
4934: -- bug8518421
4935: SELECT sum (decode(nvl(AIL.unit_price,0) * nvl(AIL.quantity_invoiced,0),

Line 5535: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5531: --------------------------------------------------------
5532: l_debug_info := 'Calculate Shipment Total for the invoice';
5533: --------------------------------------------------------
5534: IF (g_debug_mode = 'Y') THEN
5535: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5536: END IF;
5537:
5538: /*-----------------------------------------------------------------+
5539: | Calculate the total shipment transaction amt billed by this |

Line 5556: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5552: -----------------------------------------------------------------
5553: l_debug_info := 'Calc_Ship_Total_Trx_Amt_Var->shipment amt is 0';
5554: -----------------------------------------------------------------
5555: IF (g_debug_mode = 'Y') THEN
5556: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5557: END IF;
5558: p_ship_trx_amt_var := 0;
5559: ELSE
5560: IF p_match_basis = 'QUANTITY' THEN -- Amount Based Matching

Line 5701: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5697: ------------------------------------------------------------------
5698: l_debug_info := 'Calculate Shipment Total amount for the invoice';
5699: --------------------------------------------------------------=---
5700: IF (g_debug_mode = 'Y') THEN
5701: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5702: END IF;
5703:
5704: /*-----------------------------------------------------------------+
5705: | The Meaning fo the following query conditions indicates:- |

Line 5727: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5723: l_debug_info := 'Calc_Ship_Trx_Amt - Match to PO';
5724: -------------------------------------------------------
5725:
5726: IF (g_debug_mode = 'Y') THEN
5727: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5728: END IF;
5729:
5730: SELECT sum( NVL(L.amount, 0) )
5731: INTO p_ship_trx_amt

Line 5761: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5757: l_debug_info := 'Calc_Ship_Trx_Amt - Match to RECEIPT';
5758: -------------------------------------------------------
5759:
5760: IF (g_debug_mode = 'Y') THEN
5761: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5762: END IF;
5763:
5764: SELECT sum(NVL(L.amount, 0))
5765: INTO p_ship_trx_amt

Line 5843: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5839: l_debug_info := 'Calculate ERV total for Shipment/receipt in the invoice';
5840: -------------------------------------------------------------------------
5841:
5842: IF g_debug_mode = 'Y' THEN
5843: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5844: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
5845: AP_Debug_Pkg.Print(g_debug_mode, 'line location id: '||
5846: TO_CHAR(p_line_location_id));
5847: END IF;

Line 5844: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));

5840: -------------------------------------------------------------------------
5841:
5842: IF g_debug_mode = 'Y' THEN
5843: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5844: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
5845: AP_Debug_Pkg.Print(g_debug_mode, 'line location id: '||
5846: TO_CHAR(p_line_location_id));
5847: END IF;
5848:

Line 5845: AP_Debug_Pkg.Print(g_debug_mode, 'line location id: '||

5841:
5842: IF g_debug_mode = 'Y' THEN
5843: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5844: AP_Debug_Pkg.Print(g_debug_mode, 'Invoice id: '|| TO_CHAR(p_invoice_id));
5845: AP_Debug_Pkg.Print(g_debug_mode, 'line location id: '||
5846: TO_CHAR(p_line_location_id));
5847: END IF;
5848:
5849: IF (p_match_option = 'P') THEN

Line 5855: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5851: -------------------------------------------------------
5852: l_debug_info := 'Calc_Max_Rate_Var - Match to RECEIPT';
5853: -------------------------------------------------------
5854: IF (g_debug_mode = 'Y') THEN
5855: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5856: END IF;
5857:
5858: SELECT SUM( NVL(D.base_amount, 0))
5859: INTO p_rate_amt_var

Line 5872: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5868: -------------------------------------------------------
5869: l_debug_info := 'Calc_Max_Rate_Var - Match to RECEIPT';
5870: -------------------------------------------------------
5871: IF (g_debug_mode = 'Y') THEN
5872: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5873: END IF;
5874:
5875: SELECT SUM(NVL(D.base_amount, 0))
5876: INTO p_rate_amt_var

Line 5948: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5944: l_debug_info := 'Calculate Base Shipment Total for the invoice';
5945: ----------------------------------------------------------------
5946:
5947: IF g_debug_mode = 'Y' THEN
5948: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5949: END IF;
5950:
5951: /*-----------------------------------------------------------------+
5952: | Calculate the total shipment transaction amt billed by this |

Line 5977: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5973: ---------------------------------------------------------------------------
5974: l_debug_info := 'Calc_Ship_Total_base_Trx_Amt_Var->base shipment amt is 0';
5975: ---------------------------------------------------------------------------
5976: IF (g_debug_mode = 'Y') THEN
5977: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5978: END IF;
5979:
5980: p_ship_base_amt_var := 0;
5981:

Line 5988: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

5984: ---------------------------------------------------------------------------
5985: l_debug_info := 'Calc_Ship_Total_base_Trx_Amt_Var->base shipment amt <> 0';
5986: ---------------------------------------------------------------------------
5987: IF (g_debug_mode = 'Y') THEN
5988: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
5989: END IF;
5990:
5991: --Amount-Based Matching Project, added the IF condition
5992:

Line 6175: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

6171: l_debug_info := 'Calculate base Shipment amount for the invoice';
6172: ------------------------------------------------------------------
6173:
6174: IF g_debug_mode = 'Y' THEN
6175: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
6176: END IF;
6177:
6178:
6179: /*-----------------------------------------------------------------+

Line 6202: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

6198: l_debug_info := 'Calc_Ship_BASE_Trx_Amt - Match to PO';
6199: ----------------------------------------------------------
6200:
6201: IF (g_debug_mode = 'Y') THEN
6202: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
6203: END IF;
6204:
6205: SELECT SUM( DECODE( p_inv_curr_code
6206: ,p_base_curr_code

Line 6242: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

6238: l_debug_info := 'Calc_Ship_Trx_BASE_Amt - Match to RECEIPT';
6239: ------------------------------------------------------------
6240:
6241: IF (g_debug_mode = 'Y') THEN
6242: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
6243: END IF;
6244:
6245: SELECT SUM( DECODE( p_inv_curr_code
6246: ,p_base_curr_code

Line 6488: AP_Debug_Pkg.Print(g_debug_mode, 'exec_po_deliverable_check - end for invoice_id : '|| p_invoice_id);

6484: p_holds_count,
6485: p_release_count,
6486: p_calling_sequence);
6487:
6488: AP_Debug_Pkg.Print(g_debug_mode, 'exec_po_deliverable_check - end for invoice_id : '|| p_invoice_id);
6489:
6490: EXCEPTION
6491: WHEN OTHERS THEN
6492: IF (SQLCODE <> -20001) THEN

Line 6511: AP_Debug_Pkg.Print('Y', p_debug_info );

6507: p_debug_info IN VARCHAR2) IS
6508: BEGIN
6509:
6510: IF AP_APPROVAL_PKG.g_debug_mode = 'Y' THEN
6511: AP_Debug_Pkg.Print('Y', p_debug_info );
6512: END IF;
6513:
6514: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6515: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'AP.PLSQL.AP_APPROVAL_MATCHED_PKG'||p_api_name,p_debug_info);

Line 6595: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );

6591: ---------------------------------------
6592: l_debug_info := 'Fetch Matched_Cur';
6593: ---------------------------------------
6594: IF (g_debug_mode = 'Y') THEN
6595: AP_Debug_Pkg.Print(g_debug_mode, l_debug_info );
6596: END IF;
6597:
6598: FETCH Matched_Shpmnts_Cur
6599: INTO l_line_location_id;