DBA Data[Home] [Help]

APPS.AP_APPROVAL_MATCHED_PKG dependencies on AP_APPROVAL_MATCHED_PKG

Line 1: PACKAGE BODY AP_APPROVAL_MATCHED_PKG AS

1: PACKAGE BODY AP_APPROVAL_MATCHED_PKG AS
2: /* $Header: aprmtchb.pls 120.43.12010000.14 2009/02/12 11:57:50 mayyalas ship $ */
3:
4: /*===========================================================================
5: | Private (Non Public) Procedure Specifications

Line 369: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

365: l_match_basis PO_LINE_LOCATIONS.matching_basis%TYPE; /*Amount Based Matching */
366:
367: BEGIN
368:
369: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
370: p_calling_sequence;
371:
372: IF ( AP_APPROVAL_PKG.g_debug_mode = 'Y' ) THEN
373: g_debug_mode := 'Y';

Line 1397: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

1393: l_debug_info VARCHAR2(100);
1394:
1395: BEGIN
1396:
1397: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
1398: p_calling_sequence;
1399:
1400: IF ( AP_APPROVAL_PKG.g_debug_mode = 'Y' ) THEN
1401: g_debug_mode := 'Y';

Line 1660: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

1656: l_debug_info VARCHAR2(100);
1657:
1658: BEGIN
1659:
1660: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
1661: p_calling_sequence;
1662:
1663: IF ( AP_APPROVAL_PKG.g_debug_mode = 'Y' ) THEN
1664: g_debug_mode := 'Y';

Line 2092: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

2088:
2089:
2090: BEGIN
2091:
2092: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
2093: p_calling_sequence;
2094:
2095: IF ( AP_APPROVAL_PKG.g_debug_mode = 'Y' ) THEN
2096: g_debug_mode := 'Y';

Line 3328: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc ||'<-'||

3324: l_debug_loc VARCHAR2(30) := 'Get_PO_Closed_Code';
3325: l_curr_calling_sequence VARCHAR2(2000);
3326: BEGIN
3327:
3328: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc ||'<-'||
3329: p_calling_sequence;
3330:
3331: SELECT PLL.closed_code
3332: INTO p_po_closed_code

Line 3372: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

3368: l_debug_loc VARCHAR2(30) := 'Inv_Has_Holds_Other_Than';
3369: l_curr_calling_sequence VARCHAR2(2000);
3370: BEGIN
3371:
3372: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
3373: p_calling_sequence;
3374:
3375: SELECT 'Y'
3376: INTO l_holds_exist

Line 3424: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

3420: l_debug_loc VARCHAR2(30) := 'Inv_Has_Unreleased_Holds';
3421: l_curr_calling_sequence VARCHAR2(2000);
3422: BEGIN
3423:
3424: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
3425: p_calling_sequence;
3426:
3427: SELECT 'Y'
3428: INTO l_holds_exist

Line 3476: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

3472: l_curr_calling_sequence VARCHAR2(2000);
3473: BEGIN
3474:
3475:
3476: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
3477: p_calling_sequence;
3478:
3479: SELECT ROUND(SUM(nvl(PD.quantity_delivered, 0)), 5)
3480: INTO p_qty_delivered

Line 3519: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

3515: l_debug_loc VARCHAR2(30) := 'Update_Final_Match_Flag';
3516: l_curr_calling_sequence VARCHAR2(2000);
3517: BEGIN
3518:
3519: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
3520: p_calling_sequence;
3521:
3522: UPDATE ap_invoice_distributions AID
3523: SET final_match_flag = p_final_match_flag

Line 3756: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

3752: -- End Bug 3489536
3753:
3754: BEGIN
3755:
3756: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
3757: p_calling_sequence;
3758:
3759: IF ( AP_APPROVAL_PKG.g_debug_mode = 'Y' ) THEN
3760: g_debug_mode := 'Y';

Line 4096: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

4092: l_debug_info VARCHAR2(100);
4093:
4094: BEGIN
4095:
4096: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
4097: p_calling_sequence;
4098:
4099: IF g_debug_mode = 'Y' THEN
4100: l_debug_info := 'Check if Rec Exception Exists';

Line 4243: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

4239: AND AIL.corrected_inv_id <> p_invoice_id;
4240:
4241: BEGIN
4242:
4243: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
4244: p_calling_sequence;
4245:
4246: ---------------------------------------------------------
4247: l_debug_info := 'Check if invoice is a price correction';

Line 4641: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

4637: l_corrected_invoice_id NUMBER;
4638:
4639: BEGIN
4640:
4641: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
4642: p_calling_sequence;
4643:
4644: Calc_Shipment_Qty_Billed(
4645: p_invoice_id,

Line 4733: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

4729: l_curr_calling_sequence VARCHAR2(2000);
4730:
4731: BEGIN
4732:
4733: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
4734: p_calling_sequence;
4735:
4736: /*-----------------------------------------------------------------+
4737: | The Meaning fo the following query conditions indicates:- |

Line 4881: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

4877:
4878: BEGIN
4879:
4880: l_debug_loc := 'Calc_Total_Shipment_Qty_Billed';
4881: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
4882: p_calling_sequence;
4883:
4884: Calc_Shipment_Amt_Billed(
4885: p_invoice_id,

Line 4972: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

4968:
4969: BEGIN
4970:
4971: l_debug_loc := 'Calc_Shipment_Amt_Billed';
4972: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
4973: p_calling_sequence;
4974:
4975: /*-----------------------------------------------------------------+
4976: | The Meaning fo the following query conditions indicates:- |

Line 5107: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

5103: l_freight_total NUMBER; -- 3488259 (3110072)
5104:
5105: BEGIN
5106:
5107: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
5108: p_calling_sequence;
5109: --------------------------------------------------------
5110: l_debug_info := 'Calculate Shipment Total for the invoice';
5111: --------------------------------------------------------

Line 5273: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

5269: l_curr_calling_sequence VARCHAR2(2000);
5270:
5271: BEGIN
5272:
5273: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
5274: p_calling_sequence;
5275: ------------------------------------------------------------------
5276: l_debug_info := 'Calculate Shipment Total amount for the invoice';
5277: --------------------------------------------------------------=---

Line 5413: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

5409: l_curr_calling_sequence VARCHAR2(2000);
5410:
5411: BEGIN
5412:
5413: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
5414: p_calling_sequence;
5415:
5416: -------------------------------------------------------------------------
5417: l_debug_info := 'Calculate ERV total for Shipment/receipt in the invoice';

Line 5516: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

5512: l_ship_trx_base_amt NUMBER;
5513:
5514: BEGIN
5515:
5516: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
5517: p_calling_sequence;
5518:
5519: ----------------------------------------------------------------
5520: l_debug_info := 'Calculate Base Shipment Total for the invoice';

Line 5672: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

5668: l_curr_calling_sequence VARCHAR2(2000);
5669:
5670: BEGIN
5671:
5672: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
5673: p_calling_sequence;
5674: ------------------------------------------------------------------
5675: l_debug_info := 'Calculate base Shipment amount for the invoice';
5676: ------------------------------------------------------------------

Line 5807: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

5803: l_check VARCHAR2(100);
5804:
5805: BEGIN
5806:
5807: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
5808: p_calling_sequence;
5809:
5810: BEGIN
5811: SELECT 'Price Difference or Quantity Has Decimals'

Line 5867: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

5863: l_msg_data varchar2(2000);
5864:
5865: BEGIN
5866:
5867: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
5868: p_calling_sequence;
5869:
5870: Print_Debug(l_debug_loc, 'exec_pay_when_paid_check - begin for invoice_id : '|| p_invoice_id);
5871:

Line 5946: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||

5942: l_msg_data varchar2(2000);
5943:
5944: BEGIN
5945:
5946: l_curr_calling_sequence := 'AP_APPROVAL_MATCHED_PKG.'||l_debug_loc||'<-'||
5947: p_calling_sequence;
5948:
5949: Print_Debug(l_debug_loc,'exec_po_deliverable_check - begin for invoice_id : '|| p_invoice_id);
5950:

Line 6016: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'AP.PLSQL.AP_APPROVAL_MATCHED_PKG'||p_api_name,p_debug_info);

6012: AP_Debug_Pkg.Print('Y', p_debug_info );
6013: END IF;
6014:
6015: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6016: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'AP.PLSQL.AP_APPROVAL_MATCHED_PKG'||p_api_name,p_debug_info);
6017: END IF;
6018:
6019: END Print_Debug;
6020:

Line 6021: END AP_APPROVAL_MATCHED_PKG;

6017: END IF;
6018:
6019: END Print_Debug;
6020:
6021: END AP_APPROVAL_MATCHED_PKG;