DBA Data[Home] [Help]

PACKAGE: APPS.PA_RELATIONSHIP_PVT

Source


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;