29: report OUT NOCOPY JTF_DIAG_REPORT,
30: reportClob OUT NOCOPY CLOB) IS
31: reportStr LONG;
32: counter NUMBER;
33: dummy_v2t JTF_DIAGNOSTIC_COREAPI.v2t;
34: c_userid VARCHAR2(50);
35: statusStr VARCHAR2(50);
36: errStr VARCHAR2(4000);
37: fixInfo VARCHAR2(4000);
57: JTF_DIAGNOSTIC_ADAPTUTIL.setUpVars;
58:
59: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport('@html');
60:
61: JTF_DIAGNOSTIC_COREAPI.insert_style_sheet;
62:
63: --Check FII tables first, if there is any data
64: SELECT COUNT(1) INTO h_fii_cnt FROM FII_TIME_DAY;
65: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_FII_DATA_CHK'));
61: JTF_DIAGNOSTIC_COREAPI.insert_style_sheet;
62:
63: --Check FII tables first, if there is any data
64: SELECT COUNT(1) INTO h_fii_cnt FROM FII_TIME_DAY;
65: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_FII_DATA_CHK'));
66:
67: IF h_fii_cnt = 0 THEN
68: JTF_DIAGNOSTIC_COREAPI.BRPrint;
69:
64: SELECT COUNT(1) INTO h_fii_cnt FROM FII_TIME_DAY;
65: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_FII_DATA_CHK'));
66:
67: IF h_fii_cnt = 0 THEN
68: JTF_DIAGNOSTIC_COREAPI.BRPrint;
69:
70: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_FII_NO_DATA');
71:
72: JTF_DIAGNOSTIC_COREAPI.actionerrorprint(errStr);
68: JTF_DIAGNOSTIC_COREAPI.BRPrint;
69:
70: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_FII_NO_DATA');
71:
72: JTF_DIAGNOSTIC_COREAPI.actionerrorprint(errStr);
73:
74: statusStr := 'FAILURE';
75:
76: fixInfo := errStr;
76: fixInfo := errStr;
77:
78: isFatal := 'FALSE';
79: END IF;
80: JTF_DIAGNOSTIC_COREAPI.BRPrint;
81: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_CHK'));
82:
83: IF check_dangling_records THEN
84: JTF_DIAGNOSTIC_COREAPI.BRPrint;
77:
78: isFatal := 'FALSE';
79: END IF;
80: JTF_DIAGNOSTIC_COREAPI.BRPrint;
81: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_CHK'));
82:
83: IF check_dangling_records THEN
84: JTF_DIAGNOSTIC_COREAPI.BRPrint;
85: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_CORRECT'));
80: JTF_DIAGNOSTIC_COREAPI.BRPrint;
81: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_CHK'));
82:
83: IF check_dangling_records THEN
84: JTF_DIAGNOSTIC_COREAPI.BRPrint;
85: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_CORRECT'));
86: correct_dangling_records;
87: JTF_DIAGNOSTIC_COREAPI.BRPrint;
88: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_FOUND');
81: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_CHK'));
82:
83: IF check_dangling_records THEN
84: JTF_DIAGNOSTIC_COREAPI.BRPrint;
85: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_CORRECT'));
86: correct_dangling_records;
87: JTF_DIAGNOSTIC_COREAPI.BRPrint;
88: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_FOUND');
89: statusStr := 'FAILURE';
83: IF check_dangling_records THEN
84: JTF_DIAGNOSTIC_COREAPI.BRPrint;
85: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_CORRECT'));
86: correct_dangling_records;
87: JTF_DIAGNOSTIC_COREAPI.BRPrint;
88: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_FOUND');
89: statusStr := 'FAILURE';
90: fixInfo := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_FIX');
91: isFatal := 'FALSE';
92: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
93: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
94: RETURN ;
95: END IF;
96: JTF_DIAGNOSTIC_COREAPI.BRPrint;
97: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_TIME_DIM_INDEX'));
98:
99: SELECT COUNT(1) INTO h_count FROM all_indexes
100: WHERE index_name = 'BSC_DB_CALENDAR_U1'
93: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
94: RETURN ;
95: END IF;
96: JTF_DIAGNOSTIC_COREAPI.BRPrint;
97: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_TIME_DIM_INDEX'));
98:
99: SELECT COUNT(1) INTO h_count FROM all_indexes
100: WHERE index_name = 'BSC_DB_CALENDAR_U1'
101: AND OWNER = l_oracle_schema;
100: WHERE index_name = 'BSC_DB_CALENDAR_U1'
101: AND OWNER = l_oracle_schema;
102:
103: IF h_count > 0 THEN
104: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_TIMED_IND_FOUND'));
105: JTF_DIAGNOSTIC_COREAPI.BRPrint;
106: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_TIMED_IND_FOUND');
107: statusStr := 'FAILURE';
108: fixInfo := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_TIMED_IND_FIX');
101: AND OWNER = l_oracle_schema;
102:
103: IF h_count > 0 THEN
104: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_TIMED_IND_FOUND'));
105: JTF_DIAGNOSTIC_COREAPI.BRPrint;
106: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_TIMED_IND_FOUND');
107: statusStr := 'FAILURE';
108: fixInfo := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_TIMED_IND_FIX');
109: isFatal := 'FALSE';
113: END IF;
114:
115: sqltxt := 'SELECT start_month||''/''||start_day||''/''||current_year "START_DATE",edw_calendar_id FROM'||
116: ' bsc_sys_calendars_b WHERE edw_calendar_type_id=1 AND edw_calendar_id IN (1001,1002,1003)';
117: dummy_num:= JTF_DIAGNOSTIC_COREAPI.display_sql(sqltxt,BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_DBI_CAL_METADATA'));
118:
119: statusStr := 'WARNING';
120: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_NEED_INVESTIGATION');
121:
119: statusStr := 'WARNING';
120: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_NEED_INVESTIGATION');
121:
122: fixInfo := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_TIMED_DATA_UPLOAD');
123: JTF_DIAGNOSTIC_COREAPI.BRPrint;
124: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint(fixInfo);
125: isFatal := 'FALSE';
126: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
127: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
120: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_NEED_INVESTIGATION');
121:
122: fixInfo := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_TIMED_DATA_UPLOAD');
123: JTF_DIAGNOSTIC_COREAPI.BRPrint;
124: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint(fixInfo);
125: isFatal := 'FALSE';
126: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
127: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
128: END runTest;