DBA Data[Home] [Help]

APPS.JL_AR_AP_WITHHOLDING_PKG dependencies on AP_WITHHOLDING_PKG

Line 1: PACKAGE BODY JL_AR_AP_WITHHOLDING_PKG AS

1: PACKAGE BODY JL_AR_AP_WITHHOLDING_PKG AS
2: /* $Header: jlarpwhb.pls 120.43.12020000.2 2012/07/20 11:03:47 rshergil ship $ */
3:
4:
5: /**************************************************************************

Line 128: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,

124: P_AWT_Type_Code IN Varchar2,
125: P_Tax_Id IN Number,
126: P_Calling_Sequence IN Varchar2,
127: P_Rec_AWT_Type OUT NOCOPY jl_zz_ap_awt_types%ROWTYPE,
128: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,
129: P_Rec_Suppl_AWT_Type OUT NOCOPY jl_zz_ap_supp_awt_types%ROWTYPE,
130: P_Rec_Suppl_AWT_Name OUT NOCOPY jl_zz_ap_sup_awt_cd%ROWTYPE,
131: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
132: P_CODE_ACCOUNTING_DATE IN DATE Default NULL); -- Argentina AWT ER

Line 131: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

127: P_Rec_AWT_Type OUT NOCOPY jl_zz_ap_awt_types%ROWTYPE,
128: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,
129: P_Rec_Suppl_AWT_Type OUT NOCOPY jl_zz_ap_supp_awt_types%ROWTYPE,
130: P_Rec_Suppl_AWT_Name OUT NOCOPY jl_zz_ap_sup_awt_cd%ROWTYPE,
131: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
132: P_CODE_ACCOUNTING_DATE IN DATE Default NULL); -- Argentina AWT ER
133:
134:
135:

Line 154: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

150: P_Base_Currency_Code IN Varchar2,
151: P_Check_Id IN Number,
152: P_Selected_Check_Id IN Number,
153: P_Calling_Sequence IN Varchar2,
154: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
155: P_Total_Wh_Amount IN OUT NOCOPY Number,
156: P_AWT_Success OUT NOCOPY Varchar2,
157: P_Last_Updated_By IN Number Default null,
158: P_Last_Update_Login IN Number Default null,

Line 247: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

243: P_Payment_Num IN Number,
244: P_Check_Id IN Number,
245: P_Selected_Check_Id IN Number,
246: P_Calling_Sequence IN Varchar2,
247: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
248: P_Last_Updated_By IN Number Default null,
249: P_Last_Update_Login IN Number Default null,
250: P_Program_Application_Id IN Number Default null,
251: P_Program_Id IN Number Default null,

Line 352: P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

348: (P_Invoice_Id IN Number,
349: P_Tax_Name IN Varchar2,
350: P_Tax_Id IN Number,
351: P_Taxable_Base_Amount_Basis IN Varchar2,
352: P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
353: P_Inv_Payment_Num IN Number,
354: P_Calling_Sequence IN Varchar2)
355: RETURN Boolean;
356:

Line 368: (P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

364: * type (sums up all the prorated amounts). *
365: * *
366: **************************************************************************/
367: FUNCTION Total_Withholding_Amount
368: (P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
369: P_Calling_Sequence IN Varchar2)
370: RETURN Number;
371:
372:

Line 465: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

461:
462: -------------------------------
463: -- Initializes debug variables
464: -------------------------------
465: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
466: 'Jl_Ar_Ap_Do_Withholding';
467:
468: -- Debug
469: IF (DEBUG_Var = 'Y') THEN

Line 677: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

673: BEGIN
674: -------------------------------
675: -- Initializes debug variables
676: -------------------------------
677: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
678: 'Jl_Ar_Ap_Undo_Withholding';
679: -- Debug Information
680: IF (DEBUG_Var = 'Y') THEN
681: JL_ZZ_AP_EXT_AWT_UTIL.Debug (l_calling_sequence);

Line 835: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

831:
832: -------------------------------
833: -- Initializes debug variables
834: -------------------------------
835: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
836: 'JL_AR_AP_VOID_SELEC_CERTIF<--' || P_Calling_Sequence;
837: -- Debug Information
838: IF (DEBUG_Var = 'Y') THEN
839: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ');

Line 931: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

927: BEGIN
928: -------------------------------
929: -- Initializes debug variables
930: -------------------------------
931: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
932: 'Jl_Ar_Ap_Undo_Temp_Withholding';
933: -- Debug Information
934: IF (DEBUG_Var = 'Y') THEN
935: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('Calling Sequence '||l_calling_sequence);

Line 994: JL_AR_AP_WITHHOLDING_PKG.JL_AR_AP_VOID_SELEC_CERTIF(p_checkrun_name,

990: -- End Debug
991:
992:
993: If (P_Calling_Module='CANCEL') or (P_Calling_Module = 'AUTOSELECT') then
994: JL_AR_AP_WITHHOLDING_PKG.JL_AR_AP_VOID_SELEC_CERTIF(p_checkrun_name,
995: l_selected_check_id,
996: l_calling_sequence);
997:
998: -- Debug Information

Line 1092: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

1088: BEGIN
1089: -------------------------------
1090: -- Initializes debug variables
1091: -------------------------------
1092: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
1093: 'Jl_Ar_Ap_Gen_Certificates';
1094:
1095: -- Debug Information
1096: IF (DEBUG_Var = 'Y') THEN

Line 1263: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

1259: BEGIN
1260: -------------------------------
1261: -- Initializes debug variables
1262: -------------------------------
1263: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
1264: 'Do_AWT_Quick_Payment<--' || P_Calling_Sequence;
1265:
1266: -- Debug Information
1267: IF (DEBUG_Var = 'Y') THEN

Line 1310: Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,

1306: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Get_Withholding_Options ');
1307: END IF;
1308: -- End Debug
1309:
1310: Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,
1311: l_create_invoices);
1312:
1313: IF (l_create_distr <> 'PAYMENT') THEN
1314: -- Nothing to do

Line 1401: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Distributions');

1397: IF (DEBUG_Var = 'Y') THEN
1398: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' Fetched Values: l_invoice_id'||to_char(l_invoice_id));
1399: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' Fetched Values: l_inv_curr_code'||l_inv_curr_code);
1400: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' Fetched Values: l_payment_num'||to_char(l_payment_num));
1401: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Distributions');
1402: END IF;
1403: -- End Debug
1404:
1405: -----------------------------------------

Line 1409: Ap_Withholding_Pkg.Create_AWT_Distributions

1405: -----------------------------------------
1406: -- Executes Second Processing Unit
1407: -- Creates AWT Distribution Lines
1408: -----------------------------------------
1409: Ap_Withholding_Pkg.Create_AWT_Distributions
1410: (l_invoice_id,
1411: P_Calling_Module,
1412: l_create_distr,
1413: l_payment_num,

Line 1427: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('After Called Ap_Withholding_Pkg.Create_AWT_Distributions');

1423: -- Payment Exchange Rate ER 8648739 End
1424:
1425: -- Debug Information
1426: IF (DEBUG_Var = 'Y') THEN
1427: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('After Called Ap_Withholding_Pkg.Create_AWT_Distributions');
1428: END IF;
1429: -- End Debug
1430:
1431:

Line 1440: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Invoices');

1436: IF (l_create_invoices = 'PAYMENT') THEN
1437:
1438: -- Debug Information
1439: IF (DEBUG_Var = 'Y') THEN
1440: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Invoices');
1441: END IF;
1442: -- End Debug
1443:
1444: Ap_Withholding_Pkg.Create_AWT_Invoices

Line 1444: Ap_Withholding_Pkg.Create_AWT_Invoices

1440: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Invoices');
1441: END IF;
1442: -- End Debug
1443:
1444: Ap_Withholding_Pkg.Create_AWT_Invoices
1445: (l_invoice_id,
1446: P_AWT_Date,
1447: P_Last_Updated_By,
1448: P_Last_Update_Login,

Line 1457: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('After Called Ap_Withholding_Pkg.Create_AWT_Invoices');

1453: --P_Calling_Module); -- bug 6835131 - No change in AP pkg for branchline, only in mainline
1454:
1455: -- Debug Information
1456: IF (DEBUG_Var = 'Y') THEN
1457: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('After Called Ap_Withholding_Pkg.Create_AWT_Invoices');
1458: END IF;
1459: -- End Debug
1460:
1461:

Line 1576: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

1572: BEGIN
1573: -------------------------------
1574: -- Initializes debug variables
1575: -------------------------------
1576: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
1577: 'Do_AWT_Build_Payment_Batch<--' || P_Calling_Sequence;
1578:
1579: -- Debug Information
1580: IF (DEBUG_Var = 'Y') THEN

Line 1605: Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,

1601: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Get_Withholding_Options ');
1602: END IF;
1603: -- End Debug
1604:
1605: Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,
1606: l_create_invoices);
1607:
1608: -- Debug Information
1609: IF (DEBUG_Var = 'Y') THEN

Line 1889: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

1885: BEGIN
1886: -------------------------------
1887: -- Initializes debug variables
1888: -------------------------------
1889: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
1890: 'Do_AWT_Confirm_Payment_Batch<--' ||
1891: P_Calling_Sequence;
1892:
1893: -- Debug Information

Line 1949: --Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,

1945: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Get_Withholding_Options ');
1946: END IF;
1947: -- End Debug
1948:
1949: --Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,
1950: -- l_create_invoices);
1951: -- Bug 5442868
1952: SELECT nvl(create_awt_dists_type, 'NEVER'),
1953: nvl(create_awt_invoices_type, 'NEVER')

Line 1987: ('==> Calling Ap_Withholding_Pkg.Create_AWT_Distributions');

1983:
1984: -- Debug Information
1985: IF (DEBUG_Var = 'Y') THEN
1986: JL_ZZ_AP_EXT_AWT_UTIL.Debug
1987: ('==> Calling Ap_Withholding_Pkg.Create_AWT_Distributions');
1988: END IF;
1989: -- End Debug
1990:
1991: Ap_Withholding_Pkg.Create_AWT_Distributions

Line 1991: Ap_Withholding_Pkg.Create_AWT_Distributions

1987: ('==> Calling Ap_Withholding_Pkg.Create_AWT_Distributions');
1988: END IF;
1989: -- End Debug
1990:
1991: Ap_Withholding_Pkg.Create_AWT_Distributions
1992: (rec_sel_inv.invoice_id,
1993: P_Calling_Module,
1994: l_create_distr,
1995: rec_sel_inv.payment_num,

Line 2007: ('After Called Ap_Withholding_Pkg.Create_AWT_Distributions');

2003:
2004: -- Debug Information
2005: IF (DEBUG_Var = 'Y') THEN
2006: JL_ZZ_AP_EXT_AWT_UTIL.Debug
2007: ('After Called Ap_Withholding_Pkg.Create_AWT_Distributions');
2008: END IF;
2009: -- End Debug
2010:
2011: ------------------------

Line 2018: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Invoices');

2014: IF (l_create_invoices = 'PAYMENT') THEN
2015:
2016: -- Debug Information
2017: IF (DEBUG_Var = 'Y') THEN
2018: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Invoices');
2019: END IF;
2020: -- End Debug
2021:
2022: Ap_Withholding_Pkg.Create_AWT_Invoices

Line 2022: Ap_Withholding_Pkg.Create_AWT_Invoices

2018: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Invoices');
2019: END IF;
2020: -- End Debug
2021:
2022: Ap_Withholding_Pkg.Create_AWT_Invoices
2023: (rec_sel_inv.invoice_id,
2024: rec_sel_inv.payment_date,
2025: P_Last_Updated_By,
2026: P_Last_Update_Login,

Line 2307: rec_awt_name Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code;

2303: -- Records Declaration
2304: ------------------------
2305: rec_payment_wh Rec_Payment_Withholding;
2306: rec_awt_type jl_zz_ap_awt_types%ROWTYPE;
2307: rec_awt_name Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code;
2308: rec_suppl_awt_type jl_zz_ap_supp_awt_types%ROWTYPE;
2309: rec_suppl_awt_name jl_zz_ap_sup_awt_cd%ROWTYPE;
2310:
2311: ------------------------

Line 2314: tab_payment_wh Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding;

2310:
2311: ------------------------
2312: -- Tables Declaration
2313: ------------------------
2314: tab_payment_wh Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding;
2315: tab_all_wh Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding;
2316: tab_inv_amounts Tab_Amounts;
2317:
2318: BEGIN

Line 2315: tab_all_wh Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding;

2311: ------------------------
2312: -- Tables Declaration
2313: ------------------------
2314: tab_payment_wh Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding;
2315: tab_all_wh Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding;
2316: tab_inv_amounts Tab_Amounts;
2317:
2318: BEGIN
2319: -------------------------------

Line 2322: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

2318: BEGIN
2319: -------------------------------
2320: -- Initializes debug variables
2321: -------------------------------
2322: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
2323: 'Calculate_AWT_Amounts<--' || P_Calling_Sequence;
2324:
2325: -- Debug Information
2326: IF (DEBUG_Var = 'Y') THEN

Line 2353: l_base_currency_code := Jl_Zz_Ap_Withholding_Pkg.Get_Base_Currency_Code;

2349:
2350: ---------------------------
2351: -- Gets generic parameters
2352: ---------------------------
2353: l_base_currency_code := Jl_Zz_Ap_Withholding_Pkg.Get_Base_Currency_Code;
2354: l_gl_period_name := Jl_Zz_Ap_Withholding_Pkg.Get_GL_Period_Name
2355: (P_AWT_Date);
2356:
2357: -- Debug Information

Line 2354: l_gl_period_name := Jl_Zz_Ap_Withholding_Pkg.Get_GL_Period_Name

2350: ---------------------------
2351: -- Gets generic parameters
2352: ---------------------------
2353: l_base_currency_code := Jl_Zz_Ap_Withholding_Pkg.Get_Base_Currency_Code;
2354: l_gl_period_name := Jl_Zz_Ap_Withholding_Pkg.Get_GL_Period_Name
2355: (P_AWT_Date);
2356:
2357: -- Debug Information
2358: IF (DEBUG_Var = 'Y') THEN

Line 2561: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when l_not_found');

2557: -----------------------------------------------------
2558:
2559: -- Debug Information
2560: IF (DEBUG_Var = 'Y') THEN
2561: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when l_not_found');
2562: END IF;
2563: -- End Debug
2564:
2565: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

Line 2565: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

2561: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when l_not_found');
2562: END IF;
2563: -- End Debug
2564:
2565: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
2566: (l_current_vendor_id,
2567: rec_awt_type,
2568: rec_awt_name,
2569: rec_suppl_awt_type,

Line 2580: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when l_not_found');

2576: P_AWT_Success);
2577:
2578: -- Debug Information
2579: IF (DEBUG_Var = 'Y') THEN
2580: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when l_not_found');
2581: END IF;
2582: -- End Debug
2583:
2584: IF (P_AWT_Success <> AWT_SUCCESS) THEN

Line 2651: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name IN ');

2647: ------------------------------------------------
2648:
2649: -- Debug Information
2650: IF (DEBUG_Var = 'Y') THEN
2651: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name IN ');
2652: END IF;
2653: -- End Debug
2654:
2655: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

Line 2655: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

2651: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name IN ');
2652: END IF;
2653: -- End Debug
2654:
2655: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
2656: (l_current_vendor_id,
2657: rec_awt_type,
2658: rec_awt_name,
2659: rec_suppl_awt_type,

Line 2670: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name IN ELSIF');

2666: P_AWT_Success);
2667:
2668: -- Debug Information
2669: IF (DEBUG_Var = 'Y') THEN
2670: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name IN ELSIF');
2671: END IF;
2672: -- End Debug
2673:
2674: IF (P_AWT_Success <> AWT_SUCCESS) THEN

Line 2802: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when <> Tax Name');

2798: ------------------------------------------------
2799:
2800: -- Debug Information
2801: IF (DEBUG_Var = 'Y') THEN
2802: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when <> Tax Name');
2803: END IF;
2804: -- End Debug
2805: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
2806: (l_current_vendor_id,

Line 2805: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

2801: IF (DEBUG_Var = 'Y') THEN
2802: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when <> Tax Name');
2803: END IF;
2804: -- End Debug
2805: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
2806: (l_current_vendor_id,
2807: rec_awt_type,
2808: rec_awt_name,
2809: rec_suppl_awt_type,

Line 2820: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when Tax Name Changed');

2816: P_AWT_Success);
2817:
2818: -- Debug Information
2819: IF (DEBUG_Var = 'Y') THEN
2820: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when Tax Name Changed');
2821: END IF;
2822: -- End Debug
2823:
2824: IF (P_AWT_Success <> AWT_SUCCESS) THEN

Line 2836: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name. Getting Tax Code Info');

2832: ---------------------------------------------
2833:
2834: -- Debug Information
2835: IF (DEBUG_Var = 'Y') THEN
2836: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name. Getting Tax Code Info');
2837: END IF;
2838: -- End Debug
2839:
2840: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name

Line 2840: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name

2836: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name. Getting Tax Code Info');
2837: END IF;
2838: -- End Debug
2839:
2840: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name
2841: (rec_payment_wh.awt_type_code,
2842: rec_payment_wh.tax_id,
2843: rec_payment_wh.vendor_id,
2844: rec_awt_name,

Line 2926: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==>Calling Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name');

2922:
2923: -- Debug Information
2924: IF (DEBUG_Var = 'Y') THEN
2925: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' Increate l_current_awt = '||to_char(l_current_awt));
2926: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==>Calling Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name');
2927: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' Invoice_id = '||to_char(rec_payment_wh.invoice_id)||' - '||
2928: 'Tax_id = '||to_char(rec_payment_wh.tax_id)||' - '||
2929: 'Tax Name = '||rec_awt_name.name);
2930: END IF;

Line 2933: Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name

2929: 'Tax Name = '||rec_awt_name.name);
2930: END IF;
2931: -- End Debug
2932:
2933: Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name
2934: (tab_payment_wh,
2935: l_current_awt,
2936: rec_payment_wh.invoice_id,
2937: rec_payment_wh.invoice_distribution_id , -- Lines

Line 2952: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name');

2948: rec_payment_wh.payment_num);
2949:
2950: -- Debug Information
2951: IF (DEBUG_Var = 'Y') THEN
2952: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name');
2953: END IF;
2954: -- End Debug
2955:
2956: END IF; -- NOT Withholding_Already_Calculated

Line 3065: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,

3061: P_AWT_Type_Code IN Varchar2,
3062: P_Tax_Id IN Number,
3063: P_Calling_Sequence IN Varchar2,
3064: P_Rec_AWT_Type OUT NOCOPY jl_zz_ap_awt_types%ROWTYPE,
3065: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,
3066: P_Rec_Suppl_AWT_Type OUT NOCOPY jl_zz_ap_supp_awt_types%ROWTYPE,
3067: P_Rec_Suppl_AWT_Name OUT NOCOPY jl_zz_ap_sup_awt_cd%ROWTYPE,
3068: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
3069: P_CODE_ACCOUNTING_DATE IN DATE Default NULL) -- Argentina AWT ER

Line 3068: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

3064: P_Rec_AWT_Type OUT NOCOPY jl_zz_ap_awt_types%ROWTYPE,
3065: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,
3066: P_Rec_Suppl_AWT_Type OUT NOCOPY jl_zz_ap_supp_awt_types%ROWTYPE,
3067: P_Rec_Suppl_AWT_Name OUT NOCOPY jl_zz_ap_sup_awt_cd%ROWTYPE,
3068: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
3069: P_CODE_ACCOUNTING_DATE IN DATE Default NULL) -- Argentina AWT ER
3070: IS
3071:
3072: l_debug_info Varchar2(300);

Line 3079: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

3075: BEGIN
3076: -------------------------------
3077: -- Initializes debug variables
3078: -------------------------------
3079: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
3080: 'Initialize_Withholdings<--' || P_Calling_Sequence;
3081:
3082: -- Debug Information
3083: IF (DEBUG_Var = 'Y') THEN

Line 3095: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Type

3091: -----------------------------------------
3092:
3093: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('ACCOUNTING_DATE = '||to_char(P_CODE_ACCOUNTING_DATE));
3094:
3095: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Type
3096: (P_AWT_Type_Code,
3097: P_Vendor_Id,
3098: P_Rec_AWT_Type,
3099: P_Rec_Suppl_AWT_Type);

Line 3101: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name

3097: P_Vendor_Id,
3098: P_Rec_AWT_Type,
3099: P_Rec_Suppl_AWT_Type);
3100:
3101: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name
3102: (P_AWT_Type_Code,
3103: P_Tax_Id,
3104: P_Vendor_Id,
3105: P_Rec_AWT_Name,

Line 3109: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Table

3105: P_Rec_AWT_Name,
3106: P_Rec_Suppl_AWT_Name,
3107: P_CODE_ACCOUNTING_DATE); -- Argentina AWT ER
3108:
3109: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Table
3110: (P_Wh_Table);
3111: -- Debug Information
3112: IF (DEBUG_Var = 'Y') THEN
3113: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('Procudure Initialize_Withholdings(-)');

Line 3154: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

3150: P_Base_Currency_Code IN Varchar2,
3151: P_Check_Id IN Number,
3152: P_Selected_Check_Id IN Number,
3153: P_Calling_Sequence IN Varchar2,
3154: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
3155: P_Total_Wh_Amount IN OUT NOCOPY Number,
3156: P_AWT_Success OUT NOCOPY Varchar2,
3157: P_Last_Updated_By IN Number Default null,
3158: P_Last_Update_Login IN Number Default null,

Line 3175: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

3171: BEGIN
3172: -------------------------------
3173: -- Initializes debug variables
3174: -------------------------------
3175: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
3176: 'Process_Withholdings<--' || P_Calling_Sequence;
3177:
3178: -- Debug Information
3179: IF (DEBUG_Var = 'Y') THEN

Line 3221: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type');

3217: ------------------------------------------------
3218:
3219: -- Debug Information
3220: IF (DEBUG_Var = 'Y') THEN
3221: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type');
3222: END IF;
3223: -- End Debug
3224:
3225: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type

Line 3225: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type

3221: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type');
3222: END IF;
3223: -- End Debug
3224:
3225: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type
3226: (P_Rec_AWT_Type,
3227: P_Rec_Suppl_AWT_Type,
3228: P_AWT_Date,
3229: P_Base_Currency_Code,

Line 3234: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type');

3230: P_Tab_Withhold);
3231:
3232: -- Debug Information
3233: IF (DEBUG_Var = 'Y') THEN
3234: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type');
3235: JL_ZZ_AP_EXT_AWT_UTIL.Print_Tax_Names(P_Tab_Withhold);
3236: END IF;
3237: -- End Debug
3238:

Line 3276: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings');

3272: -------------------------------------------------
3273:
3274: -- Debug Information
3275: IF (DEBUG_Var = 'Y') THEN
3276: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings');
3277: JL_ZZ_AP_EXT_AWT_UTIL.Print_Tax_Names(P_Tab_Withhold);
3278: END IF;
3279: -- End Debug
3280:

Line 3281: Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings (P_Tab_Withhold,

3277: JL_ZZ_AP_EXT_AWT_UTIL.Print_Tax_Names(P_Tab_Withhold);
3278: END IF;
3279: -- End Debug
3280:
3281: Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings (P_Tab_Withhold,
3282: P_Base_Currency_Code);
3283:
3284: -- Debug Information
3285: IF (DEBUG_Var = 'Y') THEN

Line 3286: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings');

3282: P_Base_Currency_Code);
3283:
3284: -- Debug Information
3285: IF (DEBUG_Var = 'Y') THEN
3286: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings');
3287: JL_ZZ_AP_EXT_AWT_UTIL.Print_Tax_Names(P_Tab_Withhold);
3288: END IF;
3289: -- End Debug
3290:

Line 3297: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table');

3293: -- Insert Temporary Distributions Lines
3294: ----------------------------------------
3295: -- Debug Information
3296: IF (DEBUG_Var = 'Y') THEN
3297: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table');
3298: END IF;
3299: -- End Debug
3300:
3301: Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table

Line 3301: Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table

3297: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table');
3298: END IF;
3299: -- End Debug
3300:
3301: Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table
3302: (P_Tab_Withhold,
3303: P_Vendor_Id,
3304: P_AWT_Date,
3305: P_GL_Period_Name,

Line 3324: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table');

3320: P_Payment_Num);
3321:
3322: -- Debug Information
3323: IF (DEBUG_Var = 'Y') THEN
3324: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table');
3325: END IF;
3326: -- End Debug
3327:
3328: IF (P_AWT_Success <> AWT_SUCCESS) THEN

Line 3514: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

3510: BEGIN
3511: -------------------------------
3512: -- Initializes debug variables
3513: -------------------------------
3514: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
3515: 'Calculate_Taxable_Base_Amounts<--' ||
3516: P_Calling_Sequence;
3517:
3518: -- Debug Information

Line 3932: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

3928: BEGIN
3929: -------------------------------
3930: -- Initializes debug variables
3931: -------------------------------
3932: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
3933: 'Get_Taxable_Base_Amount<--' || P_Calling_Sequence;
3934:
3935: -- Debug Information
3936: IF (DEBUG_Var = 'Y') THEN

Line 4104: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

4100: BEGIN
4101: -------------------------------
4102: -- Initializes debug variables
4103: -------------------------------
4104: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
4105: 'Get_Credit_Letter_Amount<--' || P_Calling_Sequence;
4106:
4107: -- Debug Information
4108: IF (DEBUG_Var = 'Y') THEN

Line 4187: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

4183: P_Payment_Num IN Number,
4184: P_Check_Id IN Number,
4185: P_Selected_Check_Id IN Number,
4186: P_Calling_Sequence IN Varchar2,
4187: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
4188: P_Last_Updated_By IN Number Default null,
4189: P_Last_Update_Login IN Number Default null,
4190: P_Program_Application_Id IN Number Default null,
4191: P_Program_Id IN Number Default null,

Line 4208: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

4204: BEGIN
4205: -------------------------------
4206: -- Initializes debug variables
4207: -------------------------------
4208: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
4209: 'Update_Credit_Letter<--' || P_Calling_Sequence;
4210:
4211: IF (DEBUG_Var = 'Y') THEN
4212: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('Calling Sequence '||l_calling_sequence);

Line 4432: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

4428: BEGIN
4429: -------------------------------
4430: -- Initializes debug variables
4431: -------------------------------
4432: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
4433: 'Insert_Credit_Letter_Amount<--' ||
4434: P_Calling_Sequence;
4435:
4436: IF (DEBUG_Var = 'Y') THEN

Line 4589: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

4585: BEGIN
4586: -------------------------------
4587: -- Initializes debug variables
4588: -------------------------------
4589: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
4590: 'Undo_Credit_Letter<--' || P_Calling_Sequence;
4591:
4592: IF (DEBUG_Var = 'Y') THEN
4593: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('Calling Sequence '||l_calling_sequence);

Line 4779: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

4775: BEGIN
4776: -------------------------------
4777: -- Initializes debug variables
4778: -------------------------------
4779: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
4780: 'Update_Quick_Payment<--' || P_Calling_Sequence;
4781:
4782:
4783: -- Debug Information

Line 5072: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

5068: BEGIN
5069: -------------------------------
5070: -- Initializes debug variables
5071: -------------------------------
5072: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5073: 'Update_Payment_Batch<--' || P_Calling_Sequence;
5074:
5075: -- Debug Information
5076: IF (DEBUG_Var = 'Y') THEN

Line 5332: P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

5328: (P_Invoice_Id IN Number,
5329: P_Tax_Name IN Varchar2,
5330: P_Tax_Id IN Number,
5331: P_Taxable_Base_Amount_Basis IN Varchar2,
5332: P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
5333: P_Inv_Payment_Num IN Number,
5334: P_Calling_Sequence IN Varchar2)
5335: RETURN Boolean
5336: IS

Line 5347: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

5343: BEGIN
5344: -------------------------------
5345: -- Initializes debug variables
5346: -------------------------------
5347: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5348: 'Withholding_Already_Calculated<--' ||
5349: P_Calling_Sequence;
5350:
5351: -- Debug Information

Line 5451: (P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

5447: * type (sums up all the prorated amounts). *
5448: * *
5449: **************************************************************************/
5450: FUNCTION Total_Withholding_Amount
5451: (P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
5452: P_Calling_Sequence IN Varchar2)
5453: RETURN Number
5454: IS
5455:

Line 5464: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

5460: BEGIN
5461: -------------------------------
5462: -- Initializes debug variables
5463: -------------------------------
5464: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5465: 'Total_Withholding_Amount<--' || P_Calling_Sequence;
5466:
5467: -- Debug Information
5468: IF (DEBUG_Var = 'Y') THEN

Line 5538: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

5534: BEGIN
5535: -------------------------------
5536: -- Initializes debug variables
5537: -------------------------------
5538: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5539: 'Partial_Payment_Paid_In_Full<--' ||
5540: P_Calling_Sequence;
5541:
5542: -- Debug Information

Line 5692: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

5688: BEGIN
5689: -------------------------------
5690: -- Initializes debug variables
5691: -------------------------------
5692: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5693: 'Confirm_Credit_Letters<--' ||
5694: P_Calling_Sequence;
5695:
5696: -- Debug Information

Line 5807: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

5803: BEGIN
5804: -------------------------------
5805: -- Initializes debug variables
5806: -------------------------------
5807: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5808: 'Reject_Payment_Batch<--' ||
5809: P_Calling_Sequence;
5810:
5811: -- Debug Information

Line 5913: Ap_Withholding_Pkg.Ap_Do_Withholding (

5909: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('PROCEDURE JL_CALL_DO_AWT(+)');
5910: END IF;
5911: -- End Debug
5912: -- Call to core procedure
5913: Ap_Withholding_Pkg.Ap_Do_Withholding (
5914: P_Invoice_Id
5915: ,P_AWT_Date
5916: ,P_Calling_Module
5917: ,P_Amount

Line 6046: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||

6042: BEGIN
6043: -------------------------------
6044: -- Initializes debug variables
6045: -------------------------------
6046: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
6047: 'Undo_Quick_Payment<--' || P_Calling_Sequence;
6048:
6049:
6050: -- Debug Information

Line 6242: END JL_AR_AP_WITHHOLDING_PKG;

6238: App_Exception.Raise_Exception;
6239:
6240: END Undo_Quick_Payment;
6241:
6242: END JL_AR_AP_WITHHOLDING_PKG;
6243: