DBA Data[Home] [Help]

APPS.JL_CO_AP_WITHHOLDING_PKG dependencies on AP_WITHHOLDING_PKG

Line 1: PACKAGE BODY JL_CO_AP_WITHHOLDING_PKG AS

1: PACKAGE BODY JL_CO_AP_WITHHOLDING_PKG AS
2: /* $Header: jlcopwhb.pls 120.17 2010/07/20 16:59:13 abuissa ship $ */
3:
4: -------------------------------------------------------------------------------
5: -- Global Variables

Line 18: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'JL.PLSQL.JL_CO_AP_WITHHOLDING_PKG.';

14: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
15: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
16: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
17: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
18: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'JL.PLSQL.JL_CO_AP_WITHHOLDING_PKG.';
19: -- Logging Infra
20:
21: /**************************************************************************
22: * Private Procedure Specification *

Line 74: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,

70: (P_Vendor_Id IN Number,
71: P_AWT_Type_Code IN Varchar2,
72: P_Tax_Id IN Number,
73: P_Rec_AWT_Type OUT NOCOPY jl_zz_ap_awt_types%ROWTYPE,
74: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,
75: P_Rec_Suppl_AWT_Type OUT NOCOPY jl_zz_ap_supp_awt_types%ROWTYPE,
76: P_Rec_Suppl_AWT_Name OUT NOCOPY jl_zz_ap_sup_awt_cd%ROWTYPE,
77: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding);
78:

Line 77: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding);

73: P_Rec_AWT_Type OUT NOCOPY jl_zz_ap_awt_types%ROWTYPE,
74: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,
75: P_Rec_Suppl_AWT_Type OUT NOCOPY jl_zz_ap_supp_awt_types%ROWTYPE,
76: P_Rec_Suppl_AWT_Name OUT NOCOPY jl_zz_ap_sup_awt_cd%ROWTYPE,
77: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding);
78:
79:
80:
81: /**************************************************************************

Line 97: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

93: P_GL_Period_Name IN Varchar2,
94: P_Base_Currency_Code IN Varchar2,
95: P_User_Defd_Formula IN Boolean,
96: P_NIT_Number IN Varchar2 Default null,
97: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
98: P_Tab_All_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding,
99: P_AWT_Success OUT NOCOPY Varchar2,
100: P_Last_Updated_By IN Number Default null,
101: P_Last_Update_Login IN Number Default null,

Line 98: P_Tab_All_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding,

94: P_Base_Currency_Code IN Varchar2,
95: P_User_Defd_Formula IN Boolean,
96: P_NIT_Number IN Varchar2 Default null,
97: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
98: P_Tab_All_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding,
99: P_AWT_Success OUT NOCOPY Varchar2,
100: P_Last_Updated_By IN Number Default null,
101: P_Last_Update_Login IN Number Default null,
102: P_Program_Application_Id IN Number Default null,

Line 165: current_calling_sequence := 'JL_CO_AP_WITHHOLDING_PKG.Jl_Co_Ap_Do_Withholding';

161: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg);
162: END IF;
163: -- Logging Infra: Procedure level
164:
165: current_calling_sequence := 'JL_CO_AP_WITHHOLDING_PKG.Jl_Co_Ap_Do_Withholding';
166:
167: -----------------------------------------------------------------------
168: -- IF calling module is different from AUTOAPPROVAL should not execute
169: -- anything for Colombia Bug# 2279293

Line 330: Ap_Withholding_Pkg.Create_AWT_Distributions

326: ELSE
327: ----------------------------
328: -- Create AWT Distributions
329: ----------------------------
330: Ap_Withholding_Pkg.Create_AWT_Distributions
331: (P_Invoice_Id,
332: P_Calling_Module,
333: l_create_dists,
334: P_Payment_Num,

Line 355: Ap_Withholding_Pkg.Create_AWT_Invoices

351:
352: -----------------------
353: -- Create AWT Invoices
354: -----------------------
355: Ap_Withholding_Pkg.Create_AWT_Invoices
356: (P_Invoice_Id,
357: l_AWT_DATE, -- bug: 8770258
358: P_Last_Updated_By,
359: P_Last_Update_Login,

Line 512: rec_awt_name Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code;

508: -- Records Declaration
509: ------------------------
510: rec_withholding c_withholdings%ROWTYPE;
511: rec_awt_type jl_zz_ap_awt_types%ROWTYPE;
512: rec_awt_name Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code;
513: rec_suppl_awt_type jl_zz_ap_supp_awt_types%ROWTYPE;
514: rec_suppl_awt_name jl_zz_ap_sup_awt_cd%ROWTYPE;
515:
516: -------------------------

Line 519: tab_withholdings Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding;

515:
516: -------------------------
517: -- Table Declaration
518: -------------------------
519: tab_withholdings Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding;
520: tab_invoice_wh Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding;
521:
522: BEGIN
523:

Line 520: tab_invoice_wh Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding;

516: -------------------------
517: -- Table Declaration
518: -------------------------
519: tab_withholdings Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding;
520: tab_invoice_wh Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding;
521:
522: BEGIN
523:
524: current_calling_sequence := 'JL_CO_AP_WITHHOLDING_PKG.Jl_Co_Ap_Calculate_AWT_Amounts';

Line 524: current_calling_sequence := 'JL_CO_AP_WITHHOLDING_PKG.Jl_Co_Ap_Calculate_AWT_Amounts';

520: tab_invoice_wh Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding;
521:
522: BEGIN
523:
524: current_calling_sequence := 'JL_CO_AP_WITHHOLDING_PKG.Jl_Co_Ap_Calculate_AWT_Amounts';
525:
526: ------------------------------------------
527: -- Opens the cursor to select all the NIT
528: ------------------------------------------

Line 569: l_base_currency_code := Jl_Zz_Ap_Withholding_Pkg.Get_Base_Currency_Code;

565:
566: ---------------------------
567: -- Gets generic parameters
568: ---------------------------
569: l_base_currency_code := Jl_Zz_Ap_Withholding_Pkg.Get_Base_Currency_Code;
570: --bug 9593393 l_gl_period_name := Jl_Zz_Ap_Withholding_Pkg.Get_GL_Period_Name
571: --bug 9593393 (P_AWT_Date);
572:
573: ----------------------------------

Line 570: --bug 9593393 l_gl_period_name := Jl_Zz_Ap_Withholding_Pkg.Get_GL_Period_Name

566: ---------------------------
567: -- Gets generic parameters
568: ---------------------------
569: l_base_currency_code := Jl_Zz_Ap_Withholding_Pkg.Get_Base_Currency_Code;
570: --bug 9593393 l_gl_period_name := Jl_Zz_Ap_Withholding_Pkg.Get_GL_Period_Name
571: --bug 9593393 (P_AWT_Date);
572:
573: ----------------------------------
574: -- Initialize auxillary variables

Line 610: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

606: IF (c_withholdings%NOTFOUND) THEN
607: ------------------------------------------------
608: -- Process the withholding tax name information
609: ------------------------------------------------
610: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
611: (l_current_vendor_id,
612: rec_awt_type,
613: rec_awt_name,
614: rec_suppl_awt_type,

Line 660: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

656:
657: -------------------------------------------------
658: -- Process previous withholding tax information
659: -------------------------------------------------
660: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
661: (l_current_vendor_id,
662: rec_awt_type,
663: rec_awt_name,
664: rec_suppl_awt_type,

Line 731: Jl_Zz_Ap_Withholding_Pkg.Print_Tax_Names (tab_withholdings);

727: -------------------------------------------
728: ELSIF (rec_withholding.tax_id <> l_previous_tax_id) THEN
729:
730:
731: Jl_Zz_Ap_Withholding_Pkg.Print_Tax_Names (tab_withholdings);
732:
733: ------------------------------------------------
734: -- Process previous withholding tax information
735: ------------------------------------------------

Line 737: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name

733: ------------------------------------------------
734: -- Process previous withholding tax information
735: ------------------------------------------------
736:
737: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Name
738: (l_current_vendor_id,
739: rec_awt_type,
740: rec_awt_name,
741: rec_suppl_awt_type,

Line 760: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name

756: -- Obtains all the information associated to the
757: -- withholding tax name
758: -------------------------------------------------
759:
760: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name
761: (rec_withholding.awt_type_code,
762: rec_withholding.tax_id,
763: rec_withholding.vendor_id,
764: rec_awt_name,

Line 783: l_tax_base_amt := Jl_Zz_Ap_Withholding_Pkg.Get_Taxable_Base_Amount

779:
780: -----------------------------------
781: -- Obtains the taxable base amount
782: -----------------------------------
783: l_tax_base_amt := Jl_Zz_Ap_Withholding_Pkg.Get_Taxable_Base_Amount
784: (rec_withholding.invoice_id,
785: rec_withholding.invoice_distribution_id,
786: rec_withholding.line_amount,
787: Null,

Line 796: Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name

792: -- Stores the information of the current tax name into the
793: -- PL/SQL table
794: -----------------------------------------------------------
795: l_current_awt := l_current_awt + 1;
796: Jl_Zz_Ap_Withholding_Pkg.Store_Tax_Name
797: (tab_withholdings,
798: l_current_awt,
799: rec_withholding.invoice_id,
800: rec_withholding.invoice_distribution_id,

Line 916: current_calling_sequence := 'JL_CO_AP_WITHHOLDING_PKG.User_Defined_Formula_Exists';

912:
913:
914: BEGIN
915:
916: current_calling_sequence := 'JL_CO_AP_WITHHOLDING_PKG.User_Defined_Formula_Exists';
917:
918: -------------------------------------------------------------------------
919: -- Opens the cursor to select all the user defined formula flag
920: -------------------------------------------------------------------------

Line 969: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,

965: (P_Vendor_Id IN Number,
966: P_AWT_Type_Code IN Varchar2,
967: P_Tax_Id IN Number,
968: P_Rec_AWT_Type OUT NOCOPY jl_zz_ap_awt_types%ROWTYPE,
969: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,
970: P_Rec_Suppl_AWT_Type OUT NOCOPY jl_zz_ap_supp_awt_types%ROWTYPE,
971: P_Rec_Suppl_AWT_Name OUT NOCOPY jl_zz_ap_sup_awt_cd%ROWTYPE,
972: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding)
973: IS

Line 972: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding)

968: P_Rec_AWT_Type OUT NOCOPY jl_zz_ap_awt_types%ROWTYPE,
969: P_Rec_AWT_Name OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Rec_AWT_Code,
970: P_Rec_Suppl_AWT_Type OUT NOCOPY jl_zz_ap_supp_awt_types%ROWTYPE,
971: P_Rec_Suppl_AWT_Name OUT NOCOPY jl_zz_ap_sup_awt_cd%ROWTYPE,
972: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding)
973: IS
974: BEGIN
975:
976: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Type

Line 976: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Type

972: P_Wh_Table IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding)
973: IS
974: BEGIN
975:
976: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Type
977: (P_AWT_Type_Code,
978: P_Vendor_Id,
979: P_Rec_AWT_Type,
980: P_Rec_Suppl_AWT_Type);

Line 982: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name

978: P_Vendor_Id,
979: P_Rec_AWT_Type,
980: P_Rec_Suppl_AWT_Type);
981:
982: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Name
983: (P_AWT_Type_Code,
984: P_Tax_Id,
985: P_Vendor_Id,
986: P_Rec_AWT_Name,

Line 989: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Table

985: P_Vendor_Id,
986: P_Rec_AWT_Name,
987: P_Rec_Suppl_AWT_Name);
988:
989: Jl_Zz_Ap_Withholding_Pkg.Initialize_Withholding_Table
990: (P_Wh_Table);
991:
992: END Initialize_Withholdings;
993:

Line 1011: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,

1007: P_GL_Period_Name IN Varchar2,
1008: P_Base_Currency_Code IN Varchar2,
1009: P_User_Defd_Formula IN Boolean,
1010: P_NIT_Number IN Varchar2 Default null,
1011: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
1012: P_Tab_All_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding,
1013: P_AWT_Success OUT NOCOPY Varchar2,
1014: P_Last_Updated_By IN Number Default null,
1015: P_Last_Update_Login IN Number Default null,

Line 1012: P_Tab_All_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding,

1008: P_Base_Currency_Code IN Varchar2,
1009: P_User_Defd_Formula IN Boolean,
1010: P_NIT_Number IN Varchar2 Default null,
1011: P_Tab_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_Withholding,
1012: P_Tab_All_Withhold IN OUT NOCOPY Jl_Zz_Ap_Withholding_Pkg.Tab_All_Withholding,
1013: P_AWT_Success OUT NOCOPY Varchar2,
1014: P_Last_Updated_By IN Number Default null,
1015: P_Last_Update_Login IN Number Default null,
1016: P_Program_Application_Id IN Number Default null,

Line 1029: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type

1025: BEGIN
1026: ------------------------------------------------
1027: -- Process previous withholding tax type
1028: ------------------------------------------------
1029: Jl_Zz_Ap_Withholding_Pkg.Process_Withholding_Type
1030: (P_Rec_AWT_Type,
1031: P_Rec_Suppl_AWT_Type,
1032: P_AWT_Date,
1033: P_Base_Currency_Code,

Line 1040: Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings(P_Tab_Withhold,

1036: --------------------------------
1037: -- Prorates the withheld amounts
1038: --------------------------------
1039: --BUG 9668909
1040: Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings(P_Tab_Withhold,
1041: P_Base_Currency_Code);
1042: Jl_Zz_Ap_Withholding_Pkg.Store_Prorated_Withholdings
1043: (P_Tab_Withhold,
1044: P_Tab_All_Withhold);

Line 1042: Jl_Zz_Ap_Withholding_Pkg.Store_Prorated_Withholdings

1038: --------------------------------
1039: --BUG 9668909
1040: Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings(P_Tab_Withhold,
1041: P_Base_Currency_Code);
1042: Jl_Zz_Ap_Withholding_Pkg.Store_Prorated_Withholdings
1043: (P_Tab_Withhold,
1044: P_Tab_All_Withhold);
1045: --BUG 9668909
1046: /*IF ((P_user_defd_formula) AND

Line 1048: Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings(P_Tab_Withhold,

1044: P_Tab_All_Withhold);
1045: --BUG 9668909
1046: /*IF ((P_user_defd_formula) AND
1047: (nvl(P_Rec_AWT_Type.user_defined_formula_flag,'N') = 'N')) THEN
1048: Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings(P_Tab_Withhold,
1049: P_Base_Currency_Code);
1050: Jl_Zz_Ap_Withholding_Pkg.Store_Prorated_Withholdings
1051: (P_Tab_Withhold,
1052: P_Tab_All_Withhold);

Line 1050: Jl_Zz_Ap_Withholding_Pkg.Store_Prorated_Withholdings

1046: /*IF ((P_user_defd_formula) AND
1047: (nvl(P_Rec_AWT_Type.user_defined_formula_flag,'N') = 'N')) THEN
1048: Jl_Zz_Ap_Withholding_Pkg.Prorate_Withholdings(P_Tab_Withhold,
1049: P_Base_Currency_Code);
1050: Jl_Zz_Ap_Withholding_Pkg.Store_Prorated_Withholdings
1051: (P_Tab_Withhold,
1052: P_Tab_All_Withhold);
1053: END IF;*/
1054:

Line 1071: Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table

1067:
1068: ----------------------------------------
1069: -- Insert Temporary Distributions Lines
1070: ----------------------------------------
1071: Jl_Zz_Ap_Withholding_Pkg.Store_Into_Temporary_Table
1072: (P_Tab_Withhold,
1073: P_Vendor_Id,
1074: P_AWT_Date,
1075: P_GL_Period_Name,

Line 1098: Jl_Zz_Ap_Withholding_Pkg.Print_Tax_Names (P_Tab_Withhold);

1094: IF (P_AWT_Success <> 'SUCCESS') THEN
1095: RETURN;
1096: END IF;
1097:
1098: Jl_Zz_Ap_Withholding_Pkg.Print_Tax_Names (P_Tab_Withhold);
1099:
1100: END Process_Withholdings;
1101:
1102: END JL_CO_AP_WITHHOLDING_PKG;

Line 1102: END JL_CO_AP_WITHHOLDING_PKG;

1098: Jl_Zz_Ap_Withholding_Pkg.Print_Tax_Names (P_Tab_Withhold);
1099:
1100: END Process_Withholdings;
1101:
1102: END JL_CO_AP_WITHHOLDING_PKG;