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.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.32.12010000.2 2008/09/15 05:27:35 vspuli 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:

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:
133:
134:
135:

Line 153: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

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

Line 246: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

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

Line 351: P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

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

Line 367: (P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

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

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

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

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

662: BEGIN
663: -------------------------------
664: -- Initializes debug variables
665: -------------------------------
666: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
667: 'Jl_Ar_Ap_Undo_Withholding';
668: -- Debug Information
669: IF (DEBUG_Var = 'Y') THEN
670: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('Procedure - Jl_Ar_Ap_Undo_Withholding');

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

814:
815: -------------------------------
816: -- Initializes debug variables
817: -------------------------------
818: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
819: 'JL_AR_AP_VOID_SELEC_CERTIF<--' || P_Calling_Sequence;
820: -- Debug Information
821: IF (DEBUG_Var = 'Y') THEN
822: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ');

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

910: BEGIN
911: -------------------------------
912: -- Initializes debug variables
913: -------------------------------
914: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
915: 'Jl_Ar_Ap_Undo_Temp_Withholding';
916: -- Debug Information
917: IF (DEBUG_Var = 'Y') THEN
918: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ');

Line 969: JL_AR_AP_WITHHOLDING_PKG.JL_AR_AP_VOID_SELEC_CERTIF(p_checkrun_name,

965: -- End Debug
966:
967:
968: If (P_Calling_Module='CANCEL') or (P_Calling_Module = 'AUTOSELECT') then
969: JL_AR_AP_WITHHOLDING_PKG.JL_AR_AP_VOID_SELEC_CERTIF(p_checkrun_name,
970: l_selected_check_id,
971: l_calling_sequence);
972:
973: -- Debug Information

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

1052: BEGIN
1053: -------------------------------
1054: -- Initializes debug variables
1055: -------------------------------
1056: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
1057: 'Jl_Ar_Ap_Gen_Certificates';
1058:
1059: -- Debug Information
1060: IF (DEBUG_Var = 'Y') THEN

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

1203: BEGIN
1204: -------------------------------
1205: -- Initializes debug variables
1206: -------------------------------
1207: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
1208: 'Do_AWT_Quick_Payment<--' || P_Calling_Sequence;
1209:
1210: -- Debug Information
1211: IF (DEBUG_Var = 'Y') THEN

Line 1253: Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,

1249: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Get_Withholding_Options ');
1250: END IF;
1251: -- End Debug
1252:
1253: Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,
1254: l_create_invoices);
1255:
1256: IF (l_create_distr <> 'PAYMENT') THEN
1257: -- Nothing to do

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

1340: IF (DEBUG_Var = 'Y') THEN
1341: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' Fetched Values: l_invoice_id'||to_char(l_invoice_id));
1342: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' Fetched Values: l_inv_curr_code'||l_inv_curr_code);
1343: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' Fetched Values: l_payment_num'||to_char(l_payment_num));
1344: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Distributions');
1345: END IF;
1346: -- End Debug
1347:
1348: -----------------------------------------

Line 1352: Ap_Withholding_Pkg.Create_AWT_Distributions

1348: -----------------------------------------
1349: -- Executes Second Processing Unit
1350: -- Creates AWT Distribution Lines
1351: -----------------------------------------
1352: Ap_Withholding_Pkg.Create_AWT_Distributions
1353: (l_invoice_id,
1354: P_Calling_Module,
1355: l_create_distr,
1356: l_payment_num,

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

1363: l_calling_sequence);
1364:
1365: -- Debug Information
1366: IF (DEBUG_Var = 'Y') THEN
1367: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('After Called Ap_Withholding_Pkg.Create_AWT_Distributions');
1368: END IF;
1369: -- End Debug
1370:
1371:

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

1376: IF (l_create_invoices = 'PAYMENT') THEN
1377:
1378: -- Debug Information
1379: IF (DEBUG_Var = 'Y') THEN
1380: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Invoices');
1381: END IF;
1382: -- End Debug
1383:
1384: Ap_Withholding_Pkg.Create_AWT_Invoices

Line 1384: Ap_Withholding_Pkg.Create_AWT_Invoices

1380: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Invoices');
1381: END IF;
1382: -- End Debug
1383:
1384: Ap_Withholding_Pkg.Create_AWT_Invoices
1385: (l_invoice_id,
1386: P_AWT_Date,
1387: P_Last_Updated_By,
1388: P_Last_Update_Login,

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

1393: P_Calling_Module);
1394:
1395: -- Debug Information
1396: IF (DEBUG_Var = 'Y') THEN
1397: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('After Called Ap_Withholding_Pkg.Create_AWT_Invoices');
1398: END IF;
1399: -- End Debug
1400:
1401:

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

1506: BEGIN
1507: -------------------------------
1508: -- Initializes debug variables
1509: -------------------------------
1510: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
1511: 'Do_AWT_Build_Payment_Batch<--' || P_Calling_Sequence;
1512:
1513: -- Debug Information
1514: IF (DEBUG_Var = 'Y') THEN

Line 1538: Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,

1534: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Get_Withholding_Options ');
1535: END IF;
1536: -- End Debug
1537:
1538: Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,
1539: l_create_invoices);
1540:
1541: -- Debug Information
1542: IF (DEBUG_Var = 'Y') THEN

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

1812: BEGIN
1813: -------------------------------
1814: -- Initializes debug variables
1815: -------------------------------
1816: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
1817: 'Do_AWT_Confirm_Payment_Batch<--' ||
1818: P_Calling_Sequence;
1819:
1820: -- Debug Information

Line 1875: --Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,

1871: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Get_Withholding_Options ');
1872: END IF;
1873: -- End Debug
1874:
1875: --Jl_Zz_Ap_Withholding_Pkg.Get_Withholding_Options (l_create_distr,
1876: -- l_create_invoices);
1877: -- Bug 5442868
1878: SELECT nvl(create_awt_dists_type, 'NEVER'),
1879: nvl(create_awt_invoices_type, 'NEVER')

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

1909:
1910: -- Debug Information
1911: IF (DEBUG_Var = 'Y') THEN
1912: JL_ZZ_AP_EXT_AWT_UTIL.Debug
1913: ('==> Calling Ap_Withholding_Pkg.Create_AWT_Distributions');
1914: END IF;
1915: -- End Debug
1916:
1917: Ap_Withholding_Pkg.Create_AWT_Distributions

Line 1917: Ap_Withholding_Pkg.Create_AWT_Distributions

1913: ('==> Calling Ap_Withholding_Pkg.Create_AWT_Distributions');
1914: END IF;
1915: -- End Debug
1916:
1917: Ap_Withholding_Pkg.Create_AWT_Distributions
1918: (rec_sel_inv.invoice_id,
1919: P_Calling_Module,
1920: l_create_distr,
1921: rec_sel_inv.payment_num,

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

1929:
1930: -- Debug Information
1931: IF (DEBUG_Var = 'Y') THEN
1932: JL_ZZ_AP_EXT_AWT_UTIL.Debug
1933: ('After Called Ap_Withholding_Pkg.Create_AWT_Distributions');
1934: END IF;
1935: -- End Debug
1936:
1937: ------------------------

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

1940: IF (l_create_invoices = 'PAYMENT') THEN
1941:
1942: -- Debug Information
1943: IF (DEBUG_Var = 'Y') THEN
1944: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Invoices');
1945: END IF;
1946: -- End Debug
1947:
1948: Ap_Withholding_Pkg.Create_AWT_Invoices

Line 1948: Ap_Withholding_Pkg.Create_AWT_Invoices

1944: JL_ZZ_AP_EXT_AWT_UTIL.Debug ('==> Calling Ap_Withholding_Pkg.Create_AWT_Invoices');
1945: END IF;
1946: -- End Debug
1947:
1948: Ap_Withholding_Pkg.Create_AWT_Invoices
1949: (rec_sel_inv.invoice_id,
1950: rec_sel_inv.payment_date,
1951: P_Last_Updated_By,
1952: P_Last_Update_Login,

Line 2216: rec_awt_name Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code;

2212: -- Records Declaration
2213: ------------------------
2214: rec_payment_wh Rec_Payment_Withholding;
2215: rec_awt_type jl_zz_ap_awt_types%ROWTYPE;
2216: rec_awt_name Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code;
2217: rec_suppl_awt_type jl_zz_ap_supp_awt_types%ROWTYPE;
2218: rec_suppl_awt_name jl_zz_ap_sup_awt_cd%ROWTYPE;
2219:
2220: ------------------------

Line 2223: tab_payment_wh Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding;

2219:
2220: ------------------------
2221: -- Tables Declaration
2222: ------------------------
2223: tab_payment_wh Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding;
2224: tab_all_wh Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding;
2225: tab_inv_amounts Tab_Amounts;
2226:
2227: BEGIN

Line 2224: tab_all_wh Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding;

2220: ------------------------
2221: -- Tables Declaration
2222: ------------------------
2223: tab_payment_wh Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding;
2224: tab_all_wh Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding;
2225: tab_inv_amounts Tab_Amounts;
2226:
2227: BEGIN
2228: -------------------------------

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

2227: BEGIN
2228: -------------------------------
2229: -- Initializes debug variables
2230: -------------------------------
2231: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
2232: 'Calculate_AWT_Amounts<--' || P_Calling_Sequence;
2233:
2234: -- Debug Information
2235: IF (DEBUG_Var = 'Y') THEN

Line 2261: l_base_currency_code := Jl_Zz_Ap_Withholding_Pkg.Get_Base_Currency_Code;

2257:
2258: ---------------------------
2259: -- Gets generic parameters
2260: ---------------------------
2261: l_base_currency_code := Jl_Zz_Ap_Withholding_Pkg.Get_Base_Currency_Code;
2262: l_gl_period_name := Jl_Zz_Ap_Withholding_Pkg.Get_GL_Period_Name
2263: (P_AWT_Date);
2264:
2265: -- Debug Information

Line 2262: l_gl_period_name := Jl_Zz_Ap_Withholding_Pkg.Get_GL_Period_Name

2258: ---------------------------
2259: -- Gets generic parameters
2260: ---------------------------
2261: l_base_currency_code := Jl_Zz_Ap_Withholding_Pkg.Get_Base_Currency_Code;
2262: l_gl_period_name := Jl_Zz_Ap_Withholding_Pkg.Get_GL_Period_Name
2263: (P_AWT_Date);
2264:
2265: -- Debug Information
2266: IF (DEBUG_Var = 'Y') THEN

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

2434: -----------------------------------------------------
2435:
2436: -- Debug Information
2437: IF (DEBUG_Var = 'Y') THEN
2438: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when l_not_found');
2439: END IF;
2440: -- End Debug
2441:
2442: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

Line 2442: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

2438: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when l_not_found');
2439: END IF;
2440: -- End Debug
2441:
2442: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
2443: (l_current_vendor_id,
2444: rec_awt_type,
2445: rec_awt_name,
2446: rec_suppl_awt_type,

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

2453: P_AWT_Success);
2454:
2455: -- Debug Information
2456: IF (DEBUG_Var = 'Y') THEN
2457: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when l_not_found');
2458: END IF;
2459: -- End Debug
2460:
2461: IF (P_AWT_Success <> AWT_SUCCESS) THEN

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

2524: ------------------------------------------------
2525:
2526: -- Debug Information
2527: IF (DEBUG_Var = 'Y') THEN
2528: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name IN ');
2529: END IF;
2530: -- End Debug
2531:
2532: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

Line 2532: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

2528: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name IN ');
2529: END IF;
2530: -- End Debug
2531:
2532: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
2533: (l_current_vendor_id,
2534: rec_awt_type,
2535: rec_awt_name,
2536: rec_suppl_awt_type,

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

2543: P_AWT_Success);
2544:
2545: -- Debug Information
2546: IF (DEBUG_Var = 'Y') THEN
2547: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name IN ELSIF');
2548: END IF;
2549: -- End Debug
2550:
2551: IF (P_AWT_Success <> AWT_SUCCESS) THEN

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

2655: ------------------------------------------------
2656:
2657: -- Debug Information
2658: IF (DEBUG_Var = 'Y') THEN
2659: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when <> Tax Name');
2660: END IF;
2661: -- End Debug
2662: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
2663: (l_current_vendor_id,

Line 2662: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

2658: IF (DEBUG_Var = 'Y') THEN
2659: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when <> Tax Name');
2660: END IF;
2661: -- End Debug
2662: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
2663: (l_current_vendor_id,
2664: rec_awt_type,
2665: rec_awt_name,
2666: rec_suppl_awt_type,

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

2673: P_AWT_Success);
2674:
2675: -- Debug Information
2676: IF (DEBUG_Var = 'Y') THEN
2677: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name when Tax Name Changed');
2678: END IF;
2679: -- End Debug
2680:
2681: IF (P_AWT_Success <> AWT_SUCCESS) THEN

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

2689: ---------------------------------------------
2690:
2691: -- Debug Information
2692: IF (DEBUG_Var = 'Y') THEN
2693: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name. Getting Tax Code Info');
2694: END IF;
2695: -- End Debug
2696:
2697: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name

Line 2697: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name

2693: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name. Getting Tax Code Info');
2694: END IF;
2695: -- End Debug
2696:
2697: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name
2698: (rec_payment_wh.awt_type_code,
2699: rec_payment_wh.tax_id,
2700: rec_payment_wh.vendor_id,
2701: rec_awt_name,

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

2779:
2780: -- Debug Information
2781: IF (DEBUG_Var = 'Y') THEN
2782: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' Increate l_current_awt = '||to_char(l_current_awt));
2783: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==>Calling Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name');
2784: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' Invoice_id = '||to_char(rec_payment_wh.invoice_id)||' - '||
2785: 'Tax_id = '||to_char(rec_payment_wh.tax_id)||' - '||
2786: 'Tax Name = '||rec_awt_name.name);
2787: END IF;

Line 2790: Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name

2786: 'Tax Name = '||rec_awt_name.name);
2787: END IF;
2788: -- End Debug
2789:
2790: Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name
2791: (tab_payment_wh,
2792: l_current_awt,
2793: rec_payment_wh.invoice_id,
2794: rec_payment_wh.invoice_distribution_id , -- Lines

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

2805: rec_payment_wh.payment_num);
2806:
2807: -- Debug Information
2808: IF (DEBUG_Var = 'Y') THEN
2809: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name');
2810: END IF;
2811: -- End Debug
2812:
2813: END IF; -- NOT Withholding_Already_Calculated

Line 2922: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,

2918: P_AWT_Type_Code IN Varchar2,
2919: P_Tax_Id IN Number,
2920: P_Calling_Sequence IN Varchar2,
2921: P_Rec_AWT_Type OUT NOCOPY jl_zz_ap_awt_types%ROWTYPE,
2922: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,
2923: P_Rec_Suppl_AWT_Type OUT NOCOPY jl_zz_ap_supp_awt_types%ROWTYPE,
2924: P_Rec_Suppl_AWT_Name OUT NOCOPY jl_zz_ap_sup_awt_cd%ROWTYPE,
2925: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding)
2926: IS

Line 2925: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding)

2921: P_Rec_AWT_Type OUT NOCOPY jl_zz_ap_awt_types%ROWTYPE,
2922: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,
2923: P_Rec_Suppl_AWT_Type OUT NOCOPY jl_zz_ap_supp_awt_types%ROWTYPE,
2924: P_Rec_Suppl_AWT_Name OUT NOCOPY jl_zz_ap_sup_awt_cd%ROWTYPE,
2925: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding)
2926: IS
2927:
2928: l_debug_info Varchar2(300);
2929: l_calling_sequence Varchar2(2000);

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

2931: BEGIN
2932: -------------------------------
2933: -- Initializes debug variables
2934: -------------------------------
2935: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
2936: 'Initialize_Withholdings<--' || P_Calling_Sequence;
2937:
2938: -----------------------------------------
2939: -- Initializes records and PL/SQL tables

Line 2941: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Type

2937:
2938: -----------------------------------------
2939: -- Initializes records and PL/SQL tables
2940: -----------------------------------------
2941: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Type
2942: (P_AWT_Type_Code,
2943: P_Vendor_Id,
2944: P_Rec_AWT_Type,
2945: P_Rec_Suppl_AWT_Type);

Line 2947: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name

2943: P_Vendor_Id,
2944: P_Rec_AWT_Type,
2945: P_Rec_Suppl_AWT_Type);
2946:
2947: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name
2948: (P_AWT_Type_Code,
2949: P_Tax_Id,
2950: P_Vendor_Id,
2951: P_Rec_AWT_Name,

Line 2954: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Table

2950: P_Vendor_Id,
2951: P_Rec_AWT_Name,
2952: P_Rec_Suppl_AWT_Name);
2953:
2954: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Table
2955: (P_Wh_Table);
2956:
2957: EXCEPTION
2958: WHEN others THEN

Line 2994: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

2990: P_Base_Currency_Code IN Varchar2,
2991: P_Check_Id IN Number,
2992: P_Selected_Check_Id IN Number,
2993: P_Calling_Sequence IN Varchar2,
2994: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
2995: P_Total_Wh_Amount IN OUT NOCOPY Number,
2996: P_AWT_Success OUT NOCOPY Varchar2,
2997: P_Last_Updated_By IN Number Default null,
2998: P_Last_Update_Login IN Number Default null,

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

3011: BEGIN
3012: -------------------------------
3013: -- Initializes debug variables
3014: -------------------------------
3015: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
3016: 'Process_Withholdings<--' || P_Calling_Sequence;
3017:
3018: -- Debug Information
3019: IF (DEBUG_Var = 'Y') THEN

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

3056: ------------------------------------------------
3057:
3058: -- Debug Information
3059: IF (DEBUG_Var = 'Y') THEN
3060: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type');
3061: END IF;
3062: -- End Debug
3063:
3064: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type

Line 3064: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type

3060: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type');
3061: END IF;
3062: -- End Debug
3063:
3064: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type
3065: (P_Rec_AWT_Type,
3066: P_Rec_Suppl_AWT_Type,
3067: P_AWT_Date,
3068: P_Base_Currency_Code,

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

3069: P_Tab_Withhold);
3070:
3071: -- Debug Information
3072: IF (DEBUG_Var = 'Y') THEN
3073: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type');
3074: JL_ZZ_AP_EXT_AWT_UTIL.Print_Tax_Names(P_Tab_Withhold);
3075: END IF;
3076: -- End Debug
3077:

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

3111: -------------------------------------------------
3112:
3113: -- Debug Information
3114: IF (DEBUG_Var = 'Y') THEN
3115: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings');
3116: JL_ZZ_AP_EXT_AWT_UTIL.Print_Tax_Names(P_Tab_Withhold);
3117: END IF;
3118: -- End Debug
3119:

Line 3120: Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings (P_Tab_Withhold,

3116: JL_ZZ_AP_EXT_AWT_UTIL.Print_Tax_Names(P_Tab_Withhold);
3117: END IF;
3118: -- End Debug
3119:
3120: Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings (P_Tab_Withhold,
3121: P_Base_Currency_Code);
3122:
3123: -- Debug Information
3124: IF (DEBUG_Var = 'Y') THEN

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

3121: P_Base_Currency_Code);
3122:
3123: -- Debug Information
3124: IF (DEBUG_Var = 'Y') THEN
3125: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings');
3126: JL_ZZ_AP_EXT_AWT_UTIL.Print_Tax_Names(P_Tab_Withhold);
3127: END IF;
3128: -- End Debug
3129:

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

3132: -- Insert Temporary Distributions Lines
3133: ----------------------------------------
3134: -- Debug Information
3135: IF (DEBUG_Var = 'Y') THEN
3136: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table');
3137: END IF;
3138: -- End Debug
3139:
3140: Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table

Line 3140: Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table

3136: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' ==> Calling Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table');
3137: END IF;
3138: -- End Debug
3139:
3140: Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table
3141: (P_Tab_Withhold,
3142: P_Vendor_Id,
3143: P_AWT_Date,
3144: P_GL_Period_Name,

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

3159: P_Payment_Num);
3160:
3161: -- Debug Information
3162: IF (DEBUG_Var = 'Y') THEN
3163: JL_ZZ_AP_EXT_AWT_UTIL.Debug (' After Called Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table');
3164: END IF;
3165: -- End Debug
3166:
3167: IF (P_AWT_Success <> AWT_SUCCESS) THEN

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

3337: BEGIN
3338: -------------------------------
3339: -- Initializes debug variables
3340: -------------------------------
3341: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
3342: 'Calculate_Taxable_Base_Amounts<--' ||
3343: P_Calling_Sequence;
3344:
3345: -- Debug Information

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

3754: BEGIN
3755: -------------------------------
3756: -- Initializes debug variables
3757: -------------------------------
3758: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
3759: 'Get_Taxable_Base_Amount<--' || P_Calling_Sequence;
3760:
3761: -- Debug Information
3762: IF (DEBUG_Var = 'Y') THEN

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

3916: BEGIN
3917: -------------------------------
3918: -- Initializes debug variables
3919: -------------------------------
3920: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
3921: 'Get_Credit_Letter_Amount<--' || P_Calling_Sequence;
3922:
3923: ------------------------------------------------------
3924: -- Obtains the credit letter amount for the supplier

Line 3984: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

3980: P_Payment_Num IN Number,
3981: P_Check_Id IN Number,
3982: P_Selected_Check_Id IN Number,
3983: P_Calling_Sequence IN Varchar2,
3984: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
3985: P_Last_Updated_By IN Number Default null,
3986: P_Last_Update_Login IN Number Default null,
3987: P_Program_Application_Id IN Number Default null,
3988: P_Program_Id IN Number Default null,

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

4001: BEGIN
4002: -------------------------------
4003: -- Initializes debug variables
4004: -------------------------------
4005: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
4006: 'Update_Credit_Letter<--' || P_Calling_Sequence;
4007:
4008: --------------------------------------------
4009: -- Checks whether there is at least one tax

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

4212: BEGIN
4213: -------------------------------
4214: -- Initializes debug variables
4215: -------------------------------
4216: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
4217: 'Insert_Credit_Letter_Amount<--' ||
4218: P_Calling_Sequence;
4219:
4220: -----------------------------------------------

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

4358: BEGIN
4359: -------------------------------
4360: -- Initializes debug variables
4361: -------------------------------
4362: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
4363: 'Undo_Credit_Letter<--' || P_Calling_Sequence;
4364:
4365: ----------------------
4366: -- Initializes record

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

4539: BEGIN
4540: -------------------------------
4541: -- Initializes debug variables
4542: -------------------------------
4543: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
4544: 'Update_Quick_Payment<--' || P_Calling_Sequence;
4545:
4546:
4547: -- Debug Information

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

4828: BEGIN
4829: -------------------------------
4830: -- Initializes debug variables
4831: -------------------------------
4832: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
4833: 'Update_Payment_Batch<--' || P_Calling_Sequence;
4834:
4835: -- Debug Information
4836: IF (DEBUG_Var = 'Y') THEN

Line 5079: P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

5075: (P_Invoice_Id IN Number,
5076: P_Tax_Name IN Varchar2,
5077: P_Tax_Id IN Number,
5078: P_Taxable_Base_Amount_Basis IN Varchar2,
5079: P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
5080: P_Inv_Payment_Num IN Number,
5081: P_Calling_Sequence IN Varchar2)
5082: RETURN Boolean
5083: IS

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

5090: BEGIN
5091: -------------------------------
5092: -- Initializes debug variables
5093: -------------------------------
5094: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5095: 'Withholding_Already_Calculated<--' ||
5096: P_Calling_Sequence;
5097:
5098: --------------------------------------------------------

Line 5182: (P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

5178: * type (sums up all the prorated amounts). *
5179: * *
5180: **************************************************************************/
5181: FUNCTION Total_Withholding_Amount
5182: (P_Tab_Withhold IN Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
5183: P_Calling_Sequence IN Varchar2)
5184: RETURN Number
5185: IS
5186:

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

5191: BEGIN
5192: -------------------------------
5193: -- Initializes debug variables
5194: -------------------------------
5195: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5196: 'Total_Withholding_Amount<--' || P_Calling_Sequence;
5197:
5198: -----------------------------------------------------------
5199: -- Sums up all the prorated amounts included into the table

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

5249: BEGIN
5250: -------------------------------
5251: -- Initializes debug variables
5252: -------------------------------
5253: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5254: 'Partial_Payment_Paid_In_Full<--' ||
5255: P_Calling_Sequence;
5256:
5257: --------------------------------------------

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

5389: BEGIN
5390: -------------------------------
5391: -- Initializes debug variables
5392: -------------------------------
5393: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5394: 'Confirm_Credit_Letters<--' ||
5395: P_Calling_Sequence;
5396:
5397: ------------------------------------------------

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

5492: BEGIN
5493: -------------------------------
5494: -- Initializes debug variables
5495: -------------------------------
5496: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5497: 'Reject_Payment_Batch<--' ||
5498: P_Calling_Sequence;
5499:
5500: -- Debug Information

Line 5589: Ap_Withholding_Pkg.Ap_Do_Withholding (

5585: )
5586: IS
5587: BEGIN
5588: -- Call to core procedure
5589: Ap_Withholding_Pkg.Ap_Do_Withholding (
5590: P_Invoice_Id
5591: ,P_AWT_Date
5592: ,P_Calling_Module
5593: ,P_Amount

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

5712: BEGIN
5713: -------------------------------
5714: -- Initializes debug variables
5715: -------------------------------
5716: l_calling_sequence := 'JL_AR_AP_WITHHOLDING_PKG' || '.' ||
5717: 'Undo_Quick_Payment<--' || P_Calling_Sequence;
5718:
5719:
5720: -- Debug Information

Line 5911: END JL_AR_AP_WITHHOLDING_PKG;

5907: App_Exception.Raise_Exception;
5908:
5909: END Undo_Quick_Payment;
5910:
5911: END JL_AR_AP_WITHHOLDING_PKG;