34:
35:
36: BEGIN
37:
38: JTF_DIAGNOSTIC_ADAPTUTIL.setUpVars;
39: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport('@html');
40: JTF_DIAGNOSTIC_COREAPI.insert_style_sheet;
41: --JTF_DIAGNOSTIC_COREAPI.line_out('this also writes to the clob');
42:
35:
36: BEGIN
37:
38: JTF_DIAGNOSTIC_ADAPTUTIL.setUpVars;
39: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport('@html');
40: JTF_DIAGNOSTIC_COREAPI.insert_style_sheet;
41: --JTF_DIAGNOSTIC_COREAPI.line_out('this also writes to the clob');
42:
43: row_limit := INV_DIAG_GRP.g_max_row;
41: --JTF_DIAGNOSTIC_COREAPI.line_out('this also writes to the clob');
42:
43: row_limit := INV_DIAG_GRP.g_max_row;
44:
45: l_org_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrgId',inputs);
46: l_item_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('ItemId',inputs);
47: l_script :=JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('ScriptName',inputs);
48:
49: IF l_script = 'MTRH_DUMP' THEN
42:
43: row_limit := INV_DIAG_GRP.g_max_row;
44:
45: l_org_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrgId',inputs);
46: l_item_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('ItemId',inputs);
47: l_script :=JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('ScriptName',inputs);
48:
49: IF l_script = 'MTRH_DUMP' THEN
50:
43: row_limit := INV_DIAG_GRP.g_max_row;
44:
45: l_org_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrgId',inputs);
46: l_item_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('ItemId',inputs);
47: l_script :=JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('ScriptName',inputs);
48:
49: IF l_script = 'MTRH_DUMP' THEN
50:
51: sqltxt := ' SELECT ' ||
221:
222: dummy_num:= JTF_DIAGNOSTIC_COREAPI.display_sql(sqltxt,'Dump of Move Order Lines');
223:
224: ELSE
225: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,'Please execute the report with Script Name');
226: JTF_DIAGNOSTIC_COREAPI.errorprint('Error: '|| 'Invalid Script Name');
227: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint('Please choose correct Script Name');
228: statusStr := 'FAILURE';
229: errStr := 'Invalid Script Name';
228: statusStr := 'FAILURE';
229: errStr := 'Invalid Script Name';
230: fixInfo := 'Please choose correct Script Name';
231: isFatal := 'FALSE';
232: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
233: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
234: RETURN;
235: END IF;
236:
229: errStr := 'Invalid Script Name';
230: fixInfo := 'Please choose correct Script Name';
231: isFatal := 'FALSE';
232: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
233: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
234: RETURN;
235: END IF;
236:
237: reportStr := ' Note: Only first 199 rows are returned by this script. The test completed as expected';
234: RETURN;
235: END IF;
236:
237: reportStr := ' Note: Only first 199 rows are returned by this script. The test completed as expected';
238: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
239: statusStr := 'SUCCESS';
240: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
241: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
242:
236:
237: reportStr := ' Note: Only first 199 rows are returned by this script. The test completed as expected';
238: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
239: statusStr := 'SUCCESS';
240: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
241: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
242:
243: EXCEPTION
244: when others then
237: reportStr := ' Note: Only first 199 rows are returned by this script. The test completed as expected';
238: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
239: statusStr := 'SUCCESS';
240: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
241: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
242:
243: EXCEPTION
244: when others then
245: JTF_DIAGNOSTIC_COREAPI.errorprint('Error: '||sqlerrm);
247: statusStr := 'FAILURE';
248: errStr := sqlerrm ||' occurred in script Exception handled';
249: fixInfo := 'Unexpected Exception in INVDM05B.pls';
250: isFatal := 'FALSE';
251: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
252: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
253: END runTest;
254:
255:
248: errStr := sqlerrm ||' occurred in script Exception handled';
249: fixInfo := 'Unexpected Exception in INVDM05B.pls';
250: isFatal := 'FALSE';
251: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
252: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
253: END runTest;
254:
255:
256: PROCEDURE getComponentName(name OUT NOCOPY VARCHAR2) IS
271: PROCEDURE getDependencies (package_names OUT NOCOPY JTF_DIAG_DEPENDTBL) IS
272: tempDependencies JTF_DIAG_DEPENDTBL;
273:
274: BEGIN
275: package_names := JTF_DIAGNOSTIC_ADAPTUTIL.initDependencyTable;
276: END getDependencies;
277:
278: PROCEDURE isDependencyPipelined (str OUT NOCOPY VARCHAR2) IS
279: BEGIN
282:
283: PROCEDURE getOutputValues(outputValues OUT NOCOPY JTF_DIAG_OUTPUTTBL) IS
284: tempOutput JTF_DIAG_OUTPUTTBL;
285: BEGIN
286: tempOutput := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
287: outputValues := tempOutput;
288: EXCEPTION
289: when others then
290: outputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
286: tempOutput := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
287: outputValues := tempOutput;
288: EXCEPTION
289: when others then
290: outputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
291: END getOutputValues;
292:
293: PROCEDURE getDefaultTestParams(defaultInputValues OUT NOCOPY JTF_DIAG_INPUTTBL) IS
294: tempInput JTF_DIAG_INPUTTBL;
292:
293: PROCEDURE getDefaultTestParams(defaultInputValues OUT NOCOPY JTF_DIAG_INPUTTBL) IS
294: tempInput JTF_DIAG_INPUTTBL;
295: BEGIN
296: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
297: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrgId','LOV-oracle.apps.inv.diag.lov.OrganizationLov');
298: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ItemId','LOV-oracle.apps.inv.diag.lov.ItemLov');
299: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ScriptName','LOV-oracle.apps.inv.diag.lov.MODumpScriptsLov');
300: defaultInputValues := tempInput;
293: PROCEDURE getDefaultTestParams(defaultInputValues OUT NOCOPY JTF_DIAG_INPUTTBL) IS
294: tempInput JTF_DIAG_INPUTTBL;
295: BEGIN
296: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
297: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrgId','LOV-oracle.apps.inv.diag.lov.OrganizationLov');
298: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ItemId','LOV-oracle.apps.inv.diag.lov.ItemLov');
299: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ScriptName','LOV-oracle.apps.inv.diag.lov.MODumpScriptsLov');
300: defaultInputValues := tempInput;
301: EXCEPTION
294: tempInput JTF_DIAG_INPUTTBL;
295: BEGIN
296: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
297: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrgId','LOV-oracle.apps.inv.diag.lov.OrganizationLov');
298: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ItemId','LOV-oracle.apps.inv.diag.lov.ItemLov');
299: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ScriptName','LOV-oracle.apps.inv.diag.lov.MODumpScriptsLov');
300: defaultInputValues := tempInput;
301: EXCEPTION
302: when others then
295: BEGIN
296: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
297: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrgId','LOV-oracle.apps.inv.diag.lov.OrganizationLov');
298: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ItemId','LOV-oracle.apps.inv.diag.lov.ItemLov');
299: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ScriptName','LOV-oracle.apps.inv.diag.lov.MODumpScriptsLov');
300: defaultInputValues := tempInput;
301: EXCEPTION
302: when others then
303: defaultInputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
299: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ScriptName','LOV-oracle.apps.inv.diag.lov.MODumpScriptsLov');
300: defaultInputValues := tempInput;
301: EXCEPTION
302: when others then
303: defaultInputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
304: END getDefaultTestParams;
305:
306: Function getTestMode return INTEGER IS
307: BEGIN
304: END getDefaultTestParams;
305:
306: Function getTestMode return INTEGER IS
307: BEGIN
308: return JTF_DIAGNOSTIC_ADAPTUTIL.ADVANCED_MODE;
309: END getTestMode;
310:
311: END INV_DIAG_MO_DUMP;