250:
251: -- opi data was not found successfully
252: l_opi_success := false;
253:
254: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
255: l_proc_name || ' ' ||
256: '#' || l_stmt_id ||
257: ': ' || SQLERRM);
258: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
254: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
255: l_proc_name || ' ' ||
256: '#' || l_stmt_id ||
257: ': ' || SQLERRM);
258: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
259: l_proc_name || ' ' ||
260: '#' || l_stmt_id || ': ' ||
261: 'Unable to collect OPI WIP Scrap data in initial load into staging table.');
262:
295: EXECUTE IMMEDIATE ('TRUNCATE TABLE ' || s_opi_schema || '.' ||
296: 'OPI_DBI_WIP_SCRAP_STG');
297:
298: l_stmt_id := 110;
299: BIS_COLLECTION_UTILITIES.PUT_LINE
300: ('Scrap Initial load terminated successfully.');
301: retcode := s_SUCCESS;
302: errbuf := '';
303: return;
306:
307: WHEN schema_info_not_found THEN
308: rollback;
309:
310: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
311: l_proc_name || ' ' ||
312: '#' || l_stmt_id ||
313: ': ' || SQLERRM);
314:
320:
321: WHEN global_setup_missing THEN
322: rollback;
323:
324: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
325: l_proc_name || ' ' ||
326: '#' || l_stmt_id ||
327: ': ' || SQLERRM);
328:
335:
336: WHEN data_extraction_failed THEN
337: rollback;
338:
339: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
340: l_proc_name || ' ' ||
341: '#' || l_stmt_id ||
342: ': ' || SQLERRM);
343:
349:
350: WHEN OTHERS THEN
351: rollback;
352:
353: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
354: l_proc_name || ' ' ||
355: '#' || l_stmt_id ||
356: ': ' || SQLERRM);
357:
572:
573: WHEN could_not_log_success THEN
574: rollback;
575:
576: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
577: l_proc_name || ' ' ||
578: '#' || l_stmt_id || ': ' ||
579: 'WIP Scrap ETL Initial load data extraction success could not be logged into log table. Aborting.');
580:
586:
587:
588: WHEN cannot_run_initial_load THEN
589: rollback;
590: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
591: l_proc_name || ' ' ||
592: '#' || l_stmt_id || ': ' ||
593: 'WIP Scrap initial load concurrent program should not be running.
594: Try running the incremental load request set if the initial request set has already been run. If not, you will need to run the initial load request set.');
600: RAISE; -- propagate exception to wrapper.
601:
602: WHEN run_common_module THEN
603: rollback;
604: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
605: l_proc_name || ' ' ||
606: '#' || l_stmt_id || ': ' ||
607: 'WIP Scrap initial load concurrent program is running out of turn. Please submit the initial load request set for initial data collection.');
608:
616:
617: WHEN OTHERS THEN
618: rollback;
619:
620: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
621: l_proc_name || ' ' ||
622: '#' || l_stmt_id ||
623: ': ' || SQLERRM);
624:
726:
727: WHEN OTHERS THEN
728: rollback;
729:
730: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
731: l_proc_name || ' ' ||
732: '#' || l_stmt_id ||
733: ': ' || SQLERRM);
734:
1028: IF (invalid_rates_exist_csr%FOUND) THEN
1029:
1030: -- there are missing rates - prepare to report them.
1031: l_all_rates_found := false;
1032: BIS_COLLECTION_UTILITIES.writeMissingRateHeader;
1033:
1034: l_stmt_id := 60;
1035: FOR get_missing_rates_rec IN get_missing_rates_c
1036: (l_pri_sec_curr_same,
1039: l_secondary_currency_code,
1040: l_secondary_rate_type)
1041: LOOP
1042:
1043: BIS_COLLECTION_UTILITIES.writemissingrate (
1044: get_missing_rates_rec.rate_type,
1045: get_missing_rates_rec.func_currency_code,
1046: get_missing_rates_rec.curr_code,
1047: get_missing_rates_rec.transaction_date);
1067:
1068: WHEN global_curr_code_not_found THEN
1069: rollback;
1070:
1071: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
1072: l_proc_name || ' ' ||
1073: '#' || l_stmt_id || ': ' ||
1074: 'WIP Scrap ETL Initial load global currency code not found.');
1075:
1081:
1082: WHEN global_rate_type_not_found THEN
1083: rollback;
1084:
1085: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
1086: l_proc_name || ' ' ||
1087: '#' || l_stmt_id || ': ' ||
1088: 'WIP Scrap ETL Initial load global rate type not found.');
1089:
1095:
1096: WHEN missing_conversion_rates THEN
1097: rollback;
1098:
1099: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
1100: l_proc_name || ' ' ||
1101: '#' || l_stmt_id || ': ' ||
1102: 'WIP Scrap ETL Initial Load found missing currency rates.');
1103:
1110:
1111: WHEN OTHERS THEN
1112: rollback;
1113:
1114: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
1115: l_proc_name || ' ' ||
1116: '#' || l_stmt_id ||
1117: ': ' || SQLERRM);
1118:
1169:
1170: l_setup_good := bis_common_parameters.check_global_parameters(l_list);
1171:
1172: IF (NOT (l_setup_good)) THEN
1173: BIS_COLLECTION_UTILITIES.PUT_LINE (
1174: 'Global setup is not correct. Please setup up the global start date, primary currency code and primary rate type.');
1175: END IF;
1176:
1177: -- check the secondary currency setup
1185: l_secondary_rate_type IS NOT NULL)
1186: OR (l_secondary_currency_code IS NOT NULL AND
1187: l_secondary_rate_type IS NULL) ) THEN
1188:
1189: BIS_COLLECTION_UTILITIES.PUT_LINE ('The global secondary currency code setup is incorrect. The secondary currency code cannot be null when the secondary rate type is defined and vice versa.');
1190:
1191: l_setup_good := FALSE;
1192:
1193: END IF;
1198:
1199: WHEN OTHERS THEN
1200: rollback;
1201:
1202: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
1203: l_proc_name || ' ' ||
1204: '#' || l_stmt_id ||
1205: ': ' || SQLERRM);
1206:
1244: DBMS_MVIEW.REFRESH ('opi_scrap_sum_mv', '?');
1245: commit;
1246:
1247: -- return successfully
1248: BIS_COLLECTION_UTILITIES.PUT_LINE
1249: ('Scrap Summaries Refreshed successfully');
1250: retcode := s_SUCCESS;
1251: errbuf := '';
1252:
1254:
1255: WHEN OTHERS THEN
1256: rollback;
1257:
1258: BIS_COLLECTION_UTILITIES.PUT_LINE (s_pkg_name || '.' ||
1259: l_proc_name || ' ' ||
1260: '#' || l_stmt_id ||
1261: ': ' || SQLERRM);
1262: