1 package PA_RELATIONSHIP_PVT AUTHID CURRENT_USER as
2 /*$Header: PAXRELVS.pls 120.1 2005/08/19 17:19:14 mwasowic noship $*/
3
4 -- API name : Create_Relationship
5 -- Type : Private Procedure
6 -- Pre-reqs : None
7 -- Return Value : N/A
8 -- Parameters
9 -- p_api_version IN NUMBER := 1.0
10 -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
11 -- p_commit IN VARCHAR2 := FND_API.G_FALSE
12 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
13 -- p_validation_level IN VARCHAR2 := 100
14 -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
15 -- p_debug_mode IN VARCHAR2 := 'N'
16 -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
17 -- p_project_id_from IN NUMBER
18 -- p_structure_id_from IN NUMBER
19 -- p_structure_version_id_from IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
20 -- p_task_version_id_from IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
21 -- p_project_id_to IN NUMBER
22 -- p_structure_id_to IN NUMBER
23 -- p_structure_version_id_to IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
24 -- p_task_version_id_to IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
25 -- p_structure_type IN VARCHAR2
26 -- p_initiating_element IN VARCHAR2
27 -- p_link_to_latest_structure_ver IN VARCHAR2 := 'N'
28 -- p_relationship_type IN VARCHAR2
29 -- p_relationship_subtype IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
30 -- p_lag_day IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
31 -- p_priority IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
32 -- x_object_relationship_id OUT NUMBER
33 -- x_return_status OUT VARCHAR2
34 -- x_msg_count OUT NUMBER
35 -- x_msg_data OUT VARCHAR2
36 --
37 -- History
38 --
39 -- 25-JUN-01 HSIU -Created
40 --
41 --
42
43
44 procedure Create_Relationship
45 (
46 p_api_version IN NUMBER := 1.0
47 ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
48 ,p_commit IN VARCHAR2 := FND_API.G_FALSE
49 ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
50 ,p_validation_level IN VARCHAR2 := 100
51 ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
52 ,p_debug_mode IN VARCHAR2 := 'N'
53 ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
54 ,p_project_id_from IN NUMBER
55 ,p_structure_id_from IN NUMBER
56 ,p_structure_version_id_from IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
57 ,p_task_version_id_from IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
58 ,p_project_id_to IN NUMBER
59 ,p_structure_id_to IN NUMBER
60 ,p_structure_version_id_to IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
61 ,p_task_version_id_to IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
62 ,p_structure_type IN VARCHAR2
63 ,p_initiating_element IN VARCHAR2
64 ,p_link_to_latest_structure_ver IN VARCHAR2 := 'N'
65 ,p_relationship_type IN VARCHAR2
66 ,p_relationship_subtype IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
67 ,p_lag_day IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
68 ,p_priority IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
69 ,p_weighting_percentage IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
70 ,x_object_relationship_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
71 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
72 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
73 ,x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
74 );
75
76
77
78 -- API name : Update_Relationship
79 -- Type : Private Procedure
80 -- Pre-reqs : None
81 -- Return Value : N/A
82 -- Parameters
83 -- p_api_version IN NUMBER := 1.0
84 -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
85 -- p_commit IN VARCHAR2 := FND_API.G_FALSE
86 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
87 -- p_validation_level IN VARCHAR2 := 100
88 -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
89 -- p_debug_mode IN VARCHAR2 := 'N'
90 -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
91 -- p_object_relationship_id IN NUMBER
92 -- p_project_id_from IN NUMBER
93 -- p_structure_id_from IN NUMBER
94 -- p_structure_version_id_from IN NUMBER
95 -- p_task_version_id_from IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
96 -- p_project_id_to IN NUMBER
97 -- p_structure_id_to IN NUMBER
98 -- p_structure_version_id_to IN NUMBER
99 -- p_task_version_id_to IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
100 -- p_relationship_type IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
101 -- p_relationship_subtype IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
102 -- p_lag_day IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
103 -- p_priority IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
104 -- p_record_version_number IN NUMBER
105 -- x_return_status OUT VARCHAR2
106 -- x_msg_count OUT NUMBER
107 -- x_msg_data OUT VARCHAR2
108 --
109 -- History
110 --
111 -- 25-JUN-01 HSIU -Created
112 --
113 --
114
115
116 procedure Update_Relationship
117 (
118 p_api_version IN NUMBER := 1.0
119 ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
120 ,p_commit IN VARCHAR2 := FND_API.G_FALSE
121 ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
122 ,p_validation_level IN VARCHAR2 := 100
123 ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
124 ,p_debug_mode IN VARCHAR2 := 'N'
125 ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
126 ,p_object_relationship_id IN NUMBER
127 ,p_project_id_from IN NUMBER
128 ,p_structure_id_from IN NUMBER
129 ,p_structure_version_id_from IN NUMBER
130 ,p_task_version_id_from IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
131 ,p_project_id_to IN NUMBER
132 ,p_structure_id_to IN NUMBER
133 ,p_structure_version_id_to IN NUMBER
134 ,p_task_version_id_to IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
135 ,p_relationship_type IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
136 ,p_relationship_subtype IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
137 ,p_lag_day IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
138 ,p_priority IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
139 ,p_weighting_percentage IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
140 ,p_record_version_number IN NUMBER
141 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
142 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
143 ,x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
144 );
145
146
147 -- API name : Delete_Relationship
148 -- Type : Private Procedure
149 -- Pre-reqs : None
150 -- Return Value : N/A
151 -- Parameters
152 -- p_api_version IN NUMBER := 1.0
153 -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
154 -- p_commit IN VARCHAR2 := FND_API.G_FALSE
155 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
156 -- p_validation_level IN VARCHAR2 := 100
157 -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
158 -- p_debug_mode IN VARCHAR2 := 'N'
159 -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
160 -- p_object_relationship_id IN NUMBER
161 -- p_record_version_number IN NUMBER
162 -- x_return_status OUT VARCHAR2
163 -- x_msg_count OUT NUMBER
164 -- x_msg_data OUT VARCHAR2
165 --
166 -- History
167 --
168 -- 25-JUN-01 HSIU -Created
169 --
170 --
171
172
173 procedure Delete_Relationship
174 (
175 p_api_version IN NUMBER := 1.0
176 ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
177 ,p_commit IN VARCHAR2 := FND_API.G_FALSE
178 ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
179 ,p_validation_level IN VARCHAR2 := 100
180 ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
181 ,p_debug_mode IN VARCHAR2 := 'N'
182 ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
183 ,p_object_relationship_id IN NUMBER
184 ,p_record_version_number IN NUMBER
185 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
186 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
187 ,x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
188 );
189
190 -- API name : Create_Dependency
191 -- Type : Private Procedure
192 -- Pre-reqs : None
193 -- Return Value : N/A
194 -- Parameters
195 -- p_api_version IN NUMBER := 1.0
196 -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
197 -- p_commit IN VARCHAR2 := FND_API.G_FALSE
198 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
199 -- p_validation_level IN VARCHAR2 := 100
200 -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
201 -- p_debug_mode IN VARCHAR2 := 'N'
202 -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
203 -- p_src_proj_id IN NUMBER := NULL
204 -- p_src_task_ver_id IN NUMBER := NULL
205 -- p_dest_proj_id IN NUMBER := NULL
206 -- P_dest_task_id IN NUMBER := NULL
207 -- P_type IN VARCHAR2 := 'FS'
208 -- P_lag_days IN NUMBER := 0
209 -- p_comments IN VARCHAR2 := NULL
210 -- x_return_status OUT VARCHAR2
211 -- x_msg_count OUT NUMBER
212 -- x_msg_data OUT VARCHAR2
213 --
214 -- History
215 --
216 -- 10-dec-03 Maansari -Created
217 --
218 -- FPM bug 3301192
219 --
220
221
222 procedure Create_dependency
223 (
224 p_api_version IN NUMBER := 1.0
225 ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
226 ,p_commit IN VARCHAR2 := FND_API.G_FALSE
227 ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
228 ,p_validation_level IN VARCHAR2 := 100
229 ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
230 ,p_debug_mode IN VARCHAR2 := 'N'
231 ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
232 ,p_src_proj_id IN NUMBER := NULL
233 ,p_src_task_ver_id IN NUMBER := NULL
234 ,p_dest_proj_id IN NUMBER := NULL
235 ,p_dest_task_ver_id IN NUMBER := NULL
236 ,p_type IN VARCHAR2 := 'FS'
237 ,p_lag_days IN NUMBER := 0
238 ,p_comments IN VARCHAR2 := NULL
239 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
240 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
241 ,x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
242 );
243
244
245 -- API name : Update_Dependency
246 -- Type : Private Procedure
247 -- Pre-reqs : None
248 -- Return Value : N/A
249 -- Parameters
250 -- p_api_version IN NUMBER := 1.0
251 -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
252 -- p_commit IN VARCHAR2 := FND_API.G_FALSE
253 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
254 -- p_validation_level IN VARCHAR2 := 100
255 -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
256 -- p_debug_mode IN VARCHAR2 := 'N'
257 -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
258 -- p_task_version_id IN NUMBER := NULL
259 -- p_type IN VARCHAR2 := NULL
260 -- p_lag_days IN NUMBER := NULL
261 -- p_comments IN VARCHAR2 := NULL
262 -- p_record_version_number IN NUMBER
263 -- x_return_status OUT VARCHAR2
264 -- x_msg_count OUT NUMBER
265 -- x_msg_data OUT VARCHAR2
266 --
267 -- History
268 --
269 -- 10-dec-03 Maansari -Created
270 --
271 -- FPM bug 3301192
272 --
273
274 procedure Update_dependency
275 (
276 p_api_version IN NUMBER := 1.0
277 ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
278 ,p_commit IN VARCHAR2 := FND_API.G_FALSE
279 ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
280 ,p_validation_level IN VARCHAR2 := 100
281 ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
282 ,p_debug_mode IN VARCHAR2 := 'N'
283 ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
284 ,p_task_version_id IN NUMBER := NULL
285 ,p_src_task_version_id IN NUMBER := NULL
286 ,p_type IN VARCHAR2 := NULL
287 ,p_lag_days IN NUMBER := NULL
288 ,p_comments IN VARCHAR2 := NULL
289 ,p_record_version_number IN NUMBER
290 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
291 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
292 ,x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
293 );
294
295 -- API name : Delete_Dependency
296 -- Type : Private Procedure
297 -- Pre-reqs : None
298 -- Return Value : N/A
299 -- Parameters
300 -- p_api_version IN NUMBER := 1.0
301 -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
302 -- p_commit IN VARCHAR2 := FND_API.G_FALSE
303 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
304 -- p_validation_level IN VARCHAR2 := 100
305 -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
306 -- p_debug_mode IN VARCHAR2 := 'N'
307 -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
308 -- p_object_relationship_id IN NUMBER := NULL
309 -- x_return_status OUT VARCHAR2
310 -- x_msg_count OUT NUMBER
311 -- x_msg_data OUT VARCHAR2
312 --
313 -- History
314 --
315 -- 10-dec-03 Maansari -Created
316 --
317 -- FPM bug 3301192
318 --
319
320 procedure Delete_Dependency
321 (
322 p_api_version IN NUMBER := 1.0
323 ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
324 ,p_commit IN VARCHAR2 := FND_API.G_FALSE
325 ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
326 ,p_validation_level IN VARCHAR2 := 100
327 ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
328 ,p_debug_mode IN VARCHAR2 := 'N'
329 ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
330 ,p_object_relationship_id IN NUMBER := NULL
331 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
332 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
333 ,x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
334 );
335
336 -- Added for FP_M changes 3305199
337 Procedure Copy_Intra_Dependency (
338 /* Bug #: 3305199 SMukka */
339 /* Changing data type from PA_PLSQL_DATATYPES.IdTabTyp to SYSTEM.pa_num_tbl_type */
340 /* P_Source_Ver_Tbl IN PA_PLSQL_DATATYPES.IdTabTyp, */
341 /* P_Destin_Ver_Tbl IN PA_PLSQL_DATATYPES.IdTabTyp, */
342 P_Source_Ver_Tbl IN SYSTEM.pa_num_tbl_type,
343 P_Destin_Ver_Tbl IN SYSTEM.pa_num_tbl_type,
344 P_source_struc_ver_id IN NUMBER := NULL,
345 p_dest_struc_ver_id IN NUMBER := NULL,
346 X_Return_Status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
347 X_Msg_Count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
348 X_Msg_Data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
349 );
350
351 Procedure Copy_Inter_Project_Dependency (
352 /* Bug #: 3305199 SMukka */
353 /* Changing data type from PA_PLSQL_DATATYPES.IdTabTyp to SYSTEM.pa_num_tbl_type */
354 /* P_Source_Ver_Tbl IN PA_PLSQL_DATATYPES.IdTabTyp, */
355 /* P_Destin_Ver_Tbl IN PA_PLSQL_DATATYPES.IdTabTyp, */
356 P_Source_Ver_Tbl IN SYSTEM.pa_num_tbl_type,
357 P_Destin_Ver_Tbl IN SYSTEM.pa_num_tbl_type,
358 X_Return_Status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
359 X_Msg_Count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
360 X_Msg_Data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
361 );
362
363 Procedure Publish_Inter_Proj_Dep (
364 P_Publishing_Struc_Ver_ID IN NUMBER,
365 P_Previous_Pub_Struc_Ver_ID IN NUMBER,
366 P_Published_Struc_Ver_ID IN NUMBER,
367 X_Return_Status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
368 X_Msg_Count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
369 X_Msg_Data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
370 );
371
372 -- End of FP_M changes
373 --
374 -- API name : Create_Subproject_Association
375 -- Type : Private Procedure
376 -- Pre-reqs : None
377 -- Return Value : N/A
378 -- Parameters
379 -- p_api_version IN NUMBER :=1.0
380 -- p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
381 -- p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
382 -- p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
383 -- p_calling_module IN VARCHAR2 :='SELF_SERVICE'
384 -- p_commit IN VARCHAR2 :=FND_API.G_FALSE
385 -- p_debug_mode IN VARCHAR2 :='N'
386 -- p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
387 -- p_src_proj_id IN pa_projects_all.project_id%type
388 -- p_task_ver_id IN pa_proj_element_versions.element_version_id%type
389 -- p_dest_proj_id IN pa_projects_all.project_id%type
390 -- p_dest_proj_name IN pa_projects_all.name%type
391 -- p_comment IN pa_object_relationships.comments%type
392 -- x_return_status OUT VARCHAR2
393 -- x_msg_count OUT NUMBER
394 -- x_msg_data OUT VARCHAR2
395 --
396 -- History
397 --
398 -- 20-Feb-04 Smukka -Created
399 -- -Created this procedure for subproject association
400 --
401 -- FPM bug 3450684
402 --
403 --
404 --
405 Procedure Create_Subproject_Association(p_api_version IN NUMBER :=1.0,
406 p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE,
407 p_validate_only IN VARCHAR2 :=FND_API.G_TRUE,
408 -- p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
409 p_validation_level IN VARCHAR2 := 100,
410 p_calling_module IN VARCHAR2 :='SELF_SERVICE',
411 p_commit IN VARCHAR2 :=FND_API.G_FALSE,
412 p_debug_mode IN VARCHAR2 :='N',
413 p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
414 p_src_proj_id IN pa_projects_all.project_id%type,
415 p_task_ver_id IN pa_proj_element_versions.element_version_id%type,
416 p_dest_proj_id IN pa_projects_all.project_id%type,
417 p_dest_proj_name IN pa_projects_all.name%type,
418 p_comment IN pa_object_relationships.comments%type,
419 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
420 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
421 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
422 --
423 -- API name : Create_Subproject_Association
424 -- Type : Private Procedure
425 -- Pre-reqs : None
426 -- Return Value : N/A
427 -- Parameters
428 -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
429 -- p_commit IN VARCHAR2 := FND_API.G_FALSE
430 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
431 -- p_validation_level IN VARCHAR2 := 100
432 -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
433 -- p_debug_mode IN VARCHAR2 := 'N'
434 -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
435 -- p_src_proj_id IN NUMBER
436 -- p_src_struc_wp_or_fin IN VARCHAR2
437 -- p_src_struc_elem_id IN NUMBER
438 -- p_src_struc_elem_ver_id IN NUMBER
439 -- p_dest_proj_id IN NUMBER
440 -- p_dest_struc_elem_id IN NUMBER
441 -- p_dest_struc_elem_ver_id IN NUMBER
442 -- p_src_task_elem_id IN NUMBER
443 -- p_src_task_elem_ver_id IN NUMBER
444 -- p_lnk_task_name_number IN NUMBER
445 -- p_relationship_type IN VARCHAR2
446 -- x_lnk_task_elem_id OUT NUMBER
447 -- x_lnk_task_elem_ver_id OUT NUMBER
448 -- x_object_relationship_id OUT NUMBER
449 -- x_pev_schedule_id OUT NUMBER
450 -- x_return_status OUT VARCHAR2
451 -- x_msg_count OUT NUMBER
452 -- x_msg_data OUT VARCHAR2
453 --
454 -- History
455 --
456 -- 20-Feb-04 Smukka -Created
457 -- -Created this procedure for subproject association
458 --
459 -- FPM bug 3450684
460 --
461 /*PROCEDURE Insert_Subproject_Association(p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
462 ,p_commit IN VARCHAR2 := FND_API.G_FALSE
463 ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
464 ,p_validation_level IN VARCHAR2 := 100
465 ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
466 ,p_debug_mode IN VARCHAR2 := 'N'
467 ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
468 ,p_src_proj_id IN NUMBER
469 ,p_src_struc_wp_or_fin IN VARCHAR2
470 ,p_src_struc_elem_id IN NUMBER
471 ,p_src_struc_elem_ver_id IN NUMBER
472 ,p_dest_proj_id IN NUMBER
473 ,p_dest_struc_elem_id IN NUMBER
474 ,p_dest_struc_elem_ver_id IN NUMBER
475 ,p_src_task_elem_id IN NUMBER
476 ,p_src_task_elem_ver_id IN NUMBER
477 ,p_lnk_task_name_number IN NUMBER
478 ,p_relationship_type IN VARCHAR2
479 ,x_lnk_task_elem_id OUT NUMBER
480 ,x_lnk_task_elem_ver_id OUT NUMBER
481 ,x_object_relationship_id OUT NUMBER
482 ,x_pev_schedule_id OUT NUMBER
483 ,x_return_status OUT VARCHAR2
484 ,x_msg_count OUT NUMBER
485 ,x_msg_data OUT VARCHAR2
486 );*/
487 --
488 -- API name : Update_Subproject_Association
489 -- Type : Private Procedure
490 -- Pre-reqs : None
491 -- Return Value : N/A
492 -- Parameters
493 -- p_api_version IN NUMBER := 1.0
494 -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
495 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
496 -- p_validation_level IN VARCHAR2 := 100
497 -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
498 -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
499 -- p_commit IN VARCHAR2 := FND_API.G_FALSE
500 -- p_debug_mode IN VARCHAR2 := 'N'
501 -- p_object_relationship_id IN NUMBER
502 -- p_record_version_number IN NUMBER
503 -- p_comment IN VARCHAR2
504 -- x_return_status OUT VARCHAR2
505 -- x_msg_count OUT NUMBER
506 -- x_msg_data OUT VARCHAR2
507 --
508 -- History
509 --
510 -- 20-Feb-04 Smukka -Created
511 -- -Created this procedure for subproject association
512 --
513 -- FPM bug 3450684
514 --
515 Procedure Update_Subproject_Association(p_api_version IN NUMBER := 1.0,
516 p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
517 p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
518 p_validation_level IN VARCHAR2 := 100,
519 p_calling_module IN VARCHAR2 := 'SELF_SERVICE',
520 p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
521 p_commit IN VARCHAR2 := FND_API.G_FALSE,
522 p_debug_mode IN VARCHAR2 := 'N',
523 p_object_relationship_id IN NUMBER,
524 p_record_version_number IN NUMBER,
525 p_comment IN VARCHAR2,
526 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
527 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
528 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
529 --
530 -- API name : Delete_SubProject_Association
531 -- Type : Private Procedure
532 -- Pre-reqs : None
533 -- Return Value : N/A
534 -- Parameters
535 -- p_commit IN VARCHAR2 := FND_API.G_FALSE
536 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
537 -- p_validation_level IN VARCHAR2 := 100
538 -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
539 -- p_debug_mode IN VARCHAR2 := 'N'
540 -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
541 -- p_object_relationships_id IN NUMBER
542 -- p_record_version_number IN NUMBER
543 -- x_return_status OUT VARCHAR2
544 -- x_msg_count OUT NUMBER
545 -- x_msg_data OUT VARCHAR2
546 --
547 -- History
548 --
549 -- 20-Feb-04 Smukka -Created
550 -- -Created this procedure for subproject association
551 --
552 -- FPM bug 3450684
553 Procedure Delete_SubProject_Association(p_commit IN VARCHAR2 := FND_API.G_FALSE,
554 p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
555 p_validation_level IN VARCHAR2 := 100,
556 p_calling_module IN VARCHAR2 := 'SELF_SERVICE',
557 p_debug_mode IN VARCHAR2 := 'N',
558 p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
559 p_object_relationships_id IN NUMBER,
560 p_record_version_number IN NUMBER,
561 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
562 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
563 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
564 --
565 --
566 Procedure Copy_OG_Lnk_For_Subproj_Ass(p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
567 p_validation_level IN VARCHAR2 := 100,
568 p_calling_module IN VARCHAR2 := 'SELF_SERVICE',
569 p_debug_mode IN VARCHAR2 := 'N',
570 p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
571 p_commit IN VARCHAR2 := FND_API.G_FALSE,
572 p_src_str_version_id IN NUMBER,
573 p_dest_str_version_id IN NUMBER, -- Destination Str version id can be of published str also
574 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
575 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
576 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
577 --
578 --
579 PROCEDURE Move_CI_Lnk_For_subproj_step1(p_api_version IN NUMBER :=1.0,
580 p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE,
581 p_validate_only IN VARCHAR2 :=FND_API.G_TRUE,
582 -- p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
583 p_validation_level IN VARCHAR2 := 100,
584 p_calling_module IN VARCHAR2 :='SELF_SERVICE',
585 p_commit IN VARCHAR2 :=FND_API.G_FALSE,
586 p_debug_mode IN VARCHAR2 :='N',
587 p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
588 p_src_str_version_id IN NUMBER,
589 p_pub_str_version_id IN NUMBER, --published str, which is destination
590 p_last_pub_str_version_id IN NUMBER,
591 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
592 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
593 x_msg_data OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
594 --
595 --
596 /*PROCEDURE Move_CI_Lnk_For_subproj_step2(p_commit IN VARCHAR2 := FND_API.G_FALSE,
597 p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
598 p_validation_level IN VARCHAR2 := 100,
599 p_calling_module IN VARCHAR2 := 'SELF_SERVICE',
600 p_debug_mode IN VARCHAR2 := 'N',
601 p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
602 p_src_str_version_id IN NUMBER,
603 p_dest_str_version_id IN NUMBER, --publishing str
604 p_publish_fl IN CHAR,
605 x_return_status OUT VARCHAR2,
606 x_msg_count OUT NUMBER,
607 x_msg_data OUT VARCHAR2);*/
608 --
609 --
610 --
611 --
612
613 -- API name : update_parent_WBS_flag_dirty
614 -- Type : Private Procedure
615 -- Pre-reqs : None
616 -- Return Value : N/A
617 -- Parameters
618 -- p_api_version IN NUMBER := 1.0
619 -- p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
620 -- p_commit IN VARCHAR2 := FND_API.G_FALSE
621 -- p_validate_only IN VARCHAR2 := FND_API.G_TRUE
622 -- p_validation_level IN VARCHAR2 := 100
623 -- p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
624 -- p_debug_mode IN VARCHAR2 := 'N'
625 -- p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
626 -- p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
627 -- p_structure_version_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
628 -- x_return_status OUT VARCHAR2
629 -- x_msg_count OUT NUMBER
630 -- x_msg_data OUT VARCHAR2
631 --
632 -- History
633 --
634 -- 13-may-05 Maansari -Created
635 --
636 -- Post FPM bug 4370533
637 --
638 -- Description
639 --
640 -- This API is used to update parent links working version flag to dirty. This is called from process_wbs_updates api in publish mode.
641
642 procedure UPDATE_PARENT_WBS_FLAG_DIRTY
643 (
644 p_api_version IN NUMBER := 1.0
645 ,p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
646 ,p_commit IN VARCHAR2 := FND_API.G_FALSE
647 ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
648 ,p_validation_level IN VARCHAR2 := 100
649 ,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
650 ,p_debug_mode IN VARCHAR2 := 'N'
651 ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
652 ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
653 ,p_structure_version_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
654 ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
655 ,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
656 ,x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
657 )
658 ;
659 end PA_RELATIONSHIP_PVT;