[Home] [Help]
PACKAGE: APPS.PA_TASKS_MAINT_UTILS
Source
1 package PA_TASKS_MAINT_UTILS as
2 /*$Header: PATSKSUS.pls 120.1 2005/08/19 17:05:34 mwasowic noship $*/
3
4
5
6 procedure CHECK_TASK_MGR_NAME_OR_ID
7 (
8 p_task_mgr_name IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
9 ,p_task_mgr_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
10 ,p_project_id IN NUMBER := NULL
11 ,p_check_id_flag IN VARCHAR2 := 'A'
12 ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
13 ,x_task_mgr_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
14 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
15 ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
16 );
17
18
19 procedure CHECK_TASK_NAME_OR_ID
20 (
21 p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
22 ,p_task_name IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
23 ,p_task_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
24 ,p_check_id_flag IN VARCHAR2 := 'A'
25 ,x_task_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
26 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
27 ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
28 );
29
30 procedure CHECK_PROJECT_NAME_OR_ID
31 (
32 p_project_name IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
33 ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
34 ,p_check_id_flag IN VARCHAR2 := 'A'
35 ,x_project_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
36 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
37 ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
38 );
39
40
41 function Get_Sequence_Number(p_peer_or_sub IN VARCHAR2,
42 p_project_id IN NUMBER,
43 p_task_id IN NUMBER)
44 return NUMBER;
45
46 FUNCTION default_address_id(p_proj_id IN NUMBER)
47 RETURN NUMBER;
48
49 PROCEDURE CHECK_TASK_NUMBER_DISP(p_project_id IN NUMBER,
50 p_task_id IN NUMBER,
51 p_task_number IN VARCHAR2,
52 p_rowid IN VARCHAR2);
53
54 procedure Check_Start_Date(p_project_id IN NUMBER,
55 p_parent_task_id IN NUMBER,
56 p_task_id IN NUMBER,
57 p_start_date IN DATE,
58 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
59 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
60 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
61
62 procedure Check_End_Date( p_project_id IN NUMBER,
63 p_parent_task_id IN NUMBER,
64 p_task_id IN NUMBER,
65 p_end_date IN DATE,
66 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
67 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
68 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
69
70
71 procedure Check_Chargeable_Flag( p_chargeable_flag IN VARCHAR2,
72 p_receive_project_invoice_flag IN VARCHAR2,
73 p_project_type IN VARCHAR2,
74 p_project_id IN number, -- Added for bug#3512486
75 x_receive_project_invoice_flag OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
76
77
78 PROCEDURE CHECK_SCHEDULE_DATES(p_project_id IN NUMBER,
79 p_sch_start_date IN DATE,
80 p_sch_end_date IN DATE,
81 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
82 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
83 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
84
85
86 PROCEDURE CHECK_ESTIMATE_DATES(p_project_id IN NUMBER,
87 p_estimate_start_date IN DATE,
88 p_estimate_end_date IN DATE,
89 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
90 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
91 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
92
93 PROCEDURE CHECK_ACTUAL_DATES(p_project_id IN NUMBER,
94 p_actual_start_date IN DATE,
95 p_actual_end_date IN DATE,
96 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
97 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
98 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
99
100
101 PROCEDURE SET_ORG_ID(p_project_id IN NUMBER);
102
103 FUNCTION rearrange_display_seq (p_display_seq IN NUMBER,
104 p_above_seq IN NUMBER,
105 p_number_tasks IN NUMBER,
106 p_mode IN VARCHAR2,
107 p_operation IN VARCHAR2) RETURN NUMBER;
108
109
110 -- API name : DEFAULT_TASK_ATTRIBUTES
111 -- Type : Utility procedure
112 -- Pre-reqs : None
113 -- Return Value : N/A
114 -- Prameters
115 -- p_reference_task_id IN NUMBER REQUIRED
116 -- p_task_type IN VARCHAR2 REQUIRED
117 -- x_carrying_out_org_id OUT NUMBER REQUIRED
118 -- x_carrying_out_org_name OUT VARCHAR2 REQUIRED
119 -- x_work_type_id OUT NUMBER REQUIRED
120 -- x_work_type_name OUT VARCHAR2 REQUIRED
121 -- x_service_type_code OUT VARCHAR2 REQUIRED
122 -- x_service_type_name OUT VARCHAR2 REQUIRED
123 -- x_return_status OUT VARCHAR2 REQUIRED
124 -- x_error_msg_code OUT VARCHAR2 REQUIRED
125 --
126 -- History
127 --
128 -- 14-JUN-01 Majid Ansari -Created
129 --
130 --
131
132 PROCEDURE DEFAULT_TASK_ATTRIBUTES(
133 p_reference_task_id IN NUMBER,
134 p_task_type IN VARCHAR2,
135 x_carrying_out_org_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
136 x_carrying_out_org_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
137 x_work_type_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
138 x_work_type_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
139 x_service_type_code OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
140 x_service_type_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
141 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
142 x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
143 );
144
145
146 -- API name : FETCH_TASK_ATTIBUTES
147 -- Type : Utility procedure
148 -- Pre-reqs : None
149 -- Return Value : N/A
150 -- Prameters
151 -- p_task_id IN NUMBER REQUIRED
152 -- x_carrying_out_org_id OUT NUMBER REQUIRED
153 -- x_carrying_out_org_name OUT VARCHAR2 REQUIRED
154 -- x_work_type_id OUT NUMBER REQUIRED
155 -- x_work_type_name OUT VARCHAR2 REQUIRED
156 -- x_service_type_code OUT VARCHAR2 REQUIRED
157 -- x_service_type_name OUT VARCHAR2 REQUIRED
158 -- x_return_status OUT VARCHAR2 REQUIRED
159 -- x_error_msg_code OUT VARCHAR2 REQUIRED
160 --
161 -- History
162 --
163 -- 14-JUN-01 Majid Ansari -Created
164 --
165 --
166
167 PROCEDURE FETCH_TASK_ATTIBUTES(
168 p_task_id IN NUMBER,
169 x_carrying_out_org_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
170 x_carrying_out_org_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
171 x_work_type_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
172 x_work_type_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
173 x_service_type_code OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
174 x_service_type_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
175 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
176 x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
177 );
178
179 -- API name : FETCH_PROJECT_ATTIBUTES
180 -- Type : Utility procedure
181 -- Pre-reqs : None
182 -- Return Value : N/A
183 -- Prameters
184 -- p_project_id IN NUMBER REQUIRED
185 -- x_carrying_out_org_id OUT NUMBER REQUIRED
186 -- x_carrying_out_org_name OUT VARCHAR2 REQUIRED
187 -- x_work_type_id OUT NUMBER REQUIRED
188 -- x_work_type_name OUT VARCHAR2 REQUIRED
189 -- x_service_type_code OUT VARCHAR2 REQUIRED
190 -- x_service_type_name OUT VARCHAR2 REQUIRED
191 -- x_return_status OUT VARCHAR2 REQUIRED
192 -- x_error_msg_code OUT VARCHAR2 REQUIRED
193 --
194 -- History
195 --
196 -- 14-JUN-01 Majid Ansari -Created
197 --
198 --
199
200 PROCEDURE FETCH_PROJECT_ATTIBUTES(
201 p_project_id IN NUMBER,
202 x_carrying_out_org_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
203 x_carrying_out_org_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
204 x_work_type_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
205 x_work_type_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
206 x_service_type_code OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
207 x_service_type_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
208 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
209 x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
210 );
211
212 function IsSummaryTask(p_project_id IN NUMBER,
213 p_task_id IN NUMBER)
214 return varchar2;
215
216
217 -- API name : GetWbsLevel
218 -- Type : Utility Procedure
219 -- Pre-reqs : None
220 -- Return Value : N/A
221 -- Prameters
222 -- p_project_id IN NUMBER REQUIRED
223 -- p_task_id IN NUMBER REQUIRED
224 -- x_task_level OUT NUMBER REQUIRED
225 -- x_task_level_above OUT NUMBER REQUIRED
226 -- x_task_id_above OUT NUMBER REQ
227 -- x_return_status OUT VARCHAR2 REQUIRED
228 -- x_error_msg_code OUT VARCHAR2 REQUIRED
229 --
230 -- History
231 --
232 -- 25-JUN-01 Majid Ansari -Created
233 --
234 --
235
236 PROCEDURE GetWbsLevel(
237 p_project_id IN NUMBER,
238 p_task_id IN NUMBER,
239
240 x_task_level OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
241 x_parent_task_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
242 x_top_task_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
243 x_display_sequence OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
244
245 x_task_level_above OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
246 x_parent_task_id_above OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
247 x_top_task_id_above OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
248 x_display_sequence_above OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
249
250 x_task_id_above OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
251 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
252 x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
253 );
254
255 -- API name : REF_PRJ_TASK_ID_REQ_CHECK
256 -- Type : Utility procedure
257 -- Pre-reqs : None
258 -- Return Value : N/A
259 -- Prameters
260 -- p_reference_project_id IN NUMBER REQUIRED
261 -- p_reference_task_id IN NUMBER REQUIRED
262 -- x_return_status OUT VARCHAR2 REQUIRED
263 -- x_error_msg_code OUT VARCHAR2 REQUIRED
264 --
265 -- History
266 --
267 -- 25-MAY-01 Majid Ansari -Created
268 --
269 --
270
271 PROCEDURE REF_PRJ_TASK_ID_REQ_CHECK(
272 p_reference_project_id IN NUMBER ,
273 p_reference_task_id IN NUMBER ,
274 x_return_status OUT NOCOPY VARCHAR2 , --File.Sql.39 bug 4440895
275 x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
276 );
277
278
279 -- API name : SRC_PRJ_TASK_ID_REQ_CHECK
280 -- Type : Utility procedure
281 -- Pre-reqs : None
282 -- Return Value : N/A
283 -- Prameters
284 -- p_project_id IN NUMBER REQUIRED
285 -- p_task_id IN NUMBER REQUIRED
286 -- x_return_status OUT VARCHAR2 REQUIRED
287 -- x_error_msg_code OUT VARCHAR2 REQUIRED
288 --
289 -- History
290 --
291 -- 25-MAY-01 Majid Ansari -Created
292 --
293 --
294
295 PROCEDURE SRC_PRJ_TASK_ID_REQ_CHECK(
296 p_project_id IN NUMBER ,
297 p_task_id IN NUMBER ,
298 x_return_status OUT NOCOPY VARCHAR2 , --File.Sql.39 bug 4440895
299 x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
300 ) ;
301
302
303 PROCEDURE check_start_end_date
304 ( p_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
305 ,p_context IN VARCHAR2 := 'START'
306 ,p_old_start_date IN DATE
307 ,p_new_start_date IN DATE
308 ,p_old_end_date IN DATE
309 ,p_new_end_date IN DATE
310 ,p_update_start_date_flag OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
311 ,p_update_end_date_flag OUT NOCOPY VARCHAR2 ); --File.Sql.39 bug 4440895
312
313 -- API name : LOCK_PROJECT
317 -- Prameters
314 -- Type : Utility procedure
315 -- Pre-reqs : None
316 -- Return Value : N/A
318 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
319 -- p_project_id IN NUMBER REQUIRED
320 -- p_wbs_record_version_number IN NUMBER REQUIRED
321 -- x_return_status OUT VARCHAR2 REQUIRED
322 -- x_error_msg_code OUT VARCHAR2 REQUIRED
323 --
324 -- History
325 --
326 -- 25-MAY-01 Majid Ansari -Created
327 --
328 --
329
330 PROCEDURE LOCK_PROJECT(
331 p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
332 p_calling_module IN VARCHAR2 := 'SELF_SERVICE',
333 p_project_id IN NUMBER,
334 p_wbs_record_version_number IN NUMBER,
335 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
336 x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
337 );
338
339 -- API name : INCREMENT_WBS_REC_VER_NUM
340 -- Type : Utility procedure
341 -- Pre-reqs : None
342 -- Return Value : N/A
343 -- Prameters
344 -- p_project_id IN NUMBER REQUIRED
345 -- p_wbs_record_version_number IN NUMBER
346 -- x_return_status OUT VARCHAR2 REQUIRED
347 --
348 -- History
349 --
350 -- 16-JUL-01 Majid Ansari -Created
351 --
352 --
353
354 PROCEDURE INCREMENT_WBS_REC_VER_NUM(
355 p_project_id IN NUMBER,
356 p_wbs_record_version_number IN NUMBER,
357 x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
358 );
359
360 -- API name : GET_TASK_MANAGER_PROFILE
361 -- Type : Utility procedure
362 -- Pre-reqs : None
363 -- Return Value : Y or N
364 -- Parameters : N/A
365 --
366 -- History
367 --
368 -- 21-NOV-02 hubert siu -Created
369 --
370 --
371 FUNCTION GET_TASK_MANAGER_PROFILE RETURN VARCHAR2;
372
373 -- Begin add by rtarway FP.M Development
374 -- TYPE TASK_VERSION_ID_TABLE_TYPE IS TABLE OF pa_proj_element_versions.element_version_id%TYPE INDEX BY BINARY_INTEGER;
375
376 PROCEDURE CHECK_WORKPLAN_TASK_EXISTS
377 (
378 p_api_version IN NUMBER := 1.0
379 , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
380 , p_debug_mode IN NUMBER := 'N'
381 , p_task_version_id IN NUMBER
382 , x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
383 , x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
384 , x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
385 , x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
386 );
387
388 PROCEDURE CHECK_MOVE_FINANCIAL_TASK_OK
389
390 ( p_api_version IN NUMBER := 1.0
391 , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
392 , p_debug_mode IN VARCHAR2 := 'N'
393 , p_task_version_id IN NUMBER
394 , p_ref_task_version_id IN NUMBER
395 , x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
396 , x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
397 , x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
398 , x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
399 );
400 -- End add by rtarway FP.M Development
401 --BUG 4081329, rtarway
402 procedure Check_Start_Date_EI( p_project_id IN NUMBER,
403 p_task_id IN NUMBER,
404 p_start_date IN DATE,
405 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
406 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
407 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
408 procedure Check_End_Date_EI( p_project_id IN NUMBER,
409 p_task_id IN NUMBER,
410 p_end_date IN DATE,
411 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
412 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
413 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
414 --BUG 4081329, rtarway
415 end PA_TASKS_MAINT_UTILS;