90: statusStr := 'FAILURE';
91: errStr := constructErr('Oracle Application Common Name not found in Workflow Preferences');
92: fixInfo := constructHelp('Oracle Application Common Name must be registered in Workflow Preferences');
93: isFatal := 'FALSE';
94: report := jtf_diagnostic_adaptutil.constructReport(statusStr,
95: errStr, fixInfo, isFatal);
96: reportClob := jtf_diagnostic_adaptutil.getReportClob;
97: when others then
98: statusStr := 'FAILURE';
92: fixInfo := constructHelp('Oracle Application Common Name must be registered in Workflow Preferences');
93: isFatal := 'FALSE';
94: report := jtf_diagnostic_adaptutil.constructReport(statusStr,
95: errStr, fixInfo, isFatal);
96: reportClob := jtf_diagnostic_adaptutil.getReportClob;
97: when others then
98: statusStr := 'FAILURE';
99: errStr := constructErr(sqlerrm || ' occured in ' || currentMethod);
100: fixInfo := constructHelp('Contact System Adminstrator');
98: statusStr := 'FAILURE';
99: errStr := constructErr(sqlerrm || ' occured in ' || currentMethod);
100: fixInfo := constructHelp('Contact System Adminstrator');
101: isFatal := 'FALSE';
102: report := jtf_diagnostic_adaptutil.constructReport(statusStr,
103: errStr, fixInfo, isFatal);
104: reportClob := jtf_diagnostic_adaptutil.getReportClob;
105: end init;
106: --
100: fixInfo := constructHelp('Contact System Adminstrator');
101: isFatal := 'FALSE';
102: report := jtf_diagnostic_adaptutil.constructReport(statusStr,
103: errStr, fixInfo, isFatal);
104: reportClob := jtf_diagnostic_adaptutil.getReportClob;
105: end init;
106: --
107: -------------------------------------------------------------------------------
108: procedure getDefaultTestParams(defaultInputValues out nocopy jtf_diag_inputtbl) is
126: statusStr := 'FAILURE';
127: errStr := constructErr(sqlerrm || ' occured in ' || currentMethod);
128: fixInfo := constructHelp('Contact System Adminstrator');
129: isFatal := 'FALSE';
130: report := jtf_diagnostic_adaptutil.constructReport(statusStr,
131: errStr, fixInfo, isFatal);
132: reportClob := jtf_diagnostic_adaptutil.getReportClob;
133:
134: end cleanup;
128: fixInfo := constructHelp('Contact System Adminstrator');
129: isFatal := 'FALSE';
130: report := jtf_diagnostic_adaptutil.constructReport(statusStr,
131: errStr, fixInfo, isFatal);
132: reportClob := jtf_diagnostic_adaptutil.getReportClob;
133:
134: end cleanup;
135: --
136: -------------------------------------------------------------------------------
157: -------------------------------------------------------------------------------
158: function getTestMode return integer is
159: begin
160: currentMethod := 'getTestMode';
161: return jtf_diagnostic_adaptutil.BOTH_MODE;
162: end getTestMode;
163: --
164: -------------------------------------------------------------------------------
165: procedure dbms_ldap_test is
349: reportClob out nocopy clob) is
350:
351: begin
352: currentMethod := 'runtest';
353: jtf_diagnostic_adaptutil.setUpVars;
354: jtf_diagnostic_adaptutil.addStringToReport('@html');
355: jtf_diagnostic_coreapi.insert_style_sheet;
356: --oidAdmin := jtf_diagnostic_adaptutil.getInputValue('OIDPWD', inputs);
357: --oidPwd := jtf_diagnostic_adaptutil.getInputValue('OIDPWD', inputs);
350:
351: begin
352: currentMethod := 'runtest';
353: jtf_diagnostic_adaptutil.setUpVars;
354: jtf_diagnostic_adaptutil.addStringToReport('@html');
355: jtf_diagnostic_coreapi.insert_style_sheet;
356: --oidAdmin := jtf_diagnostic_adaptutil.getInputValue('OIDPWD', inputs);
357: --oidPwd := jtf_diagnostic_adaptutil.getInputValue('OIDPWD', inputs);
358:
352: currentMethod := 'runtest';
353: jtf_diagnostic_adaptutil.setUpVars;
354: jtf_diagnostic_adaptutil.addStringToReport('@html');
355: jtf_diagnostic_coreapi.insert_style_sheet;
356: --oidAdmin := jtf_diagnostic_adaptutil.getInputValue('OIDPWD', inputs);
357: --oidPwd := jtf_diagnostic_adaptutil.getInputValue('OIDPWD', inputs);
358:
359: profile_test;
360: if (not is_oid_enabled) then
353: jtf_diagnostic_adaptutil.setUpVars;
354: jtf_diagnostic_adaptutil.addStringToReport('@html');
355: jtf_diagnostic_coreapi.insert_style_sheet;
356: --oidAdmin := jtf_diagnostic_adaptutil.getInputValue('OIDPWD', inputs);
357: --oidPwd := jtf_diagnostic_adaptutil.getInputValue('OIDPWD', inputs);
358:
359: profile_test;
360: if (not is_oid_enabled) then
361: jtf_diagnostic_adaptutil.addStringToReport('No additional test executed');
357: --oidPwd := jtf_diagnostic_adaptutil.getInputValue('OIDPWD', inputs);
358:
359: profile_test;
360: if (not is_oid_enabled) then
361: jtf_diagnostic_adaptutil.addStringToReport('No additional test executed');
362:
363: else
364: dbms_ldap_test;
365: if (is_dbms_ldap_available) then
409: linkTest;
410:
411: usersTest;
412: else
413: jtf_diagnostic_adaptutil.addStringToReport('Cannot connect to OiD, test terminated');
414: end if;
415: else
416: jtf_diagnostic_adaptutil.addStringToReport('Cannot continue testing, DBMS_LDAP is not available');
417: end if;
412: else
413: jtf_diagnostic_adaptutil.addStringToReport('Cannot connect to OiD, test terminated');
414: end if;
415: else
416: jtf_diagnostic_adaptutil.addStringToReport('Cannot continue testing, DBMS_LDAP is not available');
417: end if;
418: end if;
419:
420: if (tableOpen) then
420: if (tableOpen) then
421: endTable;
422: end if;
423: if (statusStr = 'SUCCESS') then
424: jtf_diagnostic_adaptutil.addStringToReport('Test completed successfully
');
425: elsif (statusStr = 'WARNING') then
426: jtf_diagnostic_adaptutil.addStringToReport('Test succeeded with warnings
');
427: else
428: jtf_diagnostic_adaptutil.addStringToReport('Test failed
');
422: end if;
423: if (statusStr = 'SUCCESS') then
424: jtf_diagnostic_adaptutil.addStringToReport('Test completed successfully
');
425: elsif (statusStr = 'WARNING') then
426: jtf_diagnostic_adaptutil.addStringToReport('Test succeeded with warnings
');
427: else
428: jtf_diagnostic_adaptutil.addStringToReport('Test failed
');
429: end if;
430:
424: jtf_diagnostic_adaptutil.addStringToReport('Test completed successfully
');
425: elsif (statusStr = 'WARNING') then
426: jtf_diagnostic_adaptutil.addStringToReport('Test succeeded with warnings
');
427: else
428: jtf_diagnostic_adaptutil.addStringToReport('Test failed
');
429: end if;
430:
431: errStr := errStr || '