1 PACKAGE PA_CREATE_RESOURCE AS
2 /* $Header: PACRRESS.pls 120.1 2005/08/19 16:21:00 mwasowic noship $*/
3
4 -- Standard who
5 g_last_updated_by NUMBER(15) := FND_GLOBAL.USER_ID;
6 g_last_update_date DATE := SYSDATE;
7 g_creation_date DATE := SYSDATE;
8 g_created_by NUMBER(15) := FND_GLOBAL.USER_ID;
9 g_last_update_login NUMBER(15) := FND_GLOBAL.LOGIN_ID;
10
11 PROCEDURE Create_Resource_group
12 (p_resource_list_id IN NUMBER,
13 p_resource_group IN VARCHAR2,
14 p_resource_name IN VARCHAR2,
15 p_alias IN VARCHAR2,
16 p_sort_order IN NUMBER,
17 p_display_flag IN VARCHAR2,
18 p_enabled_flag IN VARCHAR2,
19 p_track_as_labor_flag OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
20 p_resource_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
21 p_resource_list_member_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
22 p_err_code OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
23 p_err_stage IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
24 p_err_stack IN OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
25
26 PROCEDURE Create_Resource_List
27 (p_resource_list_name IN VARCHAR2,
28 p_description IN VARCHAR2,
29 p_public_flag IN VARCHAR2 DEFAULT 'Y',
30 p_group_resource_type IN VARCHAR2,
31 p_start_date IN DATE DEFAULT SYSDATE,
32 p_end_date IN DATE DEFAULT NULL,
33 p_business_group_id IN NUMBER DEFAULT NULL,
34 p_job_group_id IN NUMBER, -- Added for bug 2486405.
35 p_job_group_name IN VARCHAR2 DEFAULT NULL,
36 p_use_for_wp_flag IN VARCHAR2 DEFAULT NULL,
37 p_control_flag IN VARCHAR2 DEFAULT NULL,
38 p_migration_code IN VARCHAR2 DEFAULT NULL,
39 p_record_version_number IN NUMBER DEFAULT NULL,
40 p_resource_list_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
41 p_err_code OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
42 p_err_stage IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
43 p_err_stack IN OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
44
45 PROCEDURE Update_Resource_List
46 (p_resource_list_name IN VARCHAR2 DEFAULT NULL,
47 p_description IN VARCHAR2 DEFAULT NULL,
48 p_start_date IN DATE DEFAULT NULL,
49 p_end_date IN DATE DEFAULT NULL,
50 p_job_group_id IN OUT NOCOPY NUMBER,
51 p_job_group_name IN VARCHAR2 DEFAULT NULL,
52 p_use_for_wp_flag IN VARCHAR2 DEFAULT NULL,
53 p_control_flag IN VARCHAR2 DEFAULT NULL,
54 p_migration_code IN VARCHAR2 DEFAULT NULL,
55 p_record_version_number IN OUT NOCOPY NUMBER,
56 p_resource_list_id IN NUMBER,
57 x_msg_count OUT NOCOPY NUMBER,
58 x_return_status OUT NOCOPY VARCHAR2,
59 x_msg_data OUT NOCOPY VARCHAR2);
60
61 PROCEDURE Create_Resource_txn_Attribute
62 ( p_resource_id IN NUMBER,
63 p_resource_type_Code IN VARCHAR2,
64 p_person_id IN NUMBER,
65 p_job_id IN NUMBER,
66 p_proj_organization_id IN NUMBER,
67 p_vendor_id IN NUMBER,
68 p_expenditure_type IN VARCHAR2,
69 p_event_type IN VARCHAR2,
70 p_expenditure_category IN VARCHAR2,
71 p_revenue_category_code IN VARCHAR2,
72 p_non_labor_resource IN VARCHAR2,
73 p_system_linkage IN VARCHAR2,
74 p_project_role_id IN NUMBER DEFAULT NULL,
75 p_resource_txn_attribute_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
76 p_err_code OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
77 p_err_stage IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
78 p_err_stack IN OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
79
80 PROCEDURE Create_Resource_list_member
81 (p_resource_list_id IN NUMBER,
82 p_resource_name IN VARCHAR2,
83 p_resource_type_Code IN VARCHAR2,
84 p_alias IN VARCHAR2,
85 p_sort_order IN NUMBER,
86 p_display_flag IN VARCHAR2,
87 p_enabled_flag IN VARCHAR2,
88 p_person_id IN NUMBER,
89 p_job_id IN NUMBER,
90 p_proj_organization_id IN NUMBER,
91 p_vendor_id IN NUMBER,
92 p_expenditure_type IN VARCHAR2,
93 p_event_type IN VARCHAR2,
94 p_expenditure_category IN VARCHAR2,
95 p_revenue_category_code IN VARCHAR2,
96 p_non_labor_resource IN VARCHAR2,
97 p_system_linkage IN VARCHAR2,
98 p_project_role_id IN NUMBER DEFAULT NULL,
99 p_job_group_id IN NUMBER DEFAULT NULL, --- Added for Bug 2486405.
100 p_parent_member_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
101 p_resource_list_member_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
102 p_track_as_labor_flag OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
103 p_err_code OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
104 p_err_stage IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
105 p_err_stack IN OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
106
107 PROCEDURE Create_Resource (p_resource_name IN VARCHAR2,
108 p_resource_type_Code IN VARCHAR2,
109 p_description IN VARCHAR2,
110 p_unit_of_measure IN VARCHAR2,
111 p_rollup_quantity_flag IN VARCHAR2,
112 p_track_as_labor_flag IN VARCHAR2,
113 p_start_date IN DATE,
114 p_end_date IN DATE,
115 p_person_id IN NUMBER,
116 p_job_id IN NUMBER,
117 p_proj_organization_id IN NUMBER,
118 p_vendor_id IN NUMBER,
119 p_expenditure_type IN VARCHAR2,
120 p_event_type IN VARCHAR2,
121 p_expenditure_category IN VARCHAR2,
122 p_revenue_category_code IN VARCHAR2,
123 p_non_labor_resource IN VARCHAR2,
124 p_system_linkage IN VARCHAR2,
125 p_project_role_id IN NUMBER DEFAULT NULL,
126 p_resource_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
127 p_err_code OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
128 p_err_stage IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
129 p_err_stack IN OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
130
131 PROCEDURE Add_Resouce_List_Member
132 (p_resource_list_id IN NUMBER,
133 p_resource_name IN VARCHAR2,
134 p_resource_type_Code IN VARCHAR2,
135 p_alias IN VARCHAR2,
136 p_sort_order IN NUMBER,
137 p_display_flag IN VARCHAR2,
138 p_enabled_flag IN VARCHAR2,
139 p_person_id IN NUMBER,
140 p_job_id IN NUMBER,
141 p_proj_organization_id IN NUMBER,
142 p_vendor_id IN NUMBER,
143 p_expenditure_type IN VARCHAR2,
144 p_event_type IN VARCHAR2,
145 p_expenditure_category IN VARCHAR2,
146 p_revenue_category_code IN VARCHAR2,
147 p_non_labor_resource IN VARCHAR2,
148 p_system_linkage IN VARCHAR2,
149 p_parent_member_id IN NUMBER,
150 p_project_role_id IN NUMBER DEFAULT NULL,
151 p_track_as_labor_flag OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
152 p_resource_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
153 p_resource_list_member_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
154 p_err_code OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
155 p_err_stage IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
156 p_err_stack IN OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
157
158 PROCEDURE Create_Default_Res_List ( X_business_group_id IN NUMBER
159 , X_err_code OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
160 , X_err_stage IN OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
161 , X_err_stack IN OUT NOCOPY VARCHAR2 ); --File.Sql.39 bug 4440895
162
163 PROCEDURE Delete_Plan_Res_List (p_resource_list_id IN NUMBER,
164 x_return_status OUT NOCOPY VARCHAR2,
165 x_msg_count OUT NOCOPY NUMBER,
166 x_msg_data OUT NOCOPY VARCHAR2);
167
168 /*************************************************************
169 * Function : Check_pl_alias_unique
170 * Description : The purpose of this function is to determine
171 * the uniqueness of the resource alias if it is not null.
172 * Further details are specified in the Body.
173 *************************************************************/
174
175 FUNCTION Check_pl_alias_unique(
176 p_resource_list_id IN VARCHAR2,
177 p_resource_alias IN VARCHAR2,
178 p_resource_list_member_id IN VARCHAR2)
179 RETURN VARCHAR2;
180
181 PROCEDURE Add_language;
182
183 /*******************************************************
184 * Procedure : Create_Proj_Resource_List
185 * Description : This procedure is used to create resource
186 * list members, whenever we create a project
187 * specific resource list(ie when a resource
188 * list is associated to a project).
189 * We are copying the resource members
190 * from the existing members for the same
191 * resource list.
192 ******************************************************/
193 PROCEDURE Create_Proj_Resource_List
194 (p_resource_list_id IN VARCHAR2,
195 p_project_id IN NUMBER,
196 x_return_status OUT NOCOPY VARCHAR2,
197 x_error_msg_data OUT NOCOPY Varchar2,
198 x_msg_count OUT NOCOPY Number);
199
200
201
202 /* Procedure to create a resource list and copy all its elements from the selected parent resource list id*/
203 /* Added by smullapp */
204
205 PROCEDURE COPY_RESOURCE_LIST(
206 P_Commit IN Varchar2 Default Fnd_Api.G_False,
207 P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
208 P_API_Version_Number IN Number,
209 p_parent_resource_list_id IN PA_RESOURCE_LISTS_ALL_BG.resource_list_id%TYPE,
210 p_name IN PA_RESOURCE_LISTS_ALL_BG.name%TYPE,
211 p_description IN PA_RESOURCE_LISTS_ALL_BG.description%TYPE,
212 p_start_date_active IN PA_RESOURCE_LISTS_ALL_BG.START_DATE_ACTIVE%TYPE,
213 p_END_DATE_ACTIVE IN PA_RESOURCE_LISTS_ALL_BG.END_DATE_ACTIVE%TYPE,
214 p_JOB_GROUP_ID IN PA_RESOURCE_LISTS_ALL_BG.JOB_GROUP_ID%TYPE,
215 p_CONTROL_FLAG IN PA_RESOURCE_LISTS_ALL_BG.CONTROL_FLAG%TYPE,
216 p_USE_FOR_WP_FLAG IN PA_RESOURCE_LISTS_ALL_BG.USE_FOR_WP_FLAG%TYPE,
217 x_return_status OUT NOCOPY Varchar2,
218 x_msg_data OUT NOCOPY Varchar2,
219 x_msg_count OUT NOCOPY NUMBER
220 );
221
222
223 /******************************************************
224 * Procedure : Copy_Resource_Lists
225 * Description : This API is used to copy all the
229 * Further details in the body.
226 * Resource list members for the resource_list_id's
227 * associated to the source project -->
228 * into the destination project.
230 * **************************************************/
231 PROCEDURE Copy_Resource_Lists
232 (p_source_project_id IN Number,
233 p_destination_project_id IN Number,
234 x_return_status OUT NOCOPY Varchar2);
235
236
237 /******************************************************
238 * Procedure : TRANSLATE_ROW
239 * Description : This API is used to tranlslate all
240 * translatable colmuns os pa_resource_lits_tl
241 * table. This is called from the lct file.
242 * **************************************************/
243 procedure TRANSLATE_ROW(
244 P_RESOURCE_LIST_ID in NUMBER ,
245 P_OWNER in VARCHAR2 ,
246 P_NAME in VARCHAR2 ,
247 P_DESCRIPTION in VARCHAR2
248 );
249
250 /******************************************************
251 * Procedure : LOAD_ROW
252 * Description : This API is used to update or insert rows
253 * into table pa_resource_lists_bg and
254 * pa_resource_lits_tl table. This procedure
255 * is called from the lct file.
256 * **************************************************/
257 procedure LOAD_ROW(
258 P_RESOURCE_LIST_ID in NUMBER,
259 P_NAME in VARCHAR2,
260 P_DESCRIPTION in VARCHAR2,
261 P_PUBLIC_FLAG in VARCHAR2,
262 P_GROUP_RESOURCE_TYPE_ID in NUMBER,
263 P_START_DATE_ACTIVE in DATE,
264 P_END_DATE_ACTIVE in DATE,
265 P_UNCATEGORIZED_FLAG in VARCHAR2,
266 P_BUSINESS_GROUP_ID in NUMBER,
267 P_JOB_GROUP_ID in NUMBER,
268 P_RESOURCE_LIST_TYPE in VARCHAR2,
269 P_OWNER in VARCHAR2
270 );
271
272 END PA_CREATE_RESOURCE;