DBA Data[Home] [Help]

APPS.GMD_RESULTS_GRP dependencies on GMD_API_PUB

Line 181: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab

177: p_sample IN GMD_SAMPLES%ROWTYPE
178: , p_migration IN VARCHAR2
179: , x_event_spec_disp OUT NOCOPY GMD_EVENT_SPEC_DISP%ROWTYPE
180: , x_sample_spec_disp OUT NOCOPY GMD_SAMPLE_SPEC_DISP%ROWTYPE
181: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
182: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
183: , x_return_status OUT NOCOPY VARCHAR2
184: ) IS
185:

Line 182: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab

178: , p_migration IN VARCHAR2
179: , x_event_spec_disp OUT NOCOPY GMD_EVENT_SPEC_DISP%ROWTYPE
180: , x_sample_spec_disp OUT NOCOPY GMD_SAMPLE_SPEC_DISP%ROWTYPE
181: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
182: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
183: , x_return_status OUT NOCOPY VARCHAR2
184: ) IS
185:
186: -- Cursors

Line 341: -- GMD_API_PUB.Log_Message('GMD_RETAIN_SAMPLE');

337:
338: -- Not anymore dude?
339:
340:
341: -- GMD_API_PUB.Log_Message('GMD_RETAIN_SAMPLE');
342: -- RAISE FND_API.G_EXC_ERROR;
343: -- END IF;
344:
345: -- Check that we have the Sampling Event

Line 350: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_MISSING');

346: -- Now, even in case where there is no Spec for the sample
347: -- there still should be a sampling event as per new directions.
348: IF (p_sample.sampling_event_id IS NULL) THEN
349: -- I need sampling event to know which Spec is used.
350: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_MISSING');
351: RAISE FND_API.G_EXC_ERROR;
352: END IF;
353:
354: -- Now that we have sampling_event_id, fetch the sampling event record

Line 375: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_DISPOSED',

371: FROM gem_lookups
372: WHERE lookup_type = 'GMD_QC_SAMPLE_DISP'
373: AND lookup_code = l_sampling_event.disposition;
374:
375: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_DISPOSED',
376: 'DISPOSITION', l_meaning);
377: RAISE FND_API.G_EXC_ERROR;
378: END IF;
379:

Line 390: GMD_API_PUB.Log_Message('GMD_SPEC_NOT_FOUND');

386: OPEN c_vrs_vw(l_sampling_event.original_spec_vr_id);
387: FETCH c_vrs_vw INTO l_spec_id;
388: IF c_vrs_vw%NOTFOUND THEN
389: -- Now this can not happen that we have spec_vr_id and there is no Spec
390: GMD_API_PUB.Log_Message('GMD_SPEC_NOT_FOUND');
391: RAISE FND_API.G_EXC_ERROR;
392: END IF;
393: CLOSE c_vrs_vw;
394: END IF;

Line 526: --GMD_API_PUB.Log_Message('Descriptive Flex Field exists.Count ' || l_count);

522: validation_date)
523: THEN
524: FLEX_EXISTS := 1;
525: l_count := fnd_flex_descval.segment_count;
526: --GMD_API_PUB.Log_Message('Descriptive Flex Field exists.Count ' || l_count);
527: ELSE
528: error_segment := FND_FLEX_DESCVAL.error_segment;
529: -- raise errors_received;
530: null ;

Line 537: --GMD_API_PUB.Log_Message('Descriptive Flex Field. Values ' || concatentated_values);

533:
534: if (l_count > 0) then
535: concatentated_values := FND_FLEX_DESCVAL.concatenated_values;
536: concatentated_ids := FND_FLEX_DESCVAL.concatenated_ids;
537: --GMD_API_PUB.Log_Message('Descriptive Flex Field. Values ' || concatentated_values);
538: --GMD_API_PUB.Log_Message('Descriptive Flex Field. IDs ' || concatentated_ids);
539: end if ;
540: -- DESC FLEX Enhancement
541:

Line 538: --GMD_API_PUB.Log_Message('Descriptive Flex Field. IDs ' || concatentated_ids);

534: if (l_count > 0) then
535: concatentated_values := FND_FLEX_DESCVAL.concatenated_values;
536: concatentated_ids := FND_FLEX_DESCVAL.concatenated_ids;
537: --GMD_API_PUB.Log_Message('Descriptive Flex Field. Values ' || concatentated_values);
538: --GMD_API_PUB.Log_Message('Descriptive Flex Field. IDs ' || concatentated_ids);
539: end if ;
540: -- DESC FLEX Enhancement
541:
542:

Line 567: --GMD_API_PUB.Log_Message('FM_SCALE_BAD_UOM_CONV',

563: --IF (temp_qty < 0) THEN
564: --OPEN c_item_no(p_sample.item_id);
565: --FETCH c_item_no INTO l_item_no;
566: --CLOSE c_item_no;
567: --GMD_API_PUB.Log_Message('FM_SCALE_BAD_UOM_CONV',
568: -- 'FROM_UOM',p_sample.sample_uom,
569: -- 'TO_UOM' ,l_spec_test.test_uom,
570: -- 'ITEM_NO' ,l_item_no);
571: --RAISE FND_API.G_EXC_ERROR;

Line 762: GMD_API_PUB.Log_Message('GMD_API_ERROR',

758: WHEN errors_Received then
759: error_msg := fnd_flex_Descval.error_message ;
760: s := 1;
761: e := 200;
762: GMD_API_PUB.Log_Message('GMD_API_ERROR',
763: 'PACKAGE','CREATE_RSLT_AND_SPEC_RSLT_ROWS',
764: 'ERROR', error_msg);
765: WHEN FND_API.G_EXC_ERROR
766: OR e_sampling_event_fetch_error

Line 777: GMD_API_PUB.Log_Message('GMD_API_ERROR',

773: x_return_status := FND_API.G_RET_STS_ERROR ;
774: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
775: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
776: WHEN OTHERS THEN
777: GMD_API_PUB.Log_Message('GMD_API_ERROR',
778: 'PACKAGE','CREATE_RSLT_AND_SPEC_RSLT_ROWS',
779: 'ERROR', SUBSTR(SQLERRM,1,100));
780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
781:

Line 844: GMD_API_PUB.Log_Message('GMD_API_ERROR',

840: x_return_status := FND_API.G_RET_STS_ERROR ;
841: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
842: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
843: WHEN OTHERS THEN
844: GMD_API_PUB.Log_Message('GMD_API_ERROR',
845: 'PACKAGE','DELETE_RSLT_AND_SPEC_RSLT_ROWS',
846: 'ERROR', SUBSTR(SQLERRM,1,100));
847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
848:

Line 953: , x_test_ids OUT NOCOPY GMD_API_PUB.number_tab

949: PROCEDURE compare_rslt_and_spec
950: (
951: p_sample_id IN NUMBER
952: , p_spec_id IN NUMBER
953: , x_test_ids OUT NOCOPY GMD_API_PUB.number_tab
954: , x_return_status OUT NOCOPY VARCHAR2
955: ) IS
956:
957: -- Cursors

Line 997: GMD_API_PUB.Log_Message('GMD_API_ERROR',

993: x_return_status := FND_API.G_RET_STS_ERROR ;
994: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
996: WHEN OTHERS THEN
997: GMD_API_PUB.Log_Message('GMD_API_ERROR',
998: 'PACKAGE','COMPARE_RSLT_AND_SPEC',
999: 'ERROR', SUBSTR(SQLERRM,1,100));
1000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1001:

Line 1057: , x_test_ids OUT NOCOPY GMD_API_PUB.number_tab

1053: PROCEDURE compare_cmpst_rslt_and_spec
1054: (
1055: p_composite_spec_disp_id IN NUMBER
1056: , p_spec_id IN NUMBER
1057: , x_test_ids OUT NOCOPY GMD_API_PUB.number_tab
1058: , x_return_status OUT NOCOPY VARCHAR2
1059: ) IS
1060:
1061: -- Cursors

Line 1101: GMD_API_PUB.Log_Message('GMD_API_ERROR',

1097: x_return_status := FND_API.G_RET_STS_ERROR ;
1098: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1100: WHEN OTHERS THEN
1101: GMD_API_PUB.Log_Message('GMD_API_ERROR',
1102: 'PACKAGE','compare_cmpst_rslt_and_spec',
1103: 'ERROR', SUBSTR(SQLERRM,1,100));
1104: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1105:

Line 1395: , p_test_ids IN GMD_API_PUB.number_tab

1391:
1392: PROCEDURE add_tests_to_sample
1393: (
1394: p_sample IN GMD_SAMPLES%ROWTYPE
1395: , p_test_ids IN GMD_API_PUB.number_tab
1396: , p_event_spec_disp_id IN NUMBER
1397: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1398: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
1399: , x_return_status OUT NOCOPY VARCHAR2

Line 1397: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab

1393: (
1394: p_sample IN GMD_SAMPLES%ROWTYPE
1395: , p_test_ids IN GMD_API_PUB.number_tab
1396: , p_event_spec_disp_id IN NUMBER
1397: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1398: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
1399: , x_return_status OUT NOCOPY VARCHAR2
1400: , p_test_qty IN NUMBER default NULL
1401: , p_test_qty_uom IN VARCHAR2 default NULL

Line 1398: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab

1394: p_sample IN GMD_SAMPLES%ROWTYPE
1395: , p_test_ids IN GMD_API_PUB.number_tab
1396: , p_event_spec_disp_id IN NUMBER
1397: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1398: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
1399: , x_return_status OUT NOCOPY VARCHAR2
1400: , p_test_qty IN NUMBER default NULL
1401: , p_test_qty_uom IN VARCHAR2 default NULL
1402: )

Line 1518: GMD_API_PUB.Log_Message('GMD_CANT_ADD_TEST');

1514: FROM gem_lookups
1515: WHERE lookup_type = 'GMD_QC_SAMPLE_DISP'
1516: AND lookup_code = l_sample_spec_disp; -- 3903309
1517:
1518: GMD_API_PUB.Log_Message('GMD_CANT_ADD_TEST');
1519: RAISE FND_API.G_EXC_ERROR;
1520: END IF;
1521:
1522: -- Fetch the Event Spec Record

Line 1573: GMD_API_PUB.Log_Message('GMD_EXP_TEST_IS_THERE');

1569: IF (l_debug = 'Y') THEN
1570: gmd_debug.put_line('Expression Test is already in the result set. Abort.');
1571: END IF;
1572: CLOSE c_res_test;
1573: GMD_API_PUB.Log_Message('GMD_EXP_TEST_IS_THERE');
1574: RAISE FND_API.G_EXC_ERROR;
1575: END IF;
1576: CLOSE c_res_test; */
1577:

Line 1586: GMD_API_PUB.Log_Message('GMD_REF_TESTS_MISSING');

1582: THEN
1583: IF (l_debug = 'Y') THEN
1584: gmd_debug.put_line('Some of the reference tests are missing from the result set. Abort.');
1585: END IF;
1586: GMD_API_PUB.Log_Message('GMD_REF_TESTS_MISSING');
1587: RAISE FND_API.G_EXC_ERROR;
1588: END IF;
1589:
1590: END IF; -- l_test_type = 'E'

Line 1845: GMD_API_PUB.Log_Message('GMD_API_ERROR',

1841: x_return_status := FND_API.G_RET_STS_ERROR ;
1842: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1844: WHEN OTHERS THEN
1845: GMD_API_PUB.Log_Message('GMD_API_ERROR',
1846: 'PACKAGE','ADD_TESTS_TO_SAMPLE',
1847: 'ERROR', SUBSTR(SQLERRM,1,100));
1848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1849:

Line 1990: p_sample_ids IN GMD_API_PUB.number_tab

1986: --+========================================================================+
1987: -- End of comments
1988: PROCEDURE add_test_to_samples
1989: (
1990: p_sample_ids IN GMD_API_PUB.number_tab
1991: , p_test_id IN NUMBER
1992: , p_event_spec_disp_id IN NUMBER
1993: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1994: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab

Line 1993: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab

1989: (
1990: p_sample_ids IN GMD_API_PUB.number_tab
1991: , p_test_id IN NUMBER
1992: , p_event_spec_disp_id IN NUMBER
1993: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1994: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
1995: , x_return_status OUT NOCOPY VARCHAR2
1996: , p_test_qty IN NUMBER DEFAULT NULL
1997: , p_test_qty_uom IN VARCHAR2 DEFAULT NULL

Line 1994: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab

1990: p_sample_ids IN GMD_API_PUB.number_tab
1991: , p_test_id IN NUMBER
1992: , p_event_spec_disp_id IN NUMBER
1993: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1994: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
1995: , x_return_status OUT NOCOPY VARCHAR2
1996: , p_test_qty IN NUMBER DEFAULT NULL
1997: , p_test_qty_uom IN VARCHAR2 DEFAULT NULL
1998: )

Line 2003: l_test_ids GMD_API_PUB.number_tab;

1999: IS
2000:
2001: -- Local Variables
2002: l_sample GMD_SAMPLES%ROWTYPE;
2003: l_test_ids GMD_API_PUB.number_tab;
2004: l_results_tab GMD_API_PUB.gmd_results_tab;
2005: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
2006:
2007: l_return_status VARCHAR2(1);

Line 2004: l_results_tab GMD_API_PUB.gmd_results_tab;

2000:
2001: -- Local Variables
2002: l_sample GMD_SAMPLES%ROWTYPE;
2003: l_test_ids GMD_API_PUB.number_tab;
2004: l_results_tab GMD_API_PUB.gmd_results_tab;
2005: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
2006:
2007: l_return_status VARCHAR2(1);
2008:

Line 2005: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;

2001: -- Local Variables
2002: l_sample GMD_SAMPLES%ROWTYPE;
2003: l_test_ids GMD_API_PUB.number_tab;
2004: l_results_tab GMD_API_PUB.gmd_results_tab;
2005: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
2006:
2007: l_return_status VARCHAR2(1);
2008:
2009: BEGIN

Line 2067: GMD_API_PUB.Log_Message('GMD_API_ERROR',

2063: x_return_status := FND_API.G_RET_STS_ERROR ;
2064: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2065: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2066: WHEN OTHERS THEN
2067: GMD_API_PUB.Log_Message('GMD_API_ERROR',
2068: 'PACKAGE','ADD_TEST_TO_SAMPLES',
2069: 'ERROR', SUBSTR(SQLERRM,1,100));
2070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2071:

Line 2241: l_test_ids GMD_API_PUB.number_tab;

2237:
2238: l_change_disp_to VARCHAR2(3);
2239: l_message_data VARCHAR2(2000);
2240:
2241: l_test_ids GMD_API_PUB.number_tab;
2242: l_results_tab GMD_API_PUB.gmd_results_tab;
2243: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
2244:
2245: l_event_spec_disp GMD_EVENT_SPEC_DISP%ROWTYPE;

Line 2242: l_results_tab GMD_API_PUB.gmd_results_tab;

2238: l_change_disp_to VARCHAR2(3);
2239: l_message_data VARCHAR2(2000);
2240:
2241: l_test_ids GMD_API_PUB.number_tab;
2242: l_results_tab GMD_API_PUB.gmd_results_tab;
2243: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
2244:
2245: l_event_spec_disp GMD_EVENT_SPEC_DISP%ROWTYPE;
2246: l_sample_spec_disp GMD_SAMPLE_SPEC_DISP%ROWTYPE;

Line 2243: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;

2239: l_message_data VARCHAR2(2000);
2240:
2241: l_test_ids GMD_API_PUB.number_tab;
2242: l_results_tab GMD_API_PUB.gmd_results_tab;
2243: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
2244:
2245: l_event_spec_disp GMD_EVENT_SPEC_DISP%ROWTYPE;
2246: l_sample_spec_disp GMD_SAMPLE_SPEC_DISP%ROWTYPE;
2247: l_spec_result GMD_SPEC_RESULTS%ROWTYPE;

Line 2313: GMD_API_PUB.Log_Message('GMD_RETAIN_SAMPLE');

2309: -- Bug 3079877: Check that sample is not "Planning"
2310: IF (l_sample.sample_disposition = '0RT')
2311: AND (l_sample.sample_disposition = '0PL') THEN
2312: -- For retain sample no comparison, please!
2313: GMD_API_PUB.Log_Message('GMD_RETAIN_SAMPLE');
2314: IF (l_debug = 'Y') THEN
2315: gmd_debug.put_line(' MAKE_TARGET_SPEC_THE_BASE_SPEC For Retain or Planned sample - no comparison ');
2316: END IF;
2317:

Line 2326: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_MISSING');

2322: -- Check that we have the Sampling Event
2323: -- Now, even in case where there is no Spec for the sample
2324: -- there still should be a sampling event as per new directions.
2325: IF (l_sample.sampling_event_id IS NULL) THEN
2326: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_MISSING');
2327: IF (l_debug = 'Y') THEN
2328: gmd_debug.put_line(' MAKE_TARGET_SPEC_THE_BASE_SPEC GMD_SAMPLING_EVENT_MISSING ');
2329: END IF;
2330:

Line 2776: GMD_API_PUB.Log_Message('GMD_API_ERROR',

2772:
2773: IF (l_debug = 'Y') THEN
2774: gmd_debug.put_line('Leaving Procedure - MAKE_TARGET_SPEC_THE_BASE_SPEC with return status for OTHERS of unexpected ERROR ');
2775: END IF;
2776: GMD_API_PUB.Log_Message('GMD_API_ERROR',
2777: 'PACKAGE','MAKE_TARGET_SPEC_THE_BASE_SPEC',
2778: 'ERROR', SUBSTR(SQLERRM,1,100));
2779: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2780:

Line 2835: l_sample_ids GMD_API_PUB.number_tab;

2831: ;
2832:
2833: -- Local Variables
2834: l_sampling_event_id NUMBER;
2835: l_sample_ids GMD_API_PUB.number_tab;
2836: l_return_status VARCHAR2(1);
2837:
2838: BEGIN
2839:

Line 2852: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_NOT_FOUND');

2848: OPEN c_get_se_id (p_composite_spec_disp_id);
2849: FETCH c_get_se_id INTO l_sampling_event_id;
2850: IF c_get_se_id%NOTFOUND THEN
2851: CLOSE c_get_se_id;
2852: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_NOT_FOUND');
2853: RAISE FND_API.G_EXC_ERROR;
2854: END IF;
2855: CLOSE c_get_se_id;
2856:

Line 2876: GMD_API_PUB.Log_Message('GMD_NO_SAMPLE_TO_COMPOSITE');

2872: END IF;
2873:
2874: -- If the no of samples count is zero then error out
2875: IF (l_sample_ids.COUNT = 0) THEN
2876: GMD_API_PUB.Log_Message('GMD_NO_SAMPLE_TO_COMPOSITE');
2877: RAISE FND_API.G_EXC_ERROR;
2878: END IF;
2879:
2880: -- Now call "make_target_spec_the_base_spec" for each sample ID

Line 2917: GMD_API_PUB.Log_Message('GMD_API_ERROR',

2913: x_return_status := FND_API.G_RET_STS_ERROR ;
2914: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2915: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2916: WHEN OTHERS THEN
2917: GMD_API_PUB.Log_Message('GMD_API_ERROR',
2918: 'PACKAGE','USE_TARGET_SPEC_FOR_CMPST_RSLT',
2919: 'ERROR', SUBSTR(SQLERRM,1,100));
2920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2921:

Line 2990: x_test_ids GMD_API_PUB.number_tab;

2986: l_test_id NUMBER;
2987:
2988: l_results_rec_tbl GMD_RESULTS_GRP.gmd_results_rec_tbl;
2989:
2990: x_test_ids GMD_API_PUB.number_tab;
2991: l_sample_id GMD_API_PUB.number_tab;
2992: return_status VARCHAR2(1);
2993:
2994: /* Cursors */

Line 2991: l_sample_id GMD_API_PUB.number_tab;

2987:
2988: l_results_rec_tbl GMD_RESULTS_GRP.gmd_results_rec_tbl;
2989:
2990: x_test_ids GMD_API_PUB.number_tab;
2991: l_sample_id GMD_API_PUB.number_tab;
2992: return_status VARCHAR2(1);
2993:
2994: /* Cursors */
2995:

Line 3343: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3339: x_return_status := FND_API.G_RET_STS_ERROR ;
3340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3342: WHEN OTHERS THEN
3343: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3344: 'PACKAGE','GET_SAMPLE_IDS_FOR_SE',
3345: 'ERROR', SUBSTR(SQLERRM,1,100));
3346: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3347:

Line 3408: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');

3404: x_composite_exist := 'N';
3405: x_composite_valid := 'N';
3406:
3407: IF (p_sampling_event_id IS NULL AND p_event_spec_disp_id IS NULL) THEN
3408: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
3409: RAISE FND_API.G_EXC_ERROR;
3410: END IF;
3411:
3412: IF (p_event_spec_disp_id IS NULL) THEN

Line 3415: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOT_FOUND');

3411:
3412: IF (p_event_spec_disp_id IS NULL) THEN
3413: l_event_spec_disp_id := get_current_event_spec_disp_id(p_sampling_event_id);
3414: IF (l_event_spec_disp_id IS NULL) THEN
3415: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOT_FOUND');
3416: RAISE FND_API.G_EXC_ERROR;
3417: END IF;
3418: ELSE
3419: l_event_spec_disp_id := p_event_spec_disp_id;

Line 3449: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_NOT_FOUND');

3445: OPEN c_composite_valid(p_sampling_event_id);
3446: FETCH c_composite_valid INTO l_recomposite_ind;
3447: IF c_composite_valid%NOTFOUND THEN
3448: CLOSE c_composite_valid;
3449: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_NOT_FOUND');
3450: RAISE FND_API.G_EXC_ERROR;
3451: END IF;
3452: CLOSE c_composite_valid;
3453:

Line 3478: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3474: x_return_status := FND_API.G_RET_STS_ERROR ;
3475: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3477: WHEN OTHERS THEN
3478: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3479: 'PACKAGE','GET_SAMPLE_IDS_FOR_SE',
3480: 'ERROR', SUBSTR(SQLERRM,1,100));
3481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3482:

Line 3529: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');

3525: -- Initialize API return status to success
3526: x_return_status := FND_API.G_RET_STS_SUCCESS;
3527:
3528: IF (p_sampling_event_id IS NULL AND p_event_spec_disp_id IS NULL) THEN
3529: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
3530: RAISE FND_API.G_EXC_ERROR;
3531: END IF;
3532:
3533: IF (p_event_spec_disp_id IS NULL) THEN

Line 3536: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOT_FOUND');

3532:
3533: IF (p_event_spec_disp_id IS NULL) THEN
3534: l_event_spec_disp_id := get_current_event_spec_disp_id(p_sampling_event_id);
3535: IF (l_event_spec_disp_id IS NULL) THEN
3536: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOT_FOUND');
3537: RAISE FND_API.G_EXC_ERROR;
3538: END IF;
3539: ELSE
3540: l_event_spec_disp_id := p_event_spec_disp_id;

Line 3563: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3559: x_return_status := FND_API.G_RET_STS_ERROR ;
3560: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3562: WHEN OTHERS THEN
3563: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3564: 'PACKAGE','GET_SAMPLE_IDS_FOR_SE',
3565: 'ERROR', SUBSTR(SQLERRM,1,100));
3566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3567:

Line 3615: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');

3611: -- Initialize API return status to success
3612: x_return_status := FND_API.G_RET_STS_SUCCESS;
3613:
3614: IF (p_result_id IS NULL OR p_event_spec_disp_id IS NULL) THEN
3615: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
3616: RAISE FND_API.G_EXC_ERROR;
3617: END IF;
3618:
3619: -- See if we have the composite for the result

Line 3642: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3638: x_return_status := FND_API.G_RET_STS_ERROR ;
3639: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3641: WHEN OTHERS THEN
3642: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3643: 'PACKAGE','GET_SAMPLE_IDS_FOR_SE',
3644: 'ERROR', SUBSTR(SQLERRM,1,100));
3645: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3646:

Line 3674: , x_sample_ids OUT NOCOPY GMD_API_PUB.number_tab

3670:
3671: PROCEDURE get_sample_ids_for_se
3672: (
3673: p_sampling_event_id IN NUMBER
3674: , x_sample_ids OUT NOCOPY GMD_API_PUB.number_tab
3675: , x_return_status OUT NOCOPY VARCHAR2
3676: )
3677: IS
3678:

Line 3727: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3723: x_return_status := FND_API.G_RET_STS_ERROR ;
3724: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3725: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3726: WHEN OTHERS THEN
3727: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3728: 'PACKAGE','GET_SAMPLE_IDS_FOR_SE',
3729: 'ERROR', SUBSTR(SQLERRM,1,100));
3730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3731:

Line 3776: p_sample_ids IN GMD_API_PUB.number_tab

3772: -- End of comments
3773:
3774: PROCEDURE populate_result_data_points
3775: (
3776: p_sample_ids IN GMD_API_PUB.number_tab
3777: , p_event_spec_disp_id IN NUMBER
3778: , x_return_status OUT NOCOPY VARCHAR2
3779: )
3780: IS

Line 3851: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3847: x_return_status := FND_API.G_RET_STS_ERROR ;
3848: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3849: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3850: WHEN OTHERS THEN
3851: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3852: 'PACKAGE','POPULATE_RESULT_DATA_POINTS',
3853: 'ERROR', SUBSTR(SQLERRM,1,100));
3854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3855:

Line 4003: GMD_API_PUB.Log_Message('GMD_SPEC_NOT_FOUND');

3999: OPEN c_spec_id(p_event_spec_disp_id);
4000: FETCH c_spec_id INTO l_spec_id;
4001: IF c_spec_id%NOTFOUND THEN
4002: CLOSE c_spec_id;
4003: GMD_API_PUB.Log_Message('GMD_SPEC_NOT_FOUND');
4004: END IF;
4005: CLOSE c_spec_id;
4006:
4007: IF (l_debug = 'Y') THEN

Line 4291: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4287: x_return_status := FND_API.G_RET_STS_ERROR ;
4288: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4289: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4290: WHEN OTHERS THEN
4291: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4292: 'PACKAGE','CREATE_COMPOSITE_ROWS',
4293: 'ERROR', SUBSTR(SQLERRM,1,100));
4294: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4295:

Line 4371: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4367: x_return_status := FND_API.G_RET_STS_ERROR ;
4368: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4369: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4370: WHEN OTHERS THEN
4371: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4372: 'PACKAGE','QC_MEAN',
4373: 'ERROR', SUBSTR(SQLERRM,1,100));
4374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4375:

Line 4552: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4548: x_return_status := FND_API.G_RET_STS_ERROR ;
4549: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4550: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4551: WHEN OTHERS THEN
4552: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4553: 'PACKAGE','qc_median',
4554: 'ERROR', SUBSTR(SQLERRM,1,100));
4555: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4556:

Line 4707: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4703: x_return_status := FND_API.G_RET_STS_ERROR ;
4704: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4705: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4706: WHEN OTHERS THEN
4707: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4708: 'PACKAGE','QC_MODE',
4709: 'ERROR', SUBSTR(SQLERRM,1,100));
4710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4711:

Line 4801: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4797: x_return_status := FND_API.G_RET_STS_ERROR ;
4798: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4800: WHEN OTHERS THEN
4801: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4802: 'PACKAGE','QC_HIGH',
4803: 'ERROR', SUBSTR(SQLERRM,1,100));
4804: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4805:

Line 4896: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4892: x_return_status := FND_API.G_RET_STS_ERROR ;
4893: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4894: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4895: WHEN OTHERS THEN
4896: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4897: 'PACKAGE','QC_LOW',
4898: 'ERROR', SUBSTR(SQLERRM,1,100));
4899: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4900:

Line 4977: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4973: x_return_status := FND_API.G_RET_STS_ERROR ;
4974: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4975: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4976: WHEN OTHERS THEN
4977: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4978: 'PACKAGE','qc_standard_deviation',
4979: 'ERROR', SUBSTR(SQLERRM,1,100));
4980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4981:

Line 5027: x_test_ids GMD_API_PUB.number_tab;

5023: l_median_char VARCHAR2(80);
5024:
5025: l_comres_tab GMD_RESULTS_GRP.gmd_comres_tab;
5026: return_status VARCHAR2(1);
5027: x_test_ids GMD_API_PUB.number_tab;
5028:
5029:
5030: -- Cursors
5031:

Line 5279: GMD_API_PUB.Log_Message('GMD_QM_INV_REASON_CODE');

5275: OPEN Cur_quality_config(p_organization_id);
5276: FETCH Cur_quality_config INTO l_reason_id ;
5277: IF Cur_quality_config%NOTFOUND THEN -- #1
5278: CLOSE Cur_quality_config;
5279: GMD_API_PUB.Log_Message('GMD_QM_INV_REASON_CODE');
5280: RAISE FND_API.G_EXC_ERROR;
5281: END IF; -- #1
5282: CLOSE Cur_quality_config;
5283:

Line 5307: GMD_API_PUB.Log_Message(l_message_data);

5303: , x_return_status => x_return_status
5304: , x_message_data => l_message_data );
5305:
5306: IF x_return_status <> 'S' THEN -- #4
5307: GMD_API_PUB.Log_Message(l_message_data);
5308: RAISE FND_API.G_EXC_ERROR;
5309: END IF; -- #4
5310: END IF; -- #3
5311:

Line 5323: GMD_API_PUB.Log_Message('GMD_API_ERROR',

5319: x_return_status := FND_API.G_RET_STS_ERROR ;
5320: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5321: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5322: WHEN OTHERS THEN
5323: GMD_API_PUB.Log_Message('GMD_API_ERROR',
5324: 'PACKAGE','CHANGE_LOT_STATUS','ERROR', SUBSTR(SQLERRM,1,100));
5325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5326: END change_lot_status;
5327:

Line 5485: GMD_API_PUB.Log_Message('GMD_API_ERROR',

5481: x_return_status := FND_API.G_RET_STS_ERROR ;
5482: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5483: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5484: WHEN OTHERS THEN
5485: GMD_API_PUB.Log_Message('GMD_API_ERROR',
5486: 'PACKAGE','CHECK_EXPERIMENTAL_ERROR','ERROR', SUBSTR(SQLERRM,1,100));
5487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5488: END check_experimental_error;
5489:

Line 5655: GMD_API_PUB.Log_Message('GMD', 'QC_NOTNUMERIC');

5651: --#. Ensure the value is numeric. If not, return user to field
5652: --#. Apply decimal precision.
5653: --#. =========================================================
5654: IF NOT (is_value_numeric (p_result_rec.result)) THEN
5655: GMD_API_PUB.Log_Message('GMD', 'QC_NOTNUMERIC');
5656: RAISE FND_API.G_EXC_ERROR;
5657: END IF;
5658:
5659: L_num_result := ROUND(to_number(p_result_rec.result) ,

Line 5681: GMD_API_PUB.Log_Message('GMD', 'NOT_IN_RANGE');

5677: , p_st_max => NULL
5678: , p_t_min => p_result_rec.min_num
5679: , p_t_max => p_result_rec.max_num
5680: ) THEN
5681: GMD_API_PUB.Log_Message('GMD', 'NOT_IN_RANGE');
5682: --IF p_result_rec.test_type = 'E' THEN --Bug#6774613 QZENG
5683: -- if expression give warning, not error
5684: x_return_status := 'E'; -- expected error
5685: --ELSE

Line 5790: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');

5786:
5787: IF (NOT isvalid_resource(p_result_rec.lab_organization_id,
5788: p_result_rec.planned_resource,
5789: p_result_rec.planned_resource_instance)) THEN
5790: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
5791: RAISE FND_API.G_EXC_ERROR;
5792: END IF;
5793:
5794: IF (NOT isvalid_resource(p_result_rec.lab_organization_id,

Line 5797: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');

5793:
5794: IF (NOT isvalid_resource(p_result_rec.lab_organization_id,
5795: p_result_rec.actual_resource,
5796: p_result_rec.actual_resource_instance)) THEN
5797: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
5798: RAISE FND_API.G_EXC_ERROR;
5799: END IF;
5800:
5801: IF (l_debug = 'Y') THEN

Line 5814: GMD_API_PUB.Log_Message('GMD_API_ERROR',

5810: x_return_status := FND_API.G_RET_STS_ERROR ;
5811: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5812: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5813: WHEN OTHERS THEN
5814: GMD_API_PUB.Log_Message('GMD_API_ERROR',
5815: 'PACKAGE','VALIDATE_RESULT','ERROR', SUBSTR(SQLERRM,1,100));
5816: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5817: END validate_result;
5818:

Line 5862: GMD_API_PUB.Log_message ('GMD', 'GMD_QM_EVAL_BLANK_RESULT');

5858: IF (p_result_value IS NULL AND
5859: p_evaluation_ind IS NOT NULL AND
5860: p_evaluation_ind NOT IN ('4C', '5O', '1Z'))
5861: THEN
5862: GMD_API_PUB.Log_message ('GMD', 'GMD_QM_EVAL_BLANK_RESULT');
5863: RAISE FND_API.G_EXC_ERROR;
5864: END IF;
5865:
5866: IF nvl(p_in_spec_ind, 'N') = 'Y' THEN

Line 5869: GMD_API_PUB.Log_Message('GMD', 'GMD_QM_EVAL_NO_EXP_ERROR');

5865:
5866: IF nvl(p_in_spec_ind, 'N') = 'Y' THEN
5867: -- Result is IN-SPEC
5868: IF (p_evaluation_ind = '3E') THEN
5869: GMD_API_PUB.Log_Message('GMD', 'GMD_QM_EVAL_NO_EXP_ERROR');
5870: RAISE FND_API.G_EXC_ERROR;
5871: END IF;
5872: ELSE
5873: -- else not in spec

Line 5876: GMD_API_PUB.Log_Message('GMD', 'GMD_QM_EVAL_OUT_OF_SPEC');

5872: ELSE
5873: -- else not in spec
5874: -- Bug 3763419 - added GUARANTEED BY MANUFACTURER
5875: IF (p_evaluation_ind NOT IN ('1V', '2R', '4C', '5O', '1Z')) THEN
5876: GMD_API_PUB.Log_Message('GMD', 'GMD_QM_EVAL_OUT_OF_SPEC');
5877: RAISE FND_API.G_EXC_ERROR;
5878: END IF;
5879: END IF;
5880:

Line 5887: GMD_API_PUB.Log_Message('GMD_API_ERROR',

5883: x_return_status := FND_API.G_RET_STS_ERROR ;
5884: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5886: WHEN OTHERS THEN
5887: GMD_API_PUB.Log_Message('GMD_API_ERROR',
5888: 'PACKAGE','VALIDATE_EVALUATION_IND','ERROR', SUBSTR(SQLERRM,1,100));
5889: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5890: END validate_evaluation_ind;
5891:

Line 6073: l_samples GMD_API_PUB.number_tab;

6069: l_display_value NUMBER;
6070: l_report_value NUMBER;
6071: l_ref_tests NUMBER := 0; --Bug#5097709
6072: l_ref_count NUMBER := 0;
6073: l_samples GMD_API_PUB.number_tab;
6074:
6075: BEGIN
6076:
6077: -- Initialize API return status to success

Line 6317: GMD_API_PUB.Log_Message('GMD_API_ERROR',

6313: x_return_status := FND_API.G_RET_STS_ERROR ;
6314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6315: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6316: WHEN OTHERS THEN
6317: GMD_API_PUB.Log_Message('GMD_API_ERROR',
6318: 'PACKAGE','CALC_EXPRESSION','ERROR', SUBSTR(SQLERRM,1,100));
6319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6320: END calc_expression;
6321:

Line 6712: GMD_API_PUB.Log_Message('GMD_API_ERROR',

6708: x_return_status := FND_API.G_RET_STS_ERROR ;
6709: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6711: WHEN OTHERS THEN
6712: GMD_API_PUB.Log_Message('GMD_API_ERROR',
6713: 'PACKAGE','change_sample_disposition','ERROR', SUBSTR(SQLERRM,1,100));
6714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6715:
6716: END change_sample_disposition;

Line 6846: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');

6842: OPEN c_sample_dtl(p_sample_id);
6843: FETCH c_sample_dtl INTO l_sample_rec;
6844: IF c_sample_dtl%NOTFOUND THEN
6845: CLOSE c_sample_dtl;
6846: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
6847: RAISE FND_API.G_EXC_ERROR;
6848: END IF;
6849: CLOSE c_sample_dtl;
6850:

Line 7146: GMD_API_PUB.Log_Message(l_message_data);

7142: , p_to_disposition => l_change_disp_to
7143: , x_return_status => x_return_status
7144: , x_message_data => l_message_data);
7145: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
7146: GMD_API_PUB.Log_Message(l_message_data);
7147: RAISE FND_API.G_EXC_ERROR;
7148: END IF;
7149:
7150: -- The above procedure has changed the Sample Spec Disposition.

Line 7192: GMD_API_PUB.Log_Message('GMD_API_ERROR',

7188: x_return_status := FND_API.G_RET_STS_ERROR ;
7189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7190: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7191: WHEN OTHERS THEN
7192: GMD_API_PUB.Log_Message('GMD_API_ERROR',
7193: 'PACKAGE','CHANGE_DISP_FOR_AUTO_LOT','ERROR', SUBSTR(SQLERRM,1,100));
7194: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7195:
7196: END change_disp_for_auto_lot;

Line 7260: l_sample_ids GMD_API_PUB.number_tab;

7256: l_sampling_event GMD_SAMPLING_EVENTS%ROWTYPE;
7257: l_in_sampling_event GMD_SAMPLING_EVENTS%ROWTYPE;
7258:
7259: l_spec_dtl c_spec_dtl%ROWTYPE;
7260: l_sample_ids GMD_API_PUB.number_tab;
7261: l_update_disp_rec GMD_SAMPLES_GRP.update_disp_rec;
7262:
7263: l_event_spec_disp_id NUMBER;
7264: l_composite_spec_disp_id NUMBER;

Line 7331: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOT_FOUND');

7327:
7328: l_event_spec_disp_id := get_current_event_spec_disp_id
7329: (l_sampling_event.sampling_event_id);
7330: IF (l_event_spec_disp_id IS NULL) THEN
7331: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOT_FOUND');
7332: RAISE FND_API.G_EXC_ERROR;
7333: END IF;
7334:
7335: l_composite_exist := 'N';

Line 7498: GMD_API_PUB.Log_Message(l_message_data);

7494: , p_to_disposition => l_change_disp_to
7495: , x_return_status => l_return_status
7496: , x_message_data => l_message_data);
7497: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
7498: GMD_API_PUB.Log_Message(l_message_data);
7499: RAISE FND_API.G_EXC_ERROR;
7500: END IF;
7501:
7502: -- Disposition has been changed so now change the Lot Status in Inventory

Line 7518: GMD_API_PUB.Log_Message('GMD_QM_INV_REASON_CODE');

7514: OPEN Cur_quality_config(l_organization_id);
7515: FETCH Cur_quality_config INTO l_reason_id ;
7516: IF Cur_quality_config%NOTFOUND THEN
7517: CLOSE Cur_quality_config;
7518: GMD_API_PUB.Log_Message('GMD_QM_INV_REASON_CODE');
7519: RAISE FND_API.G_EXC_ERROR;
7520: END IF;
7521: CLOSE Cur_quality_config;
7522:

Line 7540: GMD_API_PUB.Log_Message(l_message_data);

7536: , x_message_data => l_message_data );
7537:
7538:
7539: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
7540: GMD_API_PUB.Log_Message(l_message_data);
7541: RAISE FND_API.G_EXC_ERROR;
7542: END IF;
7543:
7544: END IF; -- l_lot_status IS NOT NULL

Line 7568: GMD_API_PUB.Log_Message('GMD_API_ERROR',

7564: x_return_status := FND_API.G_RET_STS_ERROR ;
7565: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7567: WHEN OTHERS THEN
7568: GMD_API_PUB.Log_Message('GMD_API_ERROR',
7569: 'PACKAGE','change_sample_disposition','ERROR', SUBSTR(SQLERRM,1,100));
7570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7571: END composite_and_change_lot;
7572:

Line 7639: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','update_exptest_value_null','ERROR', SUBSTR(SQLERRM,1,100));

7635: END LOOP;
7636:
7637: EXCEPTION
7638: WHEN OTHERS THEN
7639: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','update_exptest_value_null','ERROR', SUBSTR(SQLERRM,1,100));
7640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7641:
7642: END update_exptest_value_null;
7643:

Line 7646: p_sample_ids IN GMD_API_PUB.number_tab

7642: END update_exptest_value_null;
7643:
7644: PROCEDURE populate_result_data_points_r -- 14021970 new procedure
7645: (
7646: p_sample_ids IN GMD_API_PUB.number_tab
7647: , p_event_spec_disp_id IN NUMBER
7648: , p_test_replicate_cnt IN NUMBER
7649: , x_return_status OUT NOCOPY VARCHAR2
7650: )

Line 7719: GMD_API_PUB.Log_Message('GMD_API_ERROR',

7715: x_return_status := FND_API.G_RET_STS_ERROR ;
7716: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7718: WHEN OTHERS THEN
7719: GMD_API_PUB.Log_Message('GMD_API_ERROR',
7720: 'PACKAGE','POPULATE_RESULT_DATA_POINTS',
7721: 'ERROR', SUBSTR(SQLERRM,1,100));
7722: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7723: