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_RESULTS_PUB dependencies on FND_API

Line 66: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;

62: l_api_name CONSTANT VARCHAR2 (30) := 'RECORD_RESULTS';
63: l_api_version CONSTANT NUMBER := 3.0;
64: l_msg_count NUMBER :=0;
65: l_msg_data VARCHAR2(2000);
66: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
67: l_results_rec GMD_RESULTS_PUB.RESULTS_REC;
68: l_tests_rec GMD_QC_TESTS%ROWTYPE;
69: l_samples_rec GMD_SAMPLES%ROWTYPE;
70: l_spec_results_row_in GMD_SPEC_RESULTS%ROWTYPE;

Line 156: IF NOT FND_API.Compatible_API_CALL

152:
153:
154: /* Standard call to get for call compatibility. */
155:
156: IF NOT FND_API.Compatible_API_CALL
157: (l_api_version , p_api_version , l_api_name , G_PKG_NAME)
158: THEN
159: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
160: END IF;

Line 159: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

155:
156: IF NOT FND_API.Compatible_API_CALL
157: (l_api_version , p_api_version , l_api_name , G_PKG_NAME)
158: THEN
159: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
160: END IF;
161:
162: /* Initialize message list if p_int_msg_list is set TRUE. */
163: IF FND_API.to_boolean(p_init_msg_list)

Line 163: IF FND_API.to_boolean(p_init_msg_list)

159: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
160: END IF;
161:
162: /* Initialize message list if p_int_msg_list is set TRUE. */
163: IF FND_API.to_boolean(p_init_msg_list)
164: THEN
165: FND_MSG_PUB.Initialize;
166: END IF;
167:

Line 170: x_return_status := FND_API.G_RET_STS_SUCCESS;

166: END IF;
167:
168: -- Initialize API return Parameters
169:
170: x_return_status := FND_API.G_RET_STS_SUCCESS;
171:
172: -- Validate User Name Parameter
173:
174: GMA_GLOBAL_GRP.Get_Who ( p_user_name => p_user_name

Line 182: RAISE FND_API.G_EXC_ERROR;

178: THEN
179: GMD_API_PUB.Log_Message('GMD_INVALID_USER_NAME',
180: 'l_user_name', p_user_name);
181:
182: RAISE FND_API.G_EXC_ERROR;
183: ELSE
184: -- Added below for BUG 2711643. Hverddin
185: GMD_API_PUB.SET_USER_CONTEXT(p_user_id => l_user_id,
186: x_return_status => l_return_status);

Line 188: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

184: -- Added below for BUG 2711643. Hverddin
185: GMD_API_PUB.SET_USER_CONTEXT(p_user_id => l_user_id,
186: x_return_status => l_return_status);
187:
188: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
189: RAISE FND_API.G_EXC_ERROR;
190: END IF;
191:
192: END IF;

Line 189: RAISE FND_API.G_EXC_ERROR;

185: GMD_API_PUB.SET_USER_CONTEXT(p_user_id => l_user_id,
186: x_return_status => l_return_status);
187:
188: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
189: RAISE FND_API.G_EXC_ERROR;
190: END IF;
191:
192: END IF;
193:

Line 204: RAISE FND_API.G_EXC_ERROR;

200: OPEN check_resp_lab_access(l_results_row.organization_id,l_application_id);
201: IF check_resp_lab_access%NOTFOUND THEN
202: GMD_API_PUB.Log_Message('GMD_RESP_LAB_NOACCESS');
203: CLOSE check_resp_lab_access;
204: RAISE FND_API.G_EXC_ERROR;
205: END IF;
206: CLOSE check_resp_lab_access;
207: /*NSRIVAST, INVCONV*/
208:

Line 214: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

210: ( p_results_rec => p_results_rec,
211: x_return_status => l_return_status
212: );
213:
214: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
215: RAISE FND_API.G_EXC_ERROR;
216: END IF;
217:
218:

Line 215: RAISE FND_API.G_EXC_ERROR;

211: x_return_status => l_return_status
212: );
213:
214: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
215: RAISE FND_API.G_EXC_ERROR;
216: END IF;
217:
218:
219: IF p_results_rec.result_id IS NULL THEN

Line 228: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

224: x_samples_rec => l_samples_rec,
225: x_return_status => l_return_status
226: );
227:
228: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
229: RAISE FND_API.G_EXC_ERROR;
230: END IF;
231:
232: -- Fetch the Result Record

Line 229: RAISE FND_API.G_EXC_ERROR;

225: x_return_status => l_return_status
226: );
227:
228: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
229: RAISE FND_API.G_EXC_ERROR;
230: END IF;
231:
232: -- Fetch the Result Record
233: l_results_row_in.test_id := l_tests_rec.test_id;

Line 241: RAISE FND_API.G_EXC_ERROR;

237: IF NOT GMD_RESULTS_PVT.fetch_row
238: ( p_results => l_results_row_in,
239: x_results => l_results_row
240: ) THEN
241: RAISE FND_API.G_EXC_ERROR;
242: END IF;
243:
244: ELSE
245: -- Fetch Result Row

Line 252: RAISE FND_API.G_EXC_ERROR;

248: IF NOT GMD_RESULTS_PVT.fetch_row
249: ( p_results => l_results_row_in,
250: x_results => l_results_row
251: ) THEN
252: RAISE FND_API.G_EXC_ERROR;
253: END IF;
254:
255: -- Get Result Info
256: l_results_rec.test_id := l_results_row.test_id;

Line 267: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

263: x_samples_rec => l_samples_rec,
264: x_return_status => l_return_status
265: );
266:
267: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
268: RAISE FND_API.G_EXC_ERROR;
269: END IF;
270:
271: END IF;

Line 268: RAISE FND_API.G_EXC_ERROR;

264: x_return_status => l_return_status
265: );
266:
267: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
268: RAISE FND_API.G_EXC_ERROR;
269: END IF;
270:
271: END IF;
272:

Line 277: RAISE FND_API.G_EXC_ERROR;

273:
274: -- Validate that Result Record is Not deleted
275: IF l_results_row.delete_mark = 1 THEN
276: GMD_API_PUB.Log_Message('GMD_RESULT_DELETED');
277: RAISE FND_API.G_EXC_ERROR;
278: END IF;
279:
280: -- If values have been populated for this result then
281: -- Return an ERROR.

Line 290: RAISE FND_API.G_EXC_ERROR;

286: GMD_API_PUB.Log_Message('GMD_RESULT_RECORDED',
287: 'l_ORGN_CODE', l_samples_rec.orgn_code,
288: 'l_SAMPLE_NO', l_samples_rec.sample_no,
289: 'l_TEST', l_tests_rec.test_code);
290: RAISE FND_API.G_EXC_ERROR;
291: END IF;
292:
293:
294: -- Validate that the values in the RESULT REC i.e RESULT_CHAR and NUM

Line 314: RAISE FND_API.G_EXC_ERROR;

310: IF c_get_event_spec%NOTFOUND THEN
311: GMD_API_PUB.Log_Message('GMD_NO_SPEC_EVENT_FOUND',
312: 'SPEC_ID', l_spec_id,
313: 'SAMP_EVENT', l_samples_rec.sampling_event_id);
314: RAISE FND_API.G_EXC_ERROR;
315: CLOSE c_get_event_spec;
316: END IF;
317: CLOSE c_get_event_spec;
318:

Line 328: RAISE FND_API.G_EXC_ERROR;

324: , x_return_status => l_return_status);
325:
326: IF (l_return_Status <> 'S') THEN
327: GMD_API_PUB.Log_Message('GMD_EXP_RES_DISALLOWED');
328: RAISE FND_API.G_EXC_ERROR;
329: END IF;
330: --RLNAGARA Bug5076736 end
331:
332:

Line 339: RAISE FND_API.G_EXC_ERROR;

335: -- Check that the result_value is Numeric
336: IF NOT GMD_RESULTS_GRP.is_value_numeric
337: ( p_char_number => p_results_rec.result_value) THEN
338: GMD_API_PUB.Log_Message('GMD_RESULT_VAL_NUM_REQD');
339: RAISE FND_API.G_EXC_ERROR;
340: END IF;
341:
342: -- l_result_value_num := p_results_rec.result_value;
343: l_validate_res.result := p_results_rec.result_value;

Line 349: RAISE FND_API.G_EXC_ERROR;

345: ELSIF l_tests_rec.test_type in ( 'T','V','U') THEN
346:
347: IF p_results_rec.result_value is NULL THEN
348: GMD_API_PUB.Log_Message('GMD_RESULT_VAL_CHAR_REQD');
349: RAISE FND_API.G_EXC_ERROR;
350: END IF;
351:
352: l_validate_res.result := p_results_rec.result_value;
353: l_result_value_char := p_results_rec.result_value;

Line 369: RAISE FND_API.G_EXC_ERROR;

365: IF c_get_event_spec%NOTFOUND THEN
366: GMD_API_PUB.Log_Message('GMD_NO_SPEC_EVENT_FOUND',
367: 'SPEC_ID', l_spec_id,
368: 'SAMP_EVENT', l_samples_rec.sampling_event_id);
369: RAISE FND_API.G_EXC_ERROR;
370: CLOSE c_get_event_spec;
371: END IF;
372: CLOSE c_get_event_spec;
373:

Line 382: RAISE FND_API.G_EXC_ERROR;

378: --== SHOULD THIS BE THE SAMPLE OR SAMPLE EVENT DISP
379: IF l_sample_disp NOT IN ('1P','2I') THEN
380: GMD_API_PUB.Log_Message('GMD_SAMPLE_DISP_INVALID',
381: 'l_SAMPLE_DISP', l_sample_disp);
382: RAISE FND_API.G_EXC_ERROR;
383: END IF;
384: */
385: --End Bug#3467531, port bug 3494551
386:

Line 443: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

439: ( p_result_rec => l_validate_res,
440: x_return_status => l_return_status
441: );
442:
443: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
444: RAISE FND_API.G_EXC_ERROR;
445: END IF;
446:
447:

Line 444: RAISE FND_API.G_EXC_ERROR;

440: x_return_status => l_return_status
441: );
442:
443: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
444: RAISE FND_API.G_EXC_ERROR;
445: END IF;
446:
447:
448: IF NOT GMD_RESULTS_PVT.LOCK_ROW ( p_result_id => l_results_row.result_id )

Line 450: RAISE FND_API.G_EXC_ERROR;

446:
447:
448: IF NOT GMD_RESULTS_PVT.LOCK_ROW ( p_result_id => l_results_row.result_id )
449: THEN
450: RAISE FND_API.G_EXC_ERROR;
451: ELSE
452: -- IF test_type is T then convert result char to Num
453: IF ( l_tests_rec.test_type = 'T') THEN
454:

Line 461: RAISE FND_API.G_EXC_ERROR;

457: FETCH c_get_result_num INTO l_validate_res.result_num;
458: IF c_get_result_num%NOTFOUND THEN
459: CLOSE c_get_result_num;
460: GMD_API_PUB.Log_Message('GMD_RESULT_CHAR_NOTFOUND');
461: RAISE FND_API.G_EXC_ERROR;
462: END IF;
463: CLOSE c_get_result_num;
464: END IF;
465:

Line 480: RAISE FND_API.G_EXC_ERROR;

476: WHERE sample_id = p_results_rec.reserve_sample_id;
477: EXCEPTION
478: WHEN NO_DATA_FOUND THEN
479: GMD_API_PUB.Log_Message('GMD_INVALID_RESERVE_SMPL');
480: RAISE FND_API.G_EXC_ERROR;
481: END;
482:
483: IF (l_samples_rec.sampling_event_id <> l_reserve_sampling_event_id) THEN
484: GMD_API_PUB.Log_Message('GMD_INVALID_RESERVE_SMPL');

Line 485: RAISE FND_API.G_EXC_ERROR;

481: END;
482:
483: IF (l_samples_rec.sampling_event_id <> l_reserve_sampling_event_id) THEN
484: GMD_API_PUB.Log_Message('GMD_INVALID_RESERVE_SMPL');
485: RAISE FND_API.G_EXC_ERROR;
486: END IF;
487: END IF;
488: --==================================================
489: -- End Bug 3492836 Validate Reserve Sample

Line 510: RAISE FND_API.G_EXC_ERROR;

506: END IF;
507:
508: IF (NVL(l_results_row.consumed_qty, 0) < 0) THEN
509: GMD_API_PUB.Log_Message('GMD_QM_NEGATIVE_QTY');
510: RAISE FND_API.G_EXC_ERROR;
511: --END IF; Bug 3468300: added else statement
512: ELSIF (( NVL(l_results_row.consumed_qty, 0) <> 0 )
513: AND (NVL(l_results_row.test_uom, '0') = '0' )) THEN
514: -- If test uom does not exist in result and consumed qty is specified, test uom must be in input file

Line 521: RAISE FND_API.G_EXC_ERROR;

517: END IF;
518:
519: IF ( NVL(l_results_row.test_uom, '0') = '0' ) THEN
520: GMD_API_PUB.Log_Message('GMD_QM_TEST_UOM');
521: RAISE FND_API.G_EXC_ERROR;
522: END IF;
523: END IF;
524:
525: --=================================

Line 573: RAISE FND_API.G_EXC_ERROR;

569:
570:
571: IF NOT GMD_RESULTS_PVT.FETCH_ROW( p_results => l_results_row_in,
572: x_results => l_results_row ) THEN
573: RAISE FND_API.G_EXC_ERROR;
574: END IF;
575:
576: END IF;
577:

Line 591: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

587: p_results_rec.reserve_sample_id ,
588: l_results_row.consumed_qty ,
589: l_return_status
590: );
591: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
592: RAISE FND_API.G_EXC_ERROR;
593: END IF;
594:
595: ELSE

Line 592: RAISE FND_API.G_EXC_ERROR;

588: l_results_row.consumed_qty ,
589: l_return_status
590: );
591: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
592: RAISE FND_API.G_EXC_ERROR;
593: END IF;
594:
595: ELSE
596: gmd_samples_grp.update_remaining_qty

Line 602: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

598: l_results_row.sample_id ,
599: l_results_row.consumed_qty ,
600: l_return_status
601: );
602: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
603: RAISE FND_API.G_EXC_ERROR;
604: END IF;
605: END IF;
606:

Line 603: RAISE FND_API.G_EXC_ERROR;

599: l_results_row.consumed_qty ,
600: l_return_status
601: );
602: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
603: RAISE FND_API.G_EXC_ERROR;
604: END IF;
605: END IF;
606:
607:

Line 622: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

618: p_result_value => p_results_rec.result_value,
619: x_return_status => l_return_status
620: );
621:
622: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
623: RAISE FND_API.G_EXC_ERROR;
624: END IF;
625:
626: END IF;

Line 623: RAISE FND_API.G_EXC_ERROR;

619: x_return_status => l_return_status
620: );
621:
622: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
623: RAISE FND_API.G_EXC_ERROR;
624: END IF;
625:
626: END IF;
627:

Line 641: RAISE FND_API.G_EXC_ERROR;

637: IF NOT GMD_SPEC_RESULTS_PVT.lock_row
638: ( p_event_spec_disp_id => l_event_spec_disp_id,
639: p_result_id => l_results_row.result_id
640: ) THEN
641: RAISE FND_API.G_EXC_ERROR;
642:
643: END IF;
644:
645: IF l_tests_rec.test_type <> 'E' THEN --RLNAGARA BUG#5076736

Line 668: RAISE FND_API.G_EXC_ERROR;

664: ( p_spec_results => l_spec_results_row_in,
665: x_spec_results => l_spec_results_row
666: ) THEN
667:
668: RAISE FND_API.G_EXC_ERROR;
669:
670: END IF;
671:
672: -- END IF; /*Bug # 3848483 Commented if eval_ind is NULL */

Line 688: RAISE FND_API.G_EXC_ERROR;

684: x_message_data => x_msg_data
685: );
686:
687: IF l_return_status <> 'S' THEN
688: RAISE FND_API.G_EXC_ERROR;
689: END IF;
690:
691:
692: --=================================

Line 711: RAISE FND_API.G_EXC_ERROR;

707: x_return_status => l_return_status
708: );
709:
710: IF l_return_status <> 'S' THEN
711: RAISE FND_API.G_EXC_ERROR;
712: END IF;
713:
714: END IF;
715: END IF;

Line 730: RAISE FND_API.G_EXC_ERROR;

726: THEN
727: CLOSE c_sample_event;
728: GMD_API_PUB.Log_Message('GMD_NO_SPEC_EVENT_FOUND',
729: 'EVENT_SPEC_DISP_ID', l_event_spec_disp_id);
730: RAISE FND_API.G_EXC_ERROR;
731: END IF;
732: CLOSE c_sample_event;
733:
734: -- dbms_output.put_line('spec_id='||l_spec_id||', sample_event_disp='||l_sample_event_disp||', samples_act='||l_samples_act);

Line 750: RAISE FND_API.G_EXC_ERROR;

746: , p_commit => p_commit
747: , x_return_status => l_return_status);
748:
749: IF l_return_status <> 'S' THEN
750: RAISE FND_API.G_EXC_ERROR;
751: END IF;
752: END IF;
753:
754:

Line 757: IF FND_API.to_boolean(p_commit)

753:
754:
755:
756: -- Standard Check of p_commit.
757: IF FND_API.to_boolean(p_commit)
758: THEN
759: COMMIT WORK;
760: END IF;
761:

Line 770: WHEN FND_API.G_EXC_ERROR THEN

766: x_spec_results_rec := l_spec_results_row;
767:
768:
769: EXCEPTION
770: WHEN FND_API.G_EXC_ERROR THEN
771: ROLLBACK TO RECORD_RESULTS;
772: x_return_status := FND_API.G_RET_STS_ERROR;
773: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
774: , p_count => x_msg_count

Line 772: x_return_status := FND_API.G_RET_STS_ERROR;

768:
769: EXCEPTION
770: WHEN FND_API.G_EXC_ERROR THEN
771: ROLLBACK TO RECORD_RESULTS;
772: x_return_status := FND_API.G_RET_STS_ERROR;
773: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
774: , p_count => x_msg_count
775: , p_data => x_msg_data
776: );

Line 773: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE

769: EXCEPTION
770: WHEN FND_API.G_EXC_ERROR THEN
771: ROLLBACK TO RECORD_RESULTS;
772: x_return_status := FND_API.G_RET_STS_ERROR;
773: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
774: , p_count => x_msg_count
775: , p_data => x_msg_data
776: );
777:

Line 778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

774: , p_count => x_msg_count
775: , p_data => x_msg_data
776: );
777:
778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
779: ROLLBACK TO RECORD_RESULTS;
780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
781: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
782: , p_count => x_msg_count

Line 780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

776: );
777:
778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
779: ROLLBACK TO RECORD_RESULTS;
780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
781: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
782: , p_count => x_msg_count
783: , p_data => x_msg_data
784: );

Line 781: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE

777:
778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
779: ROLLBACK TO RECORD_RESULTS;
780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
781: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
782: , p_count => x_msg_count
783: , p_data => x_msg_data
784: );
785:

Line 789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

785:
786:
787:
788: WHEN OTHERS THEN
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
790: ROLLBACK TO RECORD_RESULTS;
791: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
792: , l_api_name
793: );

Line 795: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE

791: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
792: , l_api_name
793: );
794:
795: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
796: , p_count => x_msg_count
797: , p_data => x_msg_data
798: );
799:

Line 823: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;

819: l_api_name CONSTANT VARCHAR2 (30) := 'ADD_TESTS_TO_SAMPLE';
820: l_api_version CONSTANT NUMBER := 2.0;
821: l_msg_count NUMBER :=0;
822: l_msg_data VARCHAR2(2000);
823: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
824: l_results_tab GMD_API_PUB.gmd_results_tab;
825: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
826: l_spec_results_row GMD_SPEC_RESULTS%ROWTYPE;
827: l_user_id NUMBER(15);

Line 850: IF NOT FND_API.Compatible_API_CALL

846:
847:
848: /* Standard call to get for call compatibility. */
849:
850: IF NOT FND_API.Compatible_API_CALL
851: (l_api_version , p_api_version , l_api_name , G_PKG_NAME)
852: THEN
853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
854: END IF;

Line 853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

849:
850: IF NOT FND_API.Compatible_API_CALL
851: (l_api_version , p_api_version , l_api_name , G_PKG_NAME)
852: THEN
853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
854: END IF;
855:
856: /* Initialize message list if p_int_msg_list is set TRUE. */
857: IF FND_API.to_boolean(p_init_msg_list)

Line 857: IF FND_API.to_boolean(p_init_msg_list)

853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
854: END IF;
855:
856: /* Initialize message list if p_int_msg_list is set TRUE. */
857: IF FND_API.to_boolean(p_init_msg_list)
858: THEN
859: FND_MSG_PUB.Initialize;
860: END IF;
861:

Line 864: x_return_status := FND_API.G_RET_STS_SUCCESS;

860: END IF;
861:
862: -- Initialize API return Parameters
863:
864: x_return_status := FND_API.G_RET_STS_SUCCESS;
865: l_results_tab := x_results_tab;
866: l_spec_results_tab := x_spec_results_tab;
867:
868: -- Validate User Name Parameter

Line 879: RAISE FND_API.G_EXC_ERROR;

875: THEN
876: GMD_API_PUB.Log_Message('GMD_INVALID_USER_NAME',
877: 'l_user_name', p_user_name);
878:
879: RAISE FND_API.G_EXC_ERROR;
880: END IF;
881:
882: -- Validate Input Parematers
883:

Line 892: RAISE FND_API.G_EXC_ERROR;

888: -- Validate that composite keys are present
889:
890: IF ( p_sample_rec.sample_no is NULL) THEN
891: GMD_API_PUB.Log_Message('GMD_SAMPLE_NUMBER_REQD');
892: RAISE FND_API.G_EXC_ERROR;
893: END IF;
894:
895: IF ( p_sample_rec.orgn_code is NULL) THEN
896: GMD_API_PUB.Log_Message('GMD_SAMPLE_ORGN_CODE_REQD');

Line 897: RAISE FND_API.G_EXC_ERROR;

893: END IF;
894:
895: IF ( p_sample_rec.orgn_code is NULL) THEN
896: GMD_API_PUB.Log_Message('GMD_SAMPLE_ORGN_CODE_REQD');
897: RAISE FND_API.G_EXC_ERROR;
898: END IF;
899:
900: END IF; -- Key Sample values Present
901:

Line 907: RAISE FND_API.G_EXC_ERROR;

903: -- Validate that test id's are present
904:
905: IF ( p_test_id_tab.COUNT < 1 ) THEN
906: GMD_API_PUB.Log_Message('GMD_TEST_ID_TABLE_EMPTY');
907: RAISE FND_API.G_EXC_ERROR;
908: END IF;
909:
910: -- Validate event spec disp id is present and valid
911:

Line 914: RAISE FND_API.G_EXC_ERROR;

910: -- Validate event spec disp id is present and valid
911:
912: IF ( p_event_spec_disp_id is NULL) THEN
913: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_DISP_NULL');
914: RAISE FND_API.G_EXC_ERROR;
915: END IF;
916:
917: -- Validate that the event_spec_disp_id is Valid
918:

Line 924: RAISE FND_API.G_EXC_ERROR;

920: FETCH c_check_event_spec INTO l_event_spec_exists;
921: IF c_check_event_spec%NOTFOUND THEN
922: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOTFOUND',
923: 'event_disp', p_event_spec_disp_id);
924: RAISE FND_API.G_EXC_ERROR;
925: CLOSE c_check_event_spec;
926: END IF;
927: CLOSE c_check_event_spec;
928:

Line 943: RAISE FND_API.G_EXC_ERROR;

939: , x_spec_results_tab => l_spec_results_tab
940: , x_return_status => l_return_status);
941:
942: IF l_return_status <> 'S' THEN
943: RAISE FND_API.G_EXC_ERROR;
944: END IF;
945:
946:
947: -- Standard Check of p_commit.

Line 948: IF FND_API.to_boolean(p_commit)

944: END IF;
945:
946:
947: -- Standard Check of p_commit.
948: IF FND_API.to_boolean(p_commit)
949: THEN
950: COMMIT WORK;
951: END IF;
952:

Line 961: WHEN FND_API.G_EXC_ERROR THEN

957: x_spec_results_tab := l_spec_results_tab;
958:
959:
960: EXCEPTION
961: WHEN FND_API.G_EXC_ERROR THEN
962: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
963: x_return_status := FND_API.G_RET_STS_ERROR;
964: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
965: , p_count => x_msg_count

Line 963: x_return_status := FND_API.G_RET_STS_ERROR;

959:
960: EXCEPTION
961: WHEN FND_API.G_EXC_ERROR THEN
962: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
963: x_return_status := FND_API.G_RET_STS_ERROR;
964: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
965: , p_count => x_msg_count
966: , p_data => x_msg_data
967: );

Line 964: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE

960: EXCEPTION
961: WHEN FND_API.G_EXC_ERROR THEN
962: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
963: x_return_status := FND_API.G_RET_STS_ERROR;
964: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
965: , p_count => x_msg_count
966: , p_data => x_msg_data
967: );
968:

Line 969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

965: , p_count => x_msg_count
966: , p_data => x_msg_data
967: );
968:
969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
970: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
972: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
973: , p_count => x_msg_count

Line 971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

967: );
968:
969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
970: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
972: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
973: , p_count => x_msg_count
974: , p_data => x_msg_data
975: );

Line 972: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE

968:
969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
970: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
972: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
973: , p_count => x_msg_count
974: , p_data => x_msg_data
975: );
976:

Line 980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

976:
977:
978:
979: WHEN OTHERS THEN
980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
981: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
982: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
983: , l_api_name
984: );

Line 986: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE

982: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
983: , l_api_name
984: );
985:
986: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
987: , p_count => x_msg_count
988: , p_data => x_msg_data
989: );
990:

Line 998: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;

994: ( p_results_rec IN GMD_RESULTS_PUB.RESULTS_REC,
995: x_return_status OUT NOCOPY VARCHAR2
996: )
997: IS
998: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
999: BEGIN
1000:
1001: -- Set out Variable
1002: x_return_status := l_return_status;

Line 1009: RAISE FND_API.G_EXC_ERROR;

1005: -- Bug 3763419 ; add Guaranteed by Manufacturer
1006: IF p_results_rec.result_value IS NULL AND
1007: p_results_rec.eval_ind NOT IN ('4C', '5O', '1Z') THEN
1008: GMD_API_PUB.Log_Message('GMD_RESULT_VALUE_REQ');
1009: RAISE FND_API.G_EXC_ERROR;
1010: END IF;
1011:
1012: --============================
1013: -- In Spec Value Should either

Line 1019: RAISE FND_API.G_EXC_ERROR;

1015: --============================
1016: IF ( p_results_rec.in_spec IS NOT NULL AND
1017: UPPER(p_results_rec.in_spec) <> 'Y') THEN
1018: GMD_API_PUB.Log_Message('GMD_INVALID_INSPEC_VALUE');
1019: RAISE FND_API.G_EXC_ERROR;
1020: END IF;
1021:
1022: IF p_results_rec.result_id IS NULL THEN
1023:

Line 1030: RAISE FND_API.G_EXC_ERROR;

1026: --============================
1027: IF ( p_results_rec.sample_id is NULL) THEN
1028: IF ( p_results_rec.sample_no is NULL) THEN
1029: GMD_API_PUB.Log_Message('GMD_SAMPLE_NUMBER_REQD');
1030: RAISE FND_API.G_EXC_ERROR;
1031: END IF;
1032:
1033: IF ( p_results_rec.organization_id is NULL) THEN /*NSRIVAST, INVCONV*/
1034: GMD_API_PUB.Log_Message('GMD_SAMPLE_ORGN_CODE_REQD');

Line 1035: RAISE FND_API.G_EXC_ERROR;

1031: END IF;
1032:
1033: IF ( p_results_rec.organization_id is NULL) THEN /*NSRIVAST, INVCONV*/
1034: GMD_API_PUB.Log_Message('GMD_SAMPLE_ORGN_CODE_REQD');
1035: RAISE FND_API.G_EXC_ERROR;
1036: END IF;
1037: END IF;
1038:
1039: --============================

Line 1045: RAISE FND_API.G_EXC_ERROR;

1041: --============================
1042: IF ( p_results_rec.test_id is NULL) THEN
1043: IF ( p_results_rec.test_code is NULL) THEN
1044: GMD_API_PUB.Log_Message('GMD_TEST_ID_CODE_NULL');
1045: RAISE FND_API.G_EXC_ERROR;
1046: END IF;
1047: END IF;
1048:
1049: --============================

Line 1054: RAISE FND_API.G_EXC_ERROR;

1050: -- Test Replicate Cnt
1051: --============================
1052: IF ( p_results_rec.test_replicate_cnt is NULL) THEN
1053: GMD_API_PUB.Log_Message('GMD_TEST_REP_CNT_REQD');
1054: RAISE FND_API.G_EXC_ERROR;
1055: END IF;
1056:
1057: END IF;
1058:

Line 1060: WHEN FND_API.G_EXC_ERROR THEN

1056:
1057: END IF;
1058:
1059: EXCEPTION
1060: WHEN FND_API.G_EXC_ERROR THEN
1061: x_return_status := FND_API.G_RET_STS_ERROR;
1062: WHEN OTHERS THEN
1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1064: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',

Line 1061: x_return_status := FND_API.G_RET_STS_ERROR;

1057: END IF;
1058:
1059: EXCEPTION
1060: WHEN FND_API.G_EXC_ERROR THEN
1061: x_return_status := FND_API.G_RET_STS_ERROR;
1062: WHEN OTHERS THEN
1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1064: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',
1065: 'GMD_RESULTS_PUB.VALIDATE_INPUT',

Line 1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1059: EXCEPTION
1060: WHEN FND_API.G_EXC_ERROR THEN
1061: x_return_status := FND_API.G_RET_STS_ERROR;
1062: WHEN OTHERS THEN
1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1064: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',
1065: 'GMD_RESULTS_PUB.VALIDATE_INPUT',
1066: 'ERROR',SUBSTR(SQLERRM,1,100),
1067: 'POSITION','010');

Line 1079: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;

1075: x_samples_rec OUT NOCOPY GMD_SAMPLES%ROWTYPE,
1076: x_return_status OUT NOCOPY VARCHAR2
1077: )
1078: IS
1079: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1080: l_tests_rec GMD_QC_TESTS%ROWTYPE;
1081: l_samples_rec GMD_SAMPLES%ROWTYPE;
1082:
1083: BEGIN

Line 1096: RAISE FND_API.G_EXC_ERROR;

1092: IF NOT GMD_QC_TESTS_PVT.fetch_row
1093: ( p_gmd_qc_tests => l_tests_rec,
1094: x_gmd_qc_tests => x_tests_rec
1095: ) THEN
1096: RAISE FND_API.G_EXC_ERROR;
1097: END IF;
1098:
1099: -- Get Sample Record
1100: l_samples_rec.sample_id := p_results_rec.sample_id;

Line 1109: RAISE FND_API.G_EXC_ERROR;

1105: (
1106: p_samples => l_samples_rec,
1107: x_samples => x_samples_rec
1108: ) THEN
1109: RAISE FND_API.G_EXC_ERROR;
1110: END IF;
1111:
1112: IF x_samples_rec.delete_mark = 1 THEN
1113: GMD_API_PUB.Log_Message('GMD_RECORD_DELETE_MARKED',

Line 1117: RAISE FND_API.G_EXC_ERROR;

1113: GMD_API_PUB.Log_Message('GMD_RECORD_DELETE_MARKED',
1114: 'l_table_name', 'GMD_SAMPLES',
1115: 'l_column_name', 'SAMPLE_ID',
1116: 'l_key_value', x_samples_rec.sample_id);
1117: RAISE FND_API.G_EXC_ERROR;
1118: END IF;
1119:
1120: EXCEPTION
1121: WHEN FND_API.G_EXC_ERROR THEN

Line 1121: WHEN FND_API.G_EXC_ERROR THEN

1117: RAISE FND_API.G_EXC_ERROR;
1118: END IF;
1119:
1120: EXCEPTION
1121: WHEN FND_API.G_EXC_ERROR THEN
1122: x_return_status := FND_API.G_RET_STS_ERROR;
1123: WHEN OTHERS THEN
1124: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1125: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',

Line 1122: x_return_status := FND_API.G_RET_STS_ERROR;

1118: END IF;
1119:
1120: EXCEPTION
1121: WHEN FND_API.G_EXC_ERROR THEN
1122: x_return_status := FND_API.G_RET_STS_ERROR;
1123: WHEN OTHERS THEN
1124: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1125: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',
1126: 'GMD_RESULTS_PUB.GET_RESULT_INFO',

Line 1124: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1120: EXCEPTION
1121: WHEN FND_API.G_EXC_ERROR THEN
1122: x_return_status := FND_API.G_RET_STS_ERROR;
1123: WHEN OTHERS THEN
1124: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1125: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',
1126: 'GMD_RESULTS_PUB.GET_RESULT_INFO',
1127: 'ERROR',SUBSTR(SQLERRM,1,100),
1128: 'POSITION','010');