32: l_resp fnd_responsibility_tl.Responsibility_Name%type :='Inventory';
33:
34: BEGIN
35:
36: JTF_DIAGNOSTIC_ADAPTUTIL.setUpVars;
37: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport('@html');
38: JTF_DIAGNOSTIC_COREAPI.insert_style_sheet;
39: --JTF_DIAGNOSTIC_COREAPI.line_out('this also writes to the clob');
40:
33:
34: BEGIN
35:
36: JTF_DIAGNOSTIC_ADAPTUTIL.setUpVars;
37: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport('@html');
38: JTF_DIAGNOSTIC_COREAPI.insert_style_sheet;
39: --JTF_DIAGNOSTIC_COREAPI.line_out('this also writes to the clob');
40:
41: /*
45: statusStr := 'FAILURE';
46: errStr := 'This test requires Inventory Responsibility Role';
47: fixInfo := 'Please contact your sysadmin to get Inventory Responsibility';
48: isFatal := 'FALSE';
49: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
50: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
51: RETURN;
52: END IF;
53: */
46: errStr := 'This test requires Inventory Responsibility Role';
47: fixInfo := 'Please contact your sysadmin to get Inventory Responsibility';
48: isFatal := 'FALSE';
49: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
50: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
51: RETURN;
52: END IF;
53: */
54:
51: RETURN;
52: END IF;
53: */
54:
55: l_org_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrgId',inputs);
56: l_order_number := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrderNo',inputs);
57:
58: IF l_org_id IS NULL OR l_order_number IS NULL THEN
59: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,'Please execute the report with organization and Sales order information');
52: END IF;
53: */
54:
55: l_org_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrgId',inputs);
56: l_order_number := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrderNo',inputs);
57:
58: IF l_org_id IS NULL OR l_order_number IS NULL THEN
59: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,'Please execute the report with organization and Sales order information');
60: JTF_DIAGNOSTIC_COREAPI.errorprint('Error: '|| 'Invalid Organization or Sales Order ');
55: l_org_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrgId',inputs);
56: l_order_number := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrderNo',inputs);
57:
58: IF l_org_id IS NULL OR l_order_number IS NULL THEN
59: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,'Please execute the report with organization and Sales order information');
60: JTF_DIAGNOSTIC_COREAPI.errorprint('Error: '|| 'Invalid Organization or Sales Order ');
61: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint('Please enter correct organization and Sales Order Number');
62: statusStr := 'FAILURE';
63: errStr := 'Invalid Organization Sales Order Combination';
62: statusStr := 'FAILURE';
63: errStr := 'Invalid Organization Sales Order Combination';
64: fixInfo := 'Please enter Organization and Sales Order information';
65: isFatal := 'FALSE';
66: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
67: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
68: RETURN;
69: END IF;
70:
63: errStr := 'Invalid Organization Sales Order Combination';
64: fixInfo := 'Please enter Organization and Sales Order information';
65: isFatal := 'FALSE';
66: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
67: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
68: RETURN;
69: END IF;
70:
71: FND_CLIENT_INFO.SET_ORG_CONTEXT('' || l_org_id || '');
92:
93: dummy_num:= JTF_DIAGNOSTIC_COREAPI.display_sql(sqltxt,'Details of Sales Order');
94:
95: reportStr := 'The test completed as expected';
96: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
97: statusStr := 'SUCCESS';
98: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
99: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
100:
94:
95: reportStr := 'The test completed as expected';
96: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
97: statusStr := 'SUCCESS';
98: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
99: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
100:
101: EXCEPTION
102: when others then
95: reportStr := 'The test completed as expected';
96: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
97: statusStr := 'SUCCESS';
98: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
99: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
100:
101: EXCEPTION
102: when others then
103: JTF_DIAGNOSTIC_COREAPI.errorprint('Error: '||sqlerrm);
105: statusStr := 'FAILURE';
106: errStr := sqlerrm ||' occurred in script INVDP01B.pls Exception handled';
107: fixInfo := 'Unexpected Exception in INVDP01B.pls';
108: isFatal := 'FALSE';
109: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
110: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
111: END runTest;
112:
113:
106: errStr := sqlerrm ||' occurred in script INVDP01B.pls Exception handled';
107: fixInfo := 'Unexpected Exception in INVDP01B.pls';
108: isFatal := 'FALSE';
109: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
110: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
111: END runTest;
112:
113:
114: PROCEDURE getComponentName(name OUT NOCOPY VARCHAR2) IS
129: PROCEDURE getDependencies (package_names OUT NOCOPY JTF_DIAG_DEPENDTBL) IS
130: tempDependencies JTF_DIAG_DEPENDTBL;
131:
132: BEGIN
133: package_names := JTF_DIAGNOSTIC_ADAPTUTIL.initDependencyTable;
134: END getDependencies;
135:
136: PROCEDURE isDependencyPipelined (str OUT NOCOPY VARCHAR2) IS
137: BEGIN
141:
142: PROCEDURE getOutputValues(outputValues OUT NOCOPY JTF_DIAG_OUTPUTTBL) IS
143: tempOutput JTF_DIAG_OUTPUTTBL;
144: BEGIN
145: tempOutput := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
146: outputValues := tempOutput;
147: EXCEPTION
148: when others then
149: outputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
145: tempOutput := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
146: outputValues := tempOutput;
147: EXCEPTION
148: when others then
149: outputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
150: END getOutputValues;
151:
152: PROCEDURE getDefaultTestParams(defaultInputValues OUT NOCOPY JTF_DIAG_INPUTTBL) IS
153: tempInput JTF_DIAG_INPUTTBL;
151:
152: PROCEDURE getDefaultTestParams(defaultInputValues OUT NOCOPY JTF_DIAG_INPUTTBL) IS
153: tempInput JTF_DIAG_INPUTTBL;
154: BEGIN
155: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
156: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrgId','LOV-oracle.apps.inv.diag.lov.OrganizationLov');
157: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrderNo','LOV-oracle.apps.inv.diag.lov.SOLov');
158: defaultInputValues := tempInput;
159: EXCEPTION
152: PROCEDURE getDefaultTestParams(defaultInputValues OUT NOCOPY JTF_DIAG_INPUTTBL) IS
153: tempInput JTF_DIAG_INPUTTBL;
154: BEGIN
155: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
156: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrgId','LOV-oracle.apps.inv.diag.lov.OrganizationLov');
157: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrderNo','LOV-oracle.apps.inv.diag.lov.SOLov');
158: defaultInputValues := tempInput;
159: EXCEPTION
160: when others then
153: tempInput JTF_DIAG_INPUTTBL;
154: BEGIN
155: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
156: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrgId','LOV-oracle.apps.inv.diag.lov.OrganizationLov');
157: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrderNo','LOV-oracle.apps.inv.diag.lov.SOLov');
158: defaultInputValues := tempInput;
159: EXCEPTION
160: when others then
161: defaultInputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
157: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrderNo','LOV-oracle.apps.inv.diag.lov.SOLov');
158: defaultInputValues := tempInput;
159: EXCEPTION
160: when others then
161: defaultInputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
162: END getDefaultTestParams;
163:
164: Function getTestMode return INTEGER IS
165: BEGIN
162: END getDefaultTestParams;
163:
164: Function getTestMode return INTEGER IS
165: BEGIN
166: return JTF_DIAGNOSTIC_ADAPTUTIL.ADVANCED_MODE;
167:
168: END getTestMode;
169:
170: END INV_DIAG_SO_MSO_MCH;