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 93: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;

89: l_api_name CONSTANT VARCHAR2 (30) := 'RECORD_RESULTS';
90: l_api_version CONSTANT NUMBER := 3.0;
91: l_msg_count NUMBER :=0;
92: l_msg_data VARCHAR2(2000);
93: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
94: l_results_rec GMD_RESULTS_PUB.RESULTS_REC;
95: l_tests_rec GMD_QC_TESTS%ROWTYPE;
96: l_samples_rec GMD_SAMPLES%ROWTYPE;
97: l_spec_results_row_in GMD_SPEC_RESULTS%ROWTYPE;

Line 204: IF NOT FND_API.Compatible_API_CALL

200:
201:
202: /* Standard call to get for call compatibility. */
203:
204: IF NOT FND_API.Compatible_API_CALL
205: (l_api_version , p_api_version , l_api_name , G_PKG_NAME)
206: THEN
207: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
208: END IF;

Line 207: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

203:
204: IF NOT FND_API.Compatible_API_CALL
205: (l_api_version , p_api_version , l_api_name , G_PKG_NAME)
206: THEN
207: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
208: END IF;
209:
210: /* Initialize message list if p_int_msg_list is set TRUE. */
211: IF FND_API.to_boolean(p_init_msg_list)

Line 211: IF FND_API.to_boolean(p_init_msg_list)

207: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
208: END IF;
209:
210: /* Initialize message list if p_int_msg_list is set TRUE. */
211: IF FND_API.to_boolean(p_init_msg_list)
212: THEN
213: FND_MSG_PUB.Initialize;
214: END IF;
215:

Line 218: x_return_status := FND_API.G_RET_STS_SUCCESS;

214: END IF;
215:
216: -- Initialize API return Parameters
217:
218: x_return_status := FND_API.G_RET_STS_SUCCESS;
219:
220: -- Validate User Name Parameter
221:
222: GMA_GLOBAL_GRP.Get_Who ( p_user_name => p_user_name

Line 230: RAISE FND_API.G_EXC_ERROR;

226: THEN
227: GMD_API_PUB.Log_Message('GMD_INVALID_USER_NAME',
228: 'l_user_name', p_user_name);
229:
230: RAISE FND_API.G_EXC_ERROR;
231: ELSE
232: -- Added below for BUG 2711643. Hverddin
233: GMD_API_PUB.SET_USER_CONTEXT(p_user_id => l_user_id,
234: x_return_status => l_return_status);

Line 236: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

232: -- Added below for BUG 2711643. Hverddin
233: GMD_API_PUB.SET_USER_CONTEXT(p_user_id => l_user_id,
234: x_return_status => l_return_status);
235:
236: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
237: RAISE FND_API.G_EXC_ERROR;
238: END IF;
239:
240: END IF;

Line 237: RAISE FND_API.G_EXC_ERROR;

233: GMD_API_PUB.SET_USER_CONTEXT(p_user_id => l_user_id,
234: x_return_status => l_return_status);
235:
236: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
237: RAISE FND_API.G_EXC_ERROR;
238: END IF;
239:
240: END IF;
241:

Line 252: RAISE FND_API.G_EXC_ERROR;

248: OPEN check_resp_lab_access(l_results_row.organization_id,l_application_id);
249: IF check_resp_lab_access%NOTFOUND THEN
250: GMD_API_PUB.Log_Message('GMD_RESP_LAB_NOACCESS');
251: CLOSE check_resp_lab_access;
252: RAISE FND_API.G_EXC_ERROR;
253: END IF;
254: CLOSE check_resp_lab_access;
255: /*NSRIVAST, INVCONV*/
256:

Line 262: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

258: ( p_results_rec => p_results_rec,
259: x_return_status => l_return_status
260: );
261:
262: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
263: RAISE FND_API.G_EXC_ERROR;
264: END IF;
265:
266:

Line 263: RAISE FND_API.G_EXC_ERROR;

259: x_return_status => l_return_status
260: );
261:
262: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
263: RAISE FND_API.G_EXC_ERROR;
264: END IF;
265:
266:
267: IF p_results_rec.result_id IS NULL THEN

Line 276: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

272: x_samples_rec => l_samples_rec,
273: x_return_status => l_return_status
274: );
275:
276: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
277: RAISE FND_API.G_EXC_ERROR;
278: END IF;
279:
280: -- Fetch the Result Record

Line 277: RAISE FND_API.G_EXC_ERROR;

273: x_return_status => l_return_status
274: );
275:
276: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
277: RAISE FND_API.G_EXC_ERROR;
278: END IF;
279:
280: -- Fetch the Result Record
281: l_results_row_in.test_id := l_tests_rec.test_id;

Line 289: RAISE FND_API.G_EXC_ERROR;

285: IF NOT GMD_RESULTS_PVT.fetch_row
286: ( p_results => l_results_row_in,
287: x_results => l_results_row
288: ) THEN
289: RAISE FND_API.G_EXC_ERROR;
290: END IF;
291:
292: ELSE
293: -- Fetch Result Row

Line 300: RAISE FND_API.G_EXC_ERROR;

296: IF NOT GMD_RESULTS_PVT.fetch_row
297: ( p_results => l_results_row_in,
298: x_results => l_results_row
299: ) THEN
300: RAISE FND_API.G_EXC_ERROR;
301: END IF;
302:
303: -- Get Result Info
304: l_results_rec.test_id := l_results_row.test_id;

Line 315: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

311: x_samples_rec => l_samples_rec,
312: x_return_status => l_return_status
313: );
314:
315: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
316: RAISE FND_API.G_EXC_ERROR;
317: END IF;
318:
319: END IF;

Line 316: RAISE FND_API.G_EXC_ERROR;

312: x_return_status => l_return_status
313: );
314:
315: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
316: RAISE FND_API.G_EXC_ERROR;
317: END IF;
318:
319: END IF;
320:

Line 325: RAISE FND_API.G_EXC_ERROR;

321:
322: -- Validate that Result Record is Not deleted
323: IF l_results_row.delete_mark = 1 THEN
324: GMD_API_PUB.Log_Message('GMD_RESULT_DELETED');
325: RAISE FND_API.G_EXC_ERROR;
326: END IF;
327:
328: -- If values have been populated for this result then
329: -- Return an ERROR.

Line 341: RAISE FND_API.G_EXC_ERROR;

337: GMD_API_PUB.Log_Message('GMD_RESULT_RECORDED',
338: 'l_ORGN_CODE', l_samples_rec.orgn_code,
339: 'l_SAMPLE_NO', l_samples_rec.sample_no,
340: 'l_TEST', l_tests_rec.test_code);
341: RAISE FND_API.G_EXC_ERROR;
342: END IF;
343: */
344:
345: -- Validate that the values in the RESULT REC i.e RESULT_CHAR and NUM

Line 372: RAISE FND_API.G_EXC_ERROR;

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

Line 386: RAISE FND_API.G_EXC_ERROR;

382: , x_return_status => l_return_status);
383:
384: IF (l_return_Status <> 'S') THEN
385: GMD_API_PUB.Log_Message('GMD_EXP_RES_DISALLOWED');
386: RAISE FND_API.G_EXC_ERROR;
387: END IF;
388: --RLNAGARA Bug5076736 end
389:
390:

Line 397: RAISE FND_API.G_EXC_ERROR;

393: -- Check that the result_value is Numeric
394: IF NOT GMD_RESULTS_GRP.is_value_numeric
395: ( p_char_number => p_results_rec.result_value) THEN
396: GMD_API_PUB.Log_Message('GMD_RESULT_VAL_NUM_REQD');
397: RAISE FND_API.G_EXC_ERROR;
398: END IF;
399:
400: -- l_result_value_num := p_results_rec.result_value;
401: l_validate_res.result := p_results_rec.result_value;

Line 407: RAISE FND_API.G_EXC_ERROR;

403: ELSIF l_tests_rec.test_type in ( 'T','V','U') THEN
404:
405: IF p_results_rec.result_value is NULL THEN
406: GMD_API_PUB.Log_Message('GMD_RESULT_VAL_CHAR_REQD');
407: RAISE FND_API.G_EXC_ERROR;
408: END IF;
409:
410: l_validate_res.result := p_results_rec.result_value;
411: l_result_value_char := p_results_rec.result_value;

Line 427: RAISE FND_API.G_EXC_ERROR;

423: IF c_get_event_spec%NOTFOUND THEN
424: GMD_API_PUB.Log_Message('GMD_NO_SPEC_EVENT_FOUND',
425: 'SPEC_ID', l_spec_id,
426: 'SAMP_EVENT', l_samples_rec.sampling_event_id);
427: RAISE FND_API.G_EXC_ERROR;
428: CLOSE c_get_event_spec;
429: END IF;
430: CLOSE c_get_event_spec;
431:

Line 441: RAISE FND_API.G_EXC_ERROR;

437: IF l_sample_disp in ('0RT', '4A', '5AV', '6RJ', '7CN')
438: THEN
439: GMD_API_PUB.Log_Message('GMD_SAMPLE_DISP_INVALID',
440: 'l_SAMPLE_DISP', l_sample_disp);
441: RAISE FND_API.G_EXC_ERROR;
442: END IF;
443:
444:
445: --Begin Bug#3467531, port bug 3494551 P.Raghu

Line 452: RAISE FND_API.G_EXC_ERROR;

448: --== SHOULD THIS BE THE SAMPLE OR SAMPLE EVENT DISP
449: IF l_sample_disp NOT IN ('1P','2I') THEN
450: GMD_API_PUB.Log_Message('GMD_SAMPLE_DISP_INVALID',
451: 'l_SAMPLE_DISP', l_sample_disp);
452: RAISE FND_API.G_EXC_ERROR;
453: END IF;
454: */
455: --End Bug#3467531, port bug 3494551
456:

Line 522: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

518: ( p_result_rec => l_validate_res,
519: x_return_status => l_return_status
520: );
521:
522: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
523: RAISE FND_API.G_EXC_ERROR;
524: END IF;
525:
526:

Line 523: RAISE FND_API.G_EXC_ERROR;

519: x_return_status => l_return_status
520: );
521:
522: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
523: RAISE FND_API.G_EXC_ERROR;
524: END IF;
525:
526:
527: IF NOT GMD_RESULTS_PVT.LOCK_ROW ( p_result_id => l_results_row.result_id )

Line 529: RAISE FND_API.G_EXC_ERROR;

525:
526:
527: IF NOT GMD_RESULTS_PVT.LOCK_ROW ( p_result_id => l_results_row.result_id )
528: THEN
529: RAISE FND_API.G_EXC_ERROR;
530: ELSE
531: -- IF test_type is T then convert result char to Num
532: IF ( l_tests_rec.test_type = 'T') THEN
533:

Line 540: RAISE FND_API.G_EXC_ERROR;

536: FETCH c_get_result_num INTO l_validate_res.result_num;
537: IF c_get_result_num%NOTFOUND THEN
538: CLOSE c_get_result_num;
539: GMD_API_PUB.Log_Message('GMD_RESULT_CHAR_NOTFOUND');
540: RAISE FND_API.G_EXC_ERROR;
541: END IF;
542: CLOSE c_get_result_num;
543: END IF;
544:

Line 559: RAISE FND_API.G_EXC_ERROR;

555: WHERE sample_id = p_results_rec.reserve_sample_id;
556: EXCEPTION
557: WHEN NO_DATA_FOUND THEN
558: GMD_API_PUB.Log_Message('GMD_INVALID_RESERVE_SMPL');
559: RAISE FND_API.G_EXC_ERROR;
560: END;
561:
562: IF (l_samples_rec.sampling_event_id <> l_reserve_sampling_event_id) THEN
563: GMD_API_PUB.Log_Message('GMD_INVALID_RESERVE_SMPL');

Line 564: RAISE FND_API.G_EXC_ERROR;

560: END;
561:
562: IF (l_samples_rec.sampling_event_id <> l_reserve_sampling_event_id) THEN
563: GMD_API_PUB.Log_Message('GMD_INVALID_RESERVE_SMPL');
564: RAISE FND_API.G_EXC_ERROR;
565: END IF;
566: END IF;
567: --==================================================
568: -- End Bug 3492836 Validate Reserve Sample

Line 589: RAISE FND_API.G_EXC_ERROR;

585: END IF;
586:
587: IF (NVL(l_results_row.consumed_qty, 0) < 0) THEN
588: GMD_API_PUB.Log_Message('GMD_QM_NEGATIVE_QTY');
589: RAISE FND_API.G_EXC_ERROR;
590: --END IF; Bug 3468300: added else statement
591: ELSIF (( NVL(l_results_row.consumed_qty, 0) <> 0 )
592: AND (NVL(l_results_row.test_uom, '0') = '0' )) THEN
593: -- If test uom does not exist in result and consumed qty is specified, test uom must be in input file

Line 600: RAISE FND_API.G_EXC_ERROR;

596: END IF;
597:
598: IF ( NVL(l_results_row.test_uom, '0') = '0' ) THEN
599: GMD_API_PUB.Log_Message('GMD_QM_TEST_UOM');
600: RAISE FND_API.G_EXC_ERROR;
601: END IF;
602: END IF;
603:
604: --=================================

Line 683: RAISE FND_API.G_EXC_ERROR;

679:
680:
681: IF NOT GMD_RESULTS_PVT.FETCH_ROW( p_results => l_results_row_in,
682: x_results => l_results_row ) THEN
683: RAISE FND_API.G_EXC_ERROR;
684: END IF;
685:
686: END IF;
687:

Line 699: RAISE FND_API.G_EXC_ERROR;

695: IF c_get_event_spec%NOTFOUND THEN
696: GMD_API_PUB.Log_Message('GMD_NO_SPEC_EVENT_FOUND',
697: 'SPEC_ID', l_spec_id,
698: 'SAMP_EVENT', l_samples_rec.sampling_event_id);
699: RAISE FND_API.G_EXC_ERROR;
700: CLOSE c_get_event_spec;
701: END IF;
702: CLOSE c_get_event_spec;
703:

Line 728: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

724: p_results_rec.reserve_sample_id ,
725: l_results_row.consumed_qty ,
726: l_return_status
727: );
728: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
729: RAISE FND_API.G_EXC_ERROR;
730: END IF;
731:
732: ELSE

Line 729: RAISE FND_API.G_EXC_ERROR;

725: l_results_row.consumed_qty ,
726: l_return_status
727: );
728: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
729: RAISE FND_API.G_EXC_ERROR;
730: END IF;
731:
732: ELSE
733: gmd_samples_grp.update_remaining_qty

Line 739: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

735: l_results_row.sample_id ,
736: l_results_row.consumed_qty ,
737: l_return_status
738: );
739: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
740: RAISE FND_API.G_EXC_ERROR;
741: END IF;
742: END IF;
743:

Line 740: RAISE FND_API.G_EXC_ERROR;

736: l_results_row.consumed_qty ,
737: l_return_status
738: );
739: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
740: RAISE FND_API.G_EXC_ERROR;
741: END IF;
742: END IF;
743:
744:

Line 759: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

755: p_result_value => p_results_rec.result_value,
756: x_return_status => l_return_status
757: );
758:
759: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
760: RAISE FND_API.G_EXC_ERROR;
761: END IF;
762:
763: END IF;

Line 760: RAISE FND_API.G_EXC_ERROR;

756: x_return_status => l_return_status
757: );
758:
759: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
760: RAISE FND_API.G_EXC_ERROR;
761: END IF;
762:
763: END IF;
764:

Line 778: RAISE FND_API.G_EXC_ERROR;

774: IF NOT GMD_SPEC_RESULTS_PVT.lock_row
775: ( p_event_spec_disp_id => l_event_spec_disp_id,
776: p_result_id => l_results_row.result_id
777: ) THEN
778: RAISE FND_API.G_EXC_ERROR;
779:
780: END IF;
781:
782: IF l_tests_rec.test_type <> 'E' THEN --RLNAGARA BUG#5076736

Line 821: RAISE FND_API.G_EXC_ERROR;

817: ,p_test_qty_uom => l_results_row.test_qty_uom
818: ) ;
819:
820: IF l_return_status <> 'S' THEN
821: RAISE FND_API.G_EXC_ERROR;
822: END IF;
823:
824: END IF; -- IF ( NVL(p_results_rec.action_code, l_validate_res.result_action_code) = l_retest_action_code) THEN 14635099
825:

Line 858: RAISE FND_API.G_EXC_ERROR;

854: ( p_spec_results => l_spec_results_row_in,
855: x_spec_results => l_spec_results_row
856: ) THEN
857:
858: RAISE FND_API.G_EXC_ERROR;
859:
860: END IF;
861:
862: -- END IF; /*Bug # 3848483 Commented if eval_ind is NULL */

Line 885: RAISE FND_API.G_EXC_ERROR;

881: x_message_data => x_msg_data
882: );
883:
884: IF l_return_status <> 'S' THEN
885: RAISE FND_API.G_EXC_ERROR;
886: END IF;
887:
888: END IF; -- IF p_results_rec.eval_ind <> '4C' then -- 14635099
889:

Line 911: RAISE FND_API.G_EXC_ERROR;

907: x_return_status => l_return_status
908: );
909:
910: IF l_return_status <> 'S' THEN
911: RAISE FND_API.G_EXC_ERROR;
912: END IF;
913:
914: END IF;
915: END IF; */

Line 930: RAISE FND_API.G_EXC_ERROR;

926: THEN
927: CLOSE c_sample_event;
928: GMD_API_PUB.Log_Message('GMD_NO_SPEC_EVENT_FOUND',
929: 'EVENT_SPEC_DISP_ID', l_event_spec_disp_id);
930: RAISE FND_API.G_EXC_ERROR;
931: END IF;
932: CLOSE c_sample_event;
933:
934: -- dbms_output.put_line('spec_id='||l_spec_id||', sample_event_disp='||l_sample_event_disp||', samples_act='||l_samples_act);

Line 950: RAISE FND_API.G_EXC_ERROR;

946: , p_commit => p_commit
947: , x_return_status => l_return_status);
948:
949: IF l_return_status <> 'S' THEN
950: RAISE FND_API.G_EXC_ERROR;
951: END IF;
952: END IF;
953:
954:

Line 957: IF FND_API.to_boolean(p_commit)

953:
954:
955:
956: -- Standard Check of p_commit.
957: IF FND_API.to_boolean(p_commit)
958: THEN
959: COMMIT WORK;
960: END IF;
961:

Line 970: WHEN FND_API.G_EXC_ERROR THEN

966: x_spec_results_rec := l_spec_results_row;
967:
968:
969: EXCEPTION
970: WHEN FND_API.G_EXC_ERROR THEN
971: ROLLBACK TO RECORD_RESULTS;
972: x_return_status := FND_API.G_RET_STS_ERROR;
973: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
974: , p_count => x_msg_count

Line 972: x_return_status := FND_API.G_RET_STS_ERROR;

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

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

969: EXCEPTION
970: WHEN FND_API.G_EXC_ERROR THEN
971: ROLLBACK TO RECORD_RESULTS;
972: x_return_status := FND_API.G_RET_STS_ERROR;
973: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
974: , p_count => x_msg_count
975: , p_data => x_msg_data
976: );
977:

Line 978: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

974: , p_count => x_msg_count
975: , p_data => x_msg_data
976: );
977:
978: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
979: ROLLBACK TO RECORD_RESULTS;
980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
981: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
982: , p_count => x_msg_count

Line 980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

976: );
977:
978: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
979: ROLLBACK TO RECORD_RESULTS;
980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
981: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
982: , p_count => x_msg_count
983: , p_data => x_msg_data
984: );

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

977:
978: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
979: ROLLBACK TO RECORD_RESULTS;
980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
981: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
982: , p_count => x_msg_count
983: , p_data => x_msg_data
984: );
985:

Line 989: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

985:
986:
987:
988: WHEN OTHERS THEN
989: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
990: ROLLBACK TO RECORD_RESULTS;
991: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
992: , l_api_name
993: );

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

991: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
992: , l_api_name
993: );
994:
995: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
996: , p_count => x_msg_count
997: , p_data => x_msg_data
998: );
999:

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

1019: l_api_name CONSTANT VARCHAR2 (30) := 'ADD_TESTS_TO_SAMPLE';
1020: l_api_version CONSTANT NUMBER := 2.0;
1021: l_msg_count NUMBER :=0;
1022: l_msg_data VARCHAR2(2000);
1023: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1024: l_results_tab GMD_API_PUB.gmd_results_tab;
1025: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
1026: l_spec_results_row GMD_SPEC_RESULTS%ROWTYPE;
1027: l_user_id NUMBER(15);

Line 1050: IF NOT FND_API.Compatible_API_CALL

1046:
1047:
1048: /* Standard call to get for call compatibility. */
1049:
1050: IF NOT FND_API.Compatible_API_CALL
1051: (l_api_version , p_api_version , l_api_name , G_PKG_NAME)
1052: THEN
1053: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1054: END IF;

Line 1053: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1049:
1050: IF NOT FND_API.Compatible_API_CALL
1051: (l_api_version , p_api_version , l_api_name , G_PKG_NAME)
1052: THEN
1053: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1054: END IF;
1055:
1056: /* Initialize message list if p_int_msg_list is set TRUE. */
1057: IF FND_API.to_boolean(p_init_msg_list)

Line 1057: IF FND_API.to_boolean(p_init_msg_list)

1053: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1054: END IF;
1055:
1056: /* Initialize message list if p_int_msg_list is set TRUE. */
1057: IF FND_API.to_boolean(p_init_msg_list)
1058: THEN
1059: FND_MSG_PUB.Initialize;
1060: END IF;
1061:

Line 1064: x_return_status := FND_API.G_RET_STS_SUCCESS;

1060: END IF;
1061:
1062: -- Initialize API return Parameters
1063:
1064: x_return_status := FND_API.G_RET_STS_SUCCESS;
1065: l_results_tab := x_results_tab;
1066: l_spec_results_tab := x_spec_results_tab;
1067:
1068: -- Validate User Name Parameter

Line 1079: RAISE FND_API.G_EXC_ERROR;

1075: THEN
1076: GMD_API_PUB.Log_Message('GMD_INVALID_USER_NAME',
1077: 'l_user_name', p_user_name);
1078:
1079: RAISE FND_API.G_EXC_ERROR;
1080: END IF;
1081:
1082: -- Validate Input Parematers
1083:

Line 1092: RAISE FND_API.G_EXC_ERROR;

1088: -- Validate that composite keys are present
1089:
1090: IF ( p_sample_rec.sample_no is NULL) THEN
1091: GMD_API_PUB.Log_Message('GMD_SAMPLE_NUMBER_REQD');
1092: RAISE FND_API.G_EXC_ERROR;
1093: END IF;
1094:
1095: IF ( p_sample_rec.orgn_code is NULL) THEN
1096: GMD_API_PUB.Log_Message('GMD_SAMPLE_ORGN_CODE_REQD');

Line 1097: RAISE FND_API.G_EXC_ERROR;

1093: END IF;
1094:
1095: IF ( p_sample_rec.orgn_code is NULL) THEN
1096: GMD_API_PUB.Log_Message('GMD_SAMPLE_ORGN_CODE_REQD');
1097: RAISE FND_API.G_EXC_ERROR;
1098: END IF;
1099:
1100: END IF; -- Key Sample values Present
1101:

Line 1107: RAISE FND_API.G_EXC_ERROR;

1103: -- Validate that test id's are present
1104:
1105: IF ( p_test_id_tab.COUNT < 1 ) THEN
1106: GMD_API_PUB.Log_Message('GMD_TEST_ID_TABLE_EMPTY');
1107: RAISE FND_API.G_EXC_ERROR;
1108: END IF;
1109:
1110: -- Validate event spec disp id is present and valid
1111:

Line 1114: RAISE FND_API.G_EXC_ERROR;

1110: -- Validate event spec disp id is present and valid
1111:
1112: IF ( p_event_spec_disp_id is NULL) THEN
1113: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_DISP_NULL');
1114: RAISE FND_API.G_EXC_ERROR;
1115: END IF;
1116:
1117: -- Validate that the event_spec_disp_id is Valid
1118:

Line 1124: RAISE FND_API.G_EXC_ERROR;

1120: FETCH c_check_event_spec INTO l_event_spec_exists;
1121: IF c_check_event_spec%NOTFOUND THEN
1122: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOTFOUND',
1123: 'event_disp', p_event_spec_disp_id);
1124: RAISE FND_API.G_EXC_ERROR;
1125: CLOSE c_check_event_spec;
1126: END IF;
1127: CLOSE c_check_event_spec;
1128:

Line 1143: RAISE FND_API.G_EXC_ERROR;

1139: , x_spec_results_tab => l_spec_results_tab
1140: , x_return_status => l_return_status);
1141:
1142: IF l_return_status <> 'S' THEN
1143: RAISE FND_API.G_EXC_ERROR;
1144: END IF;
1145:
1146:
1147: -- Standard Check of p_commit.

Line 1148: IF FND_API.to_boolean(p_commit)

1144: END IF;
1145:
1146:
1147: -- Standard Check of p_commit.
1148: IF FND_API.to_boolean(p_commit)
1149: THEN
1150: COMMIT WORK;
1151: END IF;
1152:

Line 1161: WHEN FND_API.G_EXC_ERROR THEN

1157: x_spec_results_tab := l_spec_results_tab;
1158:
1159:
1160: EXCEPTION
1161: WHEN FND_API.G_EXC_ERROR THEN
1162: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
1163: x_return_status := FND_API.G_RET_STS_ERROR;
1164: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
1165: , p_count => x_msg_count

Line 1163: x_return_status := FND_API.G_RET_STS_ERROR;

1159:
1160: EXCEPTION
1161: WHEN FND_API.G_EXC_ERROR THEN
1162: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
1163: x_return_status := FND_API.G_RET_STS_ERROR;
1164: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
1165: , p_count => x_msg_count
1166: , p_data => x_msg_data
1167: );

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

1160: EXCEPTION
1161: WHEN FND_API.G_EXC_ERROR THEN
1162: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
1163: x_return_status := FND_API.G_RET_STS_ERROR;
1164: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
1165: , p_count => x_msg_count
1166: , p_data => x_msg_data
1167: );
1168:

Line 1169: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1165: , p_count => x_msg_count
1166: , p_data => x_msg_data
1167: );
1168:
1169: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1170: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
1171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1172: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
1173: , p_count => x_msg_count

Line 1171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1167: );
1168:
1169: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1170: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
1171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1172: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
1173: , p_count => x_msg_count
1174: , p_data => x_msg_data
1175: );

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

1168:
1169: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1170: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
1171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1172: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
1173: , p_count => x_msg_count
1174: , p_data => x_msg_data
1175: );
1176:

Line 1180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1176:
1177:
1178:
1179: WHEN OTHERS THEN
1180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1181: ROLLBACK TO ADD_TESTS_TO_SAMPLE;
1182: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
1183: , l_api_name
1184: );

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

1182: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
1183: , l_api_name
1184: );
1185:
1186: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
1187: , p_count => x_msg_count
1188: , p_data => x_msg_data
1189: );
1190:

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

1194: ( p_results_rec IN GMD_RESULTS_PUB.RESULTS_REC,
1195: x_return_status OUT NOCOPY VARCHAR2
1196: )
1197: IS
1198: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
1199: BEGIN
1200:
1201: -- Set out Variable
1202: x_return_status := l_return_status;

Line 1209: RAISE FND_API.G_EXC_ERROR;

1205: -- Bug 3763419 ; add Guaranteed by Manufacturer
1206: IF p_results_rec.result_value IS NULL AND
1207: p_results_rec.eval_ind NOT IN ('4C', '5O', '1Z') THEN
1208: GMD_API_PUB.Log_Message('GMD_RESULT_VALUE_REQ');
1209: RAISE FND_API.G_EXC_ERROR;
1210: END IF;
1211:
1212: --============================
1213: -- In Spec Value Should either

Line 1219: RAISE FND_API.G_EXC_ERROR;

1215: --============================
1216: IF ( p_results_rec.in_spec IS NOT NULL AND
1217: UPPER(p_results_rec.in_spec) <> 'Y') THEN
1218: GMD_API_PUB.Log_Message('GMD_INVALID_INSPEC_VALUE');
1219: RAISE FND_API.G_EXC_ERROR;
1220: END IF;
1221:
1222: IF p_results_rec.result_id IS NULL THEN
1223:

Line 1230: RAISE FND_API.G_EXC_ERROR;

1226: --============================
1227: IF ( p_results_rec.sample_id is NULL) THEN
1228: IF ( p_results_rec.sample_no is NULL) THEN
1229: GMD_API_PUB.Log_Message('GMD_SAMPLE_NUMBER_REQD');
1230: RAISE FND_API.G_EXC_ERROR;
1231: END IF;
1232:
1233: IF ( p_results_rec.organization_id is NULL) THEN /*NSRIVAST, INVCONV*/
1234: GMD_API_PUB.Log_Message('GMD_SAMPLE_ORGN_CODE_REQD');

Line 1235: RAISE FND_API.G_EXC_ERROR;

1231: END IF;
1232:
1233: IF ( p_results_rec.organization_id is NULL) THEN /*NSRIVAST, INVCONV*/
1234: GMD_API_PUB.Log_Message('GMD_SAMPLE_ORGN_CODE_REQD');
1235: RAISE FND_API.G_EXC_ERROR;
1236: END IF;
1237: END IF;
1238:
1239: --============================

Line 1245: RAISE FND_API.G_EXC_ERROR;

1241: --============================
1242: IF ( p_results_rec.test_id is NULL) THEN
1243: IF ( p_results_rec.test_code is NULL) THEN
1244: GMD_API_PUB.Log_Message('GMD_TEST_ID_CODE_NULL');
1245: RAISE FND_API.G_EXC_ERROR;
1246: END IF;
1247: END IF;
1248:
1249: --============================

Line 1254: RAISE FND_API.G_EXC_ERROR;

1250: -- Test Replicate Cnt
1251: --============================
1252: IF ( p_results_rec.test_replicate_cnt is NULL) THEN
1253: GMD_API_PUB.Log_Message('GMD_TEST_REP_CNT_REQD');
1254: RAISE FND_API.G_EXC_ERROR;
1255: END IF;
1256:
1257: END IF;
1258:

Line 1260: WHEN FND_API.G_EXC_ERROR THEN

1256:
1257: END IF;
1258:
1259: EXCEPTION
1260: WHEN FND_API.G_EXC_ERROR THEN
1261: x_return_status := FND_API.G_RET_STS_ERROR;
1262: WHEN OTHERS THEN
1263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1264: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',

Line 1261: x_return_status := FND_API.G_RET_STS_ERROR;

1257: END IF;
1258:
1259: EXCEPTION
1260: WHEN FND_API.G_EXC_ERROR THEN
1261: x_return_status := FND_API.G_RET_STS_ERROR;
1262: WHEN OTHERS THEN
1263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1264: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',
1265: 'GMD_RESULTS_PUB.VALIDATE_INPUT',

Line 1263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1259: EXCEPTION
1260: WHEN FND_API.G_EXC_ERROR THEN
1261: x_return_status := FND_API.G_RET_STS_ERROR;
1262: WHEN OTHERS THEN
1263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1264: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',
1265: 'GMD_RESULTS_PUB.VALIDATE_INPUT',
1266: 'ERROR',SUBSTR(SQLERRM,1,100),
1267: 'POSITION','010');

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

1275: x_samples_rec OUT NOCOPY GMD_SAMPLES%ROWTYPE,
1276: x_return_status OUT NOCOPY VARCHAR2
1277: )
1278: IS
1279: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
1280: l_tests_rec GMD_QC_TESTS%ROWTYPE;
1281: l_samples_rec GMD_SAMPLES%ROWTYPE;
1282:
1283: BEGIN

Line 1296: RAISE FND_API.G_EXC_ERROR;

1292: IF NOT GMD_QC_TESTS_PVT.fetch_row
1293: ( p_gmd_qc_tests => l_tests_rec,
1294: x_gmd_qc_tests => x_tests_rec
1295: ) THEN
1296: RAISE FND_API.G_EXC_ERROR;
1297: END IF;
1298:
1299: -- Get Sample Record
1300: l_samples_rec.sample_id := p_results_rec.sample_id;

Line 1309: RAISE FND_API.G_EXC_ERROR;

1305: (
1306: p_samples => l_samples_rec,
1307: x_samples => x_samples_rec
1308: ) THEN
1309: RAISE FND_API.G_EXC_ERROR;
1310: END IF;
1311:
1312: IF x_samples_rec.delete_mark = 1 THEN
1313: GMD_API_PUB.Log_Message('GMD_RECORD_DELETE_MARKED',

Line 1317: RAISE FND_API.G_EXC_ERROR;

1313: GMD_API_PUB.Log_Message('GMD_RECORD_DELETE_MARKED',
1314: 'l_table_name', 'GMD_SAMPLES',
1315: 'l_column_name', 'SAMPLE_ID',
1316: 'l_key_value', x_samples_rec.sample_id);
1317: RAISE FND_API.G_EXC_ERROR;
1318: END IF;
1319:
1320: EXCEPTION
1321: WHEN FND_API.G_EXC_ERROR THEN

Line 1321: WHEN FND_API.G_EXC_ERROR THEN

1317: RAISE FND_API.G_EXC_ERROR;
1318: END IF;
1319:
1320: EXCEPTION
1321: WHEN FND_API.G_EXC_ERROR THEN
1322: x_return_status := FND_API.G_RET_STS_ERROR;
1323: WHEN OTHERS THEN
1324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1325: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',

Line 1322: x_return_status := FND_API.G_RET_STS_ERROR;

1318: END IF;
1319:
1320: EXCEPTION
1321: WHEN FND_API.G_EXC_ERROR THEN
1322: x_return_status := FND_API.G_RET_STS_ERROR;
1323: WHEN OTHERS THEN
1324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1325: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',
1326: 'GMD_RESULTS_PUB.GET_RESULT_INFO',

Line 1324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1320: EXCEPTION
1321: WHEN FND_API.G_EXC_ERROR THEN
1322: x_return_status := FND_API.G_RET_STS_ERROR;
1323: WHEN OTHERS THEN
1324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1325: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE',
1326: 'GMD_RESULTS_PUB.GET_RESULT_INFO',
1327: 'ERROR',SUBSTR(SQLERRM,1,100),
1328: 'POSITION','010');