eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.GMD_SPEC_GRP dependencies on FND_API

Line 152: x_return_status := FND_API.G_RET_STS_SUCCESS;

148:
149: BEGIN
150:
151: -- Initialize API return status to success
152: x_return_status := FND_API.G_RET_STS_SUCCESS;
153:
154: -- Spec Name
155: IF (ltrim(rtrim(p_spec_header.spec_name)) IS NULL) THEN
156: GMD_API_PUB.Log_Message('GMD_SPEC_NAME_REQD');

Line 157: RAISE FND_API.G_EXC_ERROR;

153:
154: -- Spec Name
155: IF (ltrim(rtrim(p_spec_header.spec_name)) IS NULL) THEN
156: GMD_API_PUB.Log_Message('GMD_SPEC_NAME_REQD');
157: RAISE FND_API.G_EXC_ERROR;
158: END IF;
159:
160: -- Spec Vers
161: IF (p_spec_header.spec_vers IS NULL) THEN

Line 163: RAISE FND_API.G_EXC_ERROR;

159:
160: -- Spec Vers
161: IF (p_spec_header.spec_vers IS NULL) THEN
162: GMD_API_PUB.Log_Message('GMD_SPEC_VERS_REQD');
163: RAISE FND_API.G_EXC_ERROR;
164: ELSIF (p_spec_header.spec_vers < 0) THEN
165: GMD_API_PUB.Log_Message('GMD_SPEC_VERS_INVALID');
166: RAISE FND_API.G_EXC_ERROR;
167: END IF;

Line 166: RAISE FND_API.G_EXC_ERROR;

162: GMD_API_PUB.Log_Message('GMD_SPEC_VERS_REQD');
163: RAISE FND_API.G_EXC_ERROR;
164: ELSIF (p_spec_header.spec_vers < 0) THEN
165: GMD_API_PUB.Log_Message('GMD_SPEC_VERS_INVALID');
166: RAISE FND_API.G_EXC_ERROR;
167: END IF;
168:
169: --Spec Type (Bug 3451973)
170: IF (p_spec_header.spec_type in ('M', 'I')) THEN

Line 174: RAISE FND_API.G_EXC_ERROR;

170: IF (p_spec_header.spec_type in ('M', 'I')) THEN
171: null ;
172: else
173: GMD_API_PUB.Log_Message('GMD_SPEC_TYPE_NOT_FOUND');
174: RAISE FND_API.G_EXC_ERROR;
175: end if;
176:
177: -- Item ID
178: IF (p_spec_header.inventory_item_id IS NULL)

Line 182: RAISE FND_API.G_EXC_ERROR;

178: IF (p_spec_header.inventory_item_id IS NULL)
179: and (p_spec_header.spec_type = 'I') -- Bug 3401368: this is only for item specs
180: THEN
181: GMD_API_PUB.Log_Message('GMD_SPEC_ITEM_REQD');
182: RAISE FND_API.G_EXC_ERROR;
183: ELSE
184: -- Get the Item No
185: OPEN c_item(p_spec_header.inventory_item_id, p_spec_header.owner_organization_id);
186: FETCH c_item INTO x_item_number,l_grade_ctl;

Line 191: RAISE FND_API.G_EXC_ERROR;

187: IF (c_item%NOTFOUND) and (p_spec_header.spec_type = 'I') -- Bug 3401368: this is only for item specs
188: THEN
189: CLOSE c_item;
190: GMD_API_PUB.Log_Message('GMD_SPEC_ITEM_NOT_FOUND');
191: RAISE FND_API.G_EXC_ERROR;
192: END IF;
193: CLOSE c_item;
194: END IF;
195:

Line 211: RAISE FND_API.G_EXC_ERROR;

207: CLOSE c_revision;
208: CLOSE c_rev_ctrl;
209: GMD_API_PUB.Log_Message('GMD_SPEC_REVISION_NOT_FOUND',
210: 'REVISION', p_spec_header.revision);
211: RAISE FND_API.G_EXC_ERROR;
212: END IF; --c_revision%NOTFOUND
213: CLOSE c_revision;
214: ELSIF dummy = 1 THEN --The item is not a revision controlled item
215: CLOSE c_rev_ctrl;

Line 217: RAISE FND_API.G_EXC_ERROR;

213: CLOSE c_revision;
214: ELSIF dummy = 1 THEN --The item is not a revision controlled item
215: CLOSE c_rev_ctrl;
216: GMD_API_PUB.Log_Message('GMD_SPEC_NOT_REVISION_CTRL');
217: RAISE FND_API.G_EXC_ERROR;
218: END IF; --dummy = 2
219: CLOSE c_rev_ctrl;
220: END IF; --(p_spec_header.revision IS NOT NULL)
221: -- End RLNAGARA Bug # 4548546

Line 226: RAISE FND_API.G_EXC_ERROR;

222:
223: -- Grade
224: IF l_grade_ctl = 'N' and p_spec_header.grade_code IS NOT NULL THEN
225: GMD_API_PUB.Log_Message('GMD_GRADE_NOT_REQD');
226: RAISE FND_API.G_EXC_ERROR;
227: END IF;
228:
229: IF (p_spec_header.grade_code IS NOT NULL) THEN
230: -- Check that Grade exist in QC_GRAD_MST

Line 237: RAISE FND_API.G_EXC_ERROR;

233: IF c_grade%NOTFOUND THEN
234: CLOSE c_grade;
235: GMD_API_PUB.Log_Message('GMD_SPEC_GRADE_NOT_FOUND',
236: 'GRADE', p_spec_header.grade_code);
237: RAISE FND_API.G_EXC_ERROR;
238: END IF;
239: CLOSE c_grade;
240: END IF;
241:

Line 245: RAISE FND_API.G_EXC_ERROR;

241:
242: -- Spec Status
243: IF (p_spec_header.spec_status IS NULL) THEN
244: GMD_API_PUB.Log_Message('GMD_SPEC_STATUS_REQD');
245: RAISE FND_API.G_EXC_ERROR;
246: ELSE
247: -- Check that Status exist in GMD_QM_STATUS
248: OPEN c_status(p_spec_header.spec_status);
249: FETCH c_status INTO dummy;

Line 254: RAISE FND_API.G_EXC_ERROR;

250: IF c_status%NOTFOUND THEN
251: CLOSE c_status;
252: GMD_API_PUB.Log_Message('GMD_SPEC_STATUS_NOT_FOUND',
253: 'STATUS', p_spec_header.spec_status);
254: RAISE FND_API.G_EXC_ERROR;
255: END IF;
256: CLOSE c_status;
257: END IF;
258:

Line 262: RAISE FND_API.G_EXC_ERROR;

258:
259: -- Owner Orgn Code
260: IF (p_spec_header.owner_organization_id IS NULL) THEN
261: GMD_API_PUB.Log_Message('GMD_SPEC_ORGN_REQD');
262: RAISE FND_API.G_EXC_ERROR;
263: ELSE
264: -- Check that Owner Organization id exist in MTL_PARAMETERS
265: OPEN c_orgn(p_spec_header.owner_organization_id);
266: FETCH c_orgn INTO dummy;

Line 271: RAISE FND_API.G_EXC_ERROR;

267: IF c_orgn%NOTFOUND THEN
268: CLOSE c_orgn;
269: GMD_API_PUB.Log_Message('GMD_SPEC_ORGN_ID_NOT_FOUND',
270: 'ORGNID', p_spec_header.owner_organization_id);
271: RAISE FND_API.G_EXC_ERROR;
272: END IF;
273: CLOSE c_orgn;
274: END IF;
275:

Line 279: RAISE FND_API.G_EXC_ERROR;

275:
276: -- Owner ID
277: IF (p_spec_header.owner_id IS NULL) THEN
278: GMD_API_PUB.Log_Message('GMD_SPEC_OWNER_REQD');
279: RAISE FND_API.G_EXC_ERROR;
280: ELSE
281: -- Get the Owner Name
282: OPEN c_owner(p_spec_header.owner_id);
283: FETCH c_owner INTO x_owner;

Line 287: RAISE FND_API.G_EXC_ERROR;

283: FETCH c_owner INTO x_owner;
284: IF c_owner%NOTFOUND THEN
285: CLOSE c_owner;
286: GMD_API_PUB.Log_Message('GMD_SPEC_OWNER_NOT_FOUND');
287: RAISE FND_API.G_EXC_ERROR;
288: END IF;
289: CLOSE c_owner;
290: END IF;
291:

Line 296: RAISE FND_API.G_EXC_ERROR;

292:
293: -- Overlay Ind (Bug 3452015)
294: if (nvl(p_spec_header.OVERLAY_IND,'Y') <> 'Y') then
295: GMD_API_PUB.Log_Message('GMD_OVERLAY_NOT_VALID');
296: RAISE FND_API.G_EXC_ERROR;
297: end if ;
298:
299: IF (p_spec_header.OVERLAY_IND is NULL) THEN
300: IF (p_spec_header.BASE_SPEC_ID IS NOT NULL) THEN

Line 302: RAISE FND_API.G_EXC_ERROR;

298:
299: IF (p_spec_header.OVERLAY_IND is NULL) THEN
300: IF (p_spec_header.BASE_SPEC_ID IS NOT NULL) THEN
301: GMD_API_PUB.Log_Message('GMD_OVERLAY_NOT_VALID');
302: RAISE FND_API.G_EXC_ERROR;
303: end if;
304: end if;
305:
306: IF (p_spec_header.OVERLAY_IND = 'Y') THEN

Line 310: RAISE FND_API.G_EXC_ERROR;

306: IF (p_spec_header.OVERLAY_IND = 'Y') THEN
307: IF (p_spec_header.BASE_SPEC_ID IS NULL) THEN
308: GMD_API_PUB.Log_Message('GMD_BASE_SPEC_NOT_FOUND',
309: 'BASE_SPEC_ID', p_spec_header.base_spec_id);
310: RAISE FND_API.G_EXC_ERROR;
311: end if;
312: end if;
313:
314:

Line 324: RAISE FND_API.G_EXC_ERROR;

320: IF c_spec%NOTFOUND THEN
321: CLOSE c_spec;
322: GMD_API_PUB.Log_Message('GMD_BASE_SPEC_NOT_FOUND',
323: 'BASE_SPEC_ID', p_spec_header.base_spec_id);
324: RAISE FND_API.G_EXC_ERROR;
325: END IF;
326: CLOSE c_spec;
327: END IF;
328:

Line 330: WHEN FND_API.G_EXC_ERROR THEN

326: CLOSE c_spec;
327: END IF;
328:
329: EXCEPTION
330: WHEN FND_API.G_EXC_ERROR THEN
331: x_return_status := FND_API.G_RET_STS_ERROR ;
332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
334: WHEN OTHERS THEN

Line 331: x_return_status := FND_API.G_RET_STS_ERROR ;

327: END IF;
328:
329: EXCEPTION
330: WHEN FND_API.G_EXC_ERROR THEN
331: x_return_status := FND_API.G_RET_STS_ERROR ;
332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
334: WHEN OTHERS THEN
335: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.check_for_null_and_fks_in_spec',

Line 332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

328:
329: EXCEPTION
330: WHEN FND_API.G_EXC_ERROR THEN
331: x_return_status := FND_API.G_RET_STS_ERROR ;
332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
334: WHEN OTHERS THEN
335: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.check_for_null_and_fks_in_spec',
336: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');

Line 333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

329: EXCEPTION
330: WHEN FND_API.G_EXC_ERROR THEN
331: x_return_status := FND_API.G_RET_STS_ERROR ;
332: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
334: WHEN OTHERS THEN
335: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.check_for_null_and_fks_in_spec',
336: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');
337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
334: WHEN OTHERS THEN
335: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.check_for_null_and_fks_in_spec',
336: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');
337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
338:
339: END check_for_null_and_fks_in_spec;
340:
341:

Line 409: x_return_status := FND_API.G_RET_STS_SUCCESS;

405:
406: BEGIN
407:
408: -- Initialize API return status to success
409: x_return_status := FND_API.G_RET_STS_SUCCESS;
410:
411: x_spec_tests := p_spec_tests;
412: -- Test
413: IF x_spec_tests.test_id IS NULL THEN

Line 415: RAISE FND_API.G_EXC_ERROR;

411: x_spec_tests := p_spec_tests;
412: -- Test
413: IF x_spec_tests.test_id IS NULL THEN
414: GMD_API_PUB.Log_Message('GMD_TEST_ID_CODE_NULL');
415: RAISE FND_API.G_EXC_ERROR;
416: ELSE
417: OPEN cr_test(x_spec_tests.test_id);
418: FETCH cr_test INTO l_test_code,l_test_method_id,l_test_type,l_test_min_value_num,
419: l_test_max_value_num,l_test_priority;

Line 423: RAISE FND_API.G_EXC_ERROR;

419: l_test_max_value_num,l_test_priority;
420: IF cr_test%NOTFOUND THEN
421: CLOSE cr_test;
422: GMD_API_PUB.Log_Message('GMD_INVALID_TEST','TEST',x_spec_tests.test_id);
423: RAISE FND_API.G_EXC_ERROR;
424: END IF;
425: CLOSE cr_test ;
426: END IF;
427:

Line 454: RAISE FND_API.G_EXC_ERROR;

450: IF x_spec_tests.test_method_id IS NULL THEN
451: x_spec_tests.test_method_id := l_test_method_id;
452: ELSIF x_spec_tests.test_method_id <> l_test_method_id THEN
453: GMD_API_PUB.Log_Message('GMD_SPEC_TST_MTHD_INVALID');
454: RAISE FND_API.G_EXC_ERROR;
455: END IF;
456:
457: OPEN cr_test_method_valid(l_test_method_id);
458: FETCH cr_test_method_valid INTO l_test_method_id,l_test_method_replicate;

Line 462: RAISE FND_API.G_EXC_ERROR;

458: FETCH cr_test_method_valid INTO l_test_method_id,l_test_method_replicate;
459: IF cr_test_method_valid%NOTFOUND THEN
460: CLOSE cr_test_method_valid;
461: GMD_API_PUB.Log_Message('GMD_TEST_METHOD_DELETED');
462: RAISE FND_API.G_EXC_ERROR;
463: END IF;
464: CLOSE cr_test_method_valid ;
465:
466: -- test sequence

Line 469: RAISE FND_API.G_EXC_ERROR;

465:
466: -- test sequence
467: IF x_spec_tests.seq IS NULL THEN
468: GMD_API_PUB.Log_Message('GMD_SPEC_TEST_SEQ_REQD');
469: RAISE FND_API.G_EXC_ERROR;
470: ELSE
471: IF x_spec_tests.seq <> trunc(x_spec_tests.seq) THEN
472: GMD_API_PUB.Log_Message('GMD_SPEC_TEST_SEQ_NO');
473: RAISE FND_API.G_EXC_ERROR;

Line 473: RAISE FND_API.G_EXC_ERROR;

469: RAISE FND_API.G_EXC_ERROR;
470: ELSE
471: IF x_spec_tests.seq <> trunc(x_spec_tests.seq) THEN
472: GMD_API_PUB.Log_Message('GMD_SPEC_TEST_SEQ_NO');
473: RAISE FND_API.G_EXC_ERROR;
474: END IF;
475: END IF;
476:
477: IF l_test_type IN ('U','T','V') THEN

Line 482: RAISE FND_API.G_EXC_ERROR;

478:
479: IF (x_spec_tests.display_precision IS NOT NULL OR x_spec_tests.report_precision IS NOT NULL) THEN
480: FND_MESSAGE.SET_NAME('GMD','GMD_PRECISION_NOT_REQD');
481: FND_MSG_PUB.ADD;
482: RAISE FND_API.G_EXC_ERROR;
483: END IF;
484:
485: IF (x_spec_tests.min_value_num IS NOT NULL OR x_spec_tests.max_value_num IS NOT NULL) THEN
486: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_NUM_RANGE_NOT_REQD');

Line 488: RAISE FND_API.G_EXC_ERROR;

484:
485: IF (x_spec_tests.min_value_num IS NOT NULL OR x_spec_tests.max_value_num IS NOT NULL) THEN
486: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_NUM_RANGE_NOT_REQD');
487: FND_MSG_PUB.ADD;
488: RAISE FND_API.G_EXC_ERROR;
489: END IF;
490:
491: IF x_spec_tests.target_value_num IS NOT NULL THEN
492: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_NUM_TARGET_NOT_REQD');

Line 494: RAISE FND_API.G_EXC_ERROR;

490:
491: IF x_spec_tests.target_value_num IS NOT NULL THEN
492: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_NUM_TARGET_NOT_REQD');
493: FND_MSG_PUB.ADD;
494: RAISE FND_API.G_EXC_ERROR;
495: END IF;
496: --BEGIN BUG#3545701
497: --Commented the code for Non-validated tests.
498: /* IF l_test_type = 'U' and x_spec_tests.target_value_char IS NOT NULL THEN

Line 501: RAISE FND_API.G_EXC_ERROR; */

497: --Commented the code for Non-validated tests.
498: /* IF l_test_type = 'U' and x_spec_tests.target_value_char IS NOT NULL THEN
499: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_CHAR_TARGET_NOT_REQD');
500: FND_MSG_PUB.ADD;
501: RAISE FND_API.G_EXC_ERROR; */
502: --END BUG#3545701
503: IF l_test_type = 'V' and x_spec_tests.target_value_char IS NULL THEN
504: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_CHAR_TARGET_REQD');
505: FND_MSG_PUB.ADD;

Line 506: RAISE FND_API.G_EXC_ERROR;

502: --END BUG#3545701
503: IF l_test_type = 'V' and x_spec_tests.target_value_char IS NULL THEN
504: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_CHAR_TARGET_REQD');
505: FND_MSG_PUB.ADD;
506: RAISE FND_API.G_EXC_ERROR;
507: END IF;
508:
509: IF (l_test_type = 'T') THEN
510: IF (x_spec_tests.min_value_char IS NULL OR x_spec_tests.max_value_char IS NULL) THEN

Line 513: RAISE FND_API.G_EXC_ERROR;

509: IF (l_test_type = 'T') THEN
510: IF (x_spec_tests.min_value_char IS NULL OR x_spec_tests.max_value_char IS NULL) THEN
511: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_RANGE_REQ');
512: FND_MSG_PUB.ADD;
513: RAISE FND_API.G_EXC_ERROR;
514: END IF;
515: ELSE
516: IF (x_spec_tests.min_value_char IS NOT NULL OR x_spec_tests.max_value_char IS NOT NULL) THEN
517: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_CHAR_RANGE_NOT_REQD');

Line 519: RAISE FND_API.G_EXC_ERROR;

515: ELSE
516: IF (x_spec_tests.min_value_char IS NOT NULL OR x_spec_tests.max_value_char IS NOT NULL) THEN
517: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_CHAR_RANGE_NOT_REQD');
518: FND_MSG_PUB.ADD;
519: RAISE FND_API.G_EXC_ERROR;
520: END IF;
521: END IF;
522:
523: --BEGIN BUG#3545701

Line 528: RAISE FND_API.G_EXC_ERROR;

524: --Commented the code for Non-validated tests.
525: /* IF l_test_type = 'U' and x_spec_tests.out_of_spec_action IS NOT NULL THEN
526: FND_MESSAGE.SET_NAME('GMD','GMD_ACTION_CODE_NOT_REQD');
527: FND_MSG_PUB.ADD;
528: RAISE FND_API.G_EXC_ERROR;
529: END IF; */
530: --END BUG#3545701
531:
532: IF x_spec_tests.exp_error_type IS NOT NULL THEN

Line 535: RAISE FND_API.G_EXC_ERROR;

531:
532: IF x_spec_tests.exp_error_type IS NOT NULL THEN
533: FND_MESSAGE.SET_NAME('GMD','GMD_INVALID_EXP_ERROR_TYPE');
534: FND_MSG_PUB.ADD;
535: RAISE FND_API.G_EXC_ERROR;
536: END IF;
537:
538: IF (x_spec_tests.below_spec_min IS NOT NULL OR x_spec_tests.below_min_action_code IS NOT NULL )
539: OR (x_spec_tests.above_spec_min IS NOT NULL OR x_spec_tests.above_min_action_code IS NOT NULL )

Line 544: RAISE FND_API.G_EXC_ERROR;

540: OR (x_spec_tests.below_spec_max IS NOT NULL OR x_spec_tests.below_max_action_code IS NOT NULL )
541: OR (x_spec_tests.above_spec_max IS NOT NULL OR x_spec_tests.above_max_action_code IS NOT NULL ) THEN
542: FND_MESSAGE.SET_NAME('GMD', 'GMD_EXP_ERROR_NOT_REQD');
543: FND_MSG_PUB.ADD;
544: RAISE FND_API.G_EXC_ERROR;
545: END IF;
546: ELSE
547: IF (x_spec_tests.display_precision IS NULL OR x_spec_tests.report_precision IS NULL ) THEN
548: GMD_API_PUB.Log_Message('GMD_PRECISION_REQD','TEST',l_test_code);

Line 549: RAISE FND_API.G_EXC_ERROR;

545: END IF;
546: ELSE
547: IF (x_spec_tests.display_precision IS NULL OR x_spec_tests.report_precision IS NULL ) THEN
548: GMD_API_PUB.Log_Message('GMD_PRECISION_REQD','TEST',l_test_code);
549: RAISE FND_API.G_EXC_ERROR;
550: END IF;
551:
552: IF (x_spec_tests.display_precision not between 0 and 9) THEN
553: GMD_API_PUB.Log_Message('GMD_INVALID_PRECISION','PRECISION',x_spec_tests.display_precision);

Line 554: RAISE FND_API.G_EXC_ERROR;

550: END IF;
551:
552: IF (x_spec_tests.display_precision not between 0 and 9) THEN
553: GMD_API_PUB.Log_Message('GMD_INVALID_PRECISION','PRECISION',x_spec_tests.display_precision);
554: RAISE FND_API.G_EXC_ERROR;
555: END IF;
556:
557: IF (x_spec_tests.report_precision not between 0 and 9) THEN
558: GMD_API_PUB.Log_Message('GMD_INVALID_PRECISION','PRECISION',x_spec_tests.report_precision);

Line 559: RAISE FND_API.G_EXC_ERROR;

555: END IF;
556:
557: IF (x_spec_tests.report_precision not between 0 and 9) THEN
558: GMD_API_PUB.Log_Message('GMD_INVALID_PRECISION','PRECISION',x_spec_tests.report_precision);
559: RAISE FND_API.G_EXC_ERROR;
560: END IF;
561:
562: IF (x_spec_tests.min_value_num IS NULL AND x_spec_tests.max_value_num IS NULL) THEN
563: FND_MESSAGE.SET_NAME('GMD','GMD_MIN_MAX_REQ');

Line 565: RAISE FND_API.G_EXC_ERROR;

561:
562: IF (x_spec_tests.min_value_num IS NULL AND x_spec_tests.max_value_num IS NULL) THEN
563: FND_MESSAGE.SET_NAME('GMD','GMD_MIN_MAX_REQ');
564: FND_MSG_PUB.ADD;
565: RAISE FND_API.G_EXC_ERROR;
566: END IF;
567:
568: IF ((x_spec_tests.min_value_num IS NULL AND l_test_min_value_num IS NOT NULL)
569: OR (x_spec_tests.max_value_num IS NULL AND l_test_max_value_num IS NOT NULL)) THEN

Line 572: RAISE FND_API.G_EXC_ERROR;

568: IF ((x_spec_tests.min_value_num IS NULL AND l_test_min_value_num IS NOT NULL)
569: OR (x_spec_tests.max_value_num IS NULL AND l_test_max_value_num IS NOT NULL)) THEN
570: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_RANGE_REQ');
571: FND_MSG_PUB.ADD;
572: RAISE FND_API.G_EXC_ERROR;
573: END IF;
574:
575: IF (x_spec_tests.min_value_char IS NOT NULL OR x_spec_tests.max_value_char IS NOT NULL) THEN
576: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_CHAR_RANGE_NOT_REQD');

Line 578: RAISE FND_API.G_EXC_ERROR;

574:
575: IF (x_spec_tests.min_value_char IS NOT NULL OR x_spec_tests.max_value_char IS NOT NULL) THEN
576: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_CHAR_RANGE_NOT_REQD');
577: FND_MSG_PUB.ADD;
578: RAISE FND_API.G_EXC_ERROR;
579: END IF;
580:
581: IF x_spec_tests.target_value_char IS NOT NULL THEN
582: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_CHAR_TARGET_NOT_REQD');

Line 584: RAISE FND_API.G_EXC_ERROR;

580:
581: IF x_spec_tests.target_value_char IS NOT NULL THEN
582: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_CHAR_TARGET_NOT_REQD');
583: FND_MSG_PUB.ADD;
584: RAISE FND_API.G_EXC_ERROR;
585: END IF;
586:
587: IF ((x_spec_tests.exp_error_type IN ('N','P')) OR (x_spec_tests.exp_error_type IS NULL)) THEN
588: NULL ;

Line 592: RAISE FND_API.G_EXC_ERROR;

588: NULL ;
589: ELSE
590: FND_MESSAGE.SET_NAME('GMD','GMD_INVALID_EXP_ERROR_TYPE');
591: FND_MSG_PUB.ADD;
592: RAISE FND_API.G_EXC_ERROR;
593: END IF;
594:
595: IF x_spec_tests.exp_error_type IS NULL AND
596: (x_spec_tests.below_spec_min IS NOT NULL OR x_spec_tests.above_spec_min IS NOT NULL

Line 601: RAISE FND_API.G_EXC_ERROR;

597: OR x_spec_tests.below_spec_max IS NOT NULL OR x_spec_tests.above_spec_max IS NOT NULL)
598: THEN
599: FND_MESSAGE.SET_NAME('GMD', 'GMD_EXP_ERROR_TYPE_REQ');
600: FND_MSG_PUB.ADD;
601: RAISE FND_API.G_EXC_ERROR;
602: END IF;
603:
604: IF x_spec_tests.exp_error_type IS NOT NULL AND
605: (x_spec_tests.below_spec_min IS NULL AND x_spec_tests.above_spec_min IS NULL

Line 610: RAISE FND_API.G_EXC_ERROR;

606: AND x_spec_tests.below_spec_max IS NULL AND x_spec_tests.above_spec_max IS NULL)
607: THEN
608: FND_MESSAGE.SET_NAME('GMD', 'GMD_EXP_ERR_TYPE_NULL');
609: FND_MSG_PUB.ADD;
610: RAISE FND_API.G_EXC_ERROR;
611: END IF;
612:
613: END IF;
614:

Line 619: RAISE FND_API.G_EXC_ERROR;

615: -- test UOM and Quantity.
616: IF (l_test_type = 'E') THEN
617: IF (x_spec_tests.test_qty_uom IS NOT NULL OR x_spec_tests.test_qty IS NOT NULL) THEN
618: GMD_API_PUB.Log_Message('GMD_TEST_UOM_QTY_NOT_REQD');
619: RAISE FND_API.G_EXC_ERROR;
620: END IF;
621: ELSE
622: IF x_spec_tests.test_qty <= 0 THEN
623: GMD_API_PUB.Log_Message('GMD_TEST_QTY_NEG');

Line 624: RAISE FND_API.G_EXC_ERROR;

620: END IF;
621: ELSE
622: IF x_spec_tests.test_qty <= 0 THEN
623: GMD_API_PUB.Log_Message('GMD_TEST_QTY_NEG');
624: RAISE FND_API.G_EXC_ERROR;
625: END IF;
626:
627: IF (x_spec_tests.test_qty_uom IS NOT NULL AND x_spec_tests.test_qty IS NULL) OR
628: (x_spec_tests.test_qty_uom IS NULL AND x_spec_tests.test_qty IS NOT NULL) THEN

Line 630: RAISE FND_API.G_EXC_ERROR;

626:
627: IF (x_spec_tests.test_qty_uom IS NOT NULL AND x_spec_tests.test_qty IS NULL) OR
628: (x_spec_tests.test_qty_uom IS NULL AND x_spec_tests.test_qty IS NOT NULL) THEN
629: GMD_API_PUB.Log_Message('GMD_TEST_UOM_QTY_REQD');
630: RAISE FND_API.G_EXC_ERROR;
631: END IF;
632: END IF;
633:
634: IF x_spec_tests.test_priority IS NULL THEN

Line 639: RAISE FND_API.G_EXC_ERROR;

635: x_spec_tests.test_priority := l_test_priority;
636:
637: ELSIF (NOT GMD_QC_TESTS_GRP.validate_test_priority(p_test_priority => x_spec_tests.test_priority)) THEN
638: GMD_API_PUB.Log_Message('GMD_INVALID_TEST_PRIORITY');
639: RAISE FND_API.G_EXC_ERROR;
640: END IF;
641:
642: -- Replicate Validation
643: IF x_spec_tests.test_replicate IS NULL THEN

Line 645: RAISE FND_API.G_EXC_ERROR;

641:
642: -- Replicate Validation
643: IF x_spec_tests.test_replicate IS NULL THEN
644: GMD_API_PUB.Log_Message('GMD_TEST_REP_REQD');
645: RAISE FND_API.G_EXC_ERROR;
646: ELSIF (l_test_type = 'E' and x_spec_tests.test_replicate <> 1) THEN
647: GMD_API_PUB.Log_Message('SPEC_TEST_REPLICATE_ONE');
648: RAISE FND_API.G_EXC_ERROR;
649: ELSIF (x_spec_tests.test_replicate < l_test_method_replicate) THEN

Line 648: RAISE FND_API.G_EXC_ERROR;

644: GMD_API_PUB.Log_Message('GMD_TEST_REP_REQD');
645: RAISE FND_API.G_EXC_ERROR;
646: ELSIF (l_test_type = 'E' and x_spec_tests.test_replicate <> 1) THEN
647: GMD_API_PUB.Log_Message('SPEC_TEST_REPLICATE_ONE');
648: RAISE FND_API.G_EXC_ERROR;
649: ELSIF (x_spec_tests.test_replicate < l_test_method_replicate) THEN
650: GMD_API_PUB.Log_Message('SPEC_TEST_REPLICATE_ERROR',
651: 'SPEC_TEST', l_test_code);
652: RAISE FND_API.G_EXC_ERROR;

Line 652: RAISE FND_API.G_EXC_ERROR;

648: RAISE FND_API.G_EXC_ERROR;
649: ELSIF (x_spec_tests.test_replicate < l_test_method_replicate) THEN
650: GMD_API_PUB.Log_Message('SPEC_TEST_REPLICATE_ERROR',
651: 'SPEC_TEST', l_test_code);
652: RAISE FND_API.G_EXC_ERROR;
653: END IF;
654:
655:
656: -- Bug 3437091

Line 663: RAISE FND_API.G_EXC_ERROR;

659: (x_spec_tests.CALC_UOM_CONV_IND = 'Y') then
660: null;
661: else
662: GMD_API_PUB.Log_Message('GMD_UOM_CONV_IND');
663: RAISE FND_API.G_EXC_ERROR;
664: END IF;
665:
666:
667: -- action code foreign key validation.

Line 674: RAISE FND_API.G_EXC_ERROR;

670: FETCH cr_action_code INTO l_temp;
671: IF cr_action_code%NOTFOUND THEN
672: CLOSE cr_action_code;
673: GMD_API_PUB.Log_Message('GMD_INVALID_ACTION_CODE','ACTION',x_spec_tests.below_min_action_code);
674: RAISE FND_API.G_EXC_ERROR;
675: END IF;
676: CLOSE cr_action_code ;
677: END IF;
678:

Line 685: RAISE FND_API.G_EXC_ERROR;

681: FETCH cr_action_code INTO l_temp;
682: IF cr_action_code%NOTFOUND THEN
683: CLOSE cr_action_code;
684: GMD_API_PUB.Log_Message('GMD_INVALID_ACTION_CODE','ACTION',x_spec_tests.above_min_action_code);
685: RAISE FND_API.G_EXC_ERROR;
686: END IF;
687: CLOSE cr_action_code ;
688: END IF;
689:

Line 696: RAISE FND_API.G_EXC_ERROR;

692: FETCH cr_action_code INTO l_temp;
693: IF cr_action_code%NOTFOUND THEN
694: CLOSE cr_action_code;
695: GMD_API_PUB.Log_Message('GMD_INVALID_ACTION_CODE','ACTION',x_spec_tests.below_max_action_code);
696: RAISE FND_API.G_EXC_ERROR;
697: END IF;
698: CLOSE cr_action_code ;
699: END IF;
700:

Line 707: RAISE FND_API.G_EXC_ERROR;

703: FETCH cr_action_code INTO l_temp;
704: IF cr_action_code%NOTFOUND THEN
705: CLOSE cr_action_code;
706: GMD_API_PUB.Log_Message('GMD_INVALID_ACTION_CODE','ACTION',x_spec_tests.above_max_action_code);
707: RAISE FND_API.G_EXC_ERROR;
708: END IF;
709: CLOSE cr_action_code ;
710: END IF;
711:

Line 718: RAISE FND_API.G_EXC_ERROR;

714: FETCH cr_action_code INTO l_temp;
715: IF cr_action_code%NOTFOUND THEN
716: CLOSE cr_action_code;
717: GMD_API_PUB.Log_Message('GMD_INVALID_ACTION_CODE','ACTION',x_spec_tests.out_of_spec_action);
718: RAISE FND_API.G_EXC_ERROR;
719: END IF;
720: CLOSE cr_action_code ;
721: END IF;
722:

Line 727: RAISE FND_API.G_EXC_ERROR;

723: IF x_spec_tests.use_to_control_step IS NULL OR x_spec_tests.use_to_control_step IN ('N','Y') THEN
724: NULL ;
725: ELSE
726: GMD_API_PUB.Log_Message('GMD_SPEC_INVALID_IND','COLUMN','USE_TO_CONTROL_STEP');
727: RAISE FND_API.G_EXC_ERROR;
728: END IF;
729: IF x_spec_tests.use_to_control_step = 'N' THEN
730: x_spec_tests.use_to_control_step:= NULL;
731: END IF;

Line 737: RAISE FND_API.G_EXC_ERROR;

733: IF x_spec_tests.optional_ind IS NULL OR x_spec_tests.optional_ind IN ('N','Y') THEN
734: NULL ;
735: ELSE
736: GMD_API_PUB.Log_Message('GMD_SPEC_INVALID_IND','COLUMN','OPTIONAL_IND');
737: RAISE FND_API.G_EXC_ERROR;
738: END IF;
739: IF x_spec_tests.optional_ind = 'N' THEN
740: x_spec_tests.optional_ind:= NULL;
741: END IF;

Line 747: RAISE FND_API.G_EXC_ERROR;

743: IF x_spec_tests.print_spec_ind IS NULL OR x_spec_tests.print_spec_ind IN ('N','Y') THEN
744: NULL ;
745: ELSE
746: GMD_API_PUB.Log_Message('GMD_SPEC_INVALID_IND','COLUMN','PRINT_SPEC_IND');
747: RAISE FND_API.G_EXC_ERROR;
748: END IF;
749: IF x_spec_tests.print_spec_ind = 'N' THEN
750: x_spec_tests.print_spec_ind:= NULL;
751: END IF;

Line 757: RAISE FND_API.G_EXC_ERROR;

753: IF x_spec_tests.print_result_ind IS NULL OR x_spec_tests.print_result_ind IN ('N','Y') THEN
754: NULL ;
755: ELSE
756: GMD_API_PUB.Log_Message('GMD_SPEC_INVALID_IND','COLUMN','PRINT_RESULT_IND');
757: RAISE FND_API.G_EXC_ERROR;
758: END IF;
759: IF x_spec_tests.print_result_ind = 'N' THEN
760: x_spec_tests.print_result_ind:= NULL;
761: END IF;

Line 767: RAISE FND_API.G_EXC_ERROR;

763: IF x_spec_tests.retest_lot_expiry_ind IS NULL OR x_spec_tests.retest_lot_expiry_ind IN ('N','Y') THEN
764: NULL ;
765: ELSE
766: GMD_API_PUB.Log_Message('GMD_SPEC_INVALID_IND','COLUMN','RETEST_LOT_EXPIRY_IND');
767: RAISE FND_API.G_EXC_ERROR;
768: END IF;
769: IF x_spec_tests.retest_lot_expiry_ind = 'N' THEN
770: x_spec_tests.retest_lot_expiry_ind:= NULL;
771: END IF;

Line 775: WHEN FND_API.G_EXC_ERROR THEN

771: END IF;
772:
773:
774: EXCEPTION
775: WHEN FND_API.G_EXC_ERROR THEN
776: x_return_status := FND_API.G_RET_STS_ERROR ;
777: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
779: WHEN OTHERS THEN

Line 776: x_return_status := FND_API.G_RET_STS_ERROR ;

772:
773:
774: EXCEPTION
775: WHEN FND_API.G_EXC_ERROR THEN
776: x_return_status := FND_API.G_RET_STS_ERROR ;
777: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
779: WHEN OTHERS THEN
780: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.check_for_null_and_fks_in_stst',

Line 777: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

773:
774: EXCEPTION
775: WHEN FND_API.G_EXC_ERROR THEN
776: x_return_status := FND_API.G_RET_STS_ERROR ;
777: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
779: WHEN OTHERS THEN
780: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.check_for_null_and_fks_in_stst',
781: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');

Line 778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

774: EXCEPTION
775: WHEN FND_API.G_EXC_ERROR THEN
776: x_return_status := FND_API.G_RET_STS_ERROR ;
777: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
779: WHEN OTHERS THEN
780: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.check_for_null_and_fks_in_stst',
781: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');
782: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 782: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
779: WHEN OTHERS THEN
780: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.check_for_null_and_fks_in_stst',
781: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');
782: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
783:
784: END check_for_null_and_fks_in_stst;
785:
786: --Start of comments

Line 828: x_return_status := FND_API.G_RET_STS_SUCCESS;

824: l_owner_organization_code VARCHAR2(3);
825:
826: BEGIN
827: -- Initialize API return status to success
828: x_return_status := FND_API.G_RET_STS_SUCCESS;
829:
830: IF (p_called_from = 'API') THEN
831: -- Check for NULLs and Valid Foreign Keys in the input parameter
832: GMD_Spec_GRP.check_for_null_and_fks_in_spec

Line 842: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

838: );
839: -- No need if called from FORM since it is already
840: -- done in the form
841:
842: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
843: -- Message is alrady logged by check_for_null procedure
844: RAISE FND_API.G_EXC_ERROR;
845: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
846: -- Message is alrady logged by check_for_null procedure

Line 844: RAISE FND_API.G_EXC_ERROR;

840: -- done in the form
841:
842: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
843: -- Message is alrady logged by check_for_null procedure
844: RAISE FND_API.G_EXC_ERROR;
845: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
846: -- Message is alrady logged by check_for_null procedure
847: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
848: END IF;

Line 845: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

841:
842: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
843: -- Message is alrady logged by check_for_null procedure
844: RAISE FND_API.G_EXC_ERROR;
845: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
846: -- Message is alrady logged by check_for_null procedure
847: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
848: END IF;
849: END IF;

Line 847: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

843: -- Message is alrady logged by check_for_null procedure
844: RAISE FND_API.G_EXC_ERROR;
845: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
846: -- Message is alrady logged by check_for_null procedure
847: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
848: END IF;
849: END IF;
850:
851: -- Verify that spec_name and spec_vers are unique

Line 857: RAISE FND_API.G_EXC_ERROR;

853: -- Ah...Ha, Spec and Version combination is already used
854: GMD_API_PUB.Log_Message('GMD_SPEC_VERS_EXIST',
855: 'SPEC', p_spec_header.spec_name,
856: 'VERS', p_spec_header.spec_vers);
857: RAISE FND_API.G_EXC_ERROR;
858: END IF;
859:
860: -- Verify that owner_id has access to owner_orgn_code
861: IF NOT spec_owner_orgn_valid(fnd_global.resp_id,

Line 870: RAISE FND_API.G_EXC_ERROR;

866: WHERE organization_id = p_spec_header.owner_organization_id;
867: GMD_API_PUB.Log_Message('GMD_USER_ORGN_NO_ACCESS',
868: 'OWNER', l_owner,
869: 'ORGN', l_owner_organization_code);
870: RAISE FND_API.G_EXC_ERROR;
871: END IF;
872:
873: -- All systems GO...
874:

Line 876: WHEN FND_API.G_EXC_ERROR THEN

872:
873: -- All systems GO...
874:
875: EXCEPTION
876: WHEN FND_API.G_EXC_ERROR THEN
877: x_return_status := FND_API.G_RET_STS_ERROR ;
878: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
879: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
880: WHEN OTHERS THEN

Line 877: x_return_status := FND_API.G_RET_STS_ERROR ;

873: -- All systems GO...
874:
875: EXCEPTION
876: WHEN FND_API.G_EXC_ERROR THEN
877: x_return_status := FND_API.G_RET_STS_ERROR ;
878: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
879: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
880: WHEN OTHERS THEN
881: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_spec_header',

Line 878: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

874:
875: EXCEPTION
876: WHEN FND_API.G_EXC_ERROR THEN
877: x_return_status := FND_API.G_RET_STS_ERROR ;
878: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
879: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
880: WHEN OTHERS THEN
881: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_spec_header',
882: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');

Line 879: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

875: EXCEPTION
876: WHEN FND_API.G_EXC_ERROR THEN
877: x_return_status := FND_API.G_RET_STS_ERROR ;
878: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
879: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
880: WHEN OTHERS THEN
881: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_spec_header',
882: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');
883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

879: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
880: WHEN OTHERS THEN
881: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_spec_header',
882: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');
883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
884:
885:
886: END validate_spec_header;
887:

Line 1127: x_return_status := FND_API.G_RET_STS_SUCCESS;

1123: x_spec_type varchar2(10);
1124:
1125: BEGIN
1126: -- Initialize API return status to success
1127: x_return_status := FND_API.G_RET_STS_SUCCESS;
1128:
1129: -- Fetch Specification Record. Spec must exists for Spec Test.
1130: l_specification.spec_id := p_spec_test.spec_id;
1131: -- Introduce l_specification_out as part of NOCOPY changes.

Line 1153: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1149: , x_spec_tests => x_spec_test
1150: , x_return_status => l_return_status
1151: );
1152:
1153: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1154: -- Message is alrady logged by check_for_null procedure
1155: RAISE FND_API.G_EXC_ERROR;
1156: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1157: -- Message is alrady logged by check_for_null procedure

Line 1155: RAISE FND_API.G_EXC_ERROR;

1151: );
1152:
1153: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1154: -- Message is alrady logged by check_for_null procedure
1155: RAISE FND_API.G_EXC_ERROR;
1156: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1157: -- Message is alrady logged by check_for_null procedure
1158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1159: END IF;

Line 1156: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1152:
1153: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1154: -- Message is alrady logged by check_for_null procedure
1155: RAISE FND_API.G_EXC_ERROR;
1156: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1157: -- Message is alrady logged by check_for_null procedure
1158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1159: END IF;
1160: END IF;

Line 1158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1154: -- Message is alrady logged by check_for_null procedure
1155: RAISE FND_API.G_EXC_ERROR;
1156: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1157: -- Message is alrady logged by check_for_null procedure
1158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1159: END IF;
1160: END IF;
1161:
1162:

Line 1181: RAISE FND_API.G_EXC_ERROR;

1177: IF (spec_test_seq_exist(x_spec_test.spec_id,x_spec_test.seq) )
1178: THEN
1179: -- Seq is already used
1180: GMD_API_PUB.Log_Message('GMD_SPEC_TEST_SEQ_EXIST', 'SEQ', x_spec_test.seq);
1181: RAISE FND_API.G_EXC_ERROR;
1182: end if ;
1183:
1184:
1185: -- Verify that Test is unique (added by KYH 01/OCT/02)

Line 1189: RAISE FND_API.G_EXC_ERROR;

1185: -- Verify that Test is unique (added by KYH 01/OCT/02)
1186: IF spec_test_exist(x_spec_test.spec_id,x_spec_test.test_id) THEN
1187: -- Test is already used
1188: GMD_API_PUB.Log_Message('GMD_SPEC_TEST_EXIST', 'TEST_ID', x_spec_test.test_id);
1189: RAISE FND_API.G_EXC_ERROR;
1190: END IF;
1191:
1192: open c_spec_type(x_spec_test.spec_id);
1193: fetch c_spec_type into x_spec_type ;

Line 1227: --RAISE FND_API.G_EXC_ERROR;

1223: RAISE error_fetch_item;
1224: END;
1225:
1226: -- GMD_API_PUB.Log_Message('GMD_SPEC_TEST_EXIST', 'TEST_ID', x_spec_test.test_id);
1227: --RAISE FND_API.G_EXC_ERROR;
1228:
1229:
1230: BEGIN
1231: /*GMICUOM.icuomcv(pitem_id => l_item_mst.item_id,

Line 1249: RAISE FND_API.G_EXC_ERROR;

1245:
1246: EXCEPTION WHEN OTHERS
1247: THEN
1248: FND_MSG_PUB.ADD;
1249: RAISE FND_API.G_EXC_ERROR;
1250: END ;
1251: END IF;
1252:
1253:

Line 1265: RAISE FND_API.G_EXC_ERROR;

1261: FETCH c_test_value INTO x_spec_test.min_value_num;
1262: IF c_test_value%NOTFOUND THEN
1263: CLOSE c_test_value;
1264: GMD_API_PUB.Log_Message('TEST_VALUES_NOT_FOUND');
1265: RAISE FND_API.G_EXC_ERROR;
1266: END IF;
1267: CLOSE c_test_value;
1268: END IF;
1269:

Line 1277: RAISE FND_API.G_EXC_ERROR;

1273: FETCH c_test_value INTO x_spec_test.target_value_num;
1274: IF c_test_value%NOTFOUND THEN
1275: CLOSE c_test_value;
1276: GMD_API_PUB.Log_Message('TEST_VALUES_NOT_FOUND');
1277: RAISE FND_API.G_EXC_ERROR;
1278: END IF;
1279: CLOSE c_test_value;
1280: END IF;
1281:

Line 1288: RAISE FND_API.G_EXC_ERROR;

1284: FETCH c_test_value INTO x_spec_test.max_value_num;
1285: IF c_test_value%NOTFOUND THEN
1286: CLOSE c_test_value;
1287: GMD_API_PUB.Log_Message('TEST_VALUES_NOT_FOUND');
1288: RAISE FND_API.G_EXC_ERROR;
1289: END IF;
1290: CLOSE c_test_value;
1291: END IF;
1292:

Line 1320: RAISE FND_API.G_EXC_ERROR ;

1316: ,p_st_max => l_st_max
1317: ,p_t_min => l_test.min_value_num
1318: ,p_t_max => l_test.max_value_num)
1319: ) THEN
1320: RAISE FND_API.G_EXC_ERROR ;
1321: END IF;
1322:
1323: END IF; -- IF l_test.test_type NOT IN ('V','U') THEN -- 14364421 -- no need to call for test type V and U (
1324: END IF; -- l_test.test_type NOT IN ('V')

Line 1350: RAISE FND_API.G_EXC_ERROR;

1346: IF ( x_spec_test.retest_lot_expiry_ind = 'Y' and l_item.lot_control_code = 1) THEN
1347: GMD_API_PUB.Log_Message('SPEC_TEST_RETEST_IND_ERROR',
1348: 'SPEC_TEST', l_test.test_code,
1349: 'SPEC_TEST', l_item.concatenated_segments);
1350: RAISE FND_API.G_EXC_ERROR;
1351: END IF;
1352:
1353: -- Experimental Error Min and Max validation
1354: IF (l_test.test_type IN ('N', 'L', 'E') AND x_spec_test.exp_error_type IS NOT NULL ) THEN

Line 1373: RAISE FND_API.G_EXC_ERROR;

1369: p_below_spec_max => p_spec_test.below_spec_max,
1370: p_spec_test_max => x_spec_test.max_value_num,
1371: p_above_spec_max => x_spec_test.above_spec_max,
1372: p_test_max => l_test.max_value_num) THEN
1373: RAISE FND_API.G_EXC_ERROR;
1374: END IF;
1375:
1376: IF x_spec_test.below_min_action_code IS NOT NULL and x_spec_test.below_spec_min IS NULL THEN
1377: GMD_API_PUB.Log_Message('GMD_EXP_ERR_VAL_REQ_ACTION');

Line 1378: RAISE FND_API.G_EXC_ERROR;

1374: END IF;
1375:
1376: IF x_spec_test.below_min_action_code IS NOT NULL and x_spec_test.below_spec_min IS NULL THEN
1377: GMD_API_PUB.Log_Message('GMD_EXP_ERR_VAL_REQ_ACTION');
1378: RAISE FND_API.G_EXC_ERROR;
1379: END IF;
1380:
1381: IF x_spec_test.above_min_action_code IS NOT NULL and x_spec_test.above_spec_min IS NULL THEN
1382: GMD_API_PUB.Log_Message('GMD_EXP_ERR_VAL_REQ_ACTION');

Line 1383: RAISE FND_API.G_EXC_ERROR;

1379: END IF;
1380:
1381: IF x_spec_test.above_min_action_code IS NOT NULL and x_spec_test.above_spec_min IS NULL THEN
1382: GMD_API_PUB.Log_Message('GMD_EXP_ERR_VAL_REQ_ACTION');
1383: RAISE FND_API.G_EXC_ERROR;
1384: END IF;
1385:
1386: IF x_spec_test.below_max_action_code IS NOT NULL and x_spec_test.below_spec_max IS NULL THEN
1387: GMD_API_PUB.Log_Message('GMD_EXP_ERR_VAL_REQ_ACTION');

Line 1388: RAISE FND_API.G_EXC_ERROR;

1384: END IF;
1385:
1386: IF x_spec_test.below_max_action_code IS NOT NULL and x_spec_test.below_spec_max IS NULL THEN
1387: GMD_API_PUB.Log_Message('GMD_EXP_ERR_VAL_REQ_ACTION');
1388: RAISE FND_API.G_EXC_ERROR;
1389: END IF;
1390:
1391: IF x_spec_test.above_max_action_code IS NOT NULL and x_spec_test.above_spec_max IS NULL THEN
1392: GMD_API_PUB.Log_Message('GMD_EXP_ERR_VAL_REQ_ACTION');

Line 1393: RAISE FND_API.G_EXC_ERROR;

1389: END IF;
1390:
1391: IF x_spec_test.above_max_action_code IS NOT NULL and x_spec_test.above_spec_max IS NULL THEN
1392: GMD_API_PUB.Log_Message('GMD_EXP_ERR_VAL_REQ_ACTION');
1393: RAISE FND_API.G_EXC_ERROR;
1394: END IF;
1395:
1396: END IF;
1397:

Line 1404: RAISE FND_API.G_EXC_ERROR;

1400: p_spec_report_precision => x_spec_test.report_precision,
1401: p_test_display_precision => l_test.display_precision,
1402: p_test_report_precision => l_test.display_precision ) THEN
1403: -- Messages are already logged.
1404: RAISE FND_API.G_EXC_ERROR;
1405: END IF;
1406:
1407: --Update the Viability Period ( Bug 3401368)
1408: if (x_spec_test.days is not null) OR

Line 1431: WHEN FND_API.G_EXC_ERROR THEN

1427:
1428: -- All systems GO...
1429:
1430: EXCEPTION
1431: WHEN FND_API.G_EXC_ERROR THEN
1432: x_return_status := FND_API.G_RET_STS_ERROR ;
1433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1435: WHEN OTHERS THEN

Line 1432: x_return_status := FND_API.G_RET_STS_ERROR ;

1428: -- All systems GO...
1429:
1430: EXCEPTION
1431: WHEN FND_API.G_EXC_ERROR THEN
1432: x_return_status := FND_API.G_RET_STS_ERROR ;
1433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1435: WHEN OTHERS THEN
1436: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_spec_test',

Line 1433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1429:
1430: EXCEPTION
1431: WHEN FND_API.G_EXC_ERROR THEN
1432: x_return_status := FND_API.G_RET_STS_ERROR ;
1433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1435: WHEN OTHERS THEN
1436: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_spec_test',
1437: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');

Line 1434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1430: EXCEPTION
1431: WHEN FND_API.G_EXC_ERROR THEN
1432: x_return_status := FND_API.G_RET_STS_ERROR ;
1433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1435: WHEN OTHERS THEN
1436: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_spec_test',
1437: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');
1438: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1438: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1435: WHEN OTHERS THEN
1436: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_spec_test',
1437: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');
1438: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1439:
1440:
1441: END validate_spec_test;
1442:

Line 1470: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1466: l_test_seq BINARY_INTEGER;
1467:
1468:
1469: BEGIN
1470: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1471:
1472: IF p_spec_id IS NULL THEN
1473: GMD_API_PUB.Log_Message('GMD_SPEC_ID_REQUIRED');
1474: RAISE FND_API.G_EXC_ERROR;

Line 1474: RAISE FND_API.G_EXC_ERROR;

1470: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1471:
1472: IF p_spec_id IS NULL THEN
1473: GMD_API_PUB.Log_Message('GMD_SPEC_ID_REQUIRED');
1474: RAISE FND_API.G_EXC_ERROR;
1475: END IF;
1476:
1477: -- atleast one test should be present in the spec.
1478: SELECT NVL(COUNT(1),0) INTO l_test_count

Line 1485: RAISE FND_API.G_EXC_ERROR;

1481:
1482: IF l_test_count = 0 THEN
1483: FND_MESSAGE.SET_NAME('GMD','GMD_SPEC_NO_TEST');
1484: FND_MSG_PUB.ADD;
1485: RAISE FND_API.G_EXC_ERROR;
1486: END IF;
1487:
1488: -- validate expression based tests.
1489: -- all the reference tests must be present.

Line 1503: RAISE FND_API.G_EXC_ERROR;

1499: p_exp_test_seq => l_test_seq,
1500: p_exp_test_id => l_test_id ) THEN
1501: CLOSE cr_expression_tests ;
1502: GMD_API_PUB.Log_Message('GMD_SOME_REF_TESTS_MISSING');
1503: RAISE FND_API.G_EXC_ERROR;
1504: END IF;
1505: END LOOP;
1506:
1507: EXCEPTION

Line 1508: WHEN FND_API.G_EXC_ERROR THEN

1504: END IF;
1505: END LOOP;
1506:
1507: EXCEPTION
1508: WHEN FND_API.G_EXC_ERROR THEN
1509: x_return_status := FND_API.G_RET_STS_ERROR ;
1510:
1511: WHEN OTHERS THEN
1512: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_after_insert_all',

Line 1509: x_return_status := FND_API.G_RET_STS_ERROR ;

1505: END LOOP;
1506:
1507: EXCEPTION
1508: WHEN FND_API.G_EXC_ERROR THEN
1509: x_return_status := FND_API.G_RET_STS_ERROR ;
1510:
1511: WHEN OTHERS THEN
1512: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_after_insert_all',
1513: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');

Line 1514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1510:
1511: WHEN OTHERS THEN
1512: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','gmd_spec_grp.validate_after_insert_all',
1513: 'ERROR',substr(sqlerrm,1,100),'POSITION','010');
1514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1515:
1516: END validate_after_insert_all;
1517:
1518: /*===========================================================================

Line 1543: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1539: l_spec_out GMD_SPECIFICATIONS%ROWTYPE;
1540:
1541: BEGIN
1542: l_progress := '010';
1543: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1544:
1545: -- validate for primary key
1546: -- ========================
1547: IF p_spec_id IS NULL THEN

Line 1550: RAISE FND_API.G_EXC_ERROR;

1546: -- ========================
1547: IF p_spec_id IS NULL THEN
1548: FND_MESSAGE.SET_NAME('GMD','GMD_SPEC_ID_REQUIRED'); -- New Message
1549: FND_MSG_PUB.ADD;
1550: RAISE FND_API.G_EXC_ERROR;
1551: ELSE
1552: l_spec.spec_id := p_spec_id;
1553: END IF;
1554:

Line 1564: RAISE FND_API.G_EXC_ERROR;

1560: fnd_message.set_token('L_TABLE_NAME','GMD_SPECIFICATIONS');
1561: fnd_message.set_token('L_COLUMN_NAME','SPEC_ID');
1562: fnd_message.set_token('L_KEY_VALUE',l_spec.spec_id);
1563: fnd_msg_pub.ADD;
1564: RAISE FND_API.G_EXC_ERROR;
1565: END IF;
1566:
1567: l_spec := l_spec_out ;
1568:

Line 1578: RAISE FND_API.G_EXC_ERROR;

1574: fnd_message.set_token('L_TABLE_NAME','GMD_SPECIFICATIONS');
1575: fnd_message.set_token('L_COLUMN_NAME','SPEC_ID');
1576: fnd_message.set_token('L_KEY_VALUE',l_spec.spec_id);
1577: fnd_msg_pub.ADD;
1578: RAISE FND_API.G_EXC_ERROR;
1579: END IF;
1580:
1581: -- BUG 2698311
1582: -- Block deletes if the status is 400 (Approved for Lab Use) or

Line 1589: RAISE FND_API.G_EXC_ERROR;

1585: IF l_spec.spec_status in (400,700)
1586: THEN
1587: fnd_message.set_name('GMD','GMD_SPEC_STATUS_BLOCKS_DELETE');
1588: fnd_msg_pub.ADD;
1589: RAISE FND_API.G_EXC_ERROR;
1590: END IF;
1591:
1592: -- Ensure that the status permits updates
1593: -- ======================================

Line 1598: RAISE FND_API.G_EXC_ERROR;

1594: IF NOT GMD_SPEC_GRP.Record_Updateable_With_Status(l_spec.spec_status)
1595: THEN
1596: fnd_message.set_name('GMD','GMD_SPEC_STATUS_BLOCKS_UPDATE');
1597: fnd_msg_pub.ADD;
1598: RAISE FND_API.G_EXC_ERROR;
1599: END IF;
1600:
1601: EXCEPTION
1602: WHEN FND_API.G_EXC_ERROR THEN

Line 1602: WHEN FND_API.G_EXC_ERROR THEN

1598: RAISE FND_API.G_EXC_ERROR;
1599: END IF;
1600:
1601: EXCEPTION
1602: WHEN FND_API.G_EXC_ERROR THEN
1603: x_return_status := FND_API.G_RET_STS_ERROR ;
1604: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1605:
1606: WHEN OTHERS THEN

Line 1603: x_return_status := FND_API.G_RET_STS_ERROR ;

1599: END IF;
1600:
1601: EXCEPTION
1602: WHEN FND_API.G_EXC_ERROR THEN
1603: x_return_status := FND_API.G_RET_STS_ERROR ;
1604: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1605:
1606: WHEN OTHERS THEN
1607: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');

Line 1604: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);

1600:
1601: EXCEPTION
1602: WHEN FND_API.G_EXC_ERROR THEN
1603: x_return_status := FND_API.G_RET_STS_ERROR ;
1604: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1605:
1606: WHEN OTHERS THEN
1607: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
1608: FND_MESSAGE.Set_Token('PACKAGE','GMD_SPEC_GRP.VALIDATE_BEFORE_DELETE');

Line 1612: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);

1608: FND_MESSAGE.Set_Token('PACKAGE','GMD_SPEC_GRP.VALIDATE_BEFORE_DELETE');
1609: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1610: FND_MESSAGE.Set_Token('POSITION',l_progress );
1611: FND_MSG_PUB.ADD;
1612: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1614:
1615: END VALIDATE_BEFORE_DELETE ;
1616:

Line 1613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1609: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1610: FND_MESSAGE.Set_Token('POSITION',l_progress );
1611: FND_MSG_PUB.ADD;
1612: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1614:
1615: END VALIDATE_BEFORE_DELETE ;
1616:
1617: /*===========================================================================

Line 1643: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1639: l_spec_delete_mark BINARY_INTEGER;
1640:
1641: BEGIN
1642: l_progress := '010';
1643: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1644:
1645: -- validate for primary key
1646: -- ========================
1647: IF p_spec_id IS NULL THEN

Line 1650: RAISE FND_API.G_EXC_ERROR;

1646: -- ========================
1647: IF p_spec_id IS NULL THEN
1648: FND_MESSAGE.SET_NAME('GMD','GMD_SPEC_ID_REQUIRED');
1649: FND_MSG_PUB.ADD;
1650: RAISE FND_API.G_EXC_ERROR;
1651: ELSE
1652: l_spec_tests.spec_id := p_spec_id;
1653: END IF;
1654:

Line 1658: RAISE FND_API.G_EXC_ERROR;

1654:
1655: IF p_test_id IS NULL THEN
1656: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_ID_CODE_NULL');
1657: FND_MSG_PUB.ADD;
1658: RAISE FND_API.G_EXC_ERROR;
1659: ELSE
1660: l_spec_tests.test_id := p_test_id;
1661: END IF;
1662:

Line 1672: RAISE FND_API.G_EXC_ERROR;

1668: fnd_message.set_token('L_TABLE_NAME','GMD_SPEC_TESTS');
1669: fnd_message.set_token('L_COLUMN_NAME','TEST_ID');
1670: fnd_message.set_token('L_KEY_VALUE',l_spec_tests.test_id);
1671: fnd_msg_pub.ADD;
1672: RAISE FND_API.G_EXC_ERROR;
1673: END IF;
1674:
1675: l_spec_tests := l_spec_tests_out ;
1676:

Line 1688: RAISE FND_API.G_EXC_ERROR;

1684: fnd_message.set_token('L_TABLE_NAME','GMD_SPECIFICATIONS');
1685: fnd_message.set_token('L_COLUMN_NAME','SPEC_ID');
1686: fnd_message.set_token('L_KEY_VALUE',p_spec_id);
1687: fnd_msg_pub.ADD;
1688: RAISE FND_API.G_EXC_ERROR;
1689: END IF;
1690:
1691: EXCEPTION
1692: WHEN FND_API.G_EXC_ERROR THEN

Line 1692: WHEN FND_API.G_EXC_ERROR THEN

1688: RAISE FND_API.G_EXC_ERROR;
1689: END IF;
1690:
1691: EXCEPTION
1692: WHEN FND_API.G_EXC_ERROR THEN
1693: x_return_status := FND_API.G_RET_STS_ERROR ;
1694: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1695:
1696: WHEN OTHERS THEN

Line 1693: x_return_status := FND_API.G_RET_STS_ERROR ;

1689: END IF;
1690:
1691: EXCEPTION
1692: WHEN FND_API.G_EXC_ERROR THEN
1693: x_return_status := FND_API.G_RET_STS_ERROR ;
1694: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1695:
1696: WHEN OTHERS THEN
1697: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');

Line 1694: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);

1690:
1691: EXCEPTION
1692: WHEN FND_API.G_EXC_ERROR THEN
1693: x_return_status := FND_API.G_RET_STS_ERROR ;
1694: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1695:
1696: WHEN OTHERS THEN
1697: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
1698: FND_MESSAGE.Set_Token('PACKAGE','GMD_SPEC_GRP.VALIDATE_BEFORE_DELETE');

Line 1702: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);

1698: FND_MESSAGE.Set_Token('PACKAGE','GMD_SPEC_GRP.VALIDATE_BEFORE_DELETE');
1699: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1700: FND_MESSAGE.Set_Token('POSITION',l_progress );
1701: FND_MSG_PUB.ADD;
1702: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704:
1705: END VALIDATE_BEFORE_DELETE ;
1706:

Line 1703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1699: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1700: FND_MESSAGE.Set_Token('POSITION',l_progress );
1701: FND_MSG_PUB.ADD;
1702: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704:
1705: END VALIDATE_BEFORE_DELETE ;
1706:
1707: PROCEDURE validate_after_delete_test(

Line 1712: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1708: p_spec_id IN NUMBER,
1709: x_return_status OUT NOCOPY VARCHAR2) IS
1710:
1711: BEGIN
1712: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1713:
1714: validate_after_insert_all(
1715: p_spec_id => p_spec_id,
1716: x_return_status => x_return_status) ;

Line 1909: x_return_status := FND_API.G_RET_STS_SUCCESS;

1905: REQ_FIELDS_MISSING EXCEPTION;
1906:
1907: BEGIN
1908:
1909: x_return_status := FND_API.G_RET_STS_SUCCESS;
1910: FND_MSG_PUB.initialize;
1911: l_position := '010';
1912:
1913: IF p_test_id IS NULL OR p_value IS NULL THEN

Line 1930: x_return_status := FND_API.G_RET_STS_ERROR ;

1926:
1927: EXCEPTION
1928: WHEN REQ_FIELDS_MISSING THEN
1929: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_SPEC_GRP.VALUE_IN_NUM_RANGE_DISPLAY');
1930: x_return_status := FND_API.G_RET_STS_ERROR ;
1931: RETURN FALSE;
1932: WHEN OTHERS THEN
1933: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SPEC_GRP.VALUE_IN_NUM_RANGE_DISPLAY','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_position);
1934: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1934: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1930: x_return_status := FND_API.G_RET_STS_ERROR ;
1931: RETURN FALSE;
1932: WHEN OTHERS THEN
1933: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SPEC_GRP.VALUE_IN_NUM_RANGE_DISPLAY','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_position);
1934: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1935: RETURN FALSE;
1936: END value_in_num_range_display ;
1937:
1938: --Start of comments

Line 2541: x_return_status := FND_API.G_RET_STS_SUCCESS;

2537: BEGIN
2538:
2539:
2540: -- Initialize API return status to success
2541: x_return_status := FND_API.G_RET_STS_SUCCESS;
2542:
2543: FND_MSG_PUB.initialize; -- clear the message stack.
2544:
2545: l_progress := '010';

Line 2723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2719: l_progress := '040';
2720:
2721: EXCEPTION
2722: WHEN OTHERS THEN
2723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2724: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
2725: FND_MESSAGE.Set_Token('PACKAGE','GMD_SPEC_GRP.CREATE_SPECIFICATION');
2726: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
2727: FND_MESSAGE.Set_Token('POSITION',l_progress );