[Home] [Help]
PACKAGE BODY: APPS.WIP_REPSCHEDULE_UTIL
Source
1 PACKAGE BODY WIP_Repschedule_Util AS
2 /* $Header: WIPUWRSB.pls 115.12 2002/11/29 13:33:24 simishra ship $ */
3
4 -- Global constant holding the package name
5
6 G_PKG_NAME CONSTANT VARCHAR2(30) := 'WIP_Repschedule_Util';
7
8
9 -- Function Complete_Record
10
11 FUNCTION Complete_Record
12 ( p_RepSchedule_rec IN WIP_Work_Order_PUB.Repschedule_Rec_Type
13 , p_old_RepSchedule_rec IN WIP_Work_Order_PUB.Repschedule_Rec_Type
14 , p_ForceCopy IN BOOLEAN := NULL
15 ) RETURN WIP_Work_Order_PUB.Repschedule_Rec_Type
16 IS
17 l_RepSchedule_rec WIP_Work_Order_PUB.Repschedule_Rec_Type := p_RepSchedule_rec;
18 BEGIN
19 IF(p_ForceCopy IS NOT NULL) THEN
20 IF(p_ForceCopy = TRUE)
21 THEN
22
23 IF p_old_RepSchedule_rec.alternate_bom_designator <> FND_API.G_MISS_CHAR THEN
24 l_RepSchedule_rec.alternate_bom_designator := p_old_RepSchedule_rec.alternate_bom_designator;
25 END IF;
26
27 IF p_old_RepSchedule_rec.alternate_rout_designator <> FND_API.G_MISS_CHAR THEN
28 l_RepSchedule_rec.alternate_rout_designator := p_old_RepSchedule_rec.alternate_rout_designator;
29 END IF;
30
31 IF p_old_RepSchedule_rec.attribute1 <> FND_API.G_MISS_CHAR THEN
32 l_RepSchedule_rec.attribute1 := p_old_RepSchedule_rec.attribute1;
33 END IF;
34
35 IF p_old_RepSchedule_rec.attribute10 <> FND_API.G_MISS_CHAR THEN
36 l_RepSchedule_rec.attribute10 := p_old_RepSchedule_rec.attribute10;
37 END IF;
38
39 IF p_old_RepSchedule_rec.attribute11 <> FND_API.G_MISS_CHAR THEN
40 l_RepSchedule_rec.attribute11 := p_old_RepSchedule_rec.attribute11;
41 END IF;
42
43 IF p_old_RepSchedule_rec.attribute12 <> FND_API.G_MISS_CHAR THEN
44 l_RepSchedule_rec.attribute12 := p_old_RepSchedule_rec.attribute12;
45 END IF;
46
47 IF p_old_RepSchedule_rec.attribute13 <> FND_API.G_MISS_CHAR THEN
48 l_RepSchedule_rec.attribute13 := p_old_RepSchedule_rec.attribute13;
49 END IF;
50
51 IF p_old_RepSchedule_rec.attribute14 <> FND_API.G_MISS_CHAR THEN
52 l_RepSchedule_rec.attribute14 := p_old_RepSchedule_rec.attribute14;
53 END IF;
54
55 IF p_old_RepSchedule_rec.attribute15 <> FND_API.G_MISS_CHAR THEN
56 l_RepSchedule_rec.attribute15 := p_old_RepSchedule_rec.attribute15;
57 END IF;
58
59 IF p_old_RepSchedule_rec.attribute2 <> FND_API.G_MISS_CHAR THEN
60 l_RepSchedule_rec.attribute2 := p_old_RepSchedule_rec.attribute2;
61 END IF;
62
63 IF p_old_RepSchedule_rec.attribute3 <> FND_API.G_MISS_CHAR THEN
64 l_RepSchedule_rec.attribute3 := p_old_RepSchedule_rec.attribute3;
65 END IF;
66
67 IF p_old_RepSchedule_rec.attribute4 <> FND_API.G_MISS_CHAR THEN
68 l_RepSchedule_rec.attribute4 := p_old_RepSchedule_rec.attribute4;
69 END IF;
70
71 IF p_old_RepSchedule_rec.attribute5 <> FND_API.G_MISS_CHAR THEN
72 l_RepSchedule_rec.attribute5 := p_old_RepSchedule_rec.attribute5;
73 END IF;
74
75 IF p_old_RepSchedule_rec.attribute6 <> FND_API.G_MISS_CHAR THEN
76 l_RepSchedule_rec.attribute6 := p_old_RepSchedule_rec.attribute6;
77 END IF;
78
79 IF p_old_RepSchedule_rec.attribute7 <> FND_API.G_MISS_CHAR THEN
80 l_RepSchedule_rec.attribute7 := p_old_RepSchedule_rec.attribute7;
81 END IF;
82
83 IF p_old_RepSchedule_rec.attribute8 <> FND_API.G_MISS_CHAR THEN
84 l_RepSchedule_rec.attribute8 := p_old_RepSchedule_rec.attribute8;
85 END IF;
86
87 IF p_old_RepSchedule_rec.attribute9 <> FND_API.G_MISS_CHAR THEN
88 l_RepSchedule_rec.attribute9 := p_old_RepSchedule_rec.attribute9;
89 END IF;
90
91 IF p_old_RepSchedule_rec.attribute_category <> FND_API.G_MISS_CHAR THEN
92 l_RepSchedule_rec.attribute_category := p_old_RepSchedule_rec.attribute_category;
93 END IF;
94
95 IF p_old_RepSchedule_rec.bom_revision <> FND_API.G_MISS_CHAR THEN
96 l_RepSchedule_rec.bom_revision := p_old_RepSchedule_rec.bom_revision;
97 END IF;
98
99 IF p_old_RepSchedule_rec.bom_revision_date <> FND_API.G_MISS_DATE THEN
100 l_RepSchedule_rec.bom_revision_date := p_old_RepSchedule_rec.bom_revision_date;
101 END IF;
102
103 IF p_old_RepSchedule_rec.common_bom_sequence_id <> FND_API.G_MISS_NUM THEN
104 l_RepSchedule_rec.common_bom_sequence_id := p_old_RepSchedule_rec.common_bom_sequence_id;
105 END IF;
106
107 IF p_old_RepSchedule_rec.common_rout_sequence_id <> FND_API.G_MISS_NUM THEN
108 l_RepSchedule_rec.common_rout_sequence_id := p_old_RepSchedule_rec.common_rout_sequence_id;
109 END IF;
110
111 IF p_old_RepSchedule_rec.created_by <> FND_API.G_MISS_NUM THEN
112 l_RepSchedule_rec.created_by := p_old_RepSchedule_rec.created_by;
113 END IF;
114
115 IF p_old_RepSchedule_rec.creation_date <> FND_API.G_MISS_DATE THEN
116 l_RepSchedule_rec.creation_date := p_old_RepSchedule_rec.creation_date;
117 END IF;
118
119 IF p_old_RepSchedule_rec.daily_production_rate <> FND_API.G_MISS_NUM THEN
120 l_RepSchedule_rec.daily_production_rate := p_old_RepSchedule_rec.daily_production_rate;
121 END IF;
122
123 IF p_old_RepSchedule_rec.date_closed <> FND_API.G_MISS_DATE THEN
124 l_RepSchedule_rec.date_closed := p_old_RepSchedule_rec.date_closed;
125 END IF;
126
127 IF p_old_RepSchedule_rec.date_released <> FND_API.G_MISS_DATE THEN
128 l_RepSchedule_rec.date_released := p_old_RepSchedule_rec.date_released;
129 END IF;
130
131 IF p_old_RepSchedule_rec.demand_class <> FND_API.G_MISS_CHAR THEN
132 l_RepSchedule_rec.demand_class := p_old_RepSchedule_rec.demand_class;
133 END IF;
134
135 IF p_old_RepSchedule_rec.description <> FND_API.G_MISS_CHAR THEN
136 l_RepSchedule_rec.description := p_old_RepSchedule_rec.description;
137 END IF;
138
139 IF p_old_RepSchedule_rec.firm_planned_flag <> FND_API.G_MISS_NUM THEN
140 l_RepSchedule_rec.firm_planned_flag := p_old_RepSchedule_rec.firm_planned_flag;
141 END IF;
142
143 IF p_old_RepSchedule_rec.first_unit_cpl_date <> FND_API.G_MISS_DATE THEN
144 l_RepSchedule_rec.first_unit_cpl_date := p_old_RepSchedule_rec.first_unit_cpl_date;
145 END IF;
146
147 IF p_old_RepSchedule_rec.first_unit_start_date <> FND_API.G_MISS_DATE THEN
148 l_RepSchedule_rec.first_unit_start_date := p_old_RepSchedule_rec.first_unit_start_date;
149 END IF;
150
151 IF p_old_RepSchedule_rec.last_unit_cpl_date <> FND_API.G_MISS_DATE THEN
152 l_RepSchedule_rec.last_unit_cpl_date := p_old_RepSchedule_rec.last_unit_cpl_date;
153 END IF;
154
155 IF p_old_RepSchedule_rec.last_unit_start_date <> FND_API.G_MISS_DATE THEN
156 l_RepSchedule_rec.last_unit_start_date := p_old_RepSchedule_rec.last_unit_start_date;
157 END IF;
158
159 IF p_old_RepSchedule_rec.last_updated_by <> FND_API.G_MISS_NUM THEN
160 l_RepSchedule_rec.last_updated_by := p_old_RepSchedule_rec.last_updated_by;
161 END IF;
162
163 IF p_old_RepSchedule_rec.last_update_date <> FND_API.G_MISS_DATE THEN
164 l_RepSchedule_rec.last_update_date := p_old_RepSchedule_rec.last_update_date;
165 END IF;
166
167 IF p_old_RepSchedule_rec.last_update_login <> FND_API.G_MISS_NUM THEN
168 l_RepSchedule_rec.last_update_login := p_old_RepSchedule_rec.last_update_login;
169 END IF;
170
171 IF p_old_RepSchedule_rec.line_id <> FND_API.G_MISS_NUM THEN
172 l_RepSchedule_rec.line_id := p_old_RepSchedule_rec.line_id;
173 END IF;
174
175 IF p_old_RepSchedule_rec.material_account <> FND_API.G_MISS_NUM THEN
176 l_RepSchedule_rec.material_account := p_old_RepSchedule_rec.material_account;
177 END IF;
178
179 IF p_old_RepSchedule_rec.material_overhead_account <> FND_API.G_MISS_NUM THEN
180 l_RepSchedule_rec.material_overhead_account := p_old_RepSchedule_rec.material_overhead_account;
181 END IF;
182
183 IF p_old_RepSchedule_rec.material_variance_account <> FND_API.G_MISS_NUM THEN
184 l_RepSchedule_rec.material_variance_account := p_old_RepSchedule_rec.material_variance_account;
185 END IF;
186
187 IF p_old_RepSchedule_rec.organization_id <> FND_API.G_MISS_NUM THEN
188 l_RepSchedule_rec.organization_id := p_old_RepSchedule_rec.organization_id;
189 END IF;
190
191 IF p_old_RepSchedule_rec.osp_account <> FND_API.G_MISS_NUM THEN
192 l_RepSchedule_rec.osp_account := p_old_RepSchedule_rec.osp_account;
193 END IF;
194
195 IF p_old_RepSchedule_rec.osp_variance_account <> FND_API.G_MISS_NUM THEN
196 l_RepSchedule_rec.osp_variance_account := p_old_RepSchedule_rec.osp_variance_account;
197 END IF;
198
199 IF p_old_RepSchedule_rec.overhead_account <> FND_API.G_MISS_NUM THEN
200 l_RepSchedule_rec.overhead_account := p_old_RepSchedule_rec.overhead_account;
201 END IF;
202
203 IF p_old_RepSchedule_rec.overhead_variance_account <> FND_API.G_MISS_NUM THEN
204 l_RepSchedule_rec.overhead_variance_account := p_old_RepSchedule_rec.overhead_variance_account;
205 END IF;
206
207 IF p_old_RepSchedule_rec.processing_work_days <> FND_API.G_MISS_NUM THEN
208 l_RepSchedule_rec.processing_work_days := p_old_RepSchedule_rec.processing_work_days;
209 END IF;
210
211 IF p_old_RepSchedule_rec.program_application_id <> FND_API.G_MISS_NUM THEN
212 l_RepSchedule_rec.program_application_id := p_old_RepSchedule_rec.program_application_id;
213 END IF;
214
215 IF p_old_RepSchedule_rec.program_id <> FND_API.G_MISS_NUM THEN
216 l_RepSchedule_rec.program_id := p_old_RepSchedule_rec.program_id;
217 END IF;
218
219 IF p_old_RepSchedule_rec.program_update_date <> FND_API.G_MISS_DATE THEN
220 l_RepSchedule_rec.program_update_date := p_old_RepSchedule_rec.program_update_date;
221 END IF;
222
223 IF p_old_RepSchedule_rec.quantity_completed <> FND_API.G_MISS_NUM THEN
224 l_RepSchedule_rec.quantity_completed := p_old_RepSchedule_rec.quantity_completed;
225 END IF;
226
227 IF p_old_RepSchedule_rec.repetitive_schedule_id <> FND_API.G_MISS_NUM THEN
228 l_RepSchedule_rec.repetitive_schedule_id := p_old_RepSchedule_rec.repetitive_schedule_id;
229 END IF;
230
231 IF p_old_RepSchedule_rec.request_id <> FND_API.G_MISS_NUM THEN
232 l_RepSchedule_rec.request_id := p_old_RepSchedule_rec.request_id;
233 END IF;
234
235 IF p_old_RepSchedule_rec.resource_account <> FND_API.G_MISS_NUM THEN
236 l_RepSchedule_rec.resource_account := p_old_RepSchedule_rec.resource_account;
237 END IF;
238
239 IF p_old_RepSchedule_rec.resource_variance_account <> FND_API.G_MISS_NUM THEN
240 l_RepSchedule_rec.resource_variance_account := p_old_RepSchedule_rec.resource_variance_account;
241 END IF;
242
243 IF p_old_RepSchedule_rec.routing_revision <> FND_API.G_MISS_CHAR THEN
244 l_RepSchedule_rec.routing_revision := p_old_RepSchedule_rec.routing_revision;
245 END IF;
246
247 IF p_old_RepSchedule_rec.routing_revision_date <> FND_API.G_MISS_DATE THEN
248 l_RepSchedule_rec.routing_revision_date := p_old_RepSchedule_rec.routing_revision_date;
249 END IF;
250
251 IF p_old_RepSchedule_rec.status_type <> FND_API.G_MISS_NUM THEN
252 l_RepSchedule_rec.status_type := p_old_RepSchedule_rec.status_type;
253 END IF;
254
255 IF p_old_RepSchedule_rec.wip_entity_id <> FND_API.G_MISS_NUM THEN
256 l_RepSchedule_rec.wip_entity_id := p_old_RepSchedule_rec.wip_entity_id;
257 END IF;
258
259 IF p_old_RepSchedule_rec.kanban_card_id <> FND_API.G_MISS_NUM THEN
260 l_RepSchedule_rec.kanban_card_id := p_old_RepSchedule_rec.kanban_card_id;
261 END IF;
262
263 ELSE
264
265 IF l_RepSchedule_rec.alternate_bom_designator = FND_API.G_MISS_CHAR THEN
266 l_RepSchedule_rec.alternate_bom_designator := p_old_RepSchedule_rec.alternate_bom_designator;
267 END IF;
268
269 IF l_RepSchedule_rec.alternate_rout_designator = FND_API.G_MISS_CHAR THEN
270 l_RepSchedule_rec.alternate_rout_designator := p_old_RepSchedule_rec.alternate_rout_designator;
271 END IF;
272
273 IF l_RepSchedule_rec.attribute1 = FND_API.G_MISS_CHAR THEN
274 l_RepSchedule_rec.attribute1 := p_old_RepSchedule_rec.attribute1;
275 END IF;
276
277 IF l_RepSchedule_rec.attribute10 = FND_API.G_MISS_CHAR THEN
278 l_RepSchedule_rec.attribute10 := p_old_RepSchedule_rec.attribute10;
279 END IF;
280
281 IF l_RepSchedule_rec.attribute11 = FND_API.G_MISS_CHAR THEN
282 l_RepSchedule_rec.attribute11 := p_old_RepSchedule_rec.attribute11;
283 END IF;
284
285 IF l_RepSchedule_rec.attribute12 = FND_API.G_MISS_CHAR THEN
286 l_RepSchedule_rec.attribute12 := p_old_RepSchedule_rec.attribute12;
287 END IF;
288
289 IF l_RepSchedule_rec.attribute13 = FND_API.G_MISS_CHAR THEN
290 l_RepSchedule_rec.attribute13 := p_old_RepSchedule_rec.attribute13;
291 END IF;
292
293 IF l_RepSchedule_rec.attribute14 = FND_API.G_MISS_CHAR THEN
294 l_RepSchedule_rec.attribute14 := p_old_RepSchedule_rec.attribute14;
295 END IF;
296
297 IF l_RepSchedule_rec.attribute15 = FND_API.G_MISS_CHAR THEN
298 l_RepSchedule_rec.attribute15 := p_old_RepSchedule_rec.attribute15;
299 END IF;
300
301 IF l_RepSchedule_rec.attribute2 = FND_API.G_MISS_CHAR THEN
302 l_RepSchedule_rec.attribute2 := p_old_RepSchedule_rec.attribute2;
303 END IF;
304
305 IF l_RepSchedule_rec.attribute3 = FND_API.G_MISS_CHAR THEN
306 l_RepSchedule_rec.attribute3 := p_old_RepSchedule_rec.attribute3;
307 END IF;
308
309 IF l_RepSchedule_rec.attribute4 = FND_API.G_MISS_CHAR THEN
310 l_RepSchedule_rec.attribute4 := p_old_RepSchedule_rec.attribute4;
311 END IF;
312
313 IF l_RepSchedule_rec.attribute5 = FND_API.G_MISS_CHAR THEN
314 l_RepSchedule_rec.attribute5 := p_old_RepSchedule_rec.attribute5;
315 END IF;
316
317 IF l_RepSchedule_rec.attribute6 = FND_API.G_MISS_CHAR THEN
318 l_RepSchedule_rec.attribute6 := p_old_RepSchedule_rec.attribute6;
319 END IF;
320
321 IF l_RepSchedule_rec.attribute7 = FND_API.G_MISS_CHAR THEN
322 l_RepSchedule_rec.attribute7 := p_old_RepSchedule_rec.attribute7;
323 END IF;
324
325 IF l_RepSchedule_rec.attribute8 = FND_API.G_MISS_CHAR THEN
326 l_RepSchedule_rec.attribute8 := p_old_RepSchedule_rec.attribute8;
327 END IF;
328
329 IF l_RepSchedule_rec.attribute9 = FND_API.G_MISS_CHAR THEN
330 l_RepSchedule_rec.attribute9 := p_old_RepSchedule_rec.attribute9;
331 END IF;
332
333 IF l_RepSchedule_rec.attribute_category = FND_API.G_MISS_CHAR THEN
334 l_RepSchedule_rec.attribute_category := p_old_RepSchedule_rec.attribute_category;
335 END IF;
336
337 IF l_RepSchedule_rec.bom_revision = FND_API.G_MISS_CHAR THEN
338 l_RepSchedule_rec.bom_revision := p_old_RepSchedule_rec.bom_revision;
339 END IF;
340
341 IF l_RepSchedule_rec.bom_revision_date = FND_API.G_MISS_DATE THEN
342 l_RepSchedule_rec.bom_revision_date := p_old_RepSchedule_rec.bom_revision_date;
343 END IF;
344
345 IF l_RepSchedule_rec.common_bom_sequence_id = FND_API.G_MISS_NUM THEN
346 l_RepSchedule_rec.common_bom_sequence_id := p_old_RepSchedule_rec.common_bom_sequence_id;
347 END IF;
348
349 IF l_RepSchedule_rec.common_rout_sequence_id = FND_API.G_MISS_NUM THEN
350 l_RepSchedule_rec.common_rout_sequence_id := p_old_RepSchedule_rec.common_rout_sequence_id;
351 END IF;
352
353 IF l_RepSchedule_rec.created_by = FND_API.G_MISS_NUM THEN
354 l_RepSchedule_rec.created_by := p_old_RepSchedule_rec.created_by;
355 END IF;
356
357 IF l_RepSchedule_rec.creation_date = FND_API.G_MISS_DATE THEN
358 l_RepSchedule_rec.creation_date := p_old_RepSchedule_rec.creation_date;
359 END IF;
360
361 IF l_RepSchedule_rec.daily_production_rate = FND_API.G_MISS_NUM THEN
362 l_RepSchedule_rec.daily_production_rate := p_old_RepSchedule_rec.daily_production_rate;
363 END IF;
364
365 IF l_RepSchedule_rec.date_closed = FND_API.G_MISS_DATE THEN
366 l_RepSchedule_rec.date_closed := p_old_RepSchedule_rec.date_closed;
367 END IF;
368
369 IF l_RepSchedule_rec.date_released = FND_API.G_MISS_DATE THEN
370 l_RepSchedule_rec.date_released := p_old_RepSchedule_rec.date_released;
371 END IF;
375 END IF;
372
373 IF l_RepSchedule_rec.demand_class = FND_API.G_MISS_CHAR THEN
374 l_RepSchedule_rec.demand_class := p_old_RepSchedule_rec.demand_class;
376
377 IF l_RepSchedule_rec.description = FND_API.G_MISS_CHAR THEN
378 l_RepSchedule_rec.description := p_old_RepSchedule_rec.description;
379 END IF;
380
381 IF l_RepSchedule_rec.firm_planned_flag = FND_API.G_MISS_NUM THEN
382 l_RepSchedule_rec.firm_planned_flag := p_old_RepSchedule_rec.firm_planned_flag;
383 END IF;
384
385 IF l_RepSchedule_rec.first_unit_cpl_date = FND_API.G_MISS_DATE THEN
386 l_RepSchedule_rec.first_unit_cpl_date := p_old_RepSchedule_rec.first_unit_cpl_date;
387 END IF;
388
389 IF l_RepSchedule_rec.first_unit_start_date = FND_API.G_MISS_DATE THEN
390 l_RepSchedule_rec.first_unit_start_date := p_old_RepSchedule_rec.first_unit_start_date;
391 END IF;
392
393 IF l_RepSchedule_rec.last_unit_cpl_date = FND_API.G_MISS_DATE THEN
394 l_RepSchedule_rec.last_unit_cpl_date := p_old_RepSchedule_rec.last_unit_cpl_date;
395 END IF;
396
397 IF l_RepSchedule_rec.last_unit_start_date = FND_API.G_MISS_DATE THEN
398 l_RepSchedule_rec.last_unit_start_date := p_old_RepSchedule_rec.last_unit_start_date;
399 END IF;
400
401 IF l_RepSchedule_rec.last_updated_by = FND_API.G_MISS_NUM THEN
402 l_RepSchedule_rec.last_updated_by := p_old_RepSchedule_rec.last_updated_by;
403 END IF;
404
405 IF l_RepSchedule_rec.last_update_date = FND_API.G_MISS_DATE THEN
406 l_RepSchedule_rec.last_update_date := p_old_RepSchedule_rec.last_update_date;
407 END IF;
408
409 IF l_RepSchedule_rec.last_update_login = FND_API.G_MISS_NUM THEN
410 l_RepSchedule_rec.last_update_login := p_old_RepSchedule_rec.last_update_login;
411 END IF;
412
413 IF l_RepSchedule_rec.line_id = FND_API.G_MISS_NUM THEN
414 l_RepSchedule_rec.line_id := p_old_RepSchedule_rec.line_id;
415 END IF;
416
417 IF l_RepSchedule_rec.material_account = FND_API.G_MISS_NUM THEN
418 l_RepSchedule_rec.material_account := p_old_RepSchedule_rec.material_account;
419 END IF;
420
421 IF l_RepSchedule_rec.material_overhead_account = FND_API.G_MISS_NUM THEN
422 l_RepSchedule_rec.material_overhead_account := p_old_RepSchedule_rec.material_overhead_account;
423 END IF;
424
425 IF l_RepSchedule_rec.material_variance_account = FND_API.G_MISS_NUM THEN
426 l_RepSchedule_rec.material_variance_account := p_old_RepSchedule_rec.material_variance_account;
427 END IF;
428
429 IF l_RepSchedule_rec.organization_id = FND_API.G_MISS_NUM THEN
430 l_RepSchedule_rec.organization_id := p_old_RepSchedule_rec.organization_id;
431 END IF;
432
433 IF l_RepSchedule_rec.osp_account = FND_API.G_MISS_NUM THEN
434 l_RepSchedule_rec.osp_account := p_old_RepSchedule_rec.osp_account;
435 END IF;
436
437 IF l_RepSchedule_rec.osp_variance_account = FND_API.G_MISS_NUM THEN
438 l_RepSchedule_rec.osp_variance_account := p_old_RepSchedule_rec.osp_variance_account;
439 END IF;
440
441 IF l_RepSchedule_rec.overhead_account = FND_API.G_MISS_NUM THEN
442 l_RepSchedule_rec.overhead_account := p_old_RepSchedule_rec.overhead_account;
443 END IF;
444
445 IF l_RepSchedule_rec.overhead_variance_account = FND_API.G_MISS_NUM THEN
446 l_RepSchedule_rec.overhead_variance_account := p_old_RepSchedule_rec.overhead_variance_account;
447 END IF;
448
449 IF l_RepSchedule_rec.processing_work_days = FND_API.G_MISS_NUM THEN
450 l_RepSchedule_rec.processing_work_days := p_old_RepSchedule_rec.processing_work_days;
451 END IF;
452
453 IF l_RepSchedule_rec.program_application_id = FND_API.G_MISS_NUM THEN
454 l_RepSchedule_rec.program_application_id := p_old_RepSchedule_rec.program_application_id;
455 END IF;
456
457 IF l_RepSchedule_rec.program_id = FND_API.G_MISS_NUM THEN
458 l_RepSchedule_rec.program_id := p_old_RepSchedule_rec.program_id;
459 END IF;
460
461 IF l_RepSchedule_rec.program_update_date = FND_API.G_MISS_DATE THEN
462 l_RepSchedule_rec.program_update_date := p_old_RepSchedule_rec.program_update_date;
463 END IF;
464
465 IF l_RepSchedule_rec.quantity_completed = FND_API.G_MISS_NUM THEN
466 l_RepSchedule_rec.quantity_completed := p_old_RepSchedule_rec.quantity_completed;
467 END IF;
468
469 IF l_RepSchedule_rec.repetitive_schedule_id = FND_API.G_MISS_NUM THEN
470 l_RepSchedule_rec.repetitive_schedule_id := p_old_RepSchedule_rec.repetitive_schedule_id;
471 END IF;
472
473 IF l_RepSchedule_rec.request_id = FND_API.G_MISS_NUM THEN
474 l_RepSchedule_rec.request_id := p_old_RepSchedule_rec.request_id;
475 END IF;
476
477 IF l_RepSchedule_rec.resource_account = FND_API.G_MISS_NUM THEN
478 l_RepSchedule_rec.resource_account := p_old_RepSchedule_rec.resource_account;
479 END IF;
480
481 IF l_RepSchedule_rec.resource_variance_account = FND_API.G_MISS_NUM THEN
482 l_RepSchedule_rec.resource_variance_account := p_old_RepSchedule_rec.resource_variance_account;
483 END IF;
484
485 IF l_RepSchedule_rec.routing_revision = FND_API.G_MISS_CHAR THEN
486 l_RepSchedule_rec.routing_revision := p_old_RepSchedule_rec.routing_revision;
487 END IF;
488
489 IF l_RepSchedule_rec.routing_revision_date = FND_API.G_MISS_DATE THEN
493 IF l_RepSchedule_rec.status_type = FND_API.G_MISS_NUM THEN
490 l_RepSchedule_rec.routing_revision_date := p_old_RepSchedule_rec.routing_revision_date;
491 END IF;
492
494 l_RepSchedule_rec.status_type := p_old_RepSchedule_rec.status_type;
495 END IF;
496
497 IF l_RepSchedule_rec.wip_entity_id = FND_API.G_MISS_NUM THEN
498 l_RepSchedule_rec.wip_entity_id := p_old_RepSchedule_rec.wip_entity_id;
499 END IF;
500
501 IF l_RepSchedule_rec.kanban_card_id = FND_API.G_MISS_NUM THEN
502 l_RepSchedule_rec.kanban_card_id := p_old_RepSchedule_rec.kanban_card_id;
503 END IF;
504 END IF;
505 END IF;
506 RETURN l_RepSchedule_rec;
507
508 END Complete_Record;
509
510 -- Function Convert_Miss_To_Null
511
512 FUNCTION Convert_Miss_To_Null
513 ( p_RepSchedule_rec IN WIP_Work_Order_PUB.Repschedule_Rec_Type
514 ) RETURN WIP_Work_Order_PUB.Repschedule_Rec_Type
515 IS
516 l_RepSchedule_rec WIP_Work_Order_PUB.Repschedule_Rec_Type := p_RepSchedule_rec;
517 BEGIN
518
519 IF l_RepSchedule_rec.alternate_bom_designator = FND_API.G_MISS_CHAR THEN
520 l_RepSchedule_rec.alternate_bom_designator := NULL;
521 END IF;
522
523 IF l_RepSchedule_rec.alternate_rout_designator = FND_API.G_MISS_CHAR THEN
524 l_RepSchedule_rec.alternate_rout_designator := NULL;
525 END IF;
526
527 IF l_RepSchedule_rec.attribute1 = FND_API.G_MISS_CHAR THEN
528 l_RepSchedule_rec.attribute1 := NULL;
529 END IF;
530
531 IF l_RepSchedule_rec.attribute10 = FND_API.G_MISS_CHAR THEN
532 l_RepSchedule_rec.attribute10 := NULL;
533 END IF;
534
535 IF l_RepSchedule_rec.attribute11 = FND_API.G_MISS_CHAR THEN
536 l_RepSchedule_rec.attribute11 := NULL;
537 END IF;
538
539 IF l_RepSchedule_rec.attribute12 = FND_API.G_MISS_CHAR THEN
540 l_RepSchedule_rec.attribute12 := NULL;
541 END IF;
542
543 IF l_RepSchedule_rec.attribute13 = FND_API.G_MISS_CHAR THEN
544 l_RepSchedule_rec.attribute13 := NULL;
545 END IF;
546
547 IF l_RepSchedule_rec.attribute14 = FND_API.G_MISS_CHAR THEN
548 l_RepSchedule_rec.attribute14 := NULL;
549 END IF;
550
551 IF l_RepSchedule_rec.attribute15 = FND_API.G_MISS_CHAR THEN
552 l_RepSchedule_rec.attribute15 := NULL;
553 END IF;
554
555 IF l_RepSchedule_rec.attribute2 = FND_API.G_MISS_CHAR THEN
556 l_RepSchedule_rec.attribute2 := NULL;
557 END IF;
558
559 IF l_RepSchedule_rec.attribute3 = FND_API.G_MISS_CHAR THEN
560 l_RepSchedule_rec.attribute3 := NULL;
561 END IF;
562
563 IF l_RepSchedule_rec.attribute4 = FND_API.G_MISS_CHAR THEN
564 l_RepSchedule_rec.attribute4 := NULL;
565 END IF;
566
567 IF l_RepSchedule_rec.attribute5 = FND_API.G_MISS_CHAR THEN
568 l_RepSchedule_rec.attribute5 := NULL;
569 END IF;
570
571 IF l_RepSchedule_rec.attribute6 = FND_API.G_MISS_CHAR THEN
572 l_RepSchedule_rec.attribute6 := NULL;
573 END IF;
574
575 IF l_RepSchedule_rec.attribute7 = FND_API.G_MISS_CHAR THEN
576 l_RepSchedule_rec.attribute7 := NULL;
577 END IF;
578
579 IF l_RepSchedule_rec.attribute8 = FND_API.G_MISS_CHAR THEN
580 l_RepSchedule_rec.attribute8 := NULL;
581 END IF;
582
583 IF l_RepSchedule_rec.attribute9 = FND_API.G_MISS_CHAR THEN
584 l_RepSchedule_rec.attribute9 := NULL;
585 END IF;
586
587 IF l_RepSchedule_rec.attribute_category = FND_API.G_MISS_CHAR THEN
588 l_RepSchedule_rec.attribute_category := NULL;
589 END IF;
590
591 IF l_RepSchedule_rec.bom_revision = FND_API.G_MISS_CHAR THEN
592 l_RepSchedule_rec.bom_revision := NULL;
593 END IF;
594
595 IF l_RepSchedule_rec.bom_revision_date = FND_API.G_MISS_DATE THEN
596 l_RepSchedule_rec.bom_revision_date := NULL;
597 END IF;
598
599 IF l_RepSchedule_rec.common_bom_sequence_id = FND_API.G_MISS_NUM THEN
600 l_RepSchedule_rec.common_bom_sequence_id := NULL;
601 END IF;
602
603 IF l_RepSchedule_rec.common_rout_sequence_id = FND_API.G_MISS_NUM THEN
604 l_RepSchedule_rec.common_rout_sequence_id := NULL;
605 END IF;
606
607 IF l_RepSchedule_rec.created_by = FND_API.G_MISS_NUM THEN
608 l_RepSchedule_rec.created_by := NULL;
609 END IF;
610
611 IF l_RepSchedule_rec.creation_date = FND_API.G_MISS_DATE THEN
612 l_RepSchedule_rec.creation_date := NULL;
613 END IF;
614
615 IF l_RepSchedule_rec.daily_production_rate = FND_API.G_MISS_NUM THEN
616 l_RepSchedule_rec.daily_production_rate := NULL;
617 END IF;
618
619 IF l_RepSchedule_rec.date_closed = FND_API.G_MISS_DATE THEN
620 l_RepSchedule_rec.date_closed := NULL;
621 END IF;
622
623 IF l_RepSchedule_rec.date_released = FND_API.G_MISS_DATE THEN
624 l_RepSchedule_rec.date_released := NULL;
625 END IF;
626
627 IF l_RepSchedule_rec.demand_class = FND_API.G_MISS_CHAR THEN
628 l_RepSchedule_rec.demand_class := NULL;
629 END IF;
630
634
631 IF l_RepSchedule_rec.description = FND_API.G_MISS_CHAR THEN
632 l_RepSchedule_rec.description := NULL;
633 END IF;
635 IF l_RepSchedule_rec.firm_planned_flag = FND_API.G_MISS_NUM THEN
636 l_RepSchedule_rec.firm_planned_flag := NULL;
637 END IF;
638
639 IF l_RepSchedule_rec.first_unit_cpl_date = FND_API.G_MISS_DATE THEN
640 l_RepSchedule_rec.first_unit_cpl_date := NULL;
641 END IF;
642
643 IF l_RepSchedule_rec.first_unit_start_date = FND_API.G_MISS_DATE THEN
644 l_RepSchedule_rec.first_unit_start_date := NULL;
645 END IF;
646
647 IF l_RepSchedule_rec.last_unit_cpl_date = FND_API.G_MISS_DATE THEN
648 l_RepSchedule_rec.last_unit_cpl_date := NULL;
649 END IF;
650
651 IF l_RepSchedule_rec.last_unit_start_date = FND_API.G_MISS_DATE THEN
652 l_RepSchedule_rec.last_unit_start_date := NULL;
653 END IF;
654
655 IF l_RepSchedule_rec.last_updated_by = FND_API.G_MISS_NUM THEN
656 l_RepSchedule_rec.last_updated_by := NULL;
657 END IF;
658
659 IF l_RepSchedule_rec.last_update_date = FND_API.G_MISS_DATE THEN
660 l_RepSchedule_rec.last_update_date := NULL;
661 END IF;
662
663 IF l_RepSchedule_rec.last_update_login = FND_API.G_MISS_NUM THEN
664 l_RepSchedule_rec.last_update_login := NULL;
665 END IF;
666
667 IF l_RepSchedule_rec.line_id = FND_API.G_MISS_NUM THEN
668 l_RepSchedule_rec.line_id := NULL;
669 END IF;
670
671 IF l_RepSchedule_rec.material_account = FND_API.G_MISS_NUM THEN
672 l_RepSchedule_rec.material_account := NULL;
673 END IF;
674
675 IF l_RepSchedule_rec.material_overhead_account = FND_API.G_MISS_NUM THEN
676 l_RepSchedule_rec.material_overhead_account := NULL;
677 END IF;
678
679 IF l_RepSchedule_rec.material_variance_account = FND_API.G_MISS_NUM THEN
680 l_RepSchedule_rec.material_variance_account := NULL;
681 END IF;
682
683 IF l_RepSchedule_rec.organization_id = FND_API.G_MISS_NUM THEN
684 l_RepSchedule_rec.organization_id := NULL;
685 END IF;
686
687 IF l_RepSchedule_rec.osp_account = FND_API.G_MISS_NUM THEN
688 l_RepSchedule_rec.osp_account := NULL;
689 END IF;
690
691 IF l_RepSchedule_rec.osp_variance_account = FND_API.G_MISS_NUM THEN
692 l_RepSchedule_rec.osp_variance_account := NULL;
693 END IF;
694
695 IF l_RepSchedule_rec.overhead_account = FND_API.G_MISS_NUM THEN
696 l_RepSchedule_rec.overhead_account := NULL;
697 END IF;
698
699 IF l_RepSchedule_rec.overhead_variance_account = FND_API.G_MISS_NUM THEN
700 l_RepSchedule_rec.overhead_variance_account := NULL;
701 END IF;
702
703 IF l_RepSchedule_rec.processing_work_days = FND_API.G_MISS_NUM THEN
704 l_RepSchedule_rec.processing_work_days := NULL;
705 END IF;
706
707 IF l_RepSchedule_rec.program_application_id = FND_API.G_MISS_NUM THEN
708 l_RepSchedule_rec.program_application_id := NULL;
709 END IF;
710
711 IF l_RepSchedule_rec.program_id = FND_API.G_MISS_NUM THEN
712 l_RepSchedule_rec.program_id := NULL;
713 END IF;
714
715 IF l_RepSchedule_rec.program_update_date = FND_API.G_MISS_DATE THEN
716 l_RepSchedule_rec.program_update_date := NULL;
717 END IF;
718
719 IF l_RepSchedule_rec.quantity_completed = FND_API.G_MISS_NUM THEN
720 l_RepSchedule_rec.quantity_completed := NULL;
721 END IF;
722
723 IF l_RepSchedule_rec.repetitive_schedule_id = FND_API.G_MISS_NUM THEN
724 l_RepSchedule_rec.repetitive_schedule_id := NULL;
725 END IF;
726
727 IF l_RepSchedule_rec.request_id = FND_API.G_MISS_NUM THEN
728 l_RepSchedule_rec.request_id := NULL;
729 END IF;
730
731 IF l_RepSchedule_rec.resource_account = FND_API.G_MISS_NUM THEN
732 l_RepSchedule_rec.resource_account := NULL;
733 END IF;
734
735 IF l_RepSchedule_rec.resource_variance_account = FND_API.G_MISS_NUM THEN
736 l_RepSchedule_rec.resource_variance_account := NULL;
737 END IF;
738
739 IF l_RepSchedule_rec.routing_revision = FND_API.G_MISS_CHAR THEN
740 l_RepSchedule_rec.routing_revision := NULL;
741 END IF;
742
743 IF l_RepSchedule_rec.routing_revision_date = FND_API.G_MISS_DATE THEN
744 l_RepSchedule_rec.routing_revision_date := NULL;
745 END IF;
746
747 IF l_RepSchedule_rec.status_type = FND_API.G_MISS_NUM THEN
748 l_RepSchedule_rec.status_type := NULL;
749 END IF;
750
751 IF l_RepSchedule_rec.wip_entity_id = FND_API.G_MISS_NUM THEN
752 l_RepSchedule_rec.wip_entity_id := NULL;
753 END IF;
754
755 IF l_RepSchedule_rec.kanban_card_id = FND_API.G_MISS_NUM THEN
756 l_RepSchedule_rec.kanban_card_id := NULL;
757 END IF;
758
759 RETURN l_RepSchedule_rec;
760
761 END Convert_Miss_To_Null;
762
763 -- Procedure Update_Row
764
765 PROCEDURE Update_Row
766 ( p_RepSchedule_rec IN WIP_Work_Order_PUB.Repschedule_Rec_Type
767 )
768 IS
769 BEGIN
770
771 UPDATE WIP_REPETITIVE_SCHEDULES
775 , ATTRIBUTE10 = p_RepSchedule_rec.attribute10
772 SET ALTERNATE_BOM_DESIGNATOR = p_RepSchedule_rec.alternate_bom_designator
773 , ALTERNATE_ROUTING_DESIGNATOR = p_RepSchedule_rec.alternate_rout_designator
774 , ATTRIBUTE1 = p_RepSchedule_rec.attribute1
776 , ATTRIBUTE11 = p_RepSchedule_rec.attribute11
777 , ATTRIBUTE12 = p_RepSchedule_rec.attribute12
778 , ATTRIBUTE13 = p_RepSchedule_rec.attribute13
779 , ATTRIBUTE14 = p_RepSchedule_rec.attribute14
780 , ATTRIBUTE15 = p_RepSchedule_rec.attribute15
781 , ATTRIBUTE2 = p_RepSchedule_rec.attribute2
782 , ATTRIBUTE3 = p_RepSchedule_rec.attribute3
783 , ATTRIBUTE4 = p_RepSchedule_rec.attribute4
784 , ATTRIBUTE5 = p_RepSchedule_rec.attribute5
785 , ATTRIBUTE6 = p_RepSchedule_rec.attribute6
786 , ATTRIBUTE7 = p_RepSchedule_rec.attribute7
787 , ATTRIBUTE8 = p_RepSchedule_rec.attribute8
788 , ATTRIBUTE9 = p_RepSchedule_rec.attribute9
789 , ATTRIBUTE_CATEGORY = p_RepSchedule_rec.attribute_category
790 , BOM_REVISION = p_RepSchedule_rec.bom_revision
791 , BOM_REVISION_DATE = p_RepSchedule_rec.bom_revision_date
792 , COMMON_BOM_SEQUENCE_ID = p_RepSchedule_rec.common_bom_sequence_id
793 , COMMON_ROUTING_SEQUENCE_ID = p_RepSchedule_rec.common_rout_sequence_id
794 , CREATED_BY = p_RepSchedule_rec.created_by
795 , CREATION_DATE = p_RepSchedule_rec.creation_date
796 , DAILY_PRODUCTION_RATE = p_RepSchedule_rec.daily_production_rate
797 , DATE_CLOSED = p_RepSchedule_rec.date_closed
798 , DATE_RELEASED = p_RepSchedule_rec.date_released
799 , DEMAND_CLASS = p_RepSchedule_rec.demand_class
800 , DESCRIPTION = p_RepSchedule_rec.description
801 , FIRM_PLANNED_FLAG = p_RepSchedule_rec.firm_planned_flag
802 , FIRST_UNIT_COMPLETION_DATE = p_RepSchedule_rec.first_unit_cpl_date
803 , FIRST_UNIT_START_DATE = p_RepSchedule_rec.first_unit_start_date
804 , LAST_UNIT_COMPLETION_DATE = p_RepSchedule_rec.last_unit_cpl_date
805 , LAST_UNIT_START_DATE = p_RepSchedule_rec.last_unit_start_date
806 , LAST_UPDATED_BY = p_RepSchedule_rec.last_updated_by
807 , LAST_UPDATE_DATE = p_RepSchedule_rec.last_update_date
808 , LAST_UPDATE_LOGIN = p_RepSchedule_rec.last_update_login
809 , LINE_ID = p_RepSchedule_rec.line_id
810 , MATERIAL_ACCOUNT = p_RepSchedule_rec.material_account
811 , MATERIAL_OVERHEAD_ACCOUNT = p_RepSchedule_rec.material_overhead_account
812 , MATERIAL_VARIANCE_ACCOUNT = p_RepSchedule_rec.material_variance_account
813 , ORGANIZATION_ID = p_RepSchedule_rec.organization_id
814 , OUTSIDE_PROCESSING_ACCOUNT = p_RepSchedule_rec.osp_account
815 , OUTSIDE_PROC_VARIANCE_ACCOUNT = p_RepSchedule_rec.osp_variance_account
816 , OVERHEAD_ACCOUNT = p_RepSchedule_rec.overhead_account
817 , OVERHEAD_VARIANCE_ACCOUNT = p_RepSchedule_rec.overhead_variance_account
818 , PROCESSING_WORK_DAYS = p_RepSchedule_rec.processing_work_days
819 , PROGRAM_APPLICATION_ID = p_RepSchedule_rec.program_application_id
820 , PROGRAM_ID = p_RepSchedule_rec.program_id
821 , PROGRAM_UPDATE_DATE = p_RepSchedule_rec.program_update_date
822 , QUANTITY_COMPLETED = p_RepSchedule_rec.quantity_completed
823 , REPETITIVE_SCHEDULE_ID = p_RepSchedule_rec.repetitive_schedule_id
824 , REQUEST_ID = p_RepSchedule_rec.request_id
825 , RESOURCE_ACCOUNT = p_RepSchedule_rec.resource_account
826 , RESOURCE_VARIANCE_ACCOUNT = p_RepSchedule_rec.resource_variance_account
827 , ROUTING_REVISION = p_RepSchedule_rec.routing_revision
828 , ROUTING_REVISION_DATE = p_RepSchedule_rec.routing_revision_date
829 , STATUS_TYPE = p_RepSchedule_rec.status_type
830 , WIP_ENTITY_ID = p_RepSchedule_rec.wip_entity_id
831 WHERE REPETITIVE_SCHEDULE_ID = p_RepSchedule_rec.repetitive_schedule_id
832 ;
833
834 EXCEPTION
835
836 WHEN OTHERS THEN
837
838 IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
839 THEN
840 FND_MSG_PUB.Add_Exc_Msg
841 ( G_PKG_NAME
842 , 'Update_Row'
843 );
844 END IF;
845
846 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
847
848 END Update_Row;
849
850 -- Procedure Insert_Row
851
852 PROCEDURE Insert_Row
853 ( p_RepSchedule_rec IN WIP_Work_Order_PUB.Repschedule_Rec_Type
854 )
855 IS
856 BEGIN
857
858 INSERT INTO WIP_REPETITIVE_SCHEDULES
859 ( ALTERNATE_BOM_DESIGNATOR
863 , ATTRIBUTE11
860 , ALTERNATE_ROUTING_DESIGNATOR
861 , ATTRIBUTE1
862 , ATTRIBUTE10
864 , ATTRIBUTE12
865 , ATTRIBUTE13
866 , ATTRIBUTE14
867 , ATTRIBUTE15
868 , ATTRIBUTE2
869 , ATTRIBUTE3
870 , ATTRIBUTE4
871 , ATTRIBUTE5
872 , ATTRIBUTE6
873 , ATTRIBUTE7
874 , ATTRIBUTE8
875 , ATTRIBUTE9
876 , ATTRIBUTE_CATEGORY
877 , BOM_REVISION
878 , BOM_REVISION_DATE
879 , COMMON_BOM_SEQUENCE_ID
880 , COMMON_ROUTING_SEQUENCE_ID
881 , CREATED_BY
882 , CREATION_DATE
883 , DAILY_PRODUCTION_RATE
884 , DATE_CLOSED
885 , DATE_RELEASED
886 , DEMAND_CLASS
887 , DESCRIPTION
888 , FIRM_PLANNED_FLAG
889 , FIRST_UNIT_COMPLETION_DATE
890 , FIRST_UNIT_START_DATE
891 , LAST_UNIT_COMPLETION_DATE
892 , LAST_UNIT_START_DATE
893 , LAST_UPDATED_BY
894 , LAST_UPDATE_DATE
895 , LAST_UPDATE_LOGIN
896 , LINE_ID
897 , MATERIAL_ACCOUNT
898 , MATERIAL_OVERHEAD_ACCOUNT
899 , MATERIAL_VARIANCE_ACCOUNT
900 , ORGANIZATION_ID
901 , OUTSIDE_PROCESSING_ACCOUNT
902 , OUTSIDE_PROC_VARIANCE_ACCOUNT
903 , OVERHEAD_ACCOUNT
904 , OVERHEAD_VARIANCE_ACCOUNT
905 , PROCESSING_WORK_DAYS
906 , PROGRAM_APPLICATION_ID
907 , PROGRAM_ID
908 , PROGRAM_UPDATE_DATE
909 , QUANTITY_COMPLETED
910 , REPETITIVE_SCHEDULE_ID
911 , REQUEST_ID
912 , RESOURCE_ACCOUNT
913 , RESOURCE_VARIANCE_ACCOUNT
914 , ROUTING_REVISION
915 , ROUTING_REVISION_DATE
916 , STATUS_TYPE
917 , WIP_ENTITY_ID
918 )
919 VALUES
920 ( p_RepSchedule_rec.alternate_bom_designator
921 , p_RepSchedule_rec.alternate_rout_designator
922 , p_RepSchedule_rec.attribute1
923 , p_RepSchedule_rec.attribute10
924 , p_RepSchedule_rec.attribute11
925 , p_RepSchedule_rec.attribute12
926 , p_RepSchedule_rec.attribute13
927 , p_RepSchedule_rec.attribute14
928 , p_RepSchedule_rec.attribute15
929 , p_RepSchedule_rec.attribute2
930 , p_RepSchedule_rec.attribute3
931 , p_RepSchedule_rec.attribute4
932 , p_RepSchedule_rec.attribute5
933 , p_RepSchedule_rec.attribute6
934 , p_RepSchedule_rec.attribute7
935 , p_RepSchedule_rec.attribute8
936 , p_RepSchedule_rec.attribute9
937 , p_RepSchedule_rec.attribute_category
938 , p_RepSchedule_rec.bom_revision
939 , p_RepSchedule_rec.bom_revision_date
940 , p_RepSchedule_rec.common_bom_sequence_id
941 , p_RepSchedule_rec.common_rout_sequence_id
942 , p_RepSchedule_rec.created_by
943 , p_RepSchedule_rec.creation_date
944 , p_RepSchedule_rec.daily_production_rate
945 , p_RepSchedule_rec.date_closed
946 , p_RepSchedule_rec.date_released
947 , p_RepSchedule_rec.demand_class
948 , p_RepSchedule_rec.description
949 , p_RepSchedule_rec.firm_planned_flag
950 , p_RepSchedule_rec.first_unit_cpl_date
951 , p_RepSchedule_rec.first_unit_start_date
952 , p_RepSchedule_rec.last_unit_cpl_date
953 , p_RepSchedule_rec.last_unit_start_date
954 , p_RepSchedule_rec.last_updated_by
955 , p_RepSchedule_rec.last_update_date
956 , p_RepSchedule_rec.last_update_login
957 , p_RepSchedule_rec.line_id
958 , p_RepSchedule_rec.material_account
959 , p_RepSchedule_rec.material_overhead_account
960 , p_RepSchedule_rec.material_variance_account
961 , p_RepSchedule_rec.organization_id
962 , p_RepSchedule_rec.osp_account
963 , p_RepSchedule_rec.osp_variance_account
964 , p_RepSchedule_rec.overhead_account
965 , p_RepSchedule_rec.overhead_variance_account
966 , p_RepSchedule_rec.processing_work_days
967 , p_RepSchedule_rec.program_application_id
968 , p_RepSchedule_rec.program_id
969 , p_RepSchedule_rec.program_update_date
970 , p_RepSchedule_rec.quantity_completed
971 , p_RepSchedule_rec.repetitive_schedule_id
972 , p_RepSchedule_rec.request_id
973 , p_RepSchedule_rec.resource_account
974 , p_RepSchedule_rec.resource_variance_account
975 , p_RepSchedule_rec.routing_revision
976 , p_RepSchedule_rec.routing_revision_date
977 , p_RepSchedule_rec.status_type
978 , p_RepSchedule_rec.wip_entity_id
979 );
980
981 EXCEPTION
982
983 WHEN OTHERS THEN
984
985 IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
986 THEN
987 FND_MSG_PUB.Add_Exc_Msg
988 ( G_PKG_NAME
989 , 'Insert_Row'
990 );
991 END IF;
992
993 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
994
995 END Insert_Row;
996
1000 ( p_repetitive_schedule_id IN NUMBER
997 -- Procedure Delete_Row
998
999 PROCEDURE Delete_Row
1001 )
1002 IS
1003 BEGIN
1004
1005 DELETE FROM WIP_REPETITIVE_SCHEDULES
1006 WHERE REPETITIVE_SCHEDULE_ID = p_repetitive_schedule_id
1007 ;
1008
1009 EXCEPTION
1010
1011 WHEN OTHERS THEN
1012
1013 IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1014 THEN
1015 FND_MSG_PUB.Add_Exc_Msg
1016 ( G_PKG_NAME
1017 , 'Delete_Row'
1018 );
1019 END IF;
1020
1021 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1022
1023 END Delete_Row;
1024
1025 -- Function Query_Row
1026
1027 FUNCTION Query_Row
1028 ( p_repetitive_schedule_id IN NUMBER
1029 ) RETURN WIP_Work_Order_PUB.Repschedule_Rec_Type
1030 IS
1031 BEGIN
1032
1033 RETURN Query_Rows
1034 ( p_repetitive_schedule_id => p_repetitive_schedule_id
1035 )(1);
1036
1037 END Query_Row;
1038
1039 FUNCTION Query_Row
1040 ( p_wip_entity_id IN NUMBER
1041 ) RETURN WIP_Work_Order_PUB.Repschedule_Rec_Type
1042 IS
1043 BEGIN
1044
1045 RETURN Query_Rows
1046 ( p_wip_entity_id => p_wip_entity_id
1047 )(1);
1048
1049 END Query_Row;
1050
1051 -- Function Query_Rows
1052
1053 --
1054
1055 FUNCTION Query_Rows
1056 ( p_repetitive_schedule_id IN NUMBER :=
1057 NULL
1058 , p_wip_entity_id IN NUMBER :=
1059 NULL
1060 ) RETURN WIP_Work_Order_PUB.Repschedule_Tbl_Type
1061 IS
1062 l_RepSchedule_rec WIP_Work_Order_PUB.Repschedule_Rec_Type;
1063 l_RepSchedule_tbl WIP_Work_Order_PUB.Repschedule_Tbl_Type;
1064
1065 CURSOR l_RepSchedule_csr IS
1066 SELECT ALTERNATE_BOM_DESIGNATOR
1067 , ALTERNATE_ROUTING_DESIGNATOR
1068 , ATTRIBUTE1
1069 , ATTRIBUTE10
1070 , ATTRIBUTE11
1071 , ATTRIBUTE12
1072 , ATTRIBUTE13
1073 , ATTRIBUTE14
1074 , ATTRIBUTE15
1075 , ATTRIBUTE2
1076 , ATTRIBUTE3
1077 , ATTRIBUTE4
1078 , ATTRIBUTE5
1079 , ATTRIBUTE6
1080 , ATTRIBUTE7
1081 , ATTRIBUTE8
1082 , ATTRIBUTE9
1083 , ATTRIBUTE_CATEGORY
1084 , BOM_REVISION
1085 , BOM_REVISION_DATE
1086 , COMMON_BOM_SEQUENCE_ID
1087 , COMMON_ROUTING_SEQUENCE_ID
1088 , CREATED_BY
1089 , CREATION_DATE
1090 , DAILY_PRODUCTION_RATE
1091 , DATE_CLOSED
1092 , DATE_RELEASED
1093 , DEMAND_CLASS
1094 , DESCRIPTION
1095 , FIRM_PLANNED_FLAG
1096 , FIRST_UNIT_COMPLETION_DATE
1097 , FIRST_UNIT_START_DATE
1098 , LAST_UNIT_COMPLETION_DATE
1099 , LAST_UNIT_START_DATE
1100 , LAST_UPDATED_BY
1101 , LAST_UPDATE_DATE
1102 , LAST_UPDATE_LOGIN
1103 , LINE_ID
1104 , MATERIAL_ACCOUNT
1105 , MATERIAL_OVERHEAD_ACCOUNT
1106 , MATERIAL_VARIANCE_ACCOUNT
1107 , ORGANIZATION_ID
1108 , OUTSIDE_PROCESSING_ACCOUNT
1109 , OUTSIDE_PROC_VARIANCE_ACCOUNT
1110 , OVERHEAD_ACCOUNT
1111 , OVERHEAD_VARIANCE_ACCOUNT
1112 , PROCESSING_WORK_DAYS
1113 , PROGRAM_APPLICATION_ID
1114 , PROGRAM_ID
1115 , PROGRAM_UPDATE_DATE
1116 , QUANTITY_COMPLETED
1117 , REPETITIVE_SCHEDULE_ID
1118 , REQUEST_ID
1119 , RESOURCE_ACCOUNT
1120 , RESOURCE_VARIANCE_ACCOUNT
1121 , ROUTING_REVISION
1122 , ROUTING_REVISION_DATE
1123 , STATUS_TYPE
1124 , WIP_ENTITY_ID
1125 FROM WIP_REPETITIVE_SCHEDULES
1126 WHERE ( REPETITIVE_SCHEDULE_ID = nvl(p_repetitive_schedule_id,FND_API.G_MISS_NUM)
1127 )
1128 OR ( WIP_ENTITY_ID = nvl(p_wip_entity_id,FND_API.G_MISS_NUM)
1129 );
1130
1131 BEGIN
1132
1133 IF
1134 (p_repetitive_schedule_id IS NOT NULL
1135 AND
1136 p_repetitive_schedule_id <> FND_API.G_MISS_NUM)
1137 AND
1138 (p_wip_entity_id IS NOT NULL
1139 AND
1140 p_wip_entity_id <> FND_API.G_MISS_NUM)
1141 THEN
1142 IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1143 THEN
1144 FND_MSG_PUB.Add_Exc_Msg
1145 ( G_PKG_NAME
1146 , 'Query Rows'
1147 , 'Keys are mutually exclusive: repetitive_schedule_id = '|| p_repetitive_schedule_id || ', wip_entity_id = '|| p_wip_entity_id
1148 );
1149 END IF;
1150
1151 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1152
1153 END IF;
1154
1155
1156 -- Loop over fetched records
1157
1158 FOR l_implicit_rec IN l_RepSchedule_csr LOOP
1159
1160 l_RepSchedule_rec.alternate_bom_designator := l_implicit_rec.ALTERNATE_BOM_DESIGNATOR;
1164 l_RepSchedule_rec.attribute11 := l_implicit_rec.ATTRIBUTE11;
1161 l_RepSchedule_rec.alternate_rout_designator := l_implicit_rec.ALTERNATE_ROUTING_DESIGNATOR;
1162 l_RepSchedule_rec.attribute1 := l_implicit_rec.ATTRIBUTE1;
1163 l_RepSchedule_rec.attribute10 := l_implicit_rec.ATTRIBUTE10;
1165 l_RepSchedule_rec.attribute12 := l_implicit_rec.ATTRIBUTE12;
1166 l_RepSchedule_rec.attribute13 := l_implicit_rec.ATTRIBUTE13;
1167 l_RepSchedule_rec.attribute14 := l_implicit_rec.ATTRIBUTE14;
1168 l_RepSchedule_rec.attribute15 := l_implicit_rec.ATTRIBUTE15;
1169 l_RepSchedule_rec.attribute2 := l_implicit_rec.ATTRIBUTE2;
1170 l_RepSchedule_rec.attribute3 := l_implicit_rec.ATTRIBUTE3;
1171 l_RepSchedule_rec.attribute4 := l_implicit_rec.ATTRIBUTE4;
1172 l_RepSchedule_rec.attribute5 := l_implicit_rec.ATTRIBUTE5;
1173 l_RepSchedule_rec.attribute6 := l_implicit_rec.ATTRIBUTE6;
1174 l_RepSchedule_rec.attribute7 := l_implicit_rec.ATTRIBUTE7;
1175 l_RepSchedule_rec.attribute8 := l_implicit_rec.ATTRIBUTE8;
1176 l_RepSchedule_rec.attribute9 := l_implicit_rec.ATTRIBUTE9;
1177 l_RepSchedule_rec.attribute_category := l_implicit_rec.ATTRIBUTE_CATEGORY;
1178 l_RepSchedule_rec.bom_revision := l_implicit_rec.BOM_REVISION;
1179 l_RepSchedule_rec.bom_revision_date := l_implicit_rec.BOM_REVISION_DATE;
1180 l_RepSchedule_rec.common_bom_sequence_id := l_implicit_rec.COMMON_BOM_SEQUENCE_ID;
1181 l_RepSchedule_rec.common_rout_sequence_id := l_implicit_rec.COMMON_ROUTING_SEQUENCE_ID;
1182 l_RepSchedule_rec.created_by := l_implicit_rec.CREATED_BY;
1183 l_RepSchedule_rec.creation_date := l_implicit_rec.CREATION_DATE;
1184 l_RepSchedule_rec.daily_production_rate := l_implicit_rec.DAILY_PRODUCTION_RATE;
1185 l_RepSchedule_rec.date_closed := l_implicit_rec.DATE_CLOSED;
1186 l_RepSchedule_rec.date_released := l_implicit_rec.DATE_RELEASED;
1187 l_RepSchedule_rec.demand_class := l_implicit_rec.DEMAND_CLASS;
1188 l_RepSchedule_rec.description := l_implicit_rec.DESCRIPTION;
1189 l_RepSchedule_rec.firm_planned_flag := l_implicit_rec.FIRM_PLANNED_FLAG;
1190 l_RepSchedule_rec.first_unit_cpl_date := l_implicit_rec.FIRST_UNIT_COMPLETION_DATE;
1191 l_RepSchedule_rec.first_unit_start_date := l_implicit_rec.FIRST_UNIT_START_DATE;
1192 l_RepSchedule_rec.last_unit_cpl_date := l_implicit_rec.LAST_UNIT_COMPLETION_DATE;
1193 l_RepSchedule_rec.last_unit_start_date := l_implicit_rec.LAST_UNIT_START_DATE;
1194 l_RepSchedule_rec.last_updated_by := l_implicit_rec.LAST_UPDATED_BY;
1195 l_RepSchedule_rec.last_update_date := l_implicit_rec.LAST_UPDATE_DATE;
1196 l_RepSchedule_rec.last_update_login := l_implicit_rec.LAST_UPDATE_LOGIN;
1200 l_RepSchedule_rec.material_variance_account := l_implicit_rec.MATERIAL_VARIANCE_ACCOUNT;
1197 l_RepSchedule_rec.line_id := l_implicit_rec.LINE_ID;
1198 l_RepSchedule_rec.material_account := l_implicit_rec.MATERIAL_ACCOUNT;
1199 l_RepSchedule_rec.material_overhead_account := l_implicit_rec.MATERIAL_OVERHEAD_ACCOUNT;
1201 l_RepSchedule_rec.organization_id := l_implicit_rec.ORGANIZATION_ID;
1202 l_RepSchedule_rec.osp_account := l_implicit_rec.OUTSIDE_PROCESSING_ACCOUNT;
1203 l_RepSchedule_rec.osp_variance_account := l_implicit_rec.OUTSIDE_PROC_VARIANCE_ACCOUNT;
1204 l_RepSchedule_rec.overhead_account := l_implicit_rec.OVERHEAD_ACCOUNT;
1205 l_RepSchedule_rec.overhead_variance_account := l_implicit_rec.OVERHEAD_VARIANCE_ACCOUNT;
1206 l_RepSchedule_rec.processing_work_days := l_implicit_rec.PROCESSING_WORK_DAYS;
1207 l_RepSchedule_rec.program_application_id := l_implicit_rec.PROGRAM_APPLICATION_ID;
1208 l_RepSchedule_rec.program_id := l_implicit_rec.PROGRAM_ID;
1209 l_RepSchedule_rec.program_update_date := l_implicit_rec.PROGRAM_UPDATE_DATE;
1210 l_RepSchedule_rec.quantity_completed := l_implicit_rec.QUANTITY_COMPLETED;
1211 l_RepSchedule_rec.repetitive_schedule_id := l_implicit_rec.REPETITIVE_SCHEDULE_ID;
1212 l_RepSchedule_rec.request_id := l_implicit_rec.REQUEST_ID;
1213 l_RepSchedule_rec.resource_account := l_implicit_rec.RESOURCE_ACCOUNT;
1214 l_RepSchedule_rec.resource_variance_account := l_implicit_rec.RESOURCE_VARIANCE_ACCOUNT;
1215 l_RepSchedule_rec.routing_revision := l_implicit_rec.ROUTING_REVISION;
1216 l_RepSchedule_rec.routing_revision_date := l_implicit_rec.ROUTING_REVISION_DATE;
1217 l_RepSchedule_rec.status_type := l_implicit_rec.STATUS_TYPE;
1218 l_RepSchedule_rec.wip_entity_id := l_implicit_rec.WIP_ENTITY_ID;
1219
1220 l_RepSchedule_tbl(l_RepSchedule_tbl.COUNT + 1) := l_RepSchedule_rec;
1221
1222 END LOOP;
1223
1224
1225 -- PK sent and no rows found
1226
1227 IF
1228 (p_repetitive_schedule_id IS NOT NULL
1229 AND
1230 p_repetitive_schedule_id <> FND_API.G_MISS_NUM)
1231 AND
1232 (l_RepSchedule_tbl.COUNT = 0)
1233 THEN
1234 RAISE NO_DATA_FOUND;
1235 END IF;
1236
1237
1238 -- Return fetched table
1239
1240 RETURN l_RepSchedule_tbl;
1241
1242 EXCEPTION
1243
1244 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1245
1246 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1247
1248 WHEN OTHERS THEN
1249
1250 IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1251 THEN
1252 FND_MSG_PUB.Add_Exc_Msg
1253 ( G_PKG_NAME
1254 , 'Query_Rows'
1255 );
1256 END IF;
1257
1258 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1259
1260 END Query_Rows;
1261
1262 -- Procedure lock_Row
1263 --
1264
1265 PROCEDURE Lock_Row
1266 ( x_return_status OUT NOCOPY VARCHAR2
1267 , p_RepSchedule_rec IN WIP_Work_Order_PUB.Repschedule_Rec_Type
1268 , x_RepSchedule_rec OUT NOCOPY WIP_Work_Order_PUB.Repschedule_Rec_Type
1269 )
1270 IS
1271 l_RepSchedule_rec WIP_Work_Order_PUB.Repschedule_Rec_Type;
1272 BEGIN
1273
1274 SELECT ALTERNATE_BOM_DESIGNATOR
1275 , ALTERNATE_ROUTING_DESIGNATOR
1276 , ATTRIBUTE1
1277 , ATTRIBUTE10
1278 , ATTRIBUTE11
1279 , ATTRIBUTE12
1280 , ATTRIBUTE13
1281 , ATTRIBUTE14
1282 , ATTRIBUTE15
1283 , ATTRIBUTE2
1284 , ATTRIBUTE3
1285 , ATTRIBUTE4
1286 , ATTRIBUTE5
1287 , ATTRIBUTE6
1288 , ATTRIBUTE7
1289 , ATTRIBUTE8
1290 , ATTRIBUTE9
1291 , ATTRIBUTE_CATEGORY
1292 , BOM_REVISION
1293 , BOM_REVISION_DATE
1294 , COMMON_BOM_SEQUENCE_ID
1295 , COMMON_ROUTING_SEQUENCE_ID
1296 , CREATED_BY
1297 , CREATION_DATE
1298 , DAILY_PRODUCTION_RATE
1299 , DATE_CLOSED
1300 , DATE_RELEASED
1301 , DEMAND_CLASS
1302 , DESCRIPTION
1303 , FIRM_PLANNED_FLAG
1304 , FIRST_UNIT_COMPLETION_DATE
1305 , FIRST_UNIT_START_DATE
1306 , LAST_UNIT_COMPLETION_DATE
1307 , LAST_UNIT_START_DATE
1308 , LAST_UPDATED_BY
1309 , LAST_UPDATE_DATE
1310 , LAST_UPDATE_LOGIN
1311 , LINE_ID
1312 , MATERIAL_ACCOUNT
1313 , MATERIAL_OVERHEAD_ACCOUNT
1314 , MATERIAL_VARIANCE_ACCOUNT
1315 , ORGANIZATION_ID
1319 , OVERHEAD_VARIANCE_ACCOUNT
1316 , OUTSIDE_PROCESSING_ACCOUNT
1317 , OUTSIDE_PROC_VARIANCE_ACCOUNT
1318 , OVERHEAD_ACCOUNT
1320 , PROCESSING_WORK_DAYS
1321 , PROGRAM_APPLICATION_ID
1322 , PROGRAM_ID
1323 , PROGRAM_UPDATE_DATE
1324 , QUANTITY_COMPLETED
1325 , REPETITIVE_SCHEDULE_ID
1326 , REQUEST_ID
1327 , RESOURCE_ACCOUNT
1328 , RESOURCE_VARIANCE_ACCOUNT
1329 , ROUTING_REVISION
1330 , ROUTING_REVISION_DATE
1331 , STATUS_TYPE
1332 , WIP_ENTITY_ID
1333 INTO l_RepSchedule_rec.alternate_bom_designator
1334 , l_RepSchedule_rec.alternate_rout_designator
1335 , l_RepSchedule_rec.attribute1
1336 , l_RepSchedule_rec.attribute10
1337 , l_RepSchedule_rec.attribute11
1338 , l_RepSchedule_rec.attribute12
1339 , l_RepSchedule_rec.attribute13
1340 , l_RepSchedule_rec.attribute14
1341 , l_RepSchedule_rec.attribute15
1342 , l_RepSchedule_rec.attribute2
1343 , l_RepSchedule_rec.attribute3
1344 , l_RepSchedule_rec.attribute4
1345 , l_RepSchedule_rec.attribute5
1346 , l_RepSchedule_rec.attribute6
1347 , l_RepSchedule_rec.attribute7
1348 , l_RepSchedule_rec.attribute8
1349 , l_RepSchedule_rec.attribute9
1350 , l_RepSchedule_rec.attribute_category
1351 , l_RepSchedule_rec.bom_revision
1352 , l_RepSchedule_rec.bom_revision_date
1353 , l_RepSchedule_rec.common_bom_sequence_id
1354 , l_RepSchedule_rec.common_rout_sequence_id
1355 , l_RepSchedule_rec.created_by
1356 , l_RepSchedule_rec.creation_date
1357 , l_RepSchedule_rec.daily_production_rate
1358 , l_RepSchedule_rec.date_closed
1359 , l_RepSchedule_rec.date_released
1360 , l_RepSchedule_rec.demand_class
1361 , l_RepSchedule_rec.description
1362 , l_RepSchedule_rec.firm_planned_flag
1363 , l_RepSchedule_rec.first_unit_cpl_date
1364 , l_RepSchedule_rec.first_unit_start_date
1365 , l_RepSchedule_rec.last_unit_cpl_date
1366 , l_RepSchedule_rec.last_unit_start_date
1367 , l_RepSchedule_rec.last_updated_by
1368 , l_RepSchedule_rec.last_update_date
1369 , l_RepSchedule_rec.last_update_login
1370 , l_RepSchedule_rec.line_id
1371 , l_RepSchedule_rec.material_account
1372 , l_RepSchedule_rec.material_overhead_account
1373 , l_RepSchedule_rec.material_variance_account
1374 , l_RepSchedule_rec.organization_id
1375 , l_RepSchedule_rec.osp_account
1376 , l_RepSchedule_rec.osp_variance_account
1377 , l_RepSchedule_rec.overhead_account
1378 , l_RepSchedule_rec.overhead_variance_account
1379 , l_RepSchedule_rec.processing_work_days
1380 , l_RepSchedule_rec.program_application_id
1381 , l_RepSchedule_rec.program_id
1382 , l_RepSchedule_rec.program_update_date
1383 , l_RepSchedule_rec.quantity_completed
1384 , l_RepSchedule_rec.repetitive_schedule_id
1385 , l_RepSchedule_rec.request_id
1386 , l_RepSchedule_rec.resource_account
1387 , l_RepSchedule_rec.resource_variance_account
1391 , l_RepSchedule_rec.wip_entity_id
1388 , l_RepSchedule_rec.routing_revision
1389 , l_RepSchedule_rec.routing_revision_date
1390 , l_RepSchedule_rec.status_type
1392 FROM WIP_REPETITIVE_SCHEDULES
1393 WHERE REPETITIVE_SCHEDULE_ID = p_RepSchedule_rec.repetitive_schedule_id
1394 FOR UPDATE NOWAIT;
1395
1396 -- Row locked. Compare IN attributes to DB attributes.
1397
1398 IF WIP_GLOBALS.Equal(p_RepSchedule_rec.alternate_bom_designator,
1399 l_RepSchedule_rec.alternate_bom_designator)
1400 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.alternate_rout_designator,
1401 l_RepSchedule_rec.alternate_rout_designator)
1402 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute1,
1403 l_RepSchedule_rec.attribute1)
1404 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute10,
1405 l_RepSchedule_rec.attribute10)
1406 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute11,
1407 l_RepSchedule_rec.attribute11)
1408 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute12,
1409 l_RepSchedule_rec.attribute12)
1410 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute13,
1411 l_RepSchedule_rec.attribute13)
1412 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute14,
1413 l_RepSchedule_rec.attribute14)
1414 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute15,
1415 l_RepSchedule_rec.attribute15)
1416 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute2,
1417 l_RepSchedule_rec.attribute2)
1418 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute3,
1419 l_RepSchedule_rec.attribute3)
1420 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute4,
1421 l_RepSchedule_rec.attribute4)
1422 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute5,
1423 l_RepSchedule_rec.attribute5)
1424 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute6,
1425 l_RepSchedule_rec.attribute6)
1426 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute7,
1427 l_RepSchedule_rec.attribute7)
1428 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute8,
1429 l_RepSchedule_rec.attribute8)
1430 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute9,
1431 l_RepSchedule_rec.attribute9)
1432 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.attribute_category,
1433 l_RepSchedule_rec.attribute_category)
1434 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.bom_revision,
1435 l_RepSchedule_rec.bom_revision)
1436 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.bom_revision_date,
1437 l_RepSchedule_rec.bom_revision_date)
1438 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.common_bom_sequence_id,
1439 l_RepSchedule_rec.common_bom_sequence_id)
1440 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.common_rout_sequence_id,
1441 l_RepSchedule_rec.common_rout_sequence_id)
1442 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.created_by,
1443 l_RepSchedule_rec.created_by)
1444 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.creation_date,
1445 l_RepSchedule_rec.creation_date)
1446 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.daily_production_rate,
1450 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.date_released,
1447 l_RepSchedule_rec.daily_production_rate)
1448 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.date_closed,
1449 l_RepSchedule_rec.date_closed)
1451 l_RepSchedule_rec.date_released)
1452 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.demand_class,
1453 l_RepSchedule_rec.demand_class)
1454 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.description,
1455 l_RepSchedule_rec.description)
1456 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.firm_planned_flag,
1457 l_RepSchedule_rec.firm_planned_flag)
1458 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.first_unit_cpl_date,
1459 l_RepSchedule_rec.first_unit_cpl_date)
1460 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.first_unit_start_date,
1461 l_RepSchedule_rec.first_unit_start_date)
1462 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.last_unit_cpl_date,
1463 l_RepSchedule_rec.last_unit_cpl_date)
1464 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.last_unit_start_date,
1465 l_RepSchedule_rec.last_unit_start_date)
1466 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.last_updated_by,
1467 l_RepSchedule_rec.last_updated_by)
1468 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.last_update_date,
1469 l_RepSchedule_rec.last_update_date)
1470 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.last_update_login,
1471 l_RepSchedule_rec.last_update_login)
1472 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.line_id,
1473 l_RepSchedule_rec.line_id)
1474 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.material_account,
1475 l_RepSchedule_rec.material_account)
1476 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.material_overhead_account,
1477 l_RepSchedule_rec.material_overhead_account)
1478 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.material_variance_account,
1479 l_RepSchedule_rec.material_variance_account)
1480 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.organization_id,
1481 l_RepSchedule_rec.organization_id)
1482 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.osp_account,
1483 l_RepSchedule_rec.osp_account)
1484 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.osp_variance_account,
1485 l_RepSchedule_rec.osp_variance_account)
1486 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.overhead_account,
1487 l_RepSchedule_rec.overhead_account)
1488 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.overhead_variance_account,
1489 l_RepSchedule_rec.overhead_variance_account)
1490 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.processing_work_days,
1491 l_RepSchedule_rec.processing_work_days)
1492 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.program_application_id,
1493 l_RepSchedule_rec.program_application_id)
1494 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.program_id,
1495 l_RepSchedule_rec.program_id)
1496 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.program_update_date,
1497 l_RepSchedule_rec.program_update_date)
1498 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.quantity_completed,
1499 l_RepSchedule_rec.quantity_completed)
1503 l_RepSchedule_rec.request_id)
1500 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.repetitive_schedule_id,
1501 l_RepSchedule_rec.repetitive_schedule_id)
1502 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.request_id,
1504 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.resource_account,
1505 l_RepSchedule_rec.resource_account)
1506 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.resource_variance_account,
1507 l_RepSchedule_rec.resource_variance_account)
1508 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.routing_revision,
1509 l_RepSchedule_rec.routing_revision)
1510 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.routing_revision_date,
1511 l_RepSchedule_rec.routing_revision_date)
1512 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.status_type,
1513 l_RepSchedule_rec.status_type)
1514 AND WIP_GLOBALS.Equal(p_RepSchedule_rec.wip_entity_id,
1515 l_RepSchedule_rec.wip_entity_id)
1516 THEN
1517
1518 -- Row has not changed. Set out parameter.
1519
1520 x_RepSchedule_rec := l_RepSchedule_rec;
1521
1522 -- Set return status
1523
1524 x_return_status := FND_API.G_RET_STS_SUCCESS;
1525 x_RepSchedule_rec.return_status := FND_API.G_RET_STS_SUCCESS;
1526
1527 ELSE
1528
1529 -- Row has changed by another user.
1530
1531 x_return_status := FND_API.G_RET_STS_ERROR;
1532 x_RepSchedule_rec.return_status := FND_API.G_RET_STS_ERROR;
1533
1534 IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1535 THEN
1536
1537 FND_MESSAGE.SET_NAME('WIP','OE_LOCK_ROW_CHANGED');
1538 FND_MSG_PUB.Add;
1539
1540 END IF;
1541
1542 END IF;
1543
1544 EXCEPTION
1545
1546 WHEN NO_DATA_FOUND THEN
1547
1548 x_return_status := FND_API.G_RET_STS_ERROR;
1549 x_RepSchedule_rec.return_status := FND_API.G_RET_STS_ERROR;
1550
1551 IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1552 THEN
1553
1554 FND_MESSAGE.SET_NAME('WIP','OE_LOCK_ROW_DELETED');
1555 FND_MSG_PUB.Add;
1556
1557 END IF;
1558 WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
1559
1560 x_return_status := FND_API.G_RET_STS_ERROR;
1561 x_RepSchedule_rec.return_status := FND_API.G_RET_STS_ERROR;
1562
1563 IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1564 THEN
1565
1566 FND_MESSAGE.SET_NAME('WIP','OE_LOCK_ROW_ALREADY_LOCKED');
1567 FND_MSG_PUB.Add;
1568
1569 END IF;
1570 WHEN OTHERS THEN
1571
1572 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1573 x_RepSchedule_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1574
1575 IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1576 THEN
1577 FND_MSG_PUB.Add_Exc_Msg
1578 ( G_PKG_NAME
1579 , 'Lock_Row'
1580 );
1581 END IF;
1582
1583 END Lock_Row;
1584
1585
1586 FUNCTION Compare(p_RepSchedule_rec1 IN WIP_Work_Order_PUB.Repschedule_Rec_Type,
1587 p_RepSchedule_rec2 IN WIP_Work_Order_PUB.Repschedule_Rec_Type)
1588 RETURN BOOLEAN
1589 IS
1590 BEGIN
1591
1592 IF WIP_GLOBALS.Equal(p_RepSchedule_rec1.alternate_bom_designator,
1593 p_RepSchedule_rec2.alternate_bom_designator)
1594 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.alternate_rout_designator,
1595 p_RepSchedule_rec2.alternate_rout_designator)
1596 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute1,
1597 p_RepSchedule_rec2.attribute1)
1598 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute10,
1599 p_RepSchedule_rec2.attribute10)
1600 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute11,
1601 p_RepSchedule_rec2.attribute11)
1602 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute12,
1603 p_RepSchedule_rec2.attribute12)
1604 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute13,
1605 p_RepSchedule_rec2.attribute13)
1606 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute14,
1607 p_RepSchedule_rec2.attribute14)
1608 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute15,
1609 p_RepSchedule_rec2.attribute15)
1610 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute2,
1611 p_RepSchedule_rec2.attribute2)
1612 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute3,
1613 p_RepSchedule_rec2.attribute3)
1614 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute4,
1615 p_RepSchedule_rec2.attribute4)
1616 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute5,
1617 p_RepSchedule_rec2.attribute5)
1618 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute6,
1619 p_RepSchedule_rec2.attribute6)
1620 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute7,
1621 p_RepSchedule_rec2.attribute7)
1622 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute8,
1623 p_RepSchedule_rec2.attribute8)
1624 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute9,
1628 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.bom_revision,
1625 p_RepSchedule_rec2.attribute9)
1626 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.attribute_category,
1627 p_RepSchedule_rec2.attribute_category)
1629 p_RepSchedule_rec2.bom_revision)
1630 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.bom_revision_date,
1631 p_RepSchedule_rec2.bom_revision_date)
1632 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.common_bom_sequence_id,
1633 p_RepSchedule_rec2.common_bom_sequence_id)
1634 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.common_rout_sequence_id,
1635 p_RepSchedule_rec2.common_rout_sequence_id)
1636 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.created_by,
1637 p_RepSchedule_rec2.created_by)
1638 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.creation_date,
1639 p_RepSchedule_rec2.creation_date)
1640 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.daily_production_rate,
1641 p_RepSchedule_rec2.daily_production_rate)
1642 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.date_closed,
1643 p_RepSchedule_rec2.date_closed)
1644 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.date_released,
1645 p_RepSchedule_rec2.date_released)
1646 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.demand_class,
1647 p_RepSchedule_rec2.demand_class)
1648 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.description,
1649 p_RepSchedule_rec2.description)
1650 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.firm_planned_flag,
1651 p_RepSchedule_rec2.firm_planned_flag)
1652 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.first_unit_cpl_date,
1653 p_RepSchedule_rec2.first_unit_cpl_date)
1654 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.first_unit_start_date,
1655 p_RepSchedule_rec2.first_unit_start_date)
1656 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.last_unit_cpl_date,
1657 p_RepSchedule_rec2.last_unit_cpl_date)
1658 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.last_unit_start_date,
1659 p_RepSchedule_rec2.last_unit_start_date)
1660 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.last_updated_by,
1661 p_RepSchedule_rec2.last_updated_by)
1662 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.last_update_date,
1663 p_RepSchedule_rec2.last_update_date)
1664 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.last_update_login,
1665 p_RepSchedule_rec2.last_update_login)
1666 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.line_id,
1667 p_RepSchedule_rec2.line_id)
1668 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.material_account,
1669 p_RepSchedule_rec2.material_account)
1670 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.material_overhead_account,
1671 p_RepSchedule_rec2.material_overhead_account)
1672 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.material_variance_account,
1673 p_RepSchedule_rec2.material_variance_account)
1674 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.organization_id,
1675 p_RepSchedule_rec2.organization_id)
1676 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.osp_account,
1677 p_RepSchedule_rec2.osp_account)
1678 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.osp_variance_account,
1679 p_RepSchedule_rec2.osp_variance_account)
1680 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.overhead_account,
1681 p_RepSchedule_rec2.overhead_account)
1682 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.overhead_variance_account,
1683 p_RepSchedule_rec2.overhead_variance_account)
1684 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.processing_work_days,
1685 p_RepSchedule_rec2.processing_work_days)
1686 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.program_application_id,
1687 p_RepSchedule_rec2.program_application_id)
1688 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.program_id,
1689 p_RepSchedule_rec2.program_id)
1690 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.program_update_date,
1691 p_RepSchedule_rec2.program_update_date)
1692 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.quantity_completed,
1693 p_RepSchedule_rec2.quantity_completed)
1694 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.repetitive_schedule_id,
1695 p_RepSchedule_rec2.repetitive_schedule_id)
1696 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.request_id,
1697 p_RepSchedule_rec2.request_id)
1698 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.resource_account,
1699 p_RepSchedule_rec2.resource_account)
1700 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.resource_variance_account,
1701 p_RepSchedule_rec2.resource_variance_account)
1702 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.routing_revision,
1703 p_RepSchedule_rec2.routing_revision)
1704 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.routing_revision_date,
1705 p_RepSchedule_rec2.routing_revision_date)
1706 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.status_type,
1707 p_RepSchedule_rec2.status_type)
1708 AND WIP_GLOBALS.Equal(p_RepSchedule_rec1.wip_entity_id,
1709 p_RepSchedule_rec2.wip_entity_id)
1710 THEN
1711 RETURN TRUE;
1712 ELSE
1713 RETURN FALSE;
1714 END IF;
1715
1716 END Compare;
1717
1718 PROCEDURE dprintf(p_RepSchedule_rec IN WIP_Work_Order_PUB.RepSchedule_Rec_Type)
1719 IS
1720 BEGIN
1721
1722 null;
1723 -- dbms_output.new_line;
1724 -- dbms_output.put_line('Rep Schedule Record:');
1725 -- dbms_output.put_line('-------------------');
1726 -- dbms_output.put_line('daily_production_rate : ' || To_char(p_RepSchedule_rec.daily_production_rate));
1727 -- dbms_output.put_line('date_closed : ' || To_char(p_RepSchedule_rec.date_closed,WIP_CONSTANTS.DATE_FMT));
1728 -- dbms_output.put_line('date_released : ' || To_char(p_RepSchedule_rec.date_released,WIP_CONSTANTS.DATE_FMT));
1729 -- dbms_output.put_line('description : ' || p_RepSchedule_rec.description);
1730 -- dbms_output.put_line('first_unit_cpl_date : ' || To_char(p_RepSchedule_rec.first_unit_cpl_date,WIP_CONSTANTS.DATE_FMT));
1731 -- dbms_output.put_line('first_unit_start_date : ' || To_char(p_RepSchedule_rec.first_unit_start_date,WIP_CONSTANTS.DATE_FMT));
1732 -- dbms_output.put_line('last_unit_cpl_date : ' || To_char(p_RepSchedule_rec.last_unit_cpl_date,WIP_CONSTANTS.DATE_FMT));
1733 -- dbms_output.put_line('last_unit_start_date : ' || To_char(p_RepSchedule_rec.last_unit_start_date,WIP_CONSTANTS.DATE_FMT));
1734 -- dbms_output.put_line('line_id : ' || To_char(p_RepSchedule_rec.line_id));
1735 -- dbms_output.put_line('organization_id : ' || To_char(p_RepSchedule_rec.organization_id));
1736 -- dbms_output.put_line('processing_work_days : ' || To_char(p_RepSchedule_rec.processing_work_days));
1737 -- dbms_output.put_line('quantity_completed : ' || To_char(p_RepSchedule_rec.quantity_completed));
1738 -- dbms_output.put_line('repetitive_schedule_id : ' || To_char(p_RepSchedule_rec.repetitive_schedule_id));
1739 -- dbms_output.put_line('status_type : ' || To_char(p_RepSchedule_rec.status_type));
1740 -- dbms_output.put_line('wip_entity_id : ' || To_char(p_RepSchedule_rec.wip_entity_id));
1741 -- dbms_output.put_line('kanban_card_id : ' || To_char(p_RepSchedule_rec.kanban_card_id));
1742 -- dbms_output.put_line('return_status : ' || p_RepSchedule_rec.return_status);
1743 -- dbms_output.put_line('db_flag : ' || p_RepSchedule_rec.db_flag);
1744 -- dbms_output.put_line('action : ' || p_RepSchedule_rec.action);
1745 -- dbms_output.put_line('End Rep Schedule Record');
1746
1747 EXCEPTION
1748 WHEN OTHERS THEN
1749 NULL;
1750
1751 END dprintf;
1752
1753 END WIP_Repschedule_Util;