DBA Data[Home] [Help]

PACKAGE: APPS.PA_PROGRESS_PUB

Source


1 package PA_PROGRESS_PUB as
2 /* $Header: PAPCPUBS.pls 120.3 2005/08/19 16:37:33 mwasowic noship $ */
3 
4 g_wbs_apply_prog      number := null;
5 --  Bug 3606627 : Changed Defaulting to g_miss_xxx instead of null
6 TYPE PA_TASK_PROGRESS_LIST_REC_TYPE IS RECORD
7 (
8 TASK_ID				NUMBER		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
9 TASK_NAME			VARCHAR2(20)	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
10 TASK_NUMBER			VARCHAR2(25)	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
11 PM_TASK_REFERENCE		VARCHAR2(150)	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
12 PERCENT_COMPLETE		NUMBER		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
13 DESCRIPTION			VARCHAR2(250)	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
14 OBJECT_ID			NUMBER		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
15 OBJECT_VERSION_ID		NUMBER		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
16 OBJECT_TYPE			VARCHAR2(30)	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
17 PROGRESS_STATUS_CODE		VARCHAR2(150)	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
18 PROGRESS_COMMENT		VARCHAR2(4000)	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
19 ACTUAL_START_DATE		Date		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
20 ACTUAL_FINISH_DATE		Date		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
21 ESTIMATED_START_DATE		Date		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
22 ESTIMATED_FINISH_DATE		Date		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
23 SCHEDULED_START_DATE		Date		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
24 SCHEDULED_FINISH_DATE		Date		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
25 TASK_STATUS			VARCHAR2(150)	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
26 EST_REMAINING_EFFORT		NUMBER		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
27 ACTUAL_WORK_QUANTITY		NUMBER		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
28 LOWEST_LEVEL_TASK		VARCHAR2(1)	:= 'N',
29 LATEST_AS_OF_DATE		Date		:= NULL,
30 PROGRESS_MODE			VARCHAR2(30)	:= 'N',
31 ETC_COST			NUMBER		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,   /* FP M task progress bug 3420093 */
32 PM_DELIVERABLE_REFERENCE	VARCHAR2(150)	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR, -- Bug 3606627
33 PM_TASK_ASSGN_REFERENCE		VARCHAR2(150)	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR, -- Bug 3606627
34 ACTUAL_COST_TO_DATE		NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,  -- Bug 3606627
35 ACTUAL_EFFORT_TO_DATE		NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM  -- Bug 3606627
36 );
37 
38 TYPE PA_TASK_PROGRESS_LIST_TBL_TYPE IS TABLE OF PA_TASK_PROGRESS_LIST_REC_TYPE
39    INDEX BY BINARY_INTEGER;
40 
41 -- Progress Management Change for bug # 3420093.
42 
43 TYPE PA_NUM_1000_NUM IS VARRAY(1000) OF NUMBER;
44 
45 PROCEDURE UPDATE_TASK_PROGRESS(
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      NUMBER          :=FND_API.G_VALID_LEVEL_FULL            ,
51  p_calling_module               IN      VARCHAR2        :='SELF_SERVICE'                        ,
52  p_calling_mode			IN      VARCHAR2	:= null					,
53  p_debug_mode                   IN      VARCHAR2        :='N'                                   ,
54  p_max_msg_count                IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
55  p_action                       IN      VARCHAR2        default 'SAVE'                          ,
56  p_bulk_load_flag               IN      VARCHAR2        default 'N'                             ,
57  p_progress_mode                IN      VARCHAR2        default 'FUTURE'                        ,
58  p_percent_complete_id          IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
59  p_project_id                   IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
60  p_object_id                    IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
61  p_object_version_id            IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
62  p_object_type                  IN      Varchar2        := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
63  p_as_of_date                   IN      DATE            := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
64  p_percent_complete             IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
65  p_progress_status_code         IN      VARCHAR2        := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
66  p_progress_comment             IN      VARCHAR2        := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
67  p_brief_overview               IN      VARCHAR2        := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
68  p_actual_start_date            IN      DATE            := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
69  p_actual_finish_date           IN      DATE            := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
70  p_estimated_start_date         IN      DATE            := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
71  p_estimated_finish_date        IN      DATE            := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
72  p_scheduled_start_date         IN      DATE            := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
73  p_scheduled_finish_date        IN      DATE            := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE,
74  p_record_version_number        IN      NUMBER                                                  ,
75  p_task_status                  IN      VARCHAR2        := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
76  p_est_remaining_effort         IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
77  p_actual_work_quantity         IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
78  p_pm_product_code              IN      VARCHAR2        := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
79  p_structure_type               IN      VARCHAR2        := 'WORKPLAN'                           ,
80  p_actual_effort                IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
81  p_actual_effort_this_period    IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM  ,
82  p_prog_fom_wp_flag             IN      VARCHAR2        := 'N'                                  ,
83  p_planned_cost                 IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
84  p_planned_effort               IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
85  p_structure_version_id         IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
86  p_eff_rollup_percent_complete  IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , --    3910193
87  x_resource_list_member_id      OUT    NOCOPY VARCHAR2      , --File.Sql.39 bug 4440895
88  x_return_status                OUT    NOCOPY VARCHAR2                                                 , --File.Sql.39 bug 4440895
89  x_msg_count                    OUT    NOCOPY NUMBER                                                   , --File.Sql.39 bug 4440895
90  x_msg_data                     OUT    NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
91 ;
92 
93 -- Start of comments
94 --      API name        : ROLLUP_PROGRESS_PVT
95 --      Type            : Public
96 --      Pre-reqs        : For Program Rollup, the sub project buckets should be populated.
97 --      Purpose         : Rolls up the structure
98 --      Parameters Desc :
99 --              P_OBJECT_TYPE                   Possible values PA_ASSIGNMENTS, PA_DELIVERABLES, PA_TASKS
100 --              P_OBJECT_ID                     For assignments, pass resource_assignment_id, otherwise
101 --                                              proj_element_id of the deliverable and task
102 --              p_object_version_id             For Assignments, pass task_version_id, otherwise
103 --                                              element_version_id of the deliverable and task
104 --              p_task_version_id               For tasks, assignments, deliverables pass the task version id
105 --                                              , for struture pass null
106 --              p_lowest_level_task             Does not seem to be required
107 --              p_process_whole_tree            To indicate if whole tree rollup is not required. It will
108 --                                              do just 2 level rollup if N
109 --              p_structure_version_id          Structure version id of the publsihed or working structure version
110 --              p_structure_type                Possible values WORKPLAN, FINANCIAL
111 --              p_fin_rollup_method             Possible values are COST, EFFORT
112 --              p_wp_rollup_method              Possible values are COST, EFFORT, MANUAL, DURATION
113 --              p_rollup_entire_wbs             To indicate if it requires the whole structure rollup, in this
114 --                                              case it will ignore the passed object and starts with the lowest
115 --                                              task
116 --      History         : 17-MAR-04  amksingh   Rewritten For FPM Development Tracking Bug 3420093
117 -- End of comments
118 
119 PROCEDURE ROLLUP_PROGRESS_PVT(
120  p_api_version                          IN      NUMBER          :=1.0
121 ,p_init_msg_list                        IN      VARCHAR2        :=FND_API.G_TRUE
122 ,p_commit                               IN      VARCHAR2        :=FND_API.G_FALSE
123 ,p_validate_only                        IN      VARCHAR2        :=FND_API.G_TRUE
124 ,p_validation_level                     IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
125 ,p_calling_module                       IN      VARCHAR2        :='SELF_SERVICE'
126 ,p_debug_mode                           IN      VARCHAR2        :='N'
127 ,p_max_msg_count                        IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
128 ,p_progress_mode                        IN      VARCHAR2        := 'FUTURE'
129 ,p_project_id                           IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
130 ,p_object_type                          IN      VARCHAR2        := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
131 ,p_object_id                            IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
132 ,p_object_version_id			IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
133 ,p_task_version_id                      IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
134 ,p_as_of_date                           IN      DATE            := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
135 ,p_lowest_level_task			IN      VARCHAR2        := 'N'
136 ,p_process_whole_tree			IN      VARCHAR2        := 'Y'
137 ,p_structure_version_id			IN      NUMBER
138 ,p_structure_type                       IN      VARCHAR2        := 'WORKPLAN'
139 ,p_fin_rollup_method			IN      VARCHAR2        := 'COST'
140 ,p_wp_rollup_method                     IN      VARCHAR2        := 'COST'
141 ,p_rollup_entire_wbs			IN      VARCHAR2        := 'N'
142 ,p_working_wp_prog_flag                 IN      VARCHAR2        := 'N'  --maansari7/18  to be passed form apply lp progress to select regular planned amounts to send to schduling api for percent comnplete and earned value calculations.
143 ,p_upd_new_elem_ver_id_flag             IN      VARCHAR2        := 'Y'  -- rtarway, for BUG 3951024
144 ,x_return_status                        OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
145 ,x_msg_count                            OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
146 ,x_msg_data                             OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
147 );
148 
149 -- Start of comments
150 --      API name        : UPDATE_ROLLUP_PROGRESS_PVT
151 --      Type            : Private
152 --      Pre-reqs        : ROLLUP_PROGRESS_PVT shd have been called.
153 --      Purpose         : Updates the Rolled up data
154 --      Parameters Desc :
155 --              P_OBJECT_TYPE                   Possible values PA_ASSIGNMENTS, PA_DELIVERABLES, PA_TASKS
156 --              P_OBJECT_ID                     For assignments, pass resource_assignment_id, otherwise
157 --                                              proj_element_id of the deliverable and task
158 --              p_object_version_id             For Assignments, pass task_version_id, otherwise
159 --                                              element_version_id of the deliverable and task
160 --              p_task_version_id               For tasks, assignments, deliverables pass the task version id
161 --                                              , for struture pass null
162 --              p_lowest_level_task             Does not seem to be required
163 --              p_structure_version_id		Structure version id of the publsihed or working structure version
164 --              p_structure_type                Possible values WORKPLAN, FINANCIAL
165 --              p_fin_rollup_method             Possible values are COST, EFFORT
166 --              p_wp_rollup_method              Possible values are COST, EFFORT, MANUAL, DURATION
167 --              p_published_structure		To indicate if the passed structure version is published
168 --      History         : 17-MAR-04  amksingh   Rewritten For FPM Development Tracking Bug 3420093
169 -- End of comments
170 
171 PROCEDURE UPDATE_ROLLUP_PROGRESS_PVT(
172   p_api_version				IN      NUMBER			:=1.0
173  ,p_init_msg_list                       IN      VARCHAR2                :=FND_API.G_TRUE
174  ,p_commit                              IN      VARCHAR2                :=FND_API.G_FALSE
175  ,p_validate_only                       IN      VARCHAR2                :=FND_API.G_TRUE
176  ,p_validation_level			IN      NUMBER			:=FND_API.G_VALID_LEVEL_FULL
177  ,p_calling_module                      IN      VARCHAR2                :='SELF_SERVICE'
178  ,p_debug_mode                          IN      VARCHAR2                :='N'
179  ,p_max_msg_count                       IN      NUMBER			:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
180  ,p_project_id				IN      NUMBER			:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
181  ,p_object_version_id			IN      NUMBER			:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
182  ,p_as_of_date                          IN      DATE                    := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
183  ,p_rollup_table                        IN      PA_SCHEDULE_OBJECTS_PVT.PA_SCHEDULE_OBJECTS_TBL_TYPE
184  ,p_lowest_level_task			IN      VARCHAR2                := 'N'
185  ,p_task_version_id			IN      NUMBER
186  ,p_structure_version_id                IN      NUMBER
187  ,p_structure_type                      IN      VARCHAR2                := 'WORKPLAN'
188  ,p_fin_rollup_method			IN      VARCHAR2                := 'COST'
189  ,p_wp_rollup_method			IN      VARCHAR2                := 'COST'
190  ,p_published_structure			IN      VARCHAR2
191  ,p_rollup_entire_wbs                   IN      VARCHAR2		:= 'N' -- FPM Dev CR 7
192  ,p_working_wp_prog_flag                 IN      VARCHAR2        := 'N'  --bug 3829341
193  ,p_upd_new_elem_ver_id_flag             IN      VARCHAR2        := 'Y'  -- rtarway, for BUG 3951024
194  ,p_progress_mode			IN	VARCHAR2        := 'FUTURE'  -- 4091457
195  ,x_return_status                       OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
196  ,x_msg_count                           OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
197  ,x_msg_data                            OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
198 );
199 
200 PROCEDURE CREATE_PROJ_PROG_ATTR(
201   p_api_version	      IN	NUMBER	:=1.0
202  ,p_init_msg_list	      IN	VARCHAR2	:=FND_API.G_TRUE
203  ,p_commit	            IN	VARCHAR2	:=FND_API.G_FALSE
204  ,p_validate_only	      IN	VARCHAR2	:=FND_API.G_TRUE
205  ,p_validation_level	IN	NUMBER	:=FND_API.G_VALID_LEVEL_FULL
206  ,p_calling_module	      IN	VARCHAR2	:='SELF_SERVICE'
207  ,p_debug_mode	      IN	VARCHAR2	:='N'
208  ,p_max_msg_count	      IN	NUMBER	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
209  ,p_project_id                      IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
210  ,P_OBJECT_TYPE                     IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
211  ,P_OBJECT_ID                       IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
212  ,P_PROGRESS_CYCLE_ID               IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
213  ,P_WQ_ENABLE_FLAG                  IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
214  ,P_REMAIN_EFFORT_ENABLE_FLAG       IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
215  ,P_PERCENT_COMP_ENABLE_FLAG        IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
216  ,P_NEXT_PROGRESS_UPDATE_DATE       IN DATE     := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
217  ,p_action_set_id                   IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
218  ,p_TASK_WEIGHT_BASIS_CODE          IN VARCHAR2  := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
219  ,X_PROJ_PROGRESS_ATTR_ID           IN OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
220  ,P_ALLOW_COLLAB_PROG_ENTRY         IN VARCHAR2 := 'N'
221  ,P_ALLW_PHY_PRCNT_CMP_OVERRIDES    IN VARCHAR2 := 'N'
222  ,P_STRUCTURE_TYPE                  IN VARCHAR2 := 'WORKPLAN'
223  ,x_return_status	      OUT 	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
224  ,x_msg_count	      OUT 	NOCOPY NUMBER --File.Sql.39 bug 4440895
225  ,x_msg_data	            OUT 	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
226 
227 );
228 
229 PROCEDURE UPDATE_PROJ_PROG_ATTR(
230   p_api_version	      IN	NUMBER	:=1.0
231  ,p_init_msg_list	      IN	VARCHAR2	:=FND_API.G_TRUE
232  ,p_commit	            IN	VARCHAR2	:=FND_API.G_FALSE
233  ,p_validate_only	      IN	VARCHAR2	:=FND_API.G_TRUE
234  ,p_validation_level	IN	NUMBER	:=FND_API.G_VALID_LEVEL_FULL
235  ,p_calling_module	      IN	VARCHAR2	:='SELF_SERVICE'
236  ,p_debug_mode	      IN	VARCHAR2	:='N'
237  ,p_max_msg_count	      IN	NUMBER	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
238  ,p_project_id                      IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
239  ,P_OBJECT_TYPE                     IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
240  ,P_OBJECT_ID                       IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
241  ,P_PROGRESS_CYCLE_ID               IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
242  ,P_WQ_ENABLE_FLAG                  IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
243  ,P_REMAIN_EFFORT_ENABLE_FLAG       IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
244  ,P_PERCENT_COMP_ENABLE_FLAG        IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
245  ,P_NEXT_PROGRESS_UPDATE_DATE       IN DATE     := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
246  ,p_action_set_id                   IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
247  ,p_TASK_WEIGHT_BASIS_CODE          IN VARCHAR2  := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
248  ,P_PROJ_PROGRESS_ATTR_ID           IN NUMBER
249  ,p_record_version_number           IN NUMBER
250  ,p_allow_collab_prog_entry     IN      VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
251  ,p_allw_phy_prcnt_cmp_overrides IN     VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
252  ,p_structure_type		IN	VARCHAR2   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
253  ,x_return_status	      OUT 	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
254  ,x_msg_count	      OUT 	NOCOPY NUMBER --File.Sql.39 bug 4440895
255  ,x_msg_data	            OUT 	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
256 );
257 
258 PROCEDURE DELETE_PROJ_PROG_ATTR(
259   p_api_version	      IN	NUMBER	:=1.0
260  ,p_init_msg_list	      IN	VARCHAR2	:=FND_API.G_TRUE
261  ,p_commit	            IN	VARCHAR2	:=FND_API.G_FALSE
262  ,p_validate_only	      IN	VARCHAR2	:=FND_API.G_TRUE
263  ,p_validation_level	IN	NUMBER	:=FND_API.G_VALID_LEVEL_FULL
264  ,p_calling_module	      IN	VARCHAR2	:='SELF_SERVICE'
265  ,p_debug_mode	      IN	VARCHAR2	:='N'
266  ,p_max_msg_count	      IN	NUMBER	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
267  ,p_project_id                      IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
268  ,P_OBJECT_TYPE                     IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
269  ,P_OBJECT_ID                       IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
270  ,p_structure_type                  IN VARCHAR2 := 'WORKPLAN' -- Amit
271  ,x_return_status	      OUT 	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
272  ,x_msg_count	      OUT 	NOCOPY NUMBER --File.Sql.39 bug 4440895
273  ,x_msg_data	            OUT 	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
274 );
275 
276 PROCEDURE delete_progress_record(
277   p_api_version	      IN	NUMBER	:=1.0
278  ,p_init_msg_list	      IN	VARCHAR2	:=FND_API.G_TRUE
279  ,p_commit	            IN	VARCHAR2	:=FND_API.G_FALSE
280  ,p_validate_only	      IN	VARCHAR2	:=FND_API.G_TRUE
281  ,p_validation_level	IN	NUMBER	:=FND_API.G_VALID_LEVEL_FULL
282  ,p_calling_module	      IN	VARCHAR2	:='SELF_SERVICE'
283  ,p_debug_mode	      IN	VARCHAR2	:='N'
284  ,p_max_msg_count	      IN	NUMBER	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
285  ,p_structure_version_id         IN    NUMBER      := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
286  ,p_task_version_id              IN    NUMBER      := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
287  ,x_return_status	      OUT 	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
288  ,x_msg_count	      OUT 	NOCOPY NUMBER --File.Sql.39 bug 4440895
289  ,x_msg_data	            OUT 	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
290 );
291 
292 PROCEDURE push_down_task_status(
293   p_api_version       IN        NUMBER  :=1.0
294  ,p_init_msg_list             IN        VARCHAR2        :=FND_API.G_TRUE
295  ,p_commit                  IN  VARCHAR2        :=FND_API.G_FALSE
296  ,p_validate_only             IN        VARCHAR2        :=FND_API.G_TRUE
297  ,p_validation_level    IN      NUMBER  :=FND_API.G_VALID_LEVEL_FULL
298  ,p_calling_module            IN        VARCHAR2        :='SELF_SERVICE'
299  ,p_debug_mode        IN        VARCHAR2        :='N'
300  ,p_max_msg_count             IN        NUMBER  := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
301  ,p_task_status         IN    VARCHAR2
302  ,p_project_id                IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
303  ,p_object_id         IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
304  ,p_object_version_id    IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
305  ,p_object_type       IN Varchar2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
306  ,p_as_of_date          IN DATE   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
307  ,p_actual_finish_date  IN DATE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
308  ,p_structure_type      IN VARCHAR2 := 'WORKPLAN'
309  ,x_return_status             OUT       NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
310  ,x_msg_count         OUT       NOCOPY NUMBER --File.Sql.39 bug 4440895
311  ,x_msg_data                OUT         NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
312 );
313 
314 PROCEDURE ROLLUP_FUTURE_PROGRESS_PVT(
315  p_project_id              IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
316  ,P_OBJECT_TYPE            IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
317  ,P_OBJECT_ID              IN NUMBER   := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
318  ,p_object_version_id      IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
319  ,p_as_of_date             IN DATE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
320  ,p_lowest_level_task      IN VARCHAR2 := 'N'
321  ,p_calling_module	   IN VARCHAR2	:='SELF_SERVICE'
322  ,p_structure_type         IN   VARCHAR2        := 'WORKPLAN'
323  ,p_structure_version_id   IN   NUMBER		:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
324  ,p_fin_rollup_method      IN   VARCHAR2	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
325  ,p_wp_rollup_method       IN   VARCHAR2	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
326  ,p_rollup_entire_wbs      IN   VARCHAR2        := 'N' -- Bug 3606627
327  ,x_return_status           OUT       NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
328  ,x_msg_count               OUT       NOCOPY NUMBER --File.Sql.39 bug 4440895
329  ,x_msg_data                OUT         NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
330 );
331 
332 -- Update_PC_PARTY_MAERGE (PUBLIC)
333 --   This is the procedure being called during the Party Merge.
334 --   The input/output arguments format matches the document PartyMergeDD.doc.
335 --   The goal is to fix the PUBLISHED_BY_PARTY_ID in pa_percent_completes table to point to the
336 --   same party when two similar parties are begin merged.
337 --
338 -- Usage example in pl/sql
339 --   This procedure should only be called from the PartyMerge utility.
340 --
341 procedure Update_PC_PARTY_MERGE(p_entity_name in varchar2,
342                                 p_from_id in number,
343                         p_to_id in out nocopy number,
344                         p_from_fk_id in number,
345                         p_to_fk_id in number,
346                         p_parent_entity_name in varchar2,
347                         p_batch_id in number,
348                         p_batch_party_id in number,
349                         p_return_status in out nocopy varchar2);
350 
351 -- Progress Management Changes. Bug # 3420093.
352 
353 PROCEDURE apply_lp_prog_on_cwv(
354   p_api_version       		IN      NUMBER  	:=1.0
355  ,p_init_msg_list       	IN      VARCHAR2        :=FND_API.G_TRUE
356  ,p_commit              	IN  	VARCHAR2        :=FND_API.G_FALSE
357  ,p_validate_only       	IN      VARCHAR2        :=FND_API.G_TRUE
358  ,p_validation_level    	IN      NUMBER  	:=FND_API.G_VALID_LEVEL_FULL
359  ,p_calling_module      	IN      VARCHAR2        :='SELF_SERVICE'
360  ,p_debug_mode          	IN      VARCHAR2        :='N'
361  ,p_max_msg_count       	IN      NUMBER  	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
362  ,p_project_id			IN	NUMBER
363  ,p_working_str_version_id	IN	NUMBER
364  ,x_return_status     		OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
365  ,x_msg_count         		OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
366  ,x_msg_data            	OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
367 );
368 
369 -- Progress Management Changes. Bug # 3420093.
370 
371 PROCEDURE delete_working_wp_progress(
372   p_api_version       		IN      NUMBER  	:=1.0
373  ,p_init_msg_list       	IN      VARCHAR2        :=FND_API.G_TRUE
374  ,p_commit              	IN  	VARCHAR2        :=FND_API.G_FALSE
375  ,p_validate_only       	IN      VARCHAR2        :=FND_API.G_TRUE
376  ,p_validation_level    	IN      NUMBER  	:=FND_API.G_VALID_LEVEL_FULL
377  ,p_calling_module      	IN      VARCHAR2        :='SELF_SERVICE'
378  ,p_debug_mode          	IN      VARCHAR2        :='N'
379  ,p_max_msg_count       	IN      NUMBER  	:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
380  ,p_project_id                  IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
381  ,p_structure_version_id        IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
382  ,p_task_version_id             IN      SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.pa_num_tbl_type()
383  ,p_calling_context             IN      VARCHAR2        := 'STRUCTURE_VERSION'
384  ,x_return_status     		OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
385  ,x_msg_count         		OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
386  ,x_msg_data            	OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
387 );
388 
389 -- Progress Management Changes. Bug # 3420093.
390 
391 Procedure PULL_SUMMARIZED_ACTUALS (
392   p_api_version                 IN      NUMBER          :=1.0
393  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
394  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
395  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
396  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
397  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
398  ,p_debug_mode                  IN      VARCHAR2        :='N'
399  ,p_max_msg_count               IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
400    ,P_Project_ID        IN  NUMBER
401    ,P_Calling_Mode      IN  VARCHAR2
402    ,x_return_status     OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
403    ,x_msg_count         OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
404    ,x_msg_data          OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
405   );
406 
407 -- Progress Management Changes. Bug # 3420093.
408 
409 PROCEDURE update_progress(
410   p_api_version                 IN      NUMBER          :=1.0
411  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
412  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
413  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
414  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
415  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
416  ,p_debug_mode                  IN      VARCHAR2        :='N'
417  ,p_max_msg_count               IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
418  ,p_action			IN	VARCHAR2	:='SAVE'
419  ,P_rollup_entire_wbs_flag	IN	VARCHAR2	:='N'
420  ,p_progress_mode		IN	VARCHAR2	:='FUTURE'
421  ,p_percent_complete_id		IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
422  ,p_project_id			IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
423  ,p_object_id			IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
424  ,p_object_version_id		IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
425  ,p_object_type			IN	VARCHAR2	:='PA_TASKS'
426  ,p_as_of_date			IN	DATE		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
427  ,p_percent_complete		IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
428  ,p_progress_status_code	IN	VARCHAR2	:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
429  ,p_progress_comment		IN	VARCHAR2	:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
430  ,p_brief_overview		IN	VARCHAR2	:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
431  ,p_actual_start_date		IN	DATE		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
432  ,p_actual_finish_date		IN	DATE		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
433  ,p_estimated_start_date	IN	DATE		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
434  ,p_estimated_finish_date	IN	DATE		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
435  ,p_scheduled_start_date	IN	DATE		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
436  ,p_scheduled_finish_date	IN	DATE		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
437  ,p_record_version_number	IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
438  ,p_task_status			    IN	VARCHAR2	:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
439  ,p_est_remaining_effort	IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
440  ,p_ETC_cost                IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
441  ,p_actual_work_quantity	IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
442  ,p_pm_product_code		    IN	VARCHAR2	:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
443  ,p_structure_type		    IN	VARCHAR2	:='WORKPLAN'
444  ,p_actual_effort		IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
445  ,p_actual_cost			IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
446  ,p_actual_effort_this_period   IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
447  ,p_actual_cost_this_period     IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
448  ,p_object_sub_type		IN	VARCHAR2	:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
449  ,p_task_id			IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
450  ,p_structure_version_id	IN	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
451  ,p_prog_fom_wp_flag		IN	VARCHAR2	:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
452  ,p_rollup_reporting_lines_flag	IN	VARCHAR2	:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
453  ,p_planned_cost                IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
454  ,p_planned_effort              IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
455  ,p_rate_based_flag             IN      VARCHAR         := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
456  ,p_resource_class_code         IN      VARCHAR         := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
457  ,p_transfer_wp_pc_flag         IN      VARCHAR         := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
458  ,p_txn_currency_code           IN      VARCHAR2        := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
459  ,p_rbs_element_id              IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
460 -- ,p_resource_list_member_id     IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM -- Bug 3764224
461  ,p_resource_assignment_id    IN        NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM  -- Bug 3764224
462  ,p_eff_rollup_percent_complete  IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM  --    3910193
463  ,x_return_status               OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
464  ,x_msg_count                   OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
465  ,x_msg_data                    OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
466 );
467 
468 -- Progress Management Changes. Bug # 3420093.
469 
470 PROCEDURE populate_pji_tab_for_plan(
471   p_api_version                 IN      NUMBER          :=1.0
472  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
473  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
474  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
475  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
476  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
477  ,p_debug_mode                  IN      VARCHAR2        :='N'
478  ,p_max_msg_count               IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
479  ,p_project_id                  IN      NUMBER
480 ,p_project_element_id           IN      NUMBER   DEFAULT NULL  --bug 4183307
481 ,p_structure_version_id         IN      NUMBER   DEFAULT NULL
482 ,p_baselined_str_ver_id         IN      NUMBER   DEFAULT NULL
483 ,p_structure_type               IN      VARCHAR2        := 'WORKPLAN' -- Bug 3627315
484 ,p_populate_tmp_tab_flag        IN      VARCHAR2        := 'Y'   --bug 4290593
485 ,p_program_rollup_flag		IN      VARCHAR2        := 'Y'   --bug 4392189
486 ,p_calling_context		IN      VARCHAR2        := 'ROLLUP'  -- bug 4392189 , Possible values are ROLLUP and SUMMARIZE
487 ,p_as_of_date			IN      DATE		:= null  -- bug 4392189
488 ,x_return_status           OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
489 ,x_msg_count               OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
490 ,x_msg_data                OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
491 );
492 
493 PROCEDURE push_workplan_actuals(
494   p_api_version                 IN      NUMBER          :=1.0
495  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
496  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
497  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
498  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
499  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
500  ,p_debug_mode                  IN      VARCHAR2        :='N'
501  ,p_max_msg_count               IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
502  ,p_project_Id				NUMBER
503  ,p_structure_version_id		NUMBER
504  ,p_proj_element_id			NUMBER
505  ,p_object_id				NUMBER
506  ,p_object_type				VARCHAR2
507  ,p_as_of_date				DATE
508  ,p_resource_assignment_id		NUMBER		:=null -- Bug 4186007
509  ,p_resource_list_member_id		NUMBER		:=null-- Bug 4186007
510  ,p_rbs_element_id			NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
511  ,p_rate_based_flag			VARCHAR2	:= 'Y' -- Default for Task
512  ,p_resource_class_code			VARCHAR2	:='PEOPLE' -- Default for Task
513 -- ,p_TXN_CURRENCY_CODE			VARCHAR2	:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR Bug 3595585 Removed not needed
514  ,p_act_TXN_COST_this_period		NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
515  ,p_act_PRJ_COST_this_period		NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
516  ,p_act_POU_COST_this_period		NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
517  ,p_act_effort_this_period		NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
518  ,p_etc_TXN_COST_this_period		NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM-- Bug 3595585
519  ,p_etc_PRJ_COST_this_period		NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM-- Bug 3595585
520  ,p_etc_POU_COST_this_period		NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM-- Bug 3595585
521  ,p_etc_effort_this_period		NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM-- Bug 3595585
522  ,p_call_pji_apis_flag          	VARCHAR2 	:= 'Y'
523  ,p_act_TXN_raw_COST_this_period	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM -- Bug 3621404
524  ,p_act_PRJ_raw_COST_this_period	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM -- Bug 3621404
525  ,p_act_POU_raw_COST_this_period	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM -- Bug 3621404
526  ,p_etc_TXN_raw_COST_this_period	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM -- Bug 3621404
527  ,p_etc_PRJ_raw_COST_this_period	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM -- Bug 3621404
528  ,p_etc_POU_raw_COST_this_period	NUMBER		:=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM -- Bug 3621404
529  -- BUG # 3659659.
530  ,p_txn_currency_code                   VARCHAR2        := null
531  ,p_prj_currency_code                   VARCHAR2        := null
532  ,p_pfn_currency_code                   VARCHAR2        := null
533  -- BUG # 3659659.
534 --bug3675107
535  ,p_pa_period_name                      VARCHAR2    :=null
536  ,p_gl_period_name                      VARCHAR2    :=null
537 --bug3675107
538  ,x_return_status		OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
539  ,x_msg_count			OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
540  ,x_msg_data			OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
541 );
542 
543 -- Progress Management Change for bug # 3420093.
544 
545 PROCEDURE program_rollup_pvt(
546   p_api_version                 IN      NUMBER          :=1.0
547  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
548  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
549  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
550  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
551  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
552  ,p_debug_mode                  IN      VARCHAR2        :='N'
553  ,p_max_msg_count               IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
554  ,p_project_id                  IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
555  ,p_as_of_date                  IN      DATE            := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
556  ,p_structure_type              IN      VARCHAR2        := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
557  ,p_structure_ver_id            IN      NUMBER	        := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
558  ,x_return_status               OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
559  ,x_msg_count                   OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
560  ,x_msg_data                    OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
561 );
562 
563 PROCEDURE transfer_wp_percent_to_fin(
564   p_api_version                 IN      NUMBER          :=1.0
565  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
566  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
567  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
568  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
569  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
570  ,p_debug_mode                  IN      VARCHAR2        :='N'
571  ,p_max_msg_count               IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
572  ,p_project_id                  IN      NUMBER
573  ,x_return_status               OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
574  ,x_msg_count                   OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
575  ,x_msg_data                    OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
576 );
577 
578 PROCEDURE publish_progress(
579   p_api_version                 IN      NUMBER          :=1.0
580  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
581  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
582  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
583  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
584  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
585  ,p_debug_mode                  IN      VARCHAR2        :='N'
586  ,p_max_msg_count               IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
587  ,p_project_id                  IN      NUMBER
588  ,p_working_str_ver_id          IN      NUMBER    -- Bug 4190086
589  ,p_pub_structure_version_id    IN      NUMBER          -- Bug 3839288
590  ,x_upd_new_elem_ver_id_flag    OUT     NOCOPY VARCHAR2    -- BUG 3951024, rtarway --File.Sql.39 bug 4440895
591  ,x_as_of_date			       OUT     NOCOPY DATE		-- Bug 3839288	 --File.Sql.39 bug 4440895
592  ,x_task_weight_basis_code      OUT     NOCOPY VARCHAR2	-- Bug 3839288	 --File.Sql.39 bug 4440895
593  ,x_return_status               OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
594  ,x_msg_count                   OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
595  ,x_msg_data                    OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
596 );
597 
598 PROCEDURE GET_SUMMARIZED_ACTUALS(p_project_id_list   IN  SYSTEM.pa_num_tbl_type,
599                                  p_extraction_type   IN  VARCHAR2,
600                                  p_plan_res_level    IN  VARCHAR2,
601                                  p_proj_pgm_level    IN  SYSTEM.pa_num_tbl_type:= SYSTEM.pa_num_tbl_type(),
602                                  x_return_status     OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
603                                  x_msg_count         OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
604                                  x_msg_data          OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
605 -- Start of comments
606 --      API name        : UPDATE_FINANCIAL_TASK_PROGRESS
607 --      Type            : Public
608 --      Purpose         : Updates Financial Percent Complete
609 --      Parameters Desc :
610 --	p_object_type			PA_TASKS
611 --	p_as_of_date			The as_of_date for which progress to be entered
612 --	p_object_version_id		The task version id
613 --	p_structure_version_id	        Structure version id of the publsihed or working structure version
614 --      p_progress_comment              Progress comment
615 --      p_brief_overview		Brief Overview
616 --	p_structure_type		FINANCIAL
617 --	p_rollup_entire_wbs		To indicate if it requires the whole structure rollup, in this
618 --					case it will ignore the passed object and starts with the lowest
619 --					task
620 --      History         : 29-MAR-04  sdnambia   Written For FPM Development Tracking Bug 3420093
621 -- End of comments
622 
623 -- FPM Dev CR 1 : Added Following Procedure
624 PROCEDURE UPDATE_FINANCIAL_TASK_PROGRESS(
625   p_api_version                 IN      NUMBER          :=1.0
626  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
627  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
628  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
629  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
630  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
631  ,p_debug_mode                  IN      VARCHAR2        :='N'
632  ,p_max_msg_count               IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
633  ,p_action                      IN      VARCHAR2        :='SAVE'
634  ,P_rollup_entire_wbs_flag      IN      VARCHAR2        :='N'
635  ,p_progress_mode               IN      VARCHAR2        :='FUTURE'
636  ,p_percent_complete_id         IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
637  ,p_project_id                  IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
638  ,p_object_id                   IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
639  ,p_object_version_id           IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
640  ,p_object_type                 IN      VARCHAR2        :='PA_TASKS'
641  ,p_as_of_date                  IN      DATE            :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
642  ,p_percent_complete            IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
643  ,p_progress_status_code        IN      VARCHAR2        :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
644  ,p_progress_comment            IN      VARCHAR2        :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
645  ,p_brief_overview              IN      VARCHAR2        :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
646  ,p_record_version_number       IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
647  ,p_pm_product_code             IN      VARCHAR2        :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
648  ,p_structure_type              IN      VARCHAR2        :='FINANCIAL'
649  ,p_task_id                     IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
650  ,p_structure_version_id        IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
651  ,x_return_status               OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
652  ,x_msg_count                   OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
653  ,x_msg_data                    OUT     NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
654 
655 -- Progress Management Changes. Bug # 3420093.
656 
657 PROCEDURE re_rollup_progress(
658   p_api_version                 IN      NUMBER          :=1.0
659  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
660  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
661  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
662  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
663  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
664  ,p_debug_mode                  IN      VARCHAR2        :='N'
665  ,p_max_msg_count               IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
666  ,p_project_id                  IN      NUMBER
667  ,p_structure_version_id      	IN      NUMBER
668  ,x_return_status               OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
669  ,x_msg_count                   OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
670  ,x_msg_data                    OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
671 );
672 
673 -- Bug 3633293 : Added populate_bulk_pji_tab_for_plan
674 PROCEDURE populate_bulk_pji_tab_for_plan(
675   p_api_version                 IN      NUMBER          :=1.0
676  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
677  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
678  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
679  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
680  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
681  ,p_debug_mode                  IN      VARCHAR2        :='N'
682  ,p_max_msg_count               IN      NUMBER          :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
683  ,p_person_id				NUMBER
684  ,x_return_status		OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
685  ,x_msg_count			OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
686  ,x_msg_data			OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
687 );
688 
689 -- Start of comments
690 --      API name        : ASGN_DLV_TO_TASK_ROLLUP_PVT
691 --      Type            : Private
692 --      Pre-reqs        : None.
693 --      Purpose         : This API is intdended to be called for Assignment, Deliverables in Task Progress Details page when user clicks Recalculate button
694 --                      : This does partial rollup of working progress records
695 --      History         : 15-JUNE-04  amksingh   Rewritten For FPM Development Bug 3614828
696 -- End of comments
697 
698 PROCEDURE ASGN_DLV_TO_TASK_ROLLUP_PVT(
699  p_api_version                          IN      NUMBER          :=1.0
700 ,p_init_msg_list                        IN      VARCHAR2        :=FND_API.G_FALSE -- Since it is a private API so false
701 ,p_commit                               IN      VARCHAR2        :=FND_API.G_FALSE
702 ,p_validate_only                        IN      VARCHAR2        :=FND_API.G_TRUE
703 ,p_validation_level                     IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
704 ,p_calling_module                       IN      VARCHAR2        :='SELF_SERVICE'
705 ,p_debug_mode                           IN      VARCHAR2        :='N'
706 ,p_max_msg_count                        IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
707 ,p_project_id                           IN      NUMBER
708 ,p_task_id				IN      NUMBER
709 ,p_task_version_id                      IN      NUMBER
710 ,p_as_of_date                           IN      DATE
711 ,p_structure_version_id                 IN      NUMBER
712 ,p_wp_rollup_method                     IN      VARCHAR2        := 'COST'
713 ,x_return_status                        OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
714 ,x_msg_count                            OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
715 ,x_msg_data                             OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
716 );
717 
718 -- Start of comments
719 --      API name        : COPY_PROGRESS_ACT_ETC
720 --      Type            : Private
721 --      Pre-reqs        : None.
722 --      Purpose         : This API is intdended to be used for copying actuals and etc from one structure
723 --                        version to another. If there is no progress records exists then the api pass null
724 --                        for act and etc.
725 --      History         : 30-JUNE-04  Rakesh Raghavan  Rewritten For FPM Development Bug
726 --                        28-JUL-2004 Rakesh Raghavan  Added parameter: p_last_pub_str_version_id.
727 -- End of comments
728 
729 PROCEDURE COPY_PROGRESS_ACT_ETC(
730  p_api_version              IN      NUMBER          :=1.0
731 ,p_init_msg_list            IN      VARCHAR2        :=FND_API.G_FALSE -- FALSE for private API.
732 ,p_commit                   IN      VARCHAR2        :=FND_API.G_FALSE
733 ,p_validate_only            IN      VARCHAR2        :=FND_API.G_TRUE
734 ,p_validation_level         IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
735 ,p_calling_module           IN      VARCHAR2        :='SELF_SERVICE'
736 ,p_debug_mode               IN      VARCHAR2        :='N'
737 ,p_max_msg_count            IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
738 ,p_project_id               IN      NUMBER
739 ,p_src_str_ver_id           IN      NUMBER
740 ,p_dst_str_ver_id           IN      NUMBER
741 ,p_pub_wp_with_prog_flag    IN      VARCHAR2        := 'Y'
742 ,p_calling_context          IN      VARCHAR2        := 'PUBLISH'
743 ,p_last_pub_str_version_id  IN	    NUMBER	    := NULL
744 ,p_copy_actuals_flag        IN      VARCHAR2        := 'Y'
745 ,p_copy_ETC_flag            IN      VARCHAR2        := 'Y'
746 ,p_pji_conc_prog_context    IN	    VARCHAR2	    := 'N' -- Fix for Bug # 3996159.
747 ,x_return_status            OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
748 ,x_msg_count                OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
749 ,x_msg_data                 OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
750 );
751 
752 -- Bug 3807299 : new API which will be called from update_progress and AMG pa_status_pub.update_progress
753 PROCEDURE update_link_proj_rollup_dates(
754   p_api_version                 IN      NUMBER          :=1.0
755  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
756  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
757  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
758  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
759  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
760  ,p_project_id                  IN      NUMBER
761  ,p_task_id			IN      NUMBER
762  ,p_task_version_id		IN      NUMBER
763  ,p_as_of_date                  IN      DATE
764  ,p_structure_version_id        IN      NUMBER
765  ,x_return_status               OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
766  ,x_msg_count                   OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
767  ,x_msg_data                    OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
768 );
769 
770 PROCEDURE UPDATE_PROGRESS_BULK(
771   p_api_version				IN      NUMBER					:=1.0
772  ,p_init_msg_list			IN      VARCHAR2				:=FND_API.G_TRUE
773  ,p_commit				IN      VARCHAR2				:=FND_API.G_FALSE
774  ,p_validate_only			IN      VARCHAR2				:=FND_API.G_TRUE
775  ,p_validation_level			IN      NUMBER					:=FND_API.G_VALID_LEVEL_FULL
776  ,p_calling_module			IN      VARCHAR2				:='SELF_SERVICE'
777  ,p_calling_mode			IN      VARCHAR2				:= null
778  ,p_debug_mode				IN      VARCHAR2				:='N'
779  ,p_max_msg_count			IN      NUMBER					:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
780  ,p_action				IN      VARCHAR2				:='SAVE'
781  ,p_rollup_entire_wbs_flag		IN      VARCHAR2				:='N'
782  ,p_progress_mode			IN      VARCHAR2				:='FUTURE'
783  ,p_pm_product_code			IN      VARCHAR2				:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
784  ,p_structure_type			IN      VARCHAR2				:= 'WORKPLAN'
785  ,p_project_id_tbl			IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
786  ,p_object_id_tbl			IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
787  ,p_object_version_id_tbl		IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
788  ,p_object_type_tbl			IN      SYSTEM.pa_varchar2_30_tbl_type		:= SYSTEM.pa_varchar2_30_tbl_type()
789  ,p_task_id_tbl				IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
790  ,p_structure_version_id_tbl		IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
791  ,p_as_of_date_tbl			IN      SYSTEM.pa_date_tbl_type			:= SYSTEM.pa_date_tbl_type()
792  ,p_rbs_element_id_tbl            	IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
793  ,p_resource_assignment_id_tbl		IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
794  ,p_rate_based_flag_tbl        		IN      SYSTEM.pa_varchar2_1_tbl_type		:= SYSTEM.pa_varchar2_1_tbl_type()
795  ,p_resource_class_code_tbl 		IN      SYSTEM.pa_varchar2_30_tbl_type		:= SYSTEM.pa_varchar2_30_tbl_type()
796  ,p_txn_currency_code_tbl      		IN      SYSTEM.pa_varchar2_30_tbl_type		:= SYSTEM.pa_varchar2_30_tbl_type()
797  ,p_percent_complete_id_tbl		IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
798  ,p_record_version_number_tbl		IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
799  ,p_percent_complete_tbl		IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
800  ,p_eff_rup_percent_complete_tbl	IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
801  ,p_task_status_tbl			IN      SYSTEM.pa_varchar2_150_tbl_type		:= SYSTEM.pa_varchar2_150_tbl_type()
802  ,p_progress_status_code_tbl		IN      SYSTEM.pa_varchar2_30_tbl_type		:= SYSTEM.pa_varchar2_30_tbl_type()
803  ,p_progress_comment_tbl		IN      SYSTEM.pa_varchar2_2000_tbl_type	:= SYSTEM.pa_varchar2_2000_tbl_type()
804  ,p_brief_overview_tbl			IN      SYSTEM.pa_varchar2_240_tbl_type		:= SYSTEM.pa_varchar2_240_tbl_type()
805  ,p_actual_start_date_tbl		IN      SYSTEM.pa_date_tbl_type			:= SYSTEM.pa_date_tbl_type()
806  ,p_actual_finish_date_tbl		IN      SYSTEM.pa_date_tbl_type			:= SYSTEM.pa_date_tbl_type()
807  ,p_estimated_start_date_tbl		IN      SYSTEM.pa_date_tbl_type			:= SYSTEM.pa_date_tbl_type()
808  ,p_estimated_finish_date_tbl		IN      SYSTEM.pa_date_tbl_type			:= SYSTEM.pa_date_tbl_type()
809  ,p_scheduled_start_date_tbl		IN      SYSTEM.pa_date_tbl_type			:= SYSTEM.pa_date_tbl_type()
810  ,p_scheduled_finish_date_tbl		IN      SYSTEM.pa_date_tbl_type			:= SYSTEM.pa_date_tbl_type()
811  ,p_est_remaining_effort_tbl		IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
812  ,p_etc_cost_tbl			IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
813  ,p_actual_work_quantity_tbl		IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
814  ,p_actual_effort_tbl			IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
815  ,p_actual_cost_tbl			IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
816  ,p_act_eff_this_period_tbl		IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
817  ,p_actual_cost_this_period_tbl		IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
818  ,p_planned_cost_tbl			IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
819  ,p_planned_effort_tbl			IN      SYSTEM.pa_num_tbl_type			:= SYSTEM.pa_num_tbl_type()
820  ,x_return_status			OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
821  ,x_msg_count				OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
822  ,x_msg_data				OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
823 );
824 
825 -- Begin fix for Bug # 4262985.
826 
827 PROCEDURE apply_lp_prog_on_cwv_wrp(
828   p_api_version                 IN      NUMBER          :=1.0
829  ,p_init_msg_list               IN      VARCHAR2        :=FND_API.G_TRUE
830  ,p_commit                      IN      VARCHAR2        :=FND_API.G_FALSE
831  ,p_validate_only               IN      VARCHAR2        :=FND_API.G_TRUE
832  ,p_validation_level            IN      NUMBER          :=FND_API.G_VALID_LEVEL_FULL
833  ,p_calling_module              IN      VARCHAR2        :='SELF_SERVICE'
834  ,p_debug_mode                  IN      VARCHAR2        :='N'
835  ,p_max_msg_count               IN      NUMBER          := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
836  ,p_project_id                  IN      NUMBER
837  ,p_working_str_version_id      IN      NUMBER
838  ,x_return_status               OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
839  ,x_msg_count                   OUT     NOCOPY NUMBER --File.Sql.39 bug 4440895
840  ,x_msg_data                    OUT     NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
841 );
842 
843 -- End fix for Bug # 4262985.
844 
845 end PA_PROGRESS_PUB;