[Home] [Help]
PACKAGE: APPS.PA_BUDGET_ACCOUNT_PKG
Source
1 PACKAGE PA_BUDGET_ACCOUNT_PKG AUTHID CURRENT_USER AS
2 -- $Header: PABDACGS.pls 120.2 2005/08/12 10:33:39 bkattupa noship $
3
4 ----------------------------------------------------------------------------------------+
5 -- Package : PA_BUDGET_ACCOUNT_PKG
6 --
7 -- Purpose : 1. Generate the Account Code CCID for every Budget Line
8 -- depending upon the calling mode parameter.
9 -- 2. Update the Budget Line Data with generated CCID
10 -- 3. Update the Budget Account Summary Details
11 -- 4. Insert new Budget Lines which are having missed GL Periods
12 -- 5. Derive the Resource and Task related Parameters
13 -- Parameters :
14 -- P_Calling_Mode--> SUBMIT / GENERATE_ACCOUNT
15 ----------------------------------------------------------------------------------------+
16
17
18 ----------------------------------------------------------------------------------------+
19 -- Procedure : Gen_Account
20 -- Purpose : Generate the Account Code CCID for every Budget Line
21 -- depending upon the calling mode parameter and a given
22 -- Budget Version ID
23 -- Parameters : P_Calling_Mode--> SUBMIT / GENERATE_ACCOUNT
24 ----------------------------------------------------------------------------------------+
25 PROCEDURE Gen_Account (
26 P_Budget_Version_ID IN PA_Budget_Versions.Budget_Version_ID%TYPE,
27 P_Calling_Mode IN VARCHAR2,
28 X_Return_Status OUT NOCOPY VARCHAR2,
29 X_Msg_Count OUT NOCOPY NUMBER,
30 X_Msg_Data OUT NOCOPY VARCHAR2
31 ) ;
32
33 ----------------------------------------------------------------------------------------+
34 -- Procedure : Gen_Acct_All_Lines
35 -- Purpose : Generate the Account Code CCID for all Budget Lines
36 -- depending upon the calling mode parameter for a given
37 -- Budget Version ID
38 -- Calling API : Gen_Account
39 ----------------------------------------------------------------------------------------+
40 PROCEDURE Gen_Acct_All_Lines (
41 P_Budget_Version_ID IN PA_Budget_Versions.Budget_Version_ID%TYPE,
42 P_Calling_Mode IN VARCHAR2,
43 P_Budget_Type_Code IN PA_Budget_Types.Budget_Type_Code%TYPE,
44 P_Budget_Entry_Level_Code IN PA_Budget_Entry_Methods.Entry_Level_Code%TYPE,
45 P_Project_ID IN PA_projects_All.project_id%TYPE,
46 X_Return_Status OUT NOCOPY VARCHAR2,
47 X_Msg_Count OUT NOCOPY NUMBER,
48 X_Msg_Data OUT NOCOPY VARCHAR2
49 ) ;
50
51 ----------------------------------------------------------------------------------------+
52 -- Procedure : Gen_Acct_Line
53 -- Purpose : Generate the Account Code CCID for a required Budget Line
54 -- Calling API : Gen_Acct_All_Lines
55 ----------------------------------------------------------------------------------------+
56 PROCEDURE Gen_Acct_Line (
57
58 p_budget_entry_Level_Code IN pa_budget_entry_methods.Entry_Level_Code%TYPE,
59 p_budget_type_code IN pa_budget_types.budget_type_code%TYPE,
60 p_budget_version_id IN pa_budget_versions.budget_version_id%TYPE,
61
62 p_project_id IN pa_projects_all.project_id%TYPE,
63 p_project_number IN pa_projects_all.segment1%TYPE,
64 p_project_org_name IN hr_organization_units.name%TYPE,
65 p_project_org_id IN hr_organization_units.organization_id %TYPE,
66 p_project_type IN pa_project_types_all.project_type%TYPE,
67 p_project_class_code IN pa_project_classes.class_code%TYPE, /* Added for bug 2914197 */
68 p_task_id IN pa_tasks.task_id%TYPE,
69
70 p_resource_list_flag IN VARCHAR2,
71 p_resource_type_id IN pa_resource_types.resource_type_code%TYPE,
72 p_resource_group_id IN pa_resource_types.resource_type_id%TYPE,
73 p_resource_assign_id IN pa_budget_lines.resource_assignment_id%TYPE,
74 p_start_date IN pa_budget_lines.start_date%TYPE,
75
76 p_person_ID IN per_all_people_f.Person_ID%TYPE,
77 p_expenditure_category IN pa_expenditure_categories.expenditure_category%TYPE,
78 p_expenditure_type IN pa_expenditure_types.expenditure_type%TYPE,
79 p_job_id IN per_jobs.job_id%TYPE,
80 p_organization_id IN hr_all_organization_units.organization_id%TYPE,
81 p_supplier_id IN po_vendors.vendor_id%TYPE,
82
83 x_return_ccid OUT NOCOPY gl_code_combinations.code_combination_id%TYPE,
84 X_Return_Status OUT NOCOPY VARCHAR2,
85 X_Msg_Count OUT NOCOPY NUMBER,
86 X_Msg_Data OUT NOCOPY VARCHAR2,
87
88 x_concat_segs OUT NOCOPY VARCHAR2,
89 x_concat_ids OUT NOCOPY VARCHAR2,
90 x_concat_descrs OUT NOCOPY VARCHAR2,
91 x_error_message OUT NOCOPY VARCHAR2
92 ) ;
93
94 ----------------------------------------------------------------------------------------+
95 -- Procedure : Insert_into_Budget_Lines
96 -- Purpose : Insert into Budget Lines with amount=0 for a missed GL Period
97 -- Calling API : Gen_Acct_All_Lines
98 ----------------------------------------------------------------------------------------+
99 PROCEDURE Insert_into_Budget_Lines (
100 P_Budget_Version_ID IN PA_Budget_Versions.Budget_Version_ID%TYPE,
101 P_Project_ID IN PA_projects_All.project_id%TYPE,
102 P_Project_Start_Date IN DATE,
103 P_Project_End_Date IN DATE,
104 X_Return_Status OUT NOCOPY VARCHAR2,
105 X_Msg_Count OUT NOCOPY NUMBER,
106 X_Msg_Data OUT NOCOPY VARCHAR2
107 ) ;
108
109 ----------------------------------------------------------------------------------------+
110 -- Procedure : Derive_Resource_Params
111 -- Purpose : To Derive the Budget Line's Resource Parameters
112 -- Calling API : Gen_Acct_Line
113 ----------------------------------------------------------------------------------------+
114 PROCEDURE Derive_Resource_Params (
115 p_person_id IN per_all_people_f.person_id%TYPE,
116 p_job_id IN per_jobs.job_id%TYPE,
117 p_organization_id IN hr_all_organization_units.organization_id%TYPE,
118 p_supplier_id IN po_vendors.vendor_id%TYPE,
119 x_employee_number OUT NOCOPY per_all_people_f.employee_number%TYPE,
120 X_Person_Type OUT NOCOPY PA_Employees.Person_Type%TYPE, -- FP_M changes
121 x_job_name OUT NOCOPY per_jobs.name%TYPE,
122 x_job_group_id OUT NOCOPY per_jobs.job_group_id%TYPE,
123 x_job_group_name OUT NOCOPY per_job_groups.internal_name%TYPE,
124 x_organization_type OUT NOCOPY hr_all_organization_units.type%TYPE,
125 x_organization_name OUT NOCOPY hr_all_organization_units.name%TYPE,
126 x_supplier_name OUT NOCOPY po_vendors.vendor_name%TYPE,
127 X_Return_Status OUT NOCOPY VARCHAR2,
128 X_Msg_Count OUT NOCOPY NUMBER,
129 X_Msg_Data OUT NOCOPY VARCHAR2
130 ) ;
131
132 ----------------------------------------------------------------------------------------+
133 -- Procedure : Derive_Task_Params
134 -- Purpose : To Derive the Budget Line's Task Parameters
135 -- Calling API : Gen_Acct_Line
136 ----------------------------------------------------------------------------------------+
137 PROCEDURE Derive_Task_Params (
138 p_project_id IN pa_projects_all.project_id%TYPE,
139 p_top_task_id IN pa_tasks.task_id%TYPE,
140 p_low_task_id IN pa_tasks.task_id%TYPE,
141 x_top_task_number OUT NOCOPY pa_tasks.task_number%TYPE,
142 x_task_organization_id OUT NOCOPY hr_organization_units.organization_id%TYPE,
143 x_task_organization_name OUT NOCOPY hr_organization_units.name%TYPE,
144 x_task_service_type OUT NOCOPY pa_tasks.service_type_code%TYPE,
145 x_task_number OUT NOCOPY pa_tasks.task_number%TYPE,
146 X_Return_Status OUT NOCOPY VARCHAR2,
147 X_Msg_Count OUT NOCOPY NUMBER,
148 X_Msg_Data OUT NOCOPY VARCHAR2
149 ) ;
150
151 END PA_BUDGET_ACCOUNT_PKG ; /* End Package Specifications PA_BUDGET_ACCOUNT_PKG */