37: WHERE inventory_item_id = cp_n_item_id
38: AND organization_id = nvl(cp_n_org_id,organization_id);
39:
40: BEGIN
41: JTF_DIAGNOSTIC_ADAPTUTIL.setUpVars;
42: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport('@html');
43: JTF_DIAGNOSTIC_COREAPI.insert_style_sheet;
44:
45: /*Initializing local vars */
38: AND organization_id = nvl(cp_n_org_id,organization_id);
39:
40: BEGIN
41: JTF_DIAGNOSTIC_ADAPTUTIL.setUpVars;
42: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport('@html');
43: JTF_DIAGNOSTIC_COREAPI.insert_style_sheet;
44:
45: /*Initializing local vars */
46: row_limit :=1000; /* Set Row Limit to 1000 (i.e.) Max Number of records to be fetched by each sql*/
46: row_limit :=1000; /* Set Row Limit to 1000 (i.e.) Max Number of records to be fetched by each sql*/
47: l_count := 0;
48:
49: -- accept input
50: l_org_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrgId',inputs);
51: l_item_id :=JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('ItemId',inputs);
52:
53: If l_item_id is NULL then
54: JTF_DIAGNOSTIC_COREAPI.errorprint('Input Item Id is mandatory.');
47: l_count := 0;
48:
49: -- accept input
50: l_org_id := JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('OrgId',inputs);
51: l_item_id :=JTF_DIAGNOSTIC_ADAPTUTIL.getInputValue('ItemId',inputs);
52:
53: If l_item_id is NULL then
54: JTF_DIAGNOSTIC_COREAPI.errorprint('Input Item Id is mandatory.');
55: JTF_DIAGNOSTIC_COREAPI.ActionErrorPrint(' Please provide a valid value for the Item Id.');
57: isFatal := 'TRUE';
58: fixInfo := ' Please review the error message below and take corrective action. ';
59: errStr := ' Invalid value for input field Item Id. It is a mandatory input.';
60:
61: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
62: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
63: Return;
64: Else /* l_item_id is not null */
65: OPEN c_item_valid (l_item_id, l_org_id);
58: fixInfo := ' Please review the error message below and take corrective action. ';
59: errStr := ' Invalid value for input field Item Id. It is a mandatory input.';
60:
61: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
62: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
63: Return;
64: Else /* l_item_id is not null */
65: OPEN c_item_valid (l_item_id, l_org_id);
66: FETCH c_item_valid INTO l_count;
72: statusStr := 'FAILURE';
73: errStr := 'Invalid Item and Organization Combination';
74: fixInfo := ' Please review the error message below and take corrective action. ';
75: isFatal := 'TRUE';
76: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
77: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
78: RETURN;
79: END IF;
80: End If; /* l_item_id is null */
73: errStr := 'Invalid Item and Organization Combination';
74: fixInfo := ' Please review the error message below and take corrective action. ';
75: isFatal := 'TRUE';
76: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
77: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
78: RETURN;
79: END IF;
80: End If; /* l_item_id is null */
81:
208: isFatal := 'FALSE';
209:
210: <
211: JTF_DIAGNOSTIC_COREAPI.Line_Out('
This data collection script completed as expected
');
212: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
213: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
214:
215: EXCEPTION
216: when others then
209:
210: <
211: JTF_DIAGNOSTIC_COREAPI.Line_Out('
This data collection script completed as expected
');
212: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
213: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
214:
215: EXCEPTION
216: when others then
217: JTF_DIAGNOSTIC_COREAPI.errorprint('Error: '||sqlerrm);
219: statusStr := 'FAILURE';
220: errStr := sqlerrm ||' occurred in script. ';
221: fixInfo := 'Unexpected Exception in BOMDGEXB.pls';
222: isFatal := 'FALSE';
223: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
224: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
225: END runTest;
226:
227: PROCEDURE getComponentName(name OUT NOCOPY VARCHAR2) IS
220: errStr := sqlerrm ||' occurred in script. ';
221: fixInfo := 'Unexpected Exception in BOMDGEXB.pls';
222: isFatal := 'FALSE';
223: report := JTF_DIAGNOSTIC_ADAPTUTIL.constructReport(statusStr,errStr,fixInfo,isFatal);
224: reportClob := JTF_DIAGNOSTIC_ADAPTUTIL.getReportClob;
225: END runTest;
226:
227: PROCEDURE getComponentName(name OUT NOCOPY VARCHAR2) IS
228: BEGIN
243: PROCEDURE getDependencies (package_names OUT NOCOPY JTF_DIAG_DEPENDTBL) IS
244: tempDependencies JTF_DIAG_DEPENDTBL;
245:
246: BEGIN
247: package_names := JTF_DIAGNOSTIC_ADAPTUTIL.initDependencyTable;
248: END getDependencies;
249:
250: PROCEDURE isDependencyPipelined (str OUT NOCOPY VARCHAR2) IS
251: BEGIN
255:
256: PROCEDURE getOutputValues(outputValues OUT NOCOPY JTF_DIAG_OUTPUTTBL) IS
257: tempOutput JTF_DIAG_OUTPUTTBL;
258: BEGIN
259: tempOutput := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
260: outputValues := tempOutput;
261: EXCEPTION
262: when others then
263: outputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
259: tempOutput := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
260: outputValues := tempOutput;
261: EXCEPTION
262: when others then
263: outputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initOutputTable;
264: END getOutputValues;
265:
266:
267: PROCEDURE getDefaultTestParams(defaultInputValues OUT NOCOPY JTF_DIAG_INPUTTBL) IS
266:
267: PROCEDURE getDefaultTestParams(defaultInputValues OUT NOCOPY JTF_DIAG_INPUTTBL) IS
268: tempInput JTF_DIAG_INPUTTBL;
269: BEGIN
270: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
271: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrgId','LOV-oracle.apps.bom.diag.lov.OrganizationLov');-- Lov name modified to OrgId for bug 6412260
272: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ItemId','LOV-oracle.apps.bom.diag.lov.ItemLov'); -- Lov name modified to ItemId for bug 6412260
273: defaultInputValues := tempInput;
274: EXCEPTION
267: PROCEDURE getDefaultTestParams(defaultInputValues OUT NOCOPY JTF_DIAG_INPUTTBL) IS
268: tempInput JTF_DIAG_INPUTTBL;
269: BEGIN
270: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
271: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrgId','LOV-oracle.apps.bom.diag.lov.OrganizationLov');-- Lov name modified to OrgId for bug 6412260
272: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ItemId','LOV-oracle.apps.bom.diag.lov.ItemLov'); -- Lov name modified to ItemId for bug 6412260
273: defaultInputValues := tempInput;
274: EXCEPTION
275: when others then
268: tempInput JTF_DIAG_INPUTTBL;
269: BEGIN
270: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
271: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'OrgId','LOV-oracle.apps.bom.diag.lov.OrganizationLov');-- Lov name modified to OrgId for bug 6412260
272: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ItemId','LOV-oracle.apps.bom.diag.lov.ItemLov'); -- Lov name modified to ItemId for bug 6412260
273: defaultInputValues := tempInput;
274: EXCEPTION
275: when others then
276: defaultInputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
272: tempInput := JTF_DIAGNOSTIC_ADAPTUTIL.addInput(tempInput,'ItemId','LOV-oracle.apps.bom.diag.lov.ItemLov'); -- Lov name modified to ItemId for bug 6412260
273: defaultInputValues := tempInput;
274: EXCEPTION
275: when others then
276: defaultInputValues := JTF_DIAGNOSTIC_ADAPTUTIL.initinputtable;
277: END getDefaultTestParams;
278:
279: Function getTestMode return INTEGER IS
280: BEGIN
277: END getDefaultTestParams;
278:
279: Function getTestMode return INTEGER IS
280: BEGIN
281: return JTF_DIAGNOSTIC_ADAPTUTIL.ADVANCED_MODE;
282:
283: END getTestMode;
284:
285: END BOM_DIAGUNITTEST_EXPDATA;