115: l_stmt := 'select sob_id from fii_ar_oltp_cash_v@'||
116: g_rec(i).db_link||' where rownum < 2';
117:
118: if g_debug_flag = 'Y' then
119: edw_log.debug_line('');
120: edw_log.debug_line(l_stmt);
121: end if;
122: execute immediate l_stmt into l_dummy;
123:
116: g_rec(i).db_link||' where rownum < 2';
117:
118: if g_debug_flag = 'Y' then
119: edw_log.debug_line('');
120: edw_log.debug_line(l_stmt);
121: end if;
122: execute immediate l_stmt into l_dummy;
123:
124: IF l_dummy IS NOT NULL THEN
140: l_stmt := 'select name '||
141: 'from v$database@'||g_rec(i).db_link;
142:
143: if g_debug_flag = 'Y' then
144: edw_log.debug_line('');
145: edw_log.debug_line(l_stmt);
146: end if;
147:
148: execute immediate l_stmt into l_db_name2;
141: 'from v$database@'||g_rec(i).db_link;
142:
143: if g_debug_flag = 'Y' then
144: edw_log.debug_line('');
145: edw_log.debug_line(l_stmt);
146: end if;
147:
148: execute immediate l_stmt into l_db_name2;
149:
169:
170: l_stmt:='drop table '||g_fii_schema||'.'||p_table_name;
171:
172: if g_debug_flag = 'Y' then
173: edw_log.debug_line('');
174: edw_log.debug_line(l_stmt);
175: end if;
176: execute immediate l_stmt;
177:
170: l_stmt:='drop table '||g_fii_schema||'.'||p_table_name;
171:
172: if g_debug_flag = 'Y' then
173: edw_log.debug_line('');
174: edw_log.debug_line(l_stmt);
175: end if;
176: execute immediate l_stmt;
177:
178: l_stmt:='drop synonym '||p_table_name;
177:
178: l_stmt:='drop synonym '||p_table_name;
179:
180: if g_debug_flag = 'Y' then
181: edw_log.debug_line('');
182: edw_log.debug_line(l_stmt);
183: end if;
184:
185: execute immediate l_stmt;
178: l_stmt:='drop synonym '||p_table_name;
179:
180: if g_debug_flag = 'Y' then
181: edw_log.debug_line('');
182: edw_log.debug_line(l_stmt);
183: end if;
184:
185: execute immediate l_stmt;
186:
222: PCTFREE 5
223: storage (INITIAL 4K NEXT 32K)';
224:
225: if g_debug_flag = 'Y' then
226: edw_log.debug_line('');
227: edw_log.debug_line(l_stmt);
228: end if;
229: execute immediate l_stmt;
230:
223: storage (INITIAL 4K NEXT 32K)';
224:
225: if g_debug_flag = 'Y' then
226: edw_log.debug_line('');
227: edw_log.debug_line(l_stmt);
228: end if;
229: execute immediate l_stmt;
230:
231:
283: trunc(calendar_day),
284: functional_currency';
285:
286: if g_debug_flag = 'Y' then
287: edw_log.debug_line('');
288: edw_log.debug_line(l_stmt);
289: end if;
290: execute immediate l_stmt;
291:
284: functional_currency';
285:
286: if g_debug_flag = 'Y' then
287: edw_log.debug_line('');
288: edw_log.debug_line(l_stmt);
289: end if;
290: execute immediate l_stmt;
291:
292: commit;
328: PCTFREE 5
329: storage (INITIAL 4K NEXT 32K)';
330:
331: if g_debug_flag = 'Y' then
332: edw_log.debug_line('');
333: edw_log.debug_line(l_stmt);
334: end if;
335: execute immediate l_stmt;
336:
329: storage (INITIAL 4K NEXT 32K)';
330:
331: if g_debug_flag = 'Y' then
332: edw_log.debug_line('');
333: edw_log.debug_line(l_stmt);
334: end if;
335: execute immediate l_stmt;
336:
337: l_stmt := 'create table '||g_fii_schema||'.FII_AR_OLTP_INV(
350: PCTFREE 5
351: storage (INITIAL 4K NEXT 32K)';
352:
353: if g_debug_flag = 'Y' then
354: edw_log.debug_line('');
355: edw_log.debug_line(l_stmt);
356: end if;
357: execute immediate l_stmt;
358:
351: storage (INITIAL 4K NEXT 32K)';
352:
353: if g_debug_flag = 'Y' then
354: edw_log.debug_line('');
355: edw_log.debug_line(l_stmt);
356: end if;
357: execute immediate l_stmt;
358:
359:
412: f.gl_date_fk_key,
413: trunc(f.gl_date)';
414:
415: if g_debug_flag = 'Y' then
416: edw_log.debug_line('');
417: edw_log.debug_line(l_stmt);
418: end if;
419: execute immediate l_stmt;
420:
413: trunc(f.gl_date)';
414:
415: if g_debug_flag = 'Y' then
416: edw_log.debug_line('');
417: edw_log.debug_line(l_stmt);
418: end if;
419: execute immediate l_stmt;
420:
421:
479: f.gl_period_fk_key,
480: t.cday_calendar_date';
481:
482: if g_debug_flag = 'Y' then
483: edw_log.debug_line('');
484: edw_log.debug_line(l_stmt);
485: end if;
486: execute immediate l_stmt;
487:
480: t.cday_calendar_date';
481:
482: if g_debug_flag = 'Y' then
483: edw_log.debug_line('');
484: edw_log.debug_line(l_stmt);
485: end if;
486: execute immediate l_stmt;
487:
488:
539: trunc(calendar_day),
540: functional_currency';
541:
542: if g_debug_flag = 'Y' then
543: edw_log.debug_line('');
544: edw_log.debug_line(l_stmt);
545: end if;
546: execute immediate l_stmt;
547:
540: functional_currency';
541:
542: if g_debug_flag = 'Y' then
543: edw_log.debug_line('');
544: edw_log.debug_line(l_stmt);
545: end if;
546: execute immediate l_stmt;
547:
548: commit;
570: -- --------------------------------
571: l_stmt := 'truncate table '||g_fii_schema||'.fii_ar_oper_cust_summary_f';
572:
573: if g_debug_flag = 'Y' then
574: edw_log.debug_line('');
575: edw_log.debug_line(l_stmt);
576: end if;
577: execute immediate l_stmt;
578:
571: l_stmt := 'truncate table '||g_fii_schema||'.fii_ar_oper_cust_summary_f';
572:
573: if g_debug_flag = 'Y' then
574: edw_log.debug_line('');
575: edw_log.debug_line(l_stmt);
576: end if;
577: execute immediate l_stmt;
578:
579:
753: a.calendar_date
754: order by a.set_of_books_fk_key, a.operating_unit_fk_key, a.calendar_date';
755:
756: if g_debug_flag = 'Y' then
757: edw_log.debug_line('');
758: edw_log.debug_line(l_stmt);
759: end if;
760: execute immediate l_stmt;
761:
754: order by a.set_of_books_fk_key, a.operating_unit_fk_key, a.calendar_date';
755:
756: if g_debug_flag = 'Y' then
757: edw_log.debug_line('');
758: edw_log.debug_line(l_stmt);
759: end if;
760: execute immediate l_stmt;
761:
762: -- --------------------------------
833: a.calendar_date';
834:
835:
836: if g_debug_flag = 'Y' then
837: edw_log.debug_line('');
838: edw_log.debug_line(l_stmt);
839: end if;
840: execute immediate l_stmt;
841:
834:
835:
836: if g_debug_flag = 'Y' then
837: edw_log.debug_line('');
838: edw_log.debug_line(l_stmt);
839: end if;
840: execute immediate l_stmt;
841:
842: l_stmt := 'truncate table '||g_fii_schema||'.fii_ar_operations_summary';
840: execute immediate l_stmt;
841:
842: l_stmt := 'truncate table '||g_fii_schema||'.fii_ar_operations_summary';
843: if g_debug_flag = 'Y' then
844: edw_log.debug_line('');
845: edw_log.debug_line(l_stmt);
846: end if;
847: execute immediate l_stmt;
848:
841:
842: l_stmt := 'truncate table '||g_fii_schema||'.fii_ar_operations_summary';
843: if g_debug_flag = 'Y' then
844: edw_log.debug_line('');
845: edw_log.debug_line(l_stmt);
846: end if;
847: execute immediate l_stmt;
848:
849: l_stmt := '
894: and operating_unit_fk_key > 0
895: and calendar_day_fk_key > 0';
896:
897: if g_debug_flag = 'Y' then
898: edw_log.debug_line('');
899: edw_log.debug_line(l_stmt);
900: end if;
901: execute immediate l_stmt;
902:
895: and calendar_day_fk_key > 0';
896:
897: if g_debug_flag = 'Y' then
898: edw_log.debug_line('');
899: edw_log.debug_line(l_stmt);
900: end if;
901: execute immediate l_stmt;
902:
903:
924: EXECUTE IMMEDIATE l_stmt;
925:
926: -- DEBUG
927: IF (fnd_profile.value('EDW_DEBUG') = 'Y') THEN
928: edw_log.g_debug := TRUE;
929: END IF;
930:
931: l_dir:=fnd_profile.value('EDW_LOGFILE_DIR');
932: if l_dir is null then
927: IF (fnd_profile.value('EDW_DEBUG') = 'Y') THEN
928: edw_log.g_debug := TRUE;
929: END IF;
930:
931: l_dir:=fnd_profile.value('EDW_LOGFILE_DIR');
932: if l_dir is null then
933: l_dir:='/sqlcom/log';
934: end if;
935: if g_debug_flag = 'Y' then
932: if l_dir is null then
933: l_dir:='/sqlcom/log';
934: end if;
935: if g_debug_flag = 'Y' then
936: edw_log.put_names('FII_AR_OPER_SUMMARY.log','FII_AR_OPER_SUMMARY.out',l_dir);
937:
938:
939: fii_util.put_timestamp;
940: edw_log.put_line('Initialization');
936: edw_log.put_names('FII_AR_OPER_SUMMARY.log','FII_AR_OPER_SUMMARY.out',l_dir);
937:
938:
939: fii_util.put_timestamp;
940: edw_log.put_line('Initialization');
941: fii_util.start_timer;
942: end if;
943: Init;
944: Drop_table('FII_AR_EDW_REV');
949: fii_util.stop_timer;
950: fii_util.print_timer('Duration');
951:
952:
953: edw_log.put_line('');
954: edw_log.put_line('Extracting Cash information');
955:
956: end if;
957: Extract_OLTP_CASH;
950: fii_util.print_timer('Duration');
951:
952:
953: edw_log.put_line('');
954: edw_log.put_line('Extracting Cash information');
955:
956: end if;
957: Extract_OLTP_CASH;
958: if g_debug_flag = 'Y' then
958: if g_debug_flag = 'Y' then
959: fii_util.stop_timer;
960: fii_util.print_timer('Duration');
961:
962: edw_log.put_line('');
963: edw_log.put_line('Extracting Revenue and Invoice information');
964: fii_util.start_timer;
965: end if;
966: Extract_AR_INV_REV;
959: fii_util.stop_timer;
960: fii_util.print_timer('Duration');
961:
962: edw_log.put_line('');
963: edw_log.put_line('Extracting Revenue and Invoice information');
964: fii_util.start_timer;
965: end if;
966: Extract_AR_INV_REV;
967: if g_debug_flag = 'Y' then
967: if g_debug_flag = 'Y' then
968: fii_util.stop_timer;
969: fii_util.print_timer('Duration');
970:
971: edw_log.put_line('');
972: edw_log.put_line('Merging information into AR Operation Summary Table');
973: fii_util.start_timer;
974: end if;
975: Populate_AR_OPER_SUMMARY;
968: fii_util.stop_timer;
969: fii_util.print_timer('Duration');
970:
971: edw_log.put_line('');
972: edw_log.put_line('Merging information into AR Operation Summary Table');
973: fii_util.start_timer;
974: end if;
975: Populate_AR_OPER_SUMMARY;
976: if g_debug_flag = 'Y' then