[Home] [Help]
PACKAGE BODY: APPS.FII_PROJECT_M_C
Source
1 Package Body FII_PROJECT_M_C AS
2 /* $Header: FIICMPJB.pls 120.2 2005/06/07 14:59:07 pschandr ship $ */
3
4 g_debug_flag VARCHAR2(1) := NVL(FND_PROFILE.value('FII_DEBUG_MODE'), 'N');
5
6 G_PUSH_DATE_RANGE1 Date := Null;
7 G_PUSH_DATE_RANGE2 Date := Null;
8 g_row_count Number := 0;
9 g_exception_msg varchar2(2000) := Null;
10
11
12 Procedure Push(Errbuf in out nocopy Varchar2,
13 Retcode in out nocopy Varchar2,
14 p_from_date IN Varchar2,
15 p_to_date IN Varchar2) IS
16
17 l_dimension_name Varchar2(30) :='EDW_PROJECT_M' ;
18 l_temp_date Date:=Null;
19 l_rows_inserted Number:=0;
20 l_duration Number:=0;
21 l_exception_msg Varchar2(2000):=Null;
22 l_from_date Date:=Null;
23 l_to_date Date:=Null;
24
25 -- -------------------------------------------
26 -- Put any additional developer variables here
27 -- -------------------------------------------
28
29 Begin
30
31 Errbuf :=NULL;
32 Retcode:=0;
33
34 l_from_date :=to_date(p_from_date,'YYYY/MM/DD HH24:MI:SS');
35 l_to_date :=to_date(p_to_date, 'YYYY/MM/DD HH24:MI:SS');
36
37 IF (Not EDW_COLLECTION_UTIL.setup(l_dimension_name)) THEN
38 errbuf := fnd_message.get;
39 raise_application_error(-20000,'Error in SETUP: ' || errbuf);
40 END IF;
41
42 FII_PROJECT_M_C.g_push_date_range1 := nvl(l_from_date,EDW_COLLECTION_UTIL.G_local_last_push_start_date - EDW_COLLECTION_UTIL.g_offset);
43 FII_PROJECT_M_C.g_push_date_range2 := nvl(l_to_date,EDW_COLLECTION_UTIL.G_local_curr_push_start_date);
44
45 if g_debug_flag = 'Y' then
46 edw_log.put_line( 'The collection range is from '||
47 to_char(FII_PROJECT_M_C.g_push_date_range1,'MM/DD/YYYY HH24:MI:SS')||' to '||
48 to_char(FII_PROJECT_M_C.g_push_date_range2,'MM/DD/YYYY HH24:MI:SS'));
49 edw_log.put_line(' ');
50 end if;
51
52 -- -----------------------------------------------------------------------------
53 -- Start of Collection , Developer Customizable Section
54 -- -----------------------------------------------------------------------------
55
56 if g_debug_flag = 'Y' then
57 edw_log.put_line(' ');
58 edw_log.put_line('Pushing data');
59 end if;
60
61 l_temp_date := sysdate;
62
63 Push_EDW_PROJ_TASK_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
64 Push_EDW_PROJ_TOP_TASK_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
65 Push_EDW_PROJ_PROJECT_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
66 Push_EDW_PROJ_PRJ_TYP_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
67 Push_EDW_PROJ_CLS1_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
68 Push_EDW_PROJ_CLS2_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
69 Push_EDW_PROJ_CLS3_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
70 Push_EDW_PROJ_CLS4_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
71 Push_EDW_PROJ_CLS5_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
72 Push_EDW_PROJ_CLS6_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
73 Push_EDW_PROJ_CLS7_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
74 Push_EDW_PROJ_CATEG1_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
75 Push_EDW_PROJ_CATEG2_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
76 Push_EDW_PROJ_CATEG3_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
77 Push_EDW_PROJ_CATEG4_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
78 Push_EDW_PROJ_CATEG5_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
79 Push_EDW_PROJ_CATEG6_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
80 Push_EDW_PROJ_CATEG7_LSTG(FII_PROJECT_M_C.g_push_date_range1, FII_PROJECT_M_C.g_push_date_range2);
81
82 l_duration := sysdate - l_temp_date;
83
84 if g_debug_flag = 'Y' then
85 edw_log.put_line('Process Time: '||edw_log.duration(l_duration));
86 edw_log.put_line(' ');
87 end if;
88
89 -- ---------------------------------------------------------------------------
90 -- END OF Collection , Developer Customizable Section
91 -- ---------------------------------------------------------------------------
92
93 EDW_COLLECTION_UTIL.wrapup(TRUE, g_row_count, null, g_push_date_range1, g_push_date_range2);
94
95 commit;
96
97 Exception
98
99 When others then
100
101 Errbuf:=sqlerrm;
102 Retcode:=sqlcode;
103 l_exception_msg := Retcode || ':' || Errbuf;
104 FII_PROJECT_M_C.g_exception_msg := l_exception_msg;
105
106 rollback;
107
108 EDW_COLLECTION_UTIL.wrapup(FALSE, 0, FII_PROJECT_M_C.g_exception_msg, g_push_date_range1, g_push_date_range2);
109
110 commit;
111
112 End;
113
114
115 Procedure Push_EDW_PROJ_TASK_LSTG(p_from_date IN date, p_to_date IN DATE) IS
116
117 l_date1 DATE;
118 l_date2 DATE;
119 l_rows_inserted NUMBER := 0;
120
121 BEGIN
122
123 if g_debug_flag = 'Y' then
124 edw_log.put_line('Starting Push_EDW_PROJ_TASK_LSTG');
125 end if;
126
127 l_date1 := p_from_date;
128 l_date2 := p_to_date;
129
130 Insert Into EDW_PROJ_TASK_LSTG
131 (
132 TASK_PK,
133 TOP_TASK_FK,
134 NAME,
135 TASK,
136 TASK_NUMBER,
137 TASK_START_DATE,
138 TASK_END_DATE,
139 LABOR_COST_MULT,
140 SERVICE_TYPE_CODE,
141 DENORM_TASK_ORG_FK,
142 USER_ATTRIBUTE1,
143 USER_ATTRIBUTE2,
144 USER_ATTRIBUTE3,
145 USER_ATTRIBUTE4,
146 USER_ATTRIBUTE5,
147 INSTANCE,
148 DELETION_DATE,
149 OPERATION_CODE,
150 COLLECTION_STATUS,
151 CREATION_DATE,
152 LAST_UPDATE_DATE,
153 EDW_RECORD_TYPE
154 )
155 select
156 TASK_PK,
157 NVL(TOP_TASK_FK, 'NA_EDW'),
158 NAME,
159 TASK,
160 TASK_NUMBER,
161 TASK_START_DATE,
162 TASK_END_DATE,
163 LABOR_COST_MULT,
164 SERVICE_TYPE_CODE,
165 NVL(DENORM_TASK_ORG_FK,'NA_EDW'),
166 USER_ATTRIBUTE1,
167 USER_ATTRIBUTE2,
168 USER_ATTRIBUTE3,
169 USER_ATTRIBUTE4,
170 USER_ATTRIBUTE5,
171 INSTANCE,
172 to_date(NULL),
173 NULL,
174 'READY',
175 SYSDATE,
176 SYSDATE,
177 'ORACLE'
178 from
179 FII_PROJ_TASK_LCV
180 where
181 last_update_date between l_date1 and l_date2;
182
183 l_rows_inserted := sql%rowcount;
184 g_row_count := g_row_count + l_rows_inserted ;
185
186 if g_debug_flag = 'Y' then
187 edw_log.put_line('Commiting records for EDW_PROJ_TASK_LSTG');
188 end if;
189
190 commit;
191
192 if g_debug_flag = 'Y' then
193 edw_log.put_line('Completed Push_EDW_PROJ_TASK_LSTG');
194 end if;
195
196 Exception
197
198 When others then
199 raise;
200 commit;
201
202 END;
203
204
205 Procedure Push_EDW_PROJ_TOP_TASK_LSTG(p_from_date IN date, p_to_date IN DATE) IS
206
207 l_date1 DATE;
208 l_date2 DATE;
209 l_rows_inserted NUMBER := 0;
210
211 BEGIN
212
213 if g_debug_flag = 'Y' then
214 edw_log.put_line('Starting Push_EDW_PROJ_TOP_TASK_LSTG');
215 end if;
216
217 l_date1 := p_from_date;
218 l_date2 := p_to_date;
219
220 Insert Into EDW_PROJ_TOP_TASK_LSTG
221 (
222 TOP_TASK_PK,
223 PROJECT_FK,
224 NAME,
225 TOP_TASK,
226 TASK_NUMBER,
227 TASK_START_DATE,
228 TASK_END_DATE,
229 LABOR_COST_MULT,
230 SERVICE_TYPE_CODE,
231 USER_ATTRIBUTE1,
232 USER_ATTRIBUTE2,
233 USER_ATTRIBUTE3,
234 USER_ATTRIBUTE4,
235 USER_ATTRIBUTE5,
236 INSTANCE,
237 DELETION_DATE,
238 OPERATION_CODE,
239 COLLECTION_STATUS
240 )
241 select
242 TOP_TASK_PK,
243 NVL(PROJECT_FK, 'NA_EDW'),
244 NAME,
245 TOP_TASK,
246 TASK_NUMBER,
247 TASK_START_DATE,
248 TASK_END_DATE,
249 LABOR_COST_MULT,
250 SERVICE_TYPE_CODE,
251 USER_ATTRIBUTE1,
252 USER_ATTRIBUTE2,
253 USER_ATTRIBUTE3,
254 USER_ATTRIBUTE4,
255 USER_ATTRIBUTE5,
256 INSTANCE,
257 to_date(NULL),
258 NULL,
259 'READY'
260 from
261 FII_PROJ_TOP_TASK_LCV
262 where
263 last_update_date between l_date1 and l_date2;
264
265 l_rows_inserted := sql%rowcount;
266 --g_row_count := g_row_count + l_rows_inserted ;
267
268 if g_debug_flag = 'Y' then
269 edw_log.put_line('Commiting records for EDW_PROJ_TOP_TASK_LSTG');
270 end if;
271
272 commit;
273
274 if g_debug_flag = 'Y' then
275 edw_log.put_line('Completed Push_EDW_PROJ_TOP_TASK_LSTG');
276 end if;
277
278 Exception
279
280 When others then
281 raise;
282 commit;
283
284 END;
285
286
287 Procedure Push_EDW_PROJ_PROJECT_LSTG(p_from_date IN date, p_to_date IN DATE) IS
288
289 l_date1 DATE;
290 l_date2 DATE;
291 l_rows_inserted NUMBER := 0;
292
293 BEGIN
294
295 if g_debug_flag = 'Y' then
296 edw_log.put_line('Starting Push_EDW_PROJ_PROJECT_LSTG');
297 end if;
298
299 l_date1 := p_from_date;
300 l_date2 := p_to_date;
301
302 Insert Into EDW_PROJ_PROJECT_LSTG
303 (
304 PROJECT_PK,
305 PRJ_TYP_FK,
306 PROJ_CLS1_FK,
307 PROJ_CLS2_FK,
308 PROJ_CLS3_FK,
309 PROJ_CLS4_FK,
310 PROJ_CLS5_FK,
311 PROJ_CLS6_FK,
312 PROJ_CLS7_FK,
313 NAME,
314 PROJECT,
315 PROJECT_NUMBER,
316 PROJECT_MANAGER,
317 DISTRIBUTION_RULE,
318 PROJECT_STATUS_CODE,
319 USER_ATTRIBUTE1,
320 USER_ATTRIBUTE2,
321 USER_ATTRIBUTE3,
322 USER_ATTRIBUTE4,
323 USER_ATTRIBUTE5,
324 INSTANCE,
325 DELETION_DATE,
326 OPERATION_CODE,
327 COLLECTION_STATUS
328 )
329 select
330 PROJECT_PK,
331 NVL(PRJ_TYP_FK, 'NA_EDW'),
332 NVL(PROJ_CLS1_FK, 'NA_EDW'),
333 NVL(PROJ_CLS2_FK, 'NA_EDW'),
334 NVL(PROJ_CLS3_FK, 'NA_EDW'),
335 NVL(PROJ_CLS4_FK, 'NA_EDW'),
336 NVL(PROJ_CLS5_FK, 'NA_EDW'),
337 NVL(PROJ_CLS6_FK, 'NA_EDW'),
338 NVL(PROJ_CLS7_FK, 'NA_EDW'),
339 NAME,
340 PROJECT,
341 PROJECT_NUMBER,
342 PROJECT_MANAGER,
343 DISTRIBUTION_RULE,
344 PROJECT_STATUS_CODE,
345 USER_ATTRIBUTE1,
346 USER_ATTRIBUTE2,
347 USER_ATTRIBUTE3,
348 USER_ATTRIBUTE4,
349 USER_ATTRIBUTE5,
350 INSTANCE,
351 to_date(NULL),
352 NULL,
353 'READY'
354 from
355 FII_PROJ_PROJECT_LCV
356 where
357 last_update_date between l_date1 and l_date2;
358
359 l_rows_inserted := sql%rowcount;
360 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
361
362 if g_debug_flag = 'Y' then
363 edw_log.put_line('Commiting records for EDW_PROJ_PROJECT_LSTG');
364 end if;
365
366 commit;
367
368 if g_debug_flag = 'Y' then
369 edw_log.put_line('Completed Push_EDW_PROJ_PROJECT_LSTG');
370 end if;
371
372 Exception
373
374 When others then
375 raise;
376 commit;
377
378 END;
379
380
381 Procedure Push_EDW_PROJ_PRJ_TYP_LSTG(p_from_date IN date, p_to_date IN DATE) IS
382
383 l_date1 DATE;
384 l_date2 DATE;
385 l_rows_inserted NUMBER :=0;
386 l_seiban_project_type VARCHAR2(240);
387 l_instance VARCHAR2(30);
388
389 BEGIN
390
391 if g_debug_flag = 'Y' then
392 edw_log.put_line('Starting Push_EDW_PROJ_PRJ_TYP_LSTG');
393 end if;
394
395 l_date1 := p_from_date;
396 l_date2 := p_to_date;
397
398 Insert Into EDW_PROJ_PRJ_TYP_LSTG
399 (
400 PRJ_TYP_PK,
401 ALL_FK,
402 NAME,
403 PROJECT_TYPE,
404 USER_ATTRIBUTE1,
405 USER_ATTRIBUTE2,
406 USER_ATTRIBUTE3,
407 USER_ATTRIBUTE4,
408 USER_ATTRIBUTE5,
409 INSTANCE,
410 DELETION_DATE,
411 OPERATION_CODE,
412 COLLECTION_STATUS
413 )
414 select
415 PRJ_TYP_PK,
416 NVL(ALL_FK, 'NA_EDW'),
417 NAME,
418 PROJECT_TYPE,
419 USER_ATTRIBUTE1,
420 USER_ATTRIBUTE2,
421 USER_ATTRIBUTE3,
422 USER_ATTRIBUTE4,
423 USER_ATTRIBUTE5,
424 INSTANCE,
428 from
425 to_date(NULL),
426 NULL,
427 'READY'
429 FII_PROJ_PRJ_TYP_LCV
430 where
431 last_update_date between l_date1 and l_date2;
432
433 l_rows_inserted := sql%rowcount;
434
435 -- Create record for the Seiban Project Type.
436 -- Seiban Project Type was created to group projects
437 -- defined in Oracle Project Manufacturing.
438 --
439 -- All Projects pushed from Oracle Project Manufacturing
440 -- (table PJM_SEIBAN_NUMBERS) will be assigned project type "Seiban".
441 --
442 -- Note that the NAME and PROJECT_TYPE columns use
443 -- FII_PA_SEIBAN_PROJECT_TYPE message as a data source. This was
444 -- done to enable translation of the word "Seiban" into different
445 -- languages.
446
447 l_seiban_project_type := fnd_message.get_string( 'FII', 'FII_PA_SEIBAN_PROJECT_TYPE' );
448
449 if nvl( l_seiban_project_type, 'FII_PA_SEIBAN_PROJECT_TYPE' ) <> 'FII_PA_SEIBAN_PROJECT_TYPE' then
450 -- we have chacked that fnd_message returned a meaningful result;
451 -- insert record into the staging table.
452
453 l_instance := edw_instance.get_code;
454
455 Insert Into EDW_PROJ_PRJ_TYP_LSTG
456 (
457 PRJ_TYP_PK,
458 ALL_FK,
459 NAME,
460 PROJECT_TYPE,
461 USER_ATTRIBUTE1,
462 USER_ATTRIBUTE2,
463 USER_ATTRIBUTE3,
464 USER_ATTRIBUTE4,
465 USER_ATTRIBUTE5,
466 INSTANCE,
467 DELETION_DATE,
468 OPERATION_CODE,
469 COLLECTION_STATUS
470 )
471 values
472 (
473 'FII_PJM_SEIBAN_PROJECT_TYPE-' || l_instance,
474 'ALL',
475 l_seiban_project_type || ', ' || l_instance,
476 l_seiban_project_type,
477 null,
478 null,
479 null,
480 null,
481 null,
482 l_instance,
483 to_date( null ),
484 null,
485 'READY'
486 );
487
488 l_rows_inserted := l_rows_inserted + 1;
489
490 end if;
491
492 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
493
494 if g_debug_flag = 'Y' then
495 edw_log.put_line('Commiting records for EDW_PROJ_PRJ_TYP_LSTG');
496 end if;
497
498 commit;
499
500 if g_debug_flag = 'Y' then
501 edw_log.put_line('Completed Push_EDW_PROJ_PRJ_TYP_LSTG');
502 end if;
503
504 Exception
505
506 When others then
507 raise;
508 commit;
509
510 END;
511
512
513 Procedure Push_EDW_PROJ_CLS1_LSTG(p_from_date IN date, p_to_date IN DATE) IS
514
515 l_date1 DATE;
516 l_date2 DATE;
517 l_rows_inserted NUMBER :=0;
518
519 BEGIN
520
521 if g_debug_flag = 'Y' then
522 edw_log.put_line('Starting Push_EDW_PROJ_CLS1_LSTG');
523 end if;
524
525 l_date1 := p_from_date;
526 l_date2 := p_to_date;
527
528 Insert Into EDW_PROJ_CLS1_LSTG
529 (
530 DELETION_DATE,
531 INSTANCE,
532 NAME,
533 PROJECT_CLASS1,
534 PROJ_CATEG1_FK,
535 PROJ_CLS1_PK,
536 USER_ATTRIBUTE1,
537 USER_ATTRIBUTE2,
538 USER_ATTRIBUTE3,
539 USER_ATTRIBUTE4,
540 USER_ATTRIBUTE5,
541 OPERATION_CODE,
542 COLLECTION_STATUS
543 )
544 select
545 to_date(NULL),
546 INSTANCE,
547 NAME,
548 PROJECT_CLASS1,
549 NVL(PROJ_CATEG1_FK, 'NA_EDW'),
550 PROJ_CLS1_PK,
551 USER_ATTRIBUTE1,
552 USER_ATTRIBUTE2,
553 USER_ATTRIBUTE3,
554 USER_ATTRIBUTE4,
555 USER_ATTRIBUTE5,
556 NULL,
557 'READY'
558 from
559 FII_PROJ_CLS1_LCV
560 where
561 last_update_date between l_date1 and l_date2;
562
563 l_rows_inserted := sql%rowcount;
564 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
565
566 if g_debug_flag = 'Y' then
567 edw_log.put_line('Commiting records for EDW_PROJ_CLS1_LSTG');
568 end if;
569
570 commit;
571
572 if g_debug_flag = 'Y' then
573 edw_log.put_line('Completed Push_EDW_PROJ_CLS1_LSTG');
574 end if;
575
576 Exception
577
578 When others then
579 raise;
580 commit;
581
582 END;
583
584
585 Procedure Push_EDW_PROJ_CLS2_LSTG(p_from_date IN date, p_to_date IN DATE) IS
586
587 l_date1 DATE;
588 l_date2 DATE;
589 l_rows_inserted NUMBER :=0;
590
591 BEGIN
592
593 if g_debug_flag = 'Y' then
594 edw_log.put_line('Starting Push_EDW_PROJ_CLS2_LSTG');
595 end if;
596
597 l_date1 := p_from_date;
598 l_date2 := p_to_date;
599
600 Insert Into EDW_PROJ_CLS2_LSTG
604 NAME,
601 (
602 DELETION_DATE,
603 INSTANCE,
605 PROJECT_CLASS2,
606 PROJ_CATEG2_FK,
607 PROJ_CLS2_PK,
608 USER_ATTRIBUTE1,
609 USER_ATTRIBUTE2,
610 USER_ATTRIBUTE3,
611 USER_ATTRIBUTE4,
612 USER_ATTRIBUTE5,
613 OPERATION_CODE,
614 COLLECTION_STATUS
615 )
616 select to_date(NULL),
617 INSTANCE,
618 NAME,
619 PROJECT_CLASS2,
620 NVL(PROJ_CATEG2_FK, 'NA_EDW'),
621 PROJ_CLS2_PK,
622 USER_ATTRIBUTE1,
623 USER_ATTRIBUTE2,
624 USER_ATTRIBUTE3,
625 USER_ATTRIBUTE4,
626 USER_ATTRIBUTE5,
627 NULL,
628 'READY'
629 from
630 FII_PROJ_CLS2_LCV
631 where
632 last_update_date between l_date1 and l_date2;
633
634 l_rows_inserted := sql%rowcount;
635 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
636
637 if g_debug_flag = 'Y' then
638 edw_log.put_line('Commiting records for EDW_PROJ_CLS2_LSTG');
639 end if;
640
641 commit;
642
643 if g_debug_flag = 'Y' then
644 edw_log.put_line('Completed Push_EDW_PROJ_CLS2_LSTG');
645 end if;
646
647 Exception
648
649 When others then
650 raise;
651 commit;
652
653 END;
654
655
656 Procedure Push_EDW_PROJ_CLS3_LSTG(p_from_date IN date, p_to_date IN DATE) IS
657
658 l_date1 DATE;
659 l_date2 DATE;
660 l_rows_inserted NUMBER :=0;
661
662 BEGIN
663
664 if g_debug_flag = 'Y' then
665 edw_log.put_line('Starting Push_EDW_PROJ_CLS3_LSTG');
666 end if;
667
668 l_date1 := p_from_date;
669 l_date2 := p_to_date;
670
671 Insert Into EDW_PROJ_CLS3_LSTG
672 (
673 DELETION_DATE,
674 INSTANCE,
675 NAME,
676 PROJECT_CLASS3,
677 PROJ_CATEG3_FK,
678 PROJ_CLS3_PK,
679 USER_ATTRIBUTE1,
680 USER_ATTRIBUTE2,
681 USER_ATTRIBUTE3,
682 USER_ATTRIBUTE4,
683 USER_ATTRIBUTE5,
684 OPERATION_CODE,
685 COLLECTION_STATUS
686 )
687 select
688 to_date(NULL),
689 INSTANCE,
690 NAME,
691 PROJECT_CLASS3,
692 NVL(PROJ_CATEG3_FK, 'NA_EDW'),
693 PROJ_CLS3_PK,
694 USER_ATTRIBUTE1,
695 USER_ATTRIBUTE2,
696 USER_ATTRIBUTE3,
697 USER_ATTRIBUTE4,
698 USER_ATTRIBUTE5,
699 NULL,
700 'READY'
701 from
702 FII_PROJ_CLS3_LCV
703 where
704 last_update_date between l_date1 and l_date2;
705
706 l_rows_inserted := sql%rowcount;
707 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
708
709 if g_debug_flag = 'Y' then
710 edw_log.put_line('Commiting records for EDW_PROJ_CLS3_LSTG');
711 end if;
712
713 commit;
714
715 if g_debug_flag = 'Y' then
716 edw_log.put_line('Completed Push_EDW_PROJ_CLS3_LSTG');
717 end if;
718
719 Exception
720
721 When others then
722 raise;
723 commit;
724
725 END;
726
727
728 Procedure Push_EDW_PROJ_CLS4_LSTG(p_from_date IN date, p_to_date IN DATE) IS
729
730 l_date1 DATE;
731 l_date2 DATE;
732 l_rows_inserted NUMBER :=0;
733
734 BEGIN
735
736 if g_debug_flag = 'Y' then
737 edw_log.put_line('Starting Push_EDW_PROJ_CLS4_LSTG');
738 end if;
739
740 l_date1 := p_from_date;
741 l_date2 := p_to_date;
742
743 Insert Into EDW_PROJ_CLS4_LSTG
744 (
745 DELETION_DATE,
746 INSTANCE,
747 NAME,
748 PROJECT_CLASS4,
749 PROJ_CATEG4_FK,
750 PROJ_CLS4_PK,
751 USER_ATTRIBUTE1,
752 USER_ATTRIBUTE2,
753 USER_ATTRIBUTE3,
754 USER_ATTRIBUTE4,
755 USER_ATTRIBUTE5,
756 OPERATION_CODE,
757 COLLECTION_STATUS
758 )
759 select
760 to_date(NULL),
761 INSTANCE,
762 NAME,
763 PROJECT_CLASS4,
764 NVL(PROJ_CATEG4_FK, 'NA_EDW'),
765 PROJ_CLS4_PK,
766 USER_ATTRIBUTE1,
767 USER_ATTRIBUTE2,
768 USER_ATTRIBUTE3,
769 USER_ATTRIBUTE4,
770 USER_ATTRIBUTE5,
771 NULL,
772 'READY'
773 from
774 FII_PROJ_CLS4_LCV
775 where
776 last_update_date between l_date1 and l_date2;
777
778 l_rows_inserted := sql%rowcount;
779 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
780
781 if g_debug_flag = 'Y' then
782 edw_log.put_line('Commiting records for EDW_PROJ_CLS4_LSTG');
783 end if;
784
785 commit;
786
787 if g_debug_flag = 'Y' then
788 edw_log.put_line('Completed Push_EDW_PROJ_CLS4_LSTG');
789 end if;
790
791 Exception
792
796
793 When others then
794 raise;
795 commit;
797 END;
798
799
800 Procedure Push_EDW_PROJ_CLS5_LSTG(p_from_date IN date, p_to_date IN DATE) IS
801
802 l_date1 DATE;
803 l_date2 DATE;
804 l_rows_inserted NUMBER :=0;
805
806 BEGIN
807
808 if g_debug_flag = 'Y' then
809 edw_log.put_line('Starting Push_EDW_PROJ_CLS5_LSTG');
810 end if;
811
812 l_date1 := p_from_date;
813 l_date2 := p_to_date;
814
815 Insert Into EDW_PROJ_CLS5_LSTG
816 (
817 DELETION_DATE,
818 INSTANCE,
819 NAME,
820 PROJECT_CLASS5,
821 PROJ_CATEG5_FK,
822 PROJ_CLS5_PK,
823 USER_ATTRIBUTE1,
824 USER_ATTRIBUTE2,
825 USER_ATTRIBUTE3,
826 USER_ATTRIBUTE4,
827 USER_ATTRIBUTE5,
828 OPERATION_CODE,
829 COLLECTION_STATUS
830 )
831 select
832 to_date(NULL),
833 INSTANCE,
834 NAME,
835 PROJECT_CLASS5,
836 NVL(PROJ_CATEG5_FK, 'NA_EDW'),
837 PROJ_CLS5_PK,
838 USER_ATTRIBUTE1,
839 USER_ATTRIBUTE2,
840 USER_ATTRIBUTE3,
841 USER_ATTRIBUTE4,
842 USER_ATTRIBUTE5,
843 NULL,
844 'READY'
845 from
846 FII_PROJ_CLS5_LCV
847 where
848 last_update_date between l_date1 and l_date2;
849
850 l_rows_inserted := sql%rowcount;
851 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
852
853 if g_debug_flag = 'Y' then
854 edw_log.put_line('Commiting records for EDW_PROJ_CLS5_LSTG');
855 end if;
856
857 commit;
858
859 if g_debug_flag = 'Y' then
860 edw_log.put_line('Completed Push_EDW_PROJ_CLS5_LSTG');
861 end if;
862
863 Exception
864
865 When others then
866 raise;
867 commit;
868
869 END;
870
871
872 Procedure Push_EDW_PROJ_CLS6_LSTG(p_from_date IN date, p_to_date IN DATE) IS
873
874 l_date1 DATE;
875 l_date2 DATE;
876 l_rows_inserted NUMBER :=0;
877
878 BEGIN
879
880 if g_debug_flag = 'Y' then
881 edw_log.put_line('Starting Push_EDW_PROJ_CLS6_LSTG');
882 end if;
883
884 l_date1 := p_from_date;
885 l_date2 := p_to_date;
886
887 Insert Into EDW_PROJ_CLS6_LSTG
888 (
889 DELETION_DATE,
890 INSTANCE,
891 NAME,
892 PROJECT_CLASS6,
893 PROJ_CATEG6_FK,
894 PROJ_CLS6_PK,
895 USER_ATTRIBUTE1,
896 USER_ATTRIBUTE2,
897 USER_ATTRIBUTE3,
898 USER_ATTRIBUTE4,
899 USER_ATTRIBUTE5,
900 OPERATION_CODE,
901 COLLECTION_STATUS
902 )
903 select
904 to_date(NULL),
905 INSTANCE,
906 NAME,
907 PROJECT_CLASS6,
908 NVL(PROJ_CATEG6_FK, 'NA_EDW'),
909 PROJ_CLS6_PK,
910 USER_ATTRIBUTE1,
911 USER_ATTRIBUTE2,
912 USER_ATTRIBUTE3,
913 USER_ATTRIBUTE4,
914 USER_ATTRIBUTE5,
915 NULL,
916 'READY'
917 from
918 FII_PROJ_CLS6_LCV
919 where
920 last_update_date between l_date1 and l_date2;
921
922 l_rows_inserted := sql%rowcount;
923 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
924
925 if g_debug_flag = 'Y' then
926 edw_log.put_line('Commiting records for EDW_PROJ_CLS6_LSTG');
927 end if;
928
929 commit;
930
931 if g_debug_flag = 'Y' then
932 edw_log.put_line('Completed Push_EDW_PROJ_CLS6_LSTG');
933 end if;
934
935 Exception
936
937 When others then
938 raise;
939 commit;
940
941 END;
942
943
944 Procedure Push_EDW_PROJ_CLS7_LSTG(p_from_date IN date, p_to_date IN DATE) IS
945
946 l_date1 DATE;
947 l_date2 DATE;
948 l_rows_inserted NUMBER :=0;
949
950 BEGIN
951
952 if g_debug_flag = 'Y' then
953 edw_log.put_line('Starting Push_EDW_PROJ_CLS7_LSTG');
954 end if;
955
956 l_date1 := p_from_date;
957 l_date2 := p_to_date;
958
959 Insert Into EDW_PROJ_CLS7_LSTG
960 (
961 DELETION_DATE,
962 INSTANCE,
963 NAME,
964 PROJECT_CLASS7,
965 PROJ_CATEG7_FK,
966 PROJ_CLS7_PK,
967 USER_ATTRIBUTE1,
968 USER_ATTRIBUTE2,
969 USER_ATTRIBUTE3,
970 USER_ATTRIBUTE4,
971 USER_ATTRIBUTE5,
972 OPERATION_CODE,
973 COLLECTION_STATUS
974 )
975 select
976 to_date(NULL),
977 INSTANCE,
978 NAME,
979 PROJECT_CLASS7,
980 NVL(PROJ_CATEG7_FK, 'NA_EDW'),
981 PROJ_CLS7_PK,
982 USER_ATTRIBUTE1,
983 USER_ATTRIBUTE2,
984 USER_ATTRIBUTE3,
985 USER_ATTRIBUTE4,
986 USER_ATTRIBUTE5,
987 NULL, -- OPERATION_CODE
988 'READY'
992 last_update_date between l_date1 and l_date2;
989 from
990 FII_PROJ_CLS7_LCV
991 where
993
994 l_rows_inserted := sql%rowcount;
995 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
996
997 if g_debug_flag = 'Y' then
998 edw_log.put_line('Commiting records for EDW_PROJ_CLS7_LSTG');
999 end if;
1000
1001 commit;
1002
1003 if g_debug_flag = 'Y' then
1004 edw_log.put_line('Completed Push_EDW_PROJ_CLS7_LSTG');
1005 end if;
1006
1007 Exception
1008
1009 When others then
1010 raise;
1011 commit;
1012
1013 END;
1014
1015
1016 Procedure Push_EDW_PROJ_CATEG1_LSTG(p_from_date IN date, p_to_date IN DATE) IS
1017
1018 l_date1 DATE;
1019 l_date2 DATE;
1020 l_rows_inserted NUMBER :=0;
1021
1022 BEGIN
1023
1024 if g_debug_flag = 'Y' then
1025 edw_log.put_line('Starting Push_EDW_PROJ_CATEG1_LSTG');
1026 end if;
1027
1028 l_date1 := p_from_date;
1029 l_date2 := p_to_date;
1030
1031 Insert Into EDW_PROJ_CATEG1_LSTG
1032 (
1033 ALL_FK,
1034 DELETION_DATE,
1035 INSTANCE,
1036 NAME,
1037 PROJECT_CATEGORY1,
1038 PROJ_CATEG1_PK,
1039 USER_ATTRIBUTE1,
1040 USER_ATTRIBUTE2,
1041 USER_ATTRIBUTE3,
1042 USER_ATTRIBUTE4,
1043 USER_ATTRIBUTE5,
1044 OPERATION_CODE,
1045 COLLECTION_STATUS
1046 )
1047 select
1048 NVL(ALL_FK, 'NA_EDW'),
1049 to_date(NULL), -- DELETION_DATE,
1050 INSTANCE,
1051 NAME,
1052 PROJECT_CATEGORY1,
1053 PROJ_CATEG1_PK,
1054 USER_ATTRIBUTE1,
1055 USER_ATTRIBUTE2,
1056 USER_ATTRIBUTE3,
1057 USER_ATTRIBUTE4,
1058 USER_ATTRIBUTE5,
1059 NULL,
1060 'READY'
1061 from
1062 FII_PROJ_CATEG1_LCV
1063 where
1064 last_update_date between l_date1 and l_date2;
1065
1066 l_rows_inserted := sql%rowcount;
1067 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
1068
1069 if g_debug_flag = 'Y' then
1070 edw_log.put_line('Commiting records for EDW_PROJ_CATEG1_LSTG');
1071 end if;
1072
1073 commit;
1074
1075 if g_debug_flag = 'Y' then
1076 edw_log.put_line('Completed Push_EDW_PROJ_CATEG1_LSTG');
1077 end if;
1078
1079 Exception
1080
1081 When others then
1082 raise;
1083 commit;
1084
1085 END;
1086
1087
1088 Procedure Push_EDW_PROJ_CATEG2_LSTG(p_from_date IN date, p_to_date IN DATE) IS
1089
1090 l_date1 DATE;
1091 l_date2 DATE;
1092 l_rows_inserted NUMBER :=0;
1093
1094 BEGIN
1095
1096 if g_debug_flag = 'Y' then
1097 edw_log.put_line('Starting Push_EDW_PROJ_CATEG2_LSTG');
1098 end if;
1099
1100 l_date1 := p_from_date;
1101 l_date2 := p_to_date;
1102
1103 Insert Into EDW_PROJ_CATEG2_LSTG
1104 (
1105 ALL_FK,
1106 DELETION_DATE,
1107 INSTANCE,
1108 NAME,
1109 PROJECT_CATEGORY2,
1110 PROJ_CATEG2_PK,
1111 USER_ATTRIBUTE1,
1112 USER_ATTRIBUTE2,
1113 USER_ATTRIBUTE3,
1114 USER_ATTRIBUTE4,
1115 USER_ATTRIBUTE5,
1116 OPERATION_CODE,
1117 COLLECTION_STATUS
1118 )
1119 select
1120 NVL(ALL_FK, 'NA_EDW'),
1121 to_date(NULL),
1122 INSTANCE,
1123 NAME,
1124 PROJECT_CATEGORY2,
1125 PROJ_CATEG2_PK,
1126 USER_ATTRIBUTE1,
1127 USER_ATTRIBUTE2,
1128 USER_ATTRIBUTE3,
1129 USER_ATTRIBUTE4,
1130 USER_ATTRIBUTE5,
1131 NULL,
1132 'READY'
1133 from
1134 FII_PROJ_CATEG2_LCV
1135 where
1136 last_update_date between l_date1 and l_date2;
1137
1138 l_rows_inserted := sql%rowcount;
1139 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
1140
1141 if g_debug_flag = 'Y' then
1142 edw_log.put_line('Commiting records for EDW_PROJ_CATEG2_LSTG');
1143 end if;
1144
1145 commit;
1146
1147 if g_debug_flag = 'Y' then
1148 edw_log.put_line('Completed Push_EDW_PROJ_CATEG2_LSTG');
1149 end if;
1150
1151 Exception
1152
1153 When others then
1154 raise;
1155 commit;
1156
1157 END;
1158
1159 Procedure Push_EDW_PROJ_CATEG3_LSTG(p_from_date IN date, p_to_date IN DATE) IS
1160
1161 l_date1 DATE;
1162 l_date2 DATE;
1163 l_rows_inserted NUMBER :=0;
1164
1165 BEGIN
1166
1167 if g_debug_flag = 'Y' then
1168 edw_log.put_line('Starting Push_EDW_PROJ_CATEG3_LSTG');
1169 end if;
1170
1171 l_date1 := p_from_date;
1172 l_date2 := p_to_date;
1173
1174 Insert Into EDW_PROJ_CATEG3_LSTG
1175 (
1176 ALL_FK,
1177 DELETION_DATE,
1178 INSTANCE,
1179 NAME,
1183 USER_ATTRIBUTE2,
1180 PROJECT_CATEGORY3,
1181 PROJ_CATEG3_PK,
1182 USER_ATTRIBUTE1,
1184 USER_ATTRIBUTE3,
1185 USER_ATTRIBUTE4,
1186 USER_ATTRIBUTE5,
1187 OPERATION_CODE,
1188 COLLECTION_STATUS
1189 )
1190 select
1191 NVL(ALL_FK, 'NA_EDW'),
1192 to_date(NULL),
1193 INSTANCE,
1194 NAME,
1195 PROJECT_CATEGORY3,
1196 PROJ_CATEG3_PK,
1197 USER_ATTRIBUTE1,
1198 USER_ATTRIBUTE2,
1199 USER_ATTRIBUTE3,
1200 USER_ATTRIBUTE4,
1201 USER_ATTRIBUTE5,
1202 NULL,
1203 'READY'
1204 from
1205 FII_PROJ_CATEG3_LCV
1206 where
1207 last_update_date between l_date1 and l_date2;
1208
1209 l_rows_inserted := sql%rowcount;
1210 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
1211
1212 if g_debug_flag = 'Y' then
1213 edw_log.put_line('Commiting records for EDW_PROJ_CATEG3_LSTG');
1214 end if;
1215
1216 commit;
1217
1218 if g_debug_flag = 'Y' then
1219 edw_log.put_line('Completed Push_EDW_PROJ_CATEG3_LSTG');
1220 end if;
1221
1222 Exception
1223
1224 When others then
1225 raise;
1226 commit;
1227
1228 END;
1229
1230
1231 Procedure Push_EDW_PROJ_CATEG4_LSTG(p_from_date IN date, p_to_date IN DATE) IS
1232
1233 l_date1 DATE;
1234 l_date2 DATE;
1235 l_rows_inserted NUMBER :=0;
1236
1237 BEGIN
1238
1239 if g_debug_flag = 'Y' then
1240 edw_log.put_line('Starting Push_EDW_PROJ_CATEG4_LSTG');
1241 end if;
1242
1243 l_date1 := p_from_date;
1244 l_date2 := p_to_date;
1245
1246 Insert Into EDW_PROJ_CATEG4_LSTG
1247 (
1248 ALL_FK,
1249 DELETION_DATE,
1250 INSTANCE,
1251 NAME,
1252 PROJECT_CATEGORY4,
1253 PROJ_CATEG4_PK,
1254 USER_ATTRIBUTE1,
1255 USER_ATTRIBUTE2,
1256 USER_ATTRIBUTE3,
1257 USER_ATTRIBUTE4,
1258 USER_ATTRIBUTE5,
1259 OPERATION_CODE,
1260 COLLECTION_STATUS
1261 )
1262 select
1263 NVL(ALL_FK, 'NA_EDW'),
1264 to_date(NULL),
1265 INSTANCE,
1266 NAME,
1267 PROJECT_CATEGORY4,
1268 PROJ_CATEG4_PK,
1269 USER_ATTRIBUTE1,
1270 USER_ATTRIBUTE2,
1271 USER_ATTRIBUTE3,
1272 USER_ATTRIBUTE4,
1273 USER_ATTRIBUTE5,
1274 NULL,
1275 'READY'
1276 from
1277 FII_PROJ_CATEG4_LCV
1278 where
1279 last_update_date between l_date1 and l_date2;
1280
1281 l_rows_inserted := sql%rowcount;
1282 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
1283
1284 if g_debug_flag = 'Y' then
1285 edw_log.put_line('Commiting records for EDW_PROJ_CATEG4_LSTG');
1286 end if;
1287
1288 commit;
1289
1290 if g_debug_flag = 'Y' then
1291 edw_log.put_line('Completed Push_EDW_PROJ_CATEG4_LSTG');
1292 end if;
1293
1294 Exception
1295
1296 When others then
1297 raise;
1298 commit;
1299
1300 END;
1301
1302
1303 Procedure Push_EDW_PROJ_CATEG5_LSTG(p_from_date IN date, p_to_date IN DATE) IS
1304
1305 l_date1 DATE;
1306 l_date2 DATE;
1307 l_rows_inserted NUMBER :=0;
1308
1309 BEGIN
1310
1311 if g_debug_flag = 'Y' then
1312 edw_log.put_line('Starting Push_EDW_PROJ_CATEG5_LSTG');
1313 end if;
1314
1315 l_date1 := p_from_date;
1316 l_date2 := p_to_date;
1317
1318 Insert Into EDW_PROJ_CATEG5_LSTG
1319 (
1320 ALL_FK,
1321 DELETION_DATE,
1322 INSTANCE,
1323 NAME,
1324 PROJECT_CATEGORY5,
1325 PROJ_CATEG5_PK,
1326 USER_ATTRIBUTE1,
1327 USER_ATTRIBUTE2,
1328 USER_ATTRIBUTE3,
1329 USER_ATTRIBUTE4,
1330 USER_ATTRIBUTE5,
1331 OPERATION_CODE,
1332 COLLECTION_STATUS
1333 )
1334 select
1335 NVL(ALL_FK, 'NA_EDW'),
1336 to_date(NULL),
1337 INSTANCE,
1338 NAME,
1339 PROJECT_CATEGORY5,
1340 PROJ_CATEG5_PK,
1341 USER_ATTRIBUTE1,
1342 USER_ATTRIBUTE2,
1343 USER_ATTRIBUTE3,
1344 USER_ATTRIBUTE4,
1345 USER_ATTRIBUTE5,
1346 NULL,
1347 'READY'
1348 from
1349 FII_PROJ_CATEG5_LCV
1350 where
1351 last_update_date between l_date1 and l_date2;
1352
1353 l_rows_inserted := sql%rowcount;
1354 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
1355
1356 if g_debug_flag = 'Y' then
1357 edw_log.put_line('Commiting records for EDW_PROJ_CATEG5_LSTG');
1358 end if;
1359
1360 commit;
1361
1362 if g_debug_flag = 'Y' then
1363 edw_log.put_line('Completed Push_EDW_PROJ_CATEG5_LSTG');
1364 end if;
1365
1366 Exception
1367
1368 When others then
1369 raise;
1370 commit;
1371
1372 END;
1373
1374
1378 l_date2 DATE;
1375 Procedure Push_EDW_PROJ_CATEG6_LSTG(p_from_date IN date, p_to_date IN DATE) IS
1376
1377 l_date1 DATE;
1379 l_rows_inserted NUMBER :=0;
1380
1381 BEGIN
1382
1383 if g_debug_flag = 'Y' then
1384 edw_log.put_line('Starting Push_EDW_PROJ_CATEG6_LSTG');
1385 end if;
1386
1387 l_date1 := p_from_date;
1388 l_date2 := p_to_date;
1389
1390 Insert Into EDW_PROJ_CATEG6_LSTG
1391 (
1392 ALL_FK,
1393 DELETION_DATE,
1394 INSTANCE,
1395 NAME,
1396 PROJECT_CATEGORY6,
1397 PROJ_CATEG6_PK,
1398 USER_ATTRIBUTE1,
1399 USER_ATTRIBUTE2,
1400 USER_ATTRIBUTE3,
1401 USER_ATTRIBUTE4,
1402 USER_ATTRIBUTE5,
1403 OPERATION_CODE,
1404 COLLECTION_STATUS
1405 )
1406 select
1407 NVL(ALL_FK, 'NA_EDW'),
1408 to_date(NULL),
1409 INSTANCE,
1410 NAME,
1411 PROJECT_CATEGORY6,
1412 PROJ_CATEG6_PK,
1413 USER_ATTRIBUTE1,
1414 USER_ATTRIBUTE2,
1415 USER_ATTRIBUTE3,
1416 USER_ATTRIBUTE4,
1417 USER_ATTRIBUTE5,
1418 NULL,
1419 'READY'
1420 from
1421 FII_PROJ_CATEG6_LCV
1422 where
1423 last_update_date between l_date1 and l_date2;
1424
1425 l_rows_inserted := sql%rowcount;
1426 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
1427
1428 if g_debug_flag = 'Y' then
1429 edw_log.put_line('Commiting records for EDW_PROJ_CATEG6_LSTG');
1430 end if;
1431
1432 commit;
1433
1434 if g_debug_flag = 'Y' then
1435 edw_log.put_line('Completed Push_EDW_PROJ_CATEG6_LSTG');
1436 end if;
1437
1438 Exception
1439
1440 When others then
1441 raise;
1442 commit;
1443
1444 END;
1445
1446
1447 Procedure Push_EDW_PROJ_CATEG7_LSTG(p_from_date IN date, p_to_date IN DATE) IS
1448
1449 l_date1 DATE;
1450 l_date2 DATE;
1451 l_rows_inserted NUMBER :=0;
1452
1453 BEGIN
1454
1455 if g_debug_flag = 'Y' then
1456 edw_log.put_line('Starting Push_EDW_PROJ_CATEG7_LSTG');
1457 end if;
1458
1459 l_date1 := p_from_date;
1460 l_date2 := p_to_date;
1461
1462 Insert Into EDW_PROJ_CATEG7_LSTG
1463 (
1464 ALL_FK,
1465 DELETION_DATE,
1466 INSTANCE,
1467 NAME,
1468 PROJECT_CATEGORY7,
1469 PROJ_CATEG7_PK,
1470 USER_ATTRIBUTE1,
1471 USER_ATTRIBUTE2,
1472 USER_ATTRIBUTE3,
1473 USER_ATTRIBUTE4,
1474 USER_ATTRIBUTE5,
1475 OPERATION_CODE,
1476 COLLECTION_STATUS
1477 )
1478 select
1479 NVL(ALL_FK, 'NA_EDW'),
1480 to_date(NULL),
1481 INSTANCE,
1482 NAME,
1483 PROJECT_CATEGORY7,
1484 PROJ_CATEG7_PK,
1485 USER_ATTRIBUTE1,
1486 USER_ATTRIBUTE2,
1487 USER_ATTRIBUTE3,
1488 USER_ATTRIBUTE4,
1489 USER_ATTRIBUTE5,
1490 NULL,
1491 'READY'
1492 from
1493 FII_PROJ_CATEG7_LCV
1494 where
1495 last_update_date between l_date1 and l_date2;
1496
1497 l_rows_inserted := sql%rowcount;
1498 --FII_PROJECT_M_C.g_row_count := FII_PROJECT_M_C.g_row_count + l_rows_inserted ;
1499
1500 if g_debug_flag = 'Y' then
1501 edw_log.put_line('Commiting records for EDW_PROJ_CATEG7_LSTG');
1502 end if;
1503
1504 commit;
1505
1506 if g_debug_flag = 'Y' then
1507 edw_log.put_line('Completed Push_EDW_PROJ_CATEG7_LSTG');
1508 end if;
1509
1510 Exception
1511
1512 When others then
1513 raise;
1514 commit;
1515
1516 END;
1517
1518 End FII_PROJECT_M_C;