46: JTF_DIAGNOSTIC_COREAPI.insert_style_sheet;
47:
48: JTF_DIAGNOSTIC_COREAPI.BRPrint;
49:
50: JTF_DIAGNOSTIC_COREAPI.Line_out(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_CHK'));
51:
52: h_count := 0;
53:
54: h_count:= h_count+JTF_DIAGNOSTIC_COREAPI.display_sql(g_dang_measure_sql1,'BIS_INDICATORS<>BSC_SYS_DATASETS_B');
61:
62:
63: IF h_count >0 THEN
64: JTF_DIAGNOSTIC_COREAPI.BRPrint;
65: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_FOUND');
66: statusStr := 'WARNING';
67: fixInfo := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_DANGLING_OBJ_FIX');
68: isFatal := 'FALSE';
69: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint(fixInfo);
63: IF h_count >0 THEN
64: JTF_DIAGNOSTIC_COREAPI.BRPrint;
65: errStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_PER_DANG_FOUND');
66: statusStr := 'WARNING';
67: fixInfo := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_DANGLING_OBJ_FIX');
68: isFatal := 'FALSE';
69: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint(fixInfo);
70: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
71: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
72: RETURN ;
73: END IF;
74: statusStr := 'SUCCESS';
75: isFatal := 'FALSE';
76: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint(BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_NO_DANG_RECS'));
77: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
78: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
79: END runTest;
80:
82: -- procedure to report name back to framework
83: ------------------------------------------------------------
84: PROCEDURE getComponentName(name OUT NOCOPY VARCHAR2) IS
85: BEGIN
86: name := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_GEN_HEALTH_CHECK');
87: END getComponentName;
88:
89: ------------------------------------------------------------
90: -- procedure to report test description back to framework
90: -- procedure to report test description back to framework
91: ------------------------------------------------------------
92: PROCEDURE getTestDesc(descStr OUT NOCOPY VARCHAR2) IS
93: BEGIN
94: descStr := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_CORRUPT_OBJ_TDESC');
95: END getTestDesc;
96:
97: ------------------------------------------------------------
98: -- procedure to report test name back to framework
98: -- procedure to report test name back to framework
99: ------------------------------------------------------------
100: PROCEDURE getTestName(name OUT NOCOPY VARCHAR2) IS
101: BEGIN
102: name := BSC_OBJECTIVE_METADATA_SETUP.get_message_name('BSC_CORRUPT_OBJ_TNAME');
103: END getTestName;
104:
105:
106: ------------------------------------------------------------