DBA Data[Home] [Help]

APPS.GMD_QC_TESTS_GRP dependencies on FND_MSG_PUB

Line 30: FND_MSG_PUB.initialize; -- clear the message stack.

26: BEGIN
27: l_progress := '010';
28:
29: IF FND_API.to_Boolean( p_init_msg_list ) THEN
30: FND_MSG_PUB.initialize; -- clear the message stack.
31: END IF;
32:
33: IF p_test_id IS NULL AND p_test_code IS NULL THEN
34: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_ID_CODE_NULL');

Line 35: FND_MSG_PUB.ADD;

31: END IF;
32:
33: IF p_test_id IS NULL AND p_test_code IS NULL THEN
34: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_ID_CODE_NULL');
35: FND_MSG_PUB.ADD;
36: RETURN FALSE;
37: END IF;
38:
39: l_progress := '020';

Line 65: FND_MSG_PUB.ADD;

61: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
62: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.CHECK_TEST_EXIST' );
63: FND_MESSAGE.Set_Token('ERROR', SUBSTR(SQLERRM,1,100));
64: FND_MESSAGE.Set_Token('POSITION',l_progress );
65: FND_MSG_PUB.ADD;
66: RETURN FALSE;
67: END CHECK_TEST_EXIST;
68:
69:

Line 93: FND_MSG_PUB.initialize; -- clear the message stack.

89: BEGIN
90: l_progress := '010';
91:
92: IF FND_API.to_Boolean( p_init_msg_list ) THEN
93: FND_MSG_PUB.initialize; -- clear the message stack.
94: END IF;
95:
96: IF p_test_id IS NULL THEN
97: FND_MESSAGE.Set_Name('GMD','GMD_TEST_ID_CODE_NULL');

Line 98: FND_MSG_PUB.ADD;

94: END IF;
95:
96: IF p_test_id IS NULL THEN
97: FND_MESSAGE.Set_Name('GMD','GMD_TEST_ID_CODE_NULL');
98: FND_MSG_PUB.ADD;
99: RETURN FALSE;
100: END IF;
101:
102: l_progress := '020';

Line 121: FND_MSG_PUB.ADD;

117: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
118: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.TEST_EXIST_IN_SPEC' );
119: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
120: FND_MESSAGE.Set_Token('POSITION',l_progress );
121: FND_MSG_PUB.ADD;
122: RETURN FALSE;
123: END TEST_EXIST_IN_SPEC;
124:
125: /*===========================================================================

Line 162: FND_MSG_PUB.initialize; -- clear the message stack.

158: l_progress := '010';
159:
160: x_return_status := FND_API.G_RET_STS_SUCCESS ;
161: IF FND_API.to_Boolean( p_init_msg_list ) THEN
162: FND_MSG_PUB.initialize; -- clear the message stack.
163: END IF;
164:
165: IF p_expression IS NULL THEN
166: FND_MESSAGE.Set_Name('GMD','GMD_NO_EXPRESSION');

Line 167: FND_MSG_PUB.ADD;

163: END IF;
164:
165: IF p_expression IS NULL THEN
166: FND_MESSAGE.Set_Name('GMD','GMD_NO_EXPRESSION');
167: FND_MSG_PUB.ADD;
168: RAISE FND_API.G_EXC_ERROR ;
169: END IF;
170:
171: l_progress := '020';

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

174: x_exptab => l_exptab,
175: x_return_status => x_return_status);
176:
177: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
178: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
179: RETURN;
180: END IF;
181:
182: l_progress := '030';

Line 195: FND_MSG_PUB.ADD;

191: p_gmd_qc_tests => l_test_in_rec,
192: x_gmd_qc_tests => l_test_rec)) THEN
193: FND_MESSAGE.SET_NAME('GMD','GMD_INVALID_TEST_EXP');
194: FND_MESSAGE.SET_TOKEN('TEST',l_exptab(i).poperand);
195: FND_MSG_PUB.ADD;
196: RAISE FND_API.G_EXC_ERROR ;
197: ELSIF l_test_rec.delete_mark = 1 OR l_test_rec.test_type IN ('U','V','T','E') THEN
198: FND_MESSAGE.SET_NAME('GMD','GMD_INVALID_TEST_EXP');
199: FND_MESSAGE.SET_TOKEN('TEST',l_exptab(i).poperand);

Line 200: FND_MSG_PUB.ADD;

196: RAISE FND_API.G_EXC_ERROR ;
197: ELSIF l_test_rec.delete_mark = 1 OR l_test_rec.test_type IN ('U','V','T','E') THEN
198: FND_MESSAGE.SET_NAME('GMD','GMD_INVALID_TEST_EXP');
199: FND_MESSAGE.SET_TOKEN('TEST',l_exptab(i).poperand);
200: FND_MSG_PUB.ADD;
201: RAISE FND_API.G_EXC_ERROR ;
202: END IF;
203:
204: -- valid test

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

213:
214: EXCEPTION
215: WHEN FND_API.G_EXC_ERROR THEN
216: x_return_status := FND_API.G_RET_STS_ERROR ;
217: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
218:
219: WHEN OTHERS THEN
220: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
221: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.VALIDATE_EXPRESSION' );

Line 224: FND_MSG_PUB.ADD;

220: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
221: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.VALIDATE_EXPRESSION' );
222: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
223: FND_MESSAGE.Set_Token('POSITION',l_progress );
224: FND_MSG_PUB.ADD;
225: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
227: END VALIDATE_EXPRESSION;
228:

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

221: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.VALIDATE_EXPRESSION' );
222: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
223: FND_MESSAGE.Set_Token('POSITION',l_progress );
224: FND_MSG_PUB.ADD;
225: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
227: END VALIDATE_EXPRESSION;
228:
229:

Line 253: FND_MSG_PUB.initialize; -- clear the message stack.

249: l_progress := '010';
250:
251: x_return_status := FND_API.G_RET_STS_SUCCESS ;
252: IF FND_API.to_Boolean( p_init_msg_list ) THEN
253: FND_MSG_PUB.initialize; -- clear the message stack.
254: END IF;
255:
256: IF p_test_id IS NULL THEN
257: FND_MESSAGE.Set_Name('GMD','GMD_TEST_ID_CODE_NULL');

Line 258: FND_MSG_PUB.ADD;

254: END IF;
255:
256: IF p_test_id IS NULL THEN
257: FND_MESSAGE.Set_Name('GMD','GMD_TEST_ID_CODE_NULL');
258: FND_MSG_PUB.ADD;
259: RAISE FND_API.G_EXC_ERROR ;
260: END IF;
261:
262: l_progress := '020';

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

290:
291: EXCEPTION
292: WHEN FND_API.G_EXC_ERROR THEN
293: x_return_status := FND_API.G_RET_STS_ERROR ;
294: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
295: WHEN OTHERS THEN
296: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
297: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.INSERT_EXP_TEST_VALUES' );
298: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));

Line 300: FND_MSG_PUB.ADD;

296: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
297: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.INSERT_EXP_TEST_VALUES' );
298: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
299: FND_MESSAGE.Set_Token('POSITION',l_progress );
300: FND_MSG_PUB.ADD;
301: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: END insert_exp_test_values;
304:

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

297: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.INSERT_EXP_TEST_VALUES' );
298: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
299: FND_MESSAGE.Set_Token('POSITION',l_progress );
300: FND_MSG_PUB.ADD;
301: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: END insert_exp_test_values;
304:
305:

Line 340: FND_MSG_PUB.initialize; -- clear the message stack.

336: l_progress := '010';
337:
338: x_return_status := FND_API.G_RET_STS_SUCCESS ;
339: IF FND_API.to_Boolean( p_init_msg_list ) THEN
340: FND_MSG_PUB.initialize; -- clear the message stack.
341: END IF;
342:
343: IF (p_new_report_precision IS NOT NULL AND p_new_report_precision not between 0 and 9)
344: THEN

Line 347: FND_MSG_PUB.ADD;

343: IF (p_new_report_precision IS NOT NULL AND p_new_report_precision not between 0 and 9)
344: THEN
345: FND_MESSAGE.Set_Name('GMD','GMD_INVALID_PRECISION');
346: FND_MESSAGE.Set_Token('PRECISION',p_new_report_precision);
347: FND_MSG_PUB.ADD;
348: RAISE FND_API.G_EXC_ERROR;
349: END IF;
350:
351: IF (p_new_display_precision IS NOT NULL AND p_new_display_precision not between 0 and 9)

Line 355: FND_MSG_PUB.ADD;

351: IF (p_new_display_precision IS NOT NULL AND p_new_display_precision not between 0 and 9)
352: THEN
353: FND_MESSAGE.Set_Name('GMD','GMD_INVALID_PRECISION');
354: FND_MESSAGE.Set_Token('PRECISION',p_new_display_precision);
355: FND_MSG_PUB.ADD;
356: RAISE FND_API.G_EXC_ERROR;
357: END IF;
358:
359: IF (p_validation_level = 'DISPLAY_PRECISION') AND (p_new_display_precision IS NULL) THEN

Line 380: FND_MSG_PUB.ADD;

376: EXCEPTION
377: WHEN NO_DATA_FOUND THEN
378: FND_MESSAGE.Set_Name('GMD','GMD_INVALID_TEST_METHOD');
379: FND_MESSAGE.Set_Token('TEST_METHOD',to_char(p_test_method_id));
380: FND_MSG_PUB.ADD;
381: RAISE FND_API.G_EXC_ERROR;
382: END ;
383: END IF;
384:

Line 397: FND_MSG_PUB.ADD;

393: l_old_report_precision := l_test_rec.report_precision;
394:
395: IF l_old_display_precision IS NULL OR l_old_report_precision IS NULL THEN
396: FND_MESSAGE.Set_Name('GMD','GMD_INVALID_PRECISION');
397: FND_MSG_PUB.ADD;
398: RAISE FND_API.G_EXC_ERROR;
399: END IF;
400: ELSE
401: FND_MESSAGE.SET_NAME('GMD','GMD_INVALID_TEST');

Line 403: FND_MSG_PUB.ADD;

399: END IF;
400: ELSE
401: FND_MESSAGE.SET_NAME('GMD','GMD_INVALID_TEST');
402: FND_MESSAGE.SET_TOKEN('TEST',to_char(p_test_id));
403: FND_MSG_PUB.ADD;
404: RAISE FND_API.G_EXC_ERROR;
405: END IF;
406: END IF;
407:

Line 422: FND_MSG_PUB.ADD;

418: IF p_validation_level IN ('FULL','DISPLAY_PRECISION') THEN
419: IF l_test_method_precision IS NOT NULL AND p_new_display_precision > l_test_method_precision THEN
420: FND_MESSAGE.Set_Name('GMD','GMD_TST_PRCSN_GRTR_TSTMTHD');
421: FND_MESSAGE.Set_Token('TEST_METHOD_PRECISION',TO_CHAR(l_test_method_precision));
422: FND_MSG_PUB.ADD;
423: RAISE FND_API.G_EXC_ERROR;
424: END IF;
425:
426: IF p_new_report_precision > p_new_display_precision THEN

Line 428: FND_MSG_PUB.ADD;

424: END IF;
425:
426: IF p_new_report_precision > p_new_display_precision THEN
427: FND_MESSAGE.Set_Name('GMD','GMD_REP_GRTR_DIS_PRCSN');
428: FND_MSG_PUB.ADD;
429: RAISE FND_API.G_EXC_ERROR;
430: END IF;
431:
432: END IF;

Line 442: FND_MSG_PUB.ADD;

438: IF p_validation_level IN ('FULL','REPORT_PRECISION') THEN
439: IF p_new_report_precision < l_old_report_precision THEN
440: FND_MESSAGE.Set_Name('GMD','GMD_NEW_PRCSN_LESS_OLD');
441: FND_MESSAGE.Set_Token('OLD_PRECISION',to_char(l_old_report_precision));
442: FND_MSG_PUB.ADD;
443: RAISE FND_API.G_EXC_ERROR;
444: END IF;
445: END IF;
446:

Line 451: FND_MSG_PUB.ADD;

447: IF p_validation_level IN ('FULL','DISPLAY_PRECISION') THEN
448: IF p_new_display_precision < l_old_display_precision THEN
449: FND_MESSAGE.Set_Name('GMD','GMD_NEW_PRCSN_LESS_OLD');
450: FND_MESSAGE.Set_Token('OLD_PRECISION',to_char(l_old_display_precision));
451: FND_MSG_PUB.ADD;
452: RAISE FND_API.G_EXC_ERROR;
453: END IF;
454: END IF;
455: END IF;

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

457:
458: EXCEPTION
459: WHEN FND_API.G_EXC_ERROR THEN
460: x_return_status := FND_API.G_RET_STS_ERROR ;
461: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
462: WHEN OTHERS THEN
463: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
464: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.DISPLAY_REPORT_PRECISION' );
465: FND_MESSAGE.Set_Token('ERROR', SUBSTR(SQLERRM,1,100));

Line 467: FND_MSG_PUB.ADD;

463: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
464: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.DISPLAY_REPORT_PRECISION' );
465: FND_MESSAGE.Set_Token('ERROR', SUBSTR(SQLERRM,1,100));
466: FND_MESSAGE.Set_Token('POSITION',l_progress );
467: FND_MSG_PUB.ADD;
468: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
470: END DISPLAY_REPORT_PRECISION;
471:

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

464: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.DISPLAY_REPORT_PRECISION' );
465: FND_MESSAGE.Set_Token('ERROR', SUBSTR(SQLERRM,1,100));
466: FND_MESSAGE.Set_Token('POSITION',l_progress );
467: FND_MSG_PUB.ADD;
468: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
470: END DISPLAY_REPORT_PRECISION;
471:
472:

Line 492: FND_MSG_PUB.initialize; -- clear the message stack.

488: END IF;
489:
490: x_return_status := FND_API.G_RET_STS_SUCCESS ;
491: IF FND_API.to_Boolean( p_init_msg_list ) THEN
492: FND_MSG_PUB.initialize; -- clear the message stack.
493: END IF;
494:
495: l_progress := '020';
496:

Line 500: FND_MSG_PUB.ADD;

496:
497: IF p_min_value_num IS NOT NULL AND p_max_value_num IS NOT NULL THEN
498: IF p_min_value_num > p_max_value_num THEN
499: FND_MESSAGE.Set_Name('GMD','QC_MIN_MAX_SPEC');
500: FND_MSG_PUB.ADD;
501: RAISE FND_API.G_EXC_ERROR;
502: END IF;
503: END IF;
504:

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

504:
505: EXCEPTION
506: WHEN FND_API.G_EXC_ERROR THEN
507: x_return_status := FND_API.G_RET_STS_ERROR ;
508: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
509: WHEN OTHERS THEN
510: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
511: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.MIN_MAX_VALUE_NUM');
512: FND_MESSAGE.Set_Token('ERROR', SUBSTR(SQLERRM,1,100));

Line 514: FND_MSG_PUB.ADD;

510: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
511: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.MIN_MAX_VALUE_NUM');
512: FND_MESSAGE.Set_Token('ERROR', SUBSTR(SQLERRM,1,100));
513: FND_MESSAGE.Set_Token('POSITION',l_progress );
514: FND_MSG_PUB.ADD;
515: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
516: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
517: END MIN_MAX_VALUE_NUM ;
518:

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

511: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.MIN_MAX_VALUE_NUM');
512: FND_MESSAGE.Set_Token('ERROR', SUBSTR(SQLERRM,1,100));
513: FND_MESSAGE.Set_Token('POSITION',l_progress );
514: FND_MSG_PUB.ADD;
515: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
516: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
517: END MIN_MAX_VALUE_NUM ;
518:
519: /*===========================================================================

Line 547: FND_MSG_PUB.initialize; -- clear the message stack.

543: RETURN;
544: END IF;
545:
546: IF FND_API.to_Boolean( p_init_msg_list ) THEN
547: FND_MSG_PUB.initialize; -- clear the message stack.
548: END IF;
549:
550: IF p_exp_error_type IS NOT NULL AND p_exp_error_type NOT IN ('N','P') THEN
551: FND_MESSAGE.Set_Name('GMD','GMD_EXP_ERROR_TYPE_REQ');

Line 552: FND_MSG_PUB.ADD;

548: END IF;
549:
550: IF p_exp_error_type IS NOT NULL AND p_exp_error_type NOT IN ('N','P') THEN
551: FND_MESSAGE.Set_Name('GMD','GMD_EXP_ERROR_TYPE_REQ');
552: FND_MSG_PUB.ADD;
553: RAISE FND_API.G_EXC_ERROR;
554: END IF;
555:
556: l_progress := '020';

Line 563: FND_MSG_PUB.ADD;

559: IF p_exp_error_type = 'N' AND p_test_min IS NOT NULL AND p_test_max IS NOT NULL THEN
560: IF ABS(p_spec_value) > ABS(p_test_max - p_test_min) THEN
561: FND_MESSAGE.SET_NAME('GMD','GMD_INVALID_SPEC_VAL_NUM');
562: FND_MESSAGE.SET_TOKEN('MAX_VAL',to_char(ABS(p_test_max - p_test_min)));
563: FND_MSG_PUB.ADD;
564: RAISE FND_API.G_EXC_ERROR;
565: END IF;
566: ELSE
567: IF ABS(p_spec_value) > 100 THEN

Line 570: FND_MSG_PUB.ADD;

566: ELSE
567: IF ABS(p_spec_value) > 100 THEN
568: FND_MESSAGE.Set_Name('GMD','GMD_INVALID_SPEC_VAL_NUM');
569: FND_MESSAGE.SET_TOKEN('MAX_VAL',100);
570: FND_MSG_PUB.ADD;
571: RAISE FND_API.G_EXC_ERROR;
572: END IF;
573: END IF;
574: END IF;

Line 579: FND_MSG_PUB.ADD;

575:
576: IF p_action_code IS NOT NULL and p_spec_value IS NULL AND
577: p_validation_level IN ('ACTION','FULL') THEN
578: FND_MESSAGE.Set_Name('GMD','GMD_EXP_ERR_VAL_REQ_ACTION');
579: FND_MSG_PUB.ADD;
580: RAISE FND_API.G_EXC_ERROR;
581: END IF;
582:
583:

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

582:
583:
584: EXCEPTION WHEN FND_API.G_EXC_ERROR THEN
585: x_return_status := FND_API.G_RET_STS_ERROR ;
586: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
587: WHEN OTHERS THEN
588: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
589: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.validate_experimental_error');
590: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));

Line 592: FND_MSG_PUB.ADD;

588: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
589: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.validate_experimental_error');
590: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
591: FND_MESSAGE.Set_Token('POSITION',l_progress );
592: FND_MSG_PUB.ADD;
593: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
595: END validate_experimental_error;
596:

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

589: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.validate_experimental_error');
590: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
591: FND_MESSAGE.Set_Token('POSITION',l_progress );
592: FND_MSG_PUB.ADD;
593: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
595: END validate_experimental_error;
596:
597: --+========================================================================+

Line 631: FND_MSG_PUB.initialize; -- clear the message stack.

627:
628: x_return_status := FND_API.G_RET_STS_SUCCESS ;
629:
630: IF FND_API.to_Boolean( p_init_msg_list ) THEN
631: FND_MSG_PUB.initialize; -- clear the message stack.
632: END IF;
633:
634: IF p_exp_error_type IS NOT NULL AND p_exp_error_type NOT IN ('N','P') THEN
635: FND_MESSAGE.Set_Name('GMD','GMD_EXP_ERROR_TYPE_REQ');

Line 636: FND_MSG_PUB.ADD;

632: END IF;
633:
634: IF p_exp_error_type IS NOT NULL AND p_exp_error_type NOT IN ('N','P') THEN
635: FND_MESSAGE.Set_Name('GMD','GMD_EXP_ERROR_TYPE_REQ');
636: FND_MSG_PUB.ADD;
637: RAISE FND_API.G_EXC_ERROR;
638: END IF;
639:
640: l_progress := '020';

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

702: END IF;
703:
704: EXCEPTION WHEN FND_API.G_EXC_ERROR THEN
705: x_return_status := FND_API.G_RET_STS_ERROR ;
706: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
707: WHEN OTHERS THEN
708: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
709: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.validate_all_exp_error');
710: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));

Line 712: FND_MSG_PUB.ADD;

708: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
709: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.validate_all_exp_error');
710: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
711: FND_MESSAGE.Set_Token('POSITION',l_progress );
712: FND_MSG_PUB.ADD;
713: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
715: END validate_all_exp_error;
716:

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

709: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.validate_all_exp_error');
710: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
711: FND_MESSAGE.Set_Token('POSITION',l_progress );
712: FND_MSG_PUB.ADD;
713: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
715: END validate_all_exp_error;
716:
717:

Line 806: FND_MSG_PUB.ADD;

802: -- Test Code
803:
804: IF (LTRIM(RTRIM(x_gmd_qc_tests_rec.test_code)) IS NULL) THEN
805: FND_MESSAGE.SET_NAME('GMD', 'GMD_TEST_ID_CODE_NULL');
806: FND_MSG_PUB.ADD;
807: RAISE FND_API.G_EXC_ERROR;
808: END IF;
809:
810: -- Test Description

Line 814: FND_MSG_PUB.ADD;

810: -- Test Description
811:
812: IF (LTRIM(RTRIM(x_gmd_qc_tests_rec.test_desc)) IS NULL) THEN
813: FND_MESSAGE.SET_NAME('GMD', 'GMD_TEST_DESC_REQD');
814: FND_MSG_PUB.ADD;
815: RAISE FND_API.G_EXC_ERROR;
816: END IF;
817:
818: -- Test Method

Line 822: FND_MSG_PUB.ADD;

818: -- Test Method
819:
820: IF x_gmd_qc_tests_rec.test_method_id IS NULL THEN
821: FND_MESSAGE.SET_NAME('GMD', 'GMD_TEST_METHOD_REQD');
822: FND_MSG_PUB.ADD;
823: RAISE FND_API.G_EXC_ERROR;
824: ELSE
825: OPEN cr_check_valid_test_method(x_gmd_qc_tests_rec.test_method_id);
826: FETCH cr_check_valid_test_method INTO l_temp;

Line 831: FND_MSG_PUB.ADD;

827: IF cr_check_valid_test_method%NOTFOUND THEN
828: CLOSE cr_check_valid_test_method;
829: FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_TEST_METHOD');
830: FND_MESSAGE.SET_TOKEN('TEST_METHOD', TO_CHAR(x_gmd_qc_tests_rec.test_method_id));
831: FND_MSG_PUB.ADD;
832: RAISE FND_API.G_EXC_ERROR;
833: END IF;
834: CLOSE cr_check_valid_test_method ;
835:

Line 843: FND_MSG_PUB.ADD;

839: -- Test Data Type
840:
841: IF x_gmd_qc_tests_rec.test_type IS NULL THEN
842: FND_MESSAGE.SET_NAME('GMD', 'GMD_TEST_TYPE_REQD');
843: FND_MSG_PUB.ADD;
844: RAISE FND_API.G_EXC_ERROR;
845: ELSIF x_gmd_qc_tests_rec.test_type NOT IN ('U','N','E','L','V','T') THEN
846: FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_TEST_TYPE');
847: FND_MSG_PUB.ADD;

Line 847: FND_MSG_PUB.ADD;

843: FND_MSG_PUB.ADD;
844: RAISE FND_API.G_EXC_ERROR;
845: ELSIF x_gmd_qc_tests_rec.test_type NOT IN ('U','N','E','L','V','T') THEN
846: FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_TEST_TYPE');
847: FND_MSG_PUB.ADD;
848: RAISE FND_API.G_EXC_ERROR;
849: END IF;
850:
851: -- Test Priority

Line 857: FND_MSG_PUB.ADD;

853: x_gmd_qc_tests_rec.priority := '5N';
854:
855: ELSIF (NOT validate_test_priority(p_test_priority => x_gmd_qc_tests_rec.priority)) THEN
856: FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_TEST_PRIORITY');
857: FND_MSG_PUB.ADD;
858: RAISE FND_API.G_EXC_ERROR;
859: END IF;
860:
861: x_gmd_qc_tests_rec.delete_mark := 0;

Line 866: FND_MSG_PUB.ADD;

862:
863: IF x_gmd_qc_tests_rec.test_type NOT IN ('N','E') THEN
864: IF (x_gmd_qc_tests_rec.min_value_num IS NOT NULL OR x_gmd_qc_tests_rec.max_value_num IS NOT NULL) THEN
865: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_RANGE_NOT_REQD');
866: FND_MSG_PUB.ADD;
867: RAISE FND_API.G_EXC_ERROR;
868: END IF;
869:
870: ELSE

Line 873: FND_MSG_PUB.ADD;

869:
870: ELSE
871: IF (x_gmd_qc_tests_rec.min_value_num IS NULL OR x_gmd_qc_tests_rec.max_value_num IS NULL) THEN
872: FND_MESSAGE.SET_NAME('GMD', 'GMD_TEST_RANGE_REQ');
873: FND_MSG_PUB.ADD;
874: RAISE FND_API.G_EXC_ERROR;
875: END IF;
876: END IF;
877:

Line 881: FND_MSG_PUB.ADD;

877:
878: IF x_gmd_qc_tests_rec.test_type = 'E' THEN
879: IF x_gmd_qc_tests_rec.expression IS NULL THEN
880: FND_MESSAGE.SET_NAME('GMD', 'GMD_EXPRESSION_REQD');
881: FND_MSG_PUB.ADD;
882: RAISE FND_API.G_EXC_ERROR;
883: END IF;
884: ELSIF x_gmd_qc_tests_rec.expression IS NOT NULL THEN
885: FND_MESSAGE.SET_NAME('GMD','GMD_EXPRESSION_NOT_REQD');

Line 886: FND_MSG_PUB.ADD;

882: RAISE FND_API.G_EXC_ERROR;
883: END IF;
884: ELSIF x_gmd_qc_tests_rec.expression IS NOT NULL THEN
885: FND_MESSAGE.SET_NAME('GMD','GMD_EXPRESSION_NOT_REQD');
886: FND_MSG_PUB.ADD;
887: RAISE FND_API.G_EXC_ERROR;
888: END IF;
889:
890: IF x_gmd_qc_tests_rec.test_type IN ('U','T','V') THEN

Line 895: FND_MSG_PUB.ADD;

891: --BEGIN BUG#3545701
892: --Commented the code for Non-validated tests.
893: /* IF x_gmd_qc_tests_rec.test_type = 'U' and x_gmd_qc_tests_rec.test_unit IS NOT NULL THEN
894: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_UNIT_NOT_REQD');
895: FND_MSG_PUB.ADD;
896: RAISE FND_API.G_EXC_ERROR;
897: END IF; */
898: --END BUG#3545701
899: IF (x_gmd_qc_tests_rec.display_precision IS NOT NULL OR x_gmd_qc_tests_rec.report_precision IS NOT NULL) THEN

Line 901: FND_MSG_PUB.ADD;

897: END IF; */
898: --END BUG#3545701
899: IF (x_gmd_qc_tests_rec.display_precision IS NOT NULL OR x_gmd_qc_tests_rec.report_precision IS NOT NULL) THEN
900: FND_MESSAGE.SET_NAME('GMD','GMD_PRECISION_NOT_REQD');
901: FND_MSG_PUB.ADD;
902: RAISE FND_API.G_EXC_ERROR;
903: END IF;
904:
905: IF x_gmd_qc_tests_rec.exp_error_type IS NOT NULL THEN

Line 907: FND_MSG_PUB.ADD;

903: END IF;
904:
905: IF x_gmd_qc_tests_rec.exp_error_type IS NOT NULL THEN
906: FND_MESSAGE.SET_NAME('GMD','GMD_INVALID_EXP_ERROR_TYPE');
907: FND_MSG_PUB.ADD;
908: RAISE FND_API.G_EXC_ERROR;
909: END IF;
910:
911: IF (x_gmd_qc_tests_rec.below_spec_min IS NOT NULL OR x_gmd_qc_tests_rec.below_min_action_code IS NOT NULL )

Line 916: FND_MSG_PUB.ADD;

912: OR (x_gmd_qc_tests_rec.above_spec_min IS NOT NULL OR x_gmd_qc_tests_rec.above_min_action_code IS NOT NULL )
913: OR (x_gmd_qc_tests_rec.below_spec_max IS NOT NULL OR x_gmd_qc_tests_rec.below_max_action_code IS NOT NULL )
914: OR (x_gmd_qc_tests_rec.above_spec_max IS NOT NULL OR x_gmd_qc_tests_rec.above_max_action_code IS NOT NULL ) THEN
915: FND_MESSAGE.SET_NAME('GMD', 'GMD_EXP_ERROR_NOT_REQD');
916: FND_MSG_PUB.ADD;
917: RAISE FND_API.G_EXC_ERROR;
918: END IF;
919: ELSE
920: IF x_gmd_qc_tests_rec.test_unit IS NULL THEN

Line 923: FND_MSG_PUB.ADD;

919: ELSE
920: IF x_gmd_qc_tests_rec.test_unit IS NULL THEN
921: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_UNIT_REQD');
922: FND_MESSAGE.SET_TOKEN('TEST',x_gmd_qc_tests_rec.test_code);
923: FND_MSG_PUB.ADD;
924: RAISE FND_API.G_EXC_ERROR;
925: END IF;
926:
927: IF (x_gmd_qc_tests_rec.display_precision IS NULL OR x_gmd_qc_tests_rec.report_precision IS NULL ) THEN

Line 930: FND_MSG_PUB.ADD;

926:
927: IF (x_gmd_qc_tests_rec.display_precision IS NULL OR x_gmd_qc_tests_rec.report_precision IS NULL ) THEN
928: FND_MESSAGE.SET_NAME('GMD', 'GMD_PRECISION_REQD');
929: FND_MESSAGE.SET_TOKEN('TEST',x_gmd_qc_tests_rec.test_code);
930: FND_MSG_PUB.ADD;
931: RAISE FND_API.G_EXC_ERROR;
932: END IF;
933:
934: IF ((x_gmd_qc_tests_rec.exp_error_type IN ('N','P')) OR (x_gmd_qc_tests_rec.exp_error_type IS NULL)) THEN

Line 938: FND_MSG_PUB.ADD;

934: IF ((x_gmd_qc_tests_rec.exp_error_type IN ('N','P')) OR (x_gmd_qc_tests_rec.exp_error_type IS NULL)) THEN
935: NULL ;
936: ELSE
937: FND_MESSAGE.SET_NAME('GMD','GMD_INVALID_EXP_ERROR_TYPE');
938: FND_MSG_PUB.ADD;
939: RAISE FND_API.G_EXC_ERROR;
940: END IF;
941:
942: END IF;

Line 951: FND_MSG_PUB.ADD;

947: (x_gmd_qc_tests_rec.below_spec_min IS NOT NULL OR x_gmd_qc_tests_rec.above_spec_min IS NOT NULL
948: OR x_gmd_qc_tests_rec.below_spec_max IS NOT NULL OR x_gmd_qc_tests_rec.above_spec_max IS NOT NULL)
949: THEN
950: FND_MESSAGE.SET_NAME('GMD', 'GMD_EXP_ERROR_TYPE_REQ');
951: FND_MSG_PUB.ADD;
952: RAISE FND_API.G_EXC_ERROR;
953: END IF;
954:
955: IF x_gmd_qc_tests_rec.exp_error_type IS NOT NULL AND

Line 960: FND_MSG_PUB.ADD;

956: (x_gmd_qc_tests_rec.below_spec_min IS NULL AND x_gmd_qc_tests_rec.above_spec_min IS NULL
957: AND x_gmd_qc_tests_rec.below_spec_max IS NULL AND x_gmd_qc_tests_rec.above_spec_max IS NULL)
958: THEN
959: FND_MESSAGE.SET_NAME('GMD', 'GMD_EXP_ERR_TYPE_NULL');
960: FND_MSG_PUB.ADD;
961: RAISE FND_API.G_EXC_ERROR;
962: END IF;
963:
964: IF x_gmd_qc_tests_rec.TEST_UNIT IS NOT NULL THEN

Line 971: FND_MSG_PUB.ADD;

967: IF cr_check_valid_test_unit%NOTFOUND THEN
968: CLOSE cr_check_valid_test_unit;
969: FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_TEST_UNIT');
970: FND_MESSAGE.SET_TOKEN('TEST_UNIT',x_gmd_qc_tests_rec.test_unit);
971: FND_MSG_PUB.ADD;
972: RAISE FND_API.G_EXC_ERROR;
973: END IF;
974: CLOSE cr_check_valid_test_unit ;
975: END IF;

Line 984: FND_MSG_PUB.ADD;

980: IF cr_check_valid_test_class%NOTFOUND THEN
981: CLOSE cr_check_valid_test_class;
982: FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_TEST_CLASS');
983: FND_MESSAGE.SET_TOKEN('TEST_CLASS', x_gmd_qc_tests_rec.test_class);
984: FND_MSG_PUB.ADD;
985: RAISE FND_API.G_EXC_ERROR;
986: END IF;
987: CLOSE cr_check_valid_test_class ;
988: END IF;

Line 999: FND_MSG_PUB.ADD;

995: IF cr_check_valid_action_code%NOTFOUND THEN
996: CLOSE cr_check_valid_action_code;
997: FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_ACTION_CODE');
998: FND_MESSAGE.SET_TOKEN('ACTION', x_gmd_qc_tests_rec.below_min_action_code);
999: FND_MSG_PUB.ADD;
1000: RAISE FND_API.G_EXC_ERROR;
1001: END IF;
1002: CLOSE cr_check_valid_action_code ;
1003: END IF;

Line 1012: FND_MSG_PUB.ADD;

1008: IF cr_check_valid_action_code%NOTFOUND THEN
1009: CLOSE cr_check_valid_action_code;
1010: FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_ACTION_CODE');
1011: FND_MESSAGE.SET_TOKEN('ACTION', x_gmd_qc_tests_rec.above_min_action_code);
1012: FND_MSG_PUB.ADD;
1013: RAISE FND_API.G_EXC_ERROR;
1014: END IF;
1015: CLOSE cr_check_valid_action_code ;
1016: END IF;

Line 1025: FND_MSG_PUB.ADD;

1021: IF cr_check_valid_action_code%NOTFOUND THEN
1022: CLOSE cr_check_valid_action_code;
1023: FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_ACTION_CODE');
1024: FND_MESSAGE.SET_TOKEN('ACTION', x_gmd_qc_tests_rec.below_max_action_code);
1025: FND_MSG_PUB.ADD;
1026: RAISE FND_API.G_EXC_ERROR;
1027: END IF;
1028: CLOSE cr_check_valid_action_code ;
1029: END IF;

Line 1038: FND_MSG_PUB.ADD;

1034: IF cr_check_valid_action_code%NOTFOUND THEN
1035: CLOSE cr_check_valid_action_code;
1036: FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_ACTION_CODE');
1037: FND_MESSAGE.SET_TOKEN('ACTION', x_gmd_qc_tests_rec.above_max_action_code);
1038: FND_MSG_PUB.ADD;
1039: RAISE FND_API.G_EXC_ERROR;
1040: END IF;
1041: CLOSE cr_check_valid_action_code ;
1042: END IF;

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

1046:
1047: EXCEPTION
1048: WHEN FND_API.G_EXC_ERROR THEN
1049: x_return_status := FND_API.G_RET_STS_ERROR ;
1050: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1051:
1052: WHEN OTHERS THEN
1053: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
1054: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.check_for_null_and_fks');

Line 1057: FND_MSG_PUB.ADD;

1053: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
1054: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.check_for_null_and_fks');
1055: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1056: FND_MESSAGE.Set_Token('POSITION',l_progress );
1057: FND_MSG_PUB.ADD;
1058: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1060:
1061: END check_for_null_and_fks;

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

1054: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.check_for_null_and_fks');
1055: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1056: FND_MESSAGE.Set_Token('POSITION',l_progress );
1057: FND_MSG_PUB.ADD;
1058: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1060:
1061: END check_for_null_and_fks;
1062:

Line 1091: FND_MSG_PUB.ADD;

1087:
1088: -- check for duplicate test_code.
1089: IF CHECK_TEST_EXIST(p_test_code => x_gmd_qc_tests_rec.test_code) THEN
1090: FND_MESSAGE.SET_NAME('GMD','SY_WFDUPLICATE');
1091: FND_MSG_PUB.ADD;
1092: RAISE FND_API.G_EXC_ERROR;
1093: END IF;
1094:
1095: IF x_gmd_qc_tests_rec.test_type = 'E' THEN

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

1172:
1173: EXCEPTION
1174: WHEN FND_API.G_EXC_ERROR THEN
1175: x_return_status := FND_API.G_RET_STS_ERROR ;
1176: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1177:
1178: WHEN OTHERS THEN
1179: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
1180: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.validate_before_insert');

Line 1183: FND_MSG_PUB.ADD;

1179: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
1180: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.validate_before_insert');
1181: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1182: FND_MESSAGE.Set_Token('POSITION',l_progress );
1183: FND_MSG_PUB.ADD;
1184: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1186: END validate_before_insert ;
1187:

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

1180: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.validate_before_insert');
1181: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1182: FND_MESSAGE.Set_Token('POSITION',l_progress );
1183: FND_MSG_PUB.ADD;
1184: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1186: END validate_before_insert ;
1187:
1188: /*===========================================================================

Line 1210: FND_MSG_PUB.initialize; -- clear the message stack.

1206:
1207: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1208:
1209: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1210: FND_MSG_PUB.initialize; -- clear the message stack.
1211: END IF;
1212:
1213: IF p_gmd_qc_tests_rec.test_id IS NULL THEN
1214: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_ID_CODE_NULL');

Line 1215: FND_MSG_PUB.ADD;

1211: END IF;
1212:
1213: IF p_gmd_qc_tests_rec.test_id IS NULL THEN
1214: FND_MESSAGE.SET_NAME('GMD','GMD_TEST_ID_CODE_NULL');
1215: FND_MSG_PUB.ADD;
1216: RAISE FND_API.G_EXC_ERROR;
1217: END IF;
1218:
1219: IF p_gmd_qc_tests_rec.test_type = 'E' THEN

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

1242:
1243: EXCEPTION
1244: WHEN FND_API.G_EXC_ERROR THEN
1245: x_return_status := FND_API.G_RET_STS_ERROR ;
1246: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1247:
1248: WHEN OTHERS THEN
1249: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
1250: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.process_after_insert');

Line 1253: FND_MSG_PUB.ADD;

1249: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
1250: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.process_after_insert');
1251: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1252: FND_MESSAGE.Set_Token('POSITION',l_progress );
1253: FND_MSG_PUB.ADD;
1254: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1256: END process_after_insert ;
1257:

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

1250: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.process_after_insert');
1251: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1252: FND_MESSAGE.Set_Token('POSITION',l_progress );
1253: FND_MSG_PUB.ADD;
1254: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1256: END process_after_insert ;
1257:
1258: /*===========================================================================

Line 1275: FND_MSG_PUB.initialize; -- clear the message stack.

1271: BEGIN
1272: l_progress := '010';
1273:
1274: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1275: FND_MSG_PUB.initialize; -- clear the message stack.
1276: END IF;
1277:
1278:
1279: l_progress := '020';

Line 1302: FND_MSG_PUB.ADD;

1298: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
1299: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.test_group_order_exist' );
1300: FND_MESSAGE.Set_Token('ERROR', SUBSTR(SQLERRM,1,100));
1301: FND_MESSAGE.Set_Token('POSITION',l_progress );
1302: FND_MSG_PUB.ADD;
1303: RETURN FALSE;
1304: END test_group_order_exist;
1305:
1306: /*===========================================================================

Line 1417: FND_MSG_PUB.ADD;

1413: WHEN OTHERS THEN
1414: FND_MESSAGE.Set_Name('GMD','GMD_API_ERROR');
1415: FND_MESSAGE.Set_Token('PACKAGE','GMD_QC_TESTS_GRP.POPULATE_TEST_GRP_GT' );
1416: FND_MESSAGE.Set_Token('ERROR', substr(sqlerrm,1,100));
1417: FND_MSG_PUB.ADD;
1418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1419: END POPULATE_TEST_GRP_GT;
1420:
1421: /*===========================================================================