[Home] [Help]
PACKAGE BODY: APPS.PA_PROJ_ELEMENT_SCH_PKG
Source
1 PACKAGE BODY PA_PROJ_ELEMENT_SCH_PKG AS
2 /* $Header: PATSKT3B.pls 120.1 2005/08/19 17:06:05 mwasowic noship $ */
3
4 PROCEDURE Insert_Row(
5 X_ROW_ID IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
6 X_PEV_SCHEDULE_ID IN OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
7 X_ELEMENT_VERSION_ID NUMBER,
8 X_PROJECT_ID NUMBER,
9 X_PROJ_ELEMENT_ID NUMBER,
10 X_SCHEDULED_START_DATE DATE,
11 X_SCHEDULED_FINISH_DATE DATE,
12 X_OBLIGATION_START_DATE DATE,
13 X_OBLIGATION_FINISH_DATE DATE,
14 X_ACTUAL_START_DATE DATE,
15 X_ACTUAL_FINISH_DATE DATE,
16 X_ESTIMATED_START_DATE DATE,
17 X_ESTIMATED_FINISH_DATE DATE,
18 X_DURATION NUMBER,
19 X_EARLY_START_DATE DATE,
20 X_EARLY_FINISH_DATE DATE,
21 X_LATE_START_DATE DATE,
22 X_LATE_FINISH_DATE DATE,
23 X_CALENDAR_ID NUMBER,
24 X_MILESTONE_FLAG VARCHAR2,
25 X_CRITICAL_FLAG VARCHAR2,
26 X_WQ_PLANNED_QUANTITY NUMBER,
27 X_PLANNED_EFFORT NUMBER,
28 X_ACTUAL_DURATION NUMBER,
29 X_ESTIMATED_DURATION NUMBER,
30 --bug 3305199 schedule options
31 X_def_sch_tool_tsk_type_code IN VARCHAR2 := NULL,
32 X_constraint_type_code IN VARCHAR2 := NULL,
33 X_constraint_date IN DATE := NULL,
34 X_free_slack IN NUMBER := NULL,
35 X_total_slack IN NUMBER := NULL,
36 X_effort_driven_flag IN VARCHAR2 := 'N',
37 X_level_assignments_flag IN VARCHAR2 := 'N',
38 --end bug 3305199
39 X_ext_act_duration IN NUMBER := NULL,
40 X_ext_remain_duration IN NUMBER := NULL,
41 X_ext_sch_duration IN NUMBER := NULL,
42 x_source_object_id IN NUMBER:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM, --Bug No 3594635 SMukka
43 x_source_object_type IN VARCHAR2:= PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR, --Bug No 3594635 SMukka
44 X_attribute_category IN pa_proj_elem_ver_schedule.attribute_category%TYPE := NULL,
45 X_attribute1 IN pa_proj_elem_ver_schedule.attribute1%TYPE := NULL,
46 X_attribute2 IN pa_proj_elem_ver_schedule.attribute2%TYPE := NULL,
47 X_attribute3 IN pa_proj_elem_ver_schedule.attribute3%TYPE := NULL,
48 X_attribute4 IN pa_proj_elem_ver_schedule.attribute4%TYPE := NULL,
49 X_attribute5 IN pa_proj_elem_ver_schedule.attribute5%TYPE := NULL,
50 X_attribute6 IN pa_proj_elem_ver_schedule.attribute6%TYPE := NULL,
51 X_attribute7 IN pa_proj_elem_ver_schedule.attribute7%TYPE := NULL,
52 X_attribute8 IN pa_proj_elem_ver_schedule.attribute8%TYPE := NULL,
53 X_attribute9 IN pa_proj_elem_ver_schedule.attribute9%TYPE := NULL,
54 X_attribute10 IN pa_proj_elem_ver_schedule.attribute10%TYPE := NULL,
55 X_attribute11 IN pa_proj_elem_ver_schedule.attribute11%TYPE := NULL,
56 X_attribute12 IN pa_proj_elem_ver_schedule.attribute12%TYPE := NULL,
57 X_attribute13 IN pa_proj_elem_ver_schedule.attribute13%TYPE := NULL,
58 X_attribute14 IN pa_proj_elem_ver_schedule.attribute14%TYPE := NULL,
59 X_attribute15 IN pa_proj_elem_ver_schedule.attribute15%TYPE := NULL
60 ) IS
61 CURSOR cur_elem_ver_sch
62 IS
63 SELECT pa_proj_elem_ver_schedule_s.nextval
64 FROM sys.dual;
65 BEGIN
66 IF X_PEV_SCHEDULE_ID IS NULL
67 THEN
68 OPEN cur_elem_ver_sch;
69 FETCH cur_elem_ver_sch INTO X_PEV_SCHEDULE_ID;
70 CLOSE cur_elem_ver_sch;
71 END IF;
72 INSERT INTO pa_proj_elem_ver_schedule(
73 PEV_SCHEDULE_ID
74 ,ELEMENT_VERSION_ID
75 ,PROJECT_ID
76 ,PROJ_ELEMENT_ID
77 ,SCHEDULED_START_DATE
78 ,SCHEDULED_FINISH_DATE
79 ,OBLIGATION_START_DATE
80 ,OBLIGATION_FINISH_DATE
81 ,ACTUAL_START_DATE
82 ,ACTUAL_FINISH_DATE
83 ,ESTIMATED_START_DATE
84 ,ESTIMATED_FINISH_DATE
85 ,DURATION
86 ,EARLY_START_DATE
87 ,EARLY_FINISH_DATE
88 ,LATE_START_DATE
89 ,LATE_FINISH_DATE
90 ,CALENDAR_ID
91 ,MILESTONE_FLAG
92 ,CRITICAL_FLAG
93 ,CREATION_DATE
94 ,CREATED_BY
95 ,LAST_UPDATE_DATE
96 ,LAST_UPDATED_BY
97 ,LAST_UPDATE_LOGIN
98 ,RECORD_VERSION_NUMBER
99 ,WQ_PLANNED_QUANTITY
100 ,PLANNED_EFFORT
101 ,ACTUAL_DURATION
102 ,ESTIMATED_DURATION
103 ,attribute_category
104 ,attribute1
105 ,attribute2
106 ,attribute3
107 ,attribute4
108 ,attribute5
109 ,attribute6
110 ,attribute7
111 ,attribute8
112 ,attribute9
113 ,attribute10
114 ,attribute11
115 ,attribute12
116 ,attribute13
117 ,attribute14
118 ,attribute15
119 ,DEF_SCH_TOOL_TSK_TYPE_CODE
120 ,CONSTRAINT_TYPE_CODE
121 ,CONSTRAINT_DATE
122 ,FREE_SLACK
123 ,TOTAL_SLACK
124 ,EFFORT_DRIVEN_FLAG
125 ,LEVEL_ASSIGNMENTS_FLAG
126 ,ext_act_duration
127 ,ext_remain_duration
128 ,ext_sch_duration
129 ,source_object_id --Bug No 3594635 SMukka
130 ,source_object_type --Bug No 3594635 SMukka
131 )
132 VALUES (
133 X_PEV_SCHEDULE_ID
134 ,X_ELEMENT_VERSION_ID
135 ,X_PROJECT_ID
136 ,X_PROJ_ELEMENT_ID
137 ,X_SCHEDULED_START_DATE
138 ,X_SCHEDULED_FINISH_DATE
139 ,X_OBLIGATION_START_DATE
140 ,X_OBLIGATION_FINISH_DATE
141 ,X_ACTUAL_START_DATE
142 ,X_ACTUAL_FINISH_DATE
143 ,X_ESTIMATED_START_DATE
144 ,X_ESTIMATED_FINISH_DATE
145 ,X_DURATION
146 ,X_EARLY_START_DATE
147 ,X_EARLY_FINISH_DATE
148 ,X_LATE_START_DATE
149 ,X_LATE_FINISH_DATE
150 ,X_CALENDAR_ID
151 ,X_MILESTONE_FLAG
152 ,X_CRITICAL_FLAG
153 ,SYSDATE --CREATION_DATE
154 ,FND_GLOBAL.USER_ID --CREATED_BY
155 ,SYSDATE --LAST_UPDATE_DATE
156 ,FND_GLOBAL.USER_ID --LAST_UPDATED_BY
157 ,FND_GLOBAL.LOGIN_ID --LAST_UPDATE_LOGIN
158 ,1 --RECORD_VERSION_NUMBER
159 ,X_WQ_PLANNED_QUANTITY
160 ,X_PLANNED_EFFORT
161 ,X_ACTUAL_DURATION
162 ,X_ESTIMATED_DURATION
163 ,X_attribute_category
164 ,X_attribute1
165 ,X_attribute2
166 ,X_attribute3
167 ,X_attribute4
168 ,X_attribute5
169 ,X_attribute6
170 ,X_attribute7
171 ,X_attribute8
172 ,X_attribute9
173 ,X_attribute10
174 ,X_attribute11
175 ,X_attribute12
176 ,X_attribute13
177 ,X_attribute14
178 ,X_attribute15
179 ,X_def_sch_tool_tsk_type_code
180 ,X_constraint_type_code
181 ,X_constraint_date
182 ,X_free_slack
183 ,X_total_slack
184 ,X_effort_driven_flag
185 ,X_level_assignments_flag
186 ,X_ext_act_duration
187 ,X_ext_remain_duration
188 ,X_ext_sch_duration
189 ,x_source_object_id --Bug No 3594635 SMukka
190 ,x_source_object_type --Bug No 3594635 SMukka
191 );
192
193 END INsert_Row;
194
195 PROCEDURE Update_Row(
196 X_ROW_ID IN VARCHAR2,
197 X_PEV_SCHEDULE_ID NUMBER,
198 X_ELEMENT_VERSION_ID NUMBER,
199 X_PROJECT_ID NUMBER,
200 X_PROJ_ELEMENT_ID NUMBER,
201 X_SCHEDULED_START_DATE DATE,
202 X_SCHEDULED_FINISH_DATE DATE,
203 X_OBLIGATION_START_DATE DATE,
204 X_OBLIGATION_FINISH_DATE DATE,
205 X_ACTUAL_START_DATE DATE,
206 X_ACTUAL_FINISH_DATE DATE,
207 X_ESTIMATED_START_DATE DATE,
208 X_ESTIMATED_FINISH_DATE DATE,
209 X_DURATION NUMBER,
210 X_EARLY_START_DATE DATE,
211 X_EARLY_FINISH_DATE DATE,
212 X_LATE_START_DATE DATE,
213 X_LATE_FINISH_DATE DATE,
214 X_CALENDAR_ID NUMBER,
215 X_MILESTONE_FLAG VARCHAR2,
216 X_CRITICAL_FLAG VARCHAR2,
217 X_WQ_PLANNED_QUANTITY NUMBER,
218 X_PLANNED_EFFORT NUMBER,
219 X_ACTUAL_DURATION NUMBER,
220 X_ESTIMATED_DURATION NUMBER,
221 --bug 3305199 schedule options
222 X_def_sch_tool_tsk_type_code IN VARCHAR2 := NULL,
223 X_constraint_type_code IN VARCHAR2 := NULL,
224 X_constraint_date IN DATE := NULL,
225 X_free_slack IN NUMBER := NULL,
226 X_total_slack IN NUMBER := NULL,
227 X_effort_driven_flag IN VARCHAR2 := 'N',
228 X_level_assignments_flag IN VARCHAR2 := 'N',
229 --end bug 3305199
230 X_RECORD_VERSION_NUMBER NUMBER,
231 X_ext_act_duration IN NUMBER := NULL,
232 X_ext_remain_duration IN NUMBER := NULL,
233 X_ext_sch_duration IN NUMBER := NULL,
234 X_attribute_category IN pa_proj_elem_ver_schedule.attribute_category%TYPE := NULL,
235 X_attribute1 IN pa_proj_elem_ver_schedule.attribute1%TYPE := NULL,
236 X_attribute2 IN pa_proj_elem_ver_schedule.attribute2%TYPE := NULL,
237 X_attribute3 IN pa_proj_elem_ver_schedule.attribute3%TYPE := NULL,
238 X_attribute4 IN pa_proj_elem_ver_schedule.attribute4%TYPE := NULL,
239 X_attribute5 IN pa_proj_elem_ver_schedule.attribute5%TYPE := NULL,
240 X_attribute6 IN pa_proj_elem_ver_schedule.attribute6%TYPE := NULL,
241 X_attribute7 IN pa_proj_elem_ver_schedule.attribute7%TYPE := NULL,
242 X_attribute8 IN pa_proj_elem_ver_schedule.attribute8%TYPE := NULL,
243 X_attribute9 IN pa_proj_elem_ver_schedule.attribute9%TYPE := NULL,
244 X_attribute10 IN pa_proj_elem_ver_schedule.attribute10%TYPE := NULL,
245 X_attribute11 IN pa_proj_elem_ver_schedule.attribute11%TYPE := NULL,
246 X_attribute12 IN pa_proj_elem_ver_schedule.attribute12%TYPE := NULL,
247 X_attribute13 IN pa_proj_elem_ver_schedule.attribute13%TYPE := NULL,
248 X_attribute14 IN pa_proj_elem_ver_schedule.attribute14%TYPE := NULL,
249 X_attribute15 IN pa_proj_elem_ver_schedule.attribute15%TYPE := NULL
250 ) IS
251 BEGIN
252 UPDATE pa_proj_elem_ver_schedule
253 SET PEV_SCHEDULE_ID = X_PEV_SCHEDULE_ID
254 ,ELEMENT_VERSION_ID = X_ELEMENT_VERSION_ID
255 ,PROJECT_ID = X_PROJECT_ID
256 ,PROJ_ELEMENT_ID = X_PROJ_ELEMENT_ID
257 ,SCHEDULED_START_DATE = X_SCHEDULED_START_DATE
258 ,SCHEDULED_FINISH_DATE = X_SCHEDULED_FINISH_DATE
259 ,OBLIGATION_START_DATE = X_OBLIGATION_START_DATE
260 ,OBLIGATION_FINISH_DATE = X_OBLIGATION_FINISH_DATE
261 ,ACTUAL_START_DATE = X_ACTUAL_START_DATE
262 ,ACTUAL_FINISH_DATE = X_ACTUAL_FINISH_DATE
263 ,ESTIMATED_START_DATE = X_ESTIMATED_START_DATE
264 ,ESTIMATED_FINISH_DATE = X_ESTIMATED_FINISH_DATE
265 ,DURATION = X_DURATION
266 ,EARLY_START_DATE = X_EARLY_START_DATE
267 ,EARLY_FINISH_DATE = X_EARLY_FINISH_DATE
268 ,LATE_START_DATE = X_LATE_START_DATE
269 ,LATE_FINISH_DATE = X_LATE_FINISH_DATE
270 ,CALENDAR_ID = X_CALENDAR_ID
271 ,MILESTONE_FLAG = X_MILESTONE_FLAG
272 ,CRITICAL_FLAG = X_CRITICAL_FLAG
273 ,LAST_UPDATE_DATE = SYSDATE
274 ,LAST_UPDATED_BY = FND_GLOBAL.USER_ID
275 ,LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
276 ,WQ_PLANNED_QUANTITY = X_WQ_PLANNED_QUANTITY
277 ,PLANNED_EFFORT = X_PLANNED_EFFORT
278 ,ACTUAL_DURATION = X_ACTUAL_DURATION
279 ,ESTIMATED_DURATION = X_ESTIMATED_DURATION
280 ,RECORD_VERSION_NUMBER = NVL( RECORD_VERSION_NUMBER, 0 ) + 1
281 ,attribute_category = X_attribute_category
282 ,attribute1 = X_attribute1
283 ,attribute2 = X_attribute2
284 ,attribute3 = X_attribute3
285 ,attribute4 = X_attribute4
286 ,attribute5 = X_attribute5
287 ,attribute6 = X_attribute6
288 ,attribute7 = X_attribute7
289 ,attribute8 = X_attribute8
290 ,attribute9 = X_attribute9
291 ,attribute10 = X_attribute10
292 ,attribute11 = X_attribute11
293 ,attribute12 = X_attribute12
294 ,attribute13 = X_attribute13
295 ,attribute14 = X_attribute14
296 ,attribute15 = X_attribute15
297 ,DEF_SCH_TOOL_TSK_TYPE_CODE = x_def_sch_tool_tsk_type_code
298 ,CONSTRAINT_TYPE_CODE = x_constraint_type_code
299 ,CONSTRAINT_DATE = x_constraint_date
300 ,FREE_SLACK = x_free_slack
301 ,TOTAL_SLACK = x_total_slack
302 ,EFFORT_DRIVEN_FLAG = x_effort_driven_flag
303 ,LEVEL_ASSIGNMENTS_FLAG = x_level_assignments_flag
304 ,ext_act_duration = X_ext_act_duration
305 ,ext_remain_duration = X_ext_remain_duration
306 ,ext_sch_duration = X_ext_sch_duration
307 WHERE rowid = X_ROW_ID;
308 END Update_Row;
309
310 PROCEDURE Delete_Row(
311 X_ROW_ID IN VARCHAR2
312 ) IS
313 BEGIN
314 DELETE FROM pa_proj_elem_ver_schedule
315 WHERE rowid = X_ROW_ID;
316 END Delete_Row;
317
318 END PA_PROJ_ELEMENT_SCH_PKG;