DBA Data[Home] [Help]

APPS.GMD_RESULTS_GRP dependencies on GMD_API_PUB

Line 135: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab

131: p_sample IN GMD_SAMPLES%ROWTYPE
132: , p_migration IN VARCHAR2
133: , x_event_spec_disp OUT NOCOPY GMD_EVENT_SPEC_DISP%ROWTYPE
134: , x_sample_spec_disp OUT NOCOPY GMD_SAMPLE_SPEC_DISP%ROWTYPE
135: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
136: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
137: , x_return_status OUT NOCOPY VARCHAR2
138: ) IS
139:

Line 136: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab

132: , p_migration IN VARCHAR2
133: , x_event_spec_disp OUT NOCOPY GMD_EVENT_SPEC_DISP%ROWTYPE
134: , x_sample_spec_disp OUT NOCOPY GMD_SAMPLE_SPEC_DISP%ROWTYPE
135: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
136: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
137: , x_return_status OUT NOCOPY VARCHAR2
138: ) IS
139:
140: -- Cursors

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

289:
290: -- Not anymore dude?
291:
292:
293: -- GMD_API_PUB.Log_Message('GMD_RETAIN_SAMPLE');
294: -- RAISE FND_API.G_EXC_ERROR;
295: -- END IF;
296:
297: -- Check that we have the Sampling Event

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

298: -- Now, even in case where there is no Spec for the sample
299: -- there still should be a sampling event as per new directions.
300: IF (p_sample.sampling_event_id IS NULL) THEN
301: -- I need sampling event to know which Spec is used.
302: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_MISSING');
303: RAISE FND_API.G_EXC_ERROR;
304: END IF;
305:
306: -- Now that we have sampling_event_id, fetch the sampling event record

Line 327: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_DISPOSED',

323: FROM gem_lookups
324: WHERE lookup_type = 'GMD_QC_SAMPLE_DISP'
325: AND lookup_code = l_sampling_event.disposition;
326:
327: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_DISPOSED',
328: 'DISPOSITION', l_meaning);
329: RAISE FND_API.G_EXC_ERROR;
330: END IF;
331:

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

338: OPEN c_vrs_vw(l_sampling_event.original_spec_vr_id);
339: FETCH c_vrs_vw INTO l_spec_id;
340: IF c_vrs_vw%NOTFOUND THEN
341: -- Now this can not happen that we have spec_vr_id and there is no Spec
342: GMD_API_PUB.Log_Message('GMD_SPEC_NOT_FOUND');
343: RAISE FND_API.G_EXC_ERROR;
344: END IF;
345: CLOSE c_vrs_vw;
346: END IF;

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

474: validation_date)
475: THEN
476: FLEX_EXISTS := 1;
477: l_count := fnd_flex_descval.segment_count;
478: --GMD_API_PUB.Log_Message('Descriptive Flex Field exists.Count ' || l_count);
479: ELSE
480: error_segment := FND_FLEX_DESCVAL.error_segment;
481: -- raise errors_received;
482: null ;

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

485:
486: if (l_count > 0) then
487: concatentated_values := FND_FLEX_DESCVAL.concatenated_values;
488: concatentated_ids := FND_FLEX_DESCVAL.concatenated_ids;
489: --GMD_API_PUB.Log_Message('Descriptive Flex Field. Values ' || concatentated_values);
490: --GMD_API_PUB.Log_Message('Descriptive Flex Field. IDs ' || concatentated_ids);
491: end if ;
492: -- DESC FLEX Enhancement
493:

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

486: if (l_count > 0) then
487: concatentated_values := FND_FLEX_DESCVAL.concatenated_values;
488: concatentated_ids := FND_FLEX_DESCVAL.concatenated_ids;
489: --GMD_API_PUB.Log_Message('Descriptive Flex Field. Values ' || concatentated_values);
490: --GMD_API_PUB.Log_Message('Descriptive Flex Field. IDs ' || concatentated_ids);
491: end if ;
492: -- DESC FLEX Enhancement
493:
494:

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

515: --IF (temp_qty < 0) THEN
516: --OPEN c_item_no(p_sample.item_id);
517: --FETCH c_item_no INTO l_item_no;
518: --CLOSE c_item_no;
519: --GMD_API_PUB.Log_Message('FM_SCALE_BAD_UOM_CONV',
520: -- 'FROM_UOM',p_sample.sample_uom,
521: -- 'TO_UOM' ,l_spec_test.test_uom,
522: -- 'ITEM_NO' ,l_item_no);
523: --RAISE FND_API.G_EXC_ERROR;

Line 709: GMD_API_PUB.Log_Message('GMD_API_ERROR',

705: WHEN errors_Received then
706: error_msg := fnd_flex_Descval.error_message ;
707: s := 1;
708: e := 200;
709: GMD_API_PUB.Log_Message('GMD_API_ERROR',
710: 'PACKAGE','CREATE_RSLT_AND_SPEC_RSLT_ROWS',
711: 'ERROR', error_msg);
712: WHEN FND_API.G_EXC_ERROR
713: OR e_sampling_event_fetch_error

Line 724: GMD_API_PUB.Log_Message('GMD_API_ERROR',

720: x_return_status := FND_API.G_RET_STS_ERROR ;
721: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
722: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
723: WHEN OTHERS THEN
724: GMD_API_PUB.Log_Message('GMD_API_ERROR',
725: 'PACKAGE','CREATE_RSLT_AND_SPEC_RSLT_ROWS',
726: 'ERROR', SUBSTR(SQLERRM,1,100));
727: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
728:

Line 791: GMD_API_PUB.Log_Message('GMD_API_ERROR',

787: x_return_status := FND_API.G_RET_STS_ERROR ;
788: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
790: WHEN OTHERS THEN
791: GMD_API_PUB.Log_Message('GMD_API_ERROR',
792: 'PACKAGE','DELETE_RSLT_AND_SPEC_RSLT_ROWS',
793: 'ERROR', SUBSTR(SQLERRM,1,100));
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
795:

Line 900: , x_test_ids OUT NOCOPY GMD_API_PUB.number_tab

896: PROCEDURE compare_rslt_and_spec
897: (
898: p_sample_id IN NUMBER
899: , p_spec_id IN NUMBER
900: , x_test_ids OUT NOCOPY GMD_API_PUB.number_tab
901: , x_return_status OUT NOCOPY VARCHAR2
902: ) IS
903:
904: -- Cursors

Line 944: GMD_API_PUB.Log_Message('GMD_API_ERROR',

940: x_return_status := FND_API.G_RET_STS_ERROR ;
941: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
942: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
943: WHEN OTHERS THEN
944: GMD_API_PUB.Log_Message('GMD_API_ERROR',
945: 'PACKAGE','COMPARE_RSLT_AND_SPEC',
946: 'ERROR', SUBSTR(SQLERRM,1,100));
947: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
948:

Line 1004: , x_test_ids OUT NOCOPY GMD_API_PUB.number_tab

1000: PROCEDURE compare_cmpst_rslt_and_spec
1001: (
1002: p_composite_spec_disp_id IN NUMBER
1003: , p_spec_id IN NUMBER
1004: , x_test_ids OUT NOCOPY GMD_API_PUB.number_tab
1005: , x_return_status OUT NOCOPY VARCHAR2
1006: ) IS
1007:
1008: -- Cursors

Line 1048: GMD_API_PUB.Log_Message('GMD_API_ERROR',

1044: x_return_status := FND_API.G_RET_STS_ERROR ;
1045: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1047: WHEN OTHERS THEN
1048: GMD_API_PUB.Log_Message('GMD_API_ERROR',
1049: 'PACKAGE','compare_cmpst_rslt_and_spec',
1050: 'ERROR', SUBSTR(SQLERRM,1,100));
1051: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1052:

Line 1321: , p_test_ids IN GMD_API_PUB.number_tab

1317:
1318: PROCEDURE add_tests_to_sample
1319: (
1320: p_sample IN GMD_SAMPLES%ROWTYPE
1321: , p_test_ids IN GMD_API_PUB.number_tab
1322: , p_event_spec_disp_id IN NUMBER
1323: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1324: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
1325: , x_return_status OUT NOCOPY VARCHAR2

Line 1323: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab

1319: (
1320: p_sample IN GMD_SAMPLES%ROWTYPE
1321: , p_test_ids IN GMD_API_PUB.number_tab
1322: , p_event_spec_disp_id IN NUMBER
1323: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1324: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
1325: , x_return_status OUT NOCOPY VARCHAR2
1326: , p_test_qty IN NUMBER default NULL
1327: , p_test_qty_uom IN VARCHAR2 default NULL

Line 1324: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab

1320: p_sample IN GMD_SAMPLES%ROWTYPE
1321: , p_test_ids IN GMD_API_PUB.number_tab
1322: , p_event_spec_disp_id IN NUMBER
1323: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1324: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
1325: , x_return_status OUT NOCOPY VARCHAR2
1326: , p_test_qty IN NUMBER default NULL
1327: , p_test_qty_uom IN VARCHAR2 default NULL
1328: )

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

1438: FROM gem_lookups
1439: WHERE lookup_type = 'GMD_QC_SAMPLE_DISP'
1440: AND lookup_code = l_sample_spec_disp; -- 3903309
1441:
1442: GMD_API_PUB.Log_Message('GMD_CANT_ADD_TEST');
1443: RAISE FND_API.G_EXC_ERROR;
1444: END IF;
1445:
1446: -- Fetch the Event Spec Record

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

1493: IF (l_debug = 'Y') THEN
1494: gmd_debug.put_line('Expression Test is already in the result set. Abort.');
1495: END IF;
1496: CLOSE c_res_test;
1497: GMD_API_PUB.Log_Message('GMD_EXP_TEST_IS_THERE');
1498: RAISE FND_API.G_EXC_ERROR;
1499: END IF;
1500: CLOSE c_res_test; */
1501:

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

1506: THEN
1507: IF (l_debug = 'Y') THEN
1508: gmd_debug.put_line('Some of the reference tests are missing from the result set. Abort.');
1509: END IF;
1510: GMD_API_PUB.Log_Message('GMD_REF_TESTS_MISSING');
1511: RAISE FND_API.G_EXC_ERROR;
1512: END IF;
1513:
1514: END IF; -- l_test_type = 'E'

Line 1763: GMD_API_PUB.Log_Message('GMD_API_ERROR',

1759: x_return_status := FND_API.G_RET_STS_ERROR ;
1760: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1761: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1762: WHEN OTHERS THEN
1763: GMD_API_PUB.Log_Message('GMD_API_ERROR',
1764: 'PACKAGE','ADD_TESTS_TO_SAMPLE',
1765: 'ERROR', SUBSTR(SQLERRM,1,100));
1766: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1767:

Line 1908: p_sample_ids IN GMD_API_PUB.number_tab

1904: --+========================================================================+
1905: -- End of comments
1906: PROCEDURE add_test_to_samples
1907: (
1908: p_sample_ids IN GMD_API_PUB.number_tab
1909: , p_test_id IN NUMBER
1910: , p_event_spec_disp_id IN NUMBER
1911: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1912: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab

Line 1911: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab

1907: (
1908: p_sample_ids IN GMD_API_PUB.number_tab
1909: , p_test_id IN NUMBER
1910: , p_event_spec_disp_id IN NUMBER
1911: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1912: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
1913: , x_return_status OUT NOCOPY VARCHAR2
1914: , p_test_qty IN NUMBER DEFAULT NULL
1915: , p_test_qty_uom IN VARCHAR2 DEFAULT NULL

Line 1912: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab

1908: p_sample_ids IN GMD_API_PUB.number_tab
1909: , p_test_id IN NUMBER
1910: , p_event_spec_disp_id IN NUMBER
1911: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
1912: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
1913: , x_return_status OUT NOCOPY VARCHAR2
1914: , p_test_qty IN NUMBER DEFAULT NULL
1915: , p_test_qty_uom IN VARCHAR2 DEFAULT NULL
1916: )

Line 1921: l_test_ids GMD_API_PUB.number_tab;

1917: IS
1918:
1919: -- Local Variables
1920: l_sample GMD_SAMPLES%ROWTYPE;
1921: l_test_ids GMD_API_PUB.number_tab;
1922: l_results_tab GMD_API_PUB.gmd_results_tab;
1923: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
1924:
1925: l_return_status VARCHAR2(1);

Line 1922: l_results_tab GMD_API_PUB.gmd_results_tab;

1918:
1919: -- Local Variables
1920: l_sample GMD_SAMPLES%ROWTYPE;
1921: l_test_ids GMD_API_PUB.number_tab;
1922: l_results_tab GMD_API_PUB.gmd_results_tab;
1923: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
1924:
1925: l_return_status VARCHAR2(1);
1926:

Line 1923: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;

1919: -- Local Variables
1920: l_sample GMD_SAMPLES%ROWTYPE;
1921: l_test_ids GMD_API_PUB.number_tab;
1922: l_results_tab GMD_API_PUB.gmd_results_tab;
1923: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
1924:
1925: l_return_status VARCHAR2(1);
1926:
1927: BEGIN

Line 1985: GMD_API_PUB.Log_Message('GMD_API_ERROR',

1981: x_return_status := FND_API.G_RET_STS_ERROR ;
1982: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1983: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1984: WHEN OTHERS THEN
1985: GMD_API_PUB.Log_Message('GMD_API_ERROR',
1986: 'PACKAGE','ADD_TEST_TO_SAMPLES',
1987: 'ERROR', SUBSTR(SQLERRM,1,100));
1988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1989:

Line 2154: l_test_ids GMD_API_PUB.number_tab;

2150:
2151: l_change_disp_to VARCHAR2(3);
2152: l_message_data VARCHAR2(2000);
2153:
2154: l_test_ids GMD_API_PUB.number_tab;
2155: l_results_tab GMD_API_PUB.gmd_results_tab;
2156: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
2157:
2158: l_event_spec_disp GMD_EVENT_SPEC_DISP%ROWTYPE;

Line 2155: l_results_tab GMD_API_PUB.gmd_results_tab;

2151: l_change_disp_to VARCHAR2(3);
2152: l_message_data VARCHAR2(2000);
2153:
2154: l_test_ids GMD_API_PUB.number_tab;
2155: l_results_tab GMD_API_PUB.gmd_results_tab;
2156: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
2157:
2158: l_event_spec_disp GMD_EVENT_SPEC_DISP%ROWTYPE;
2159: l_sample_spec_disp GMD_SAMPLE_SPEC_DISP%ROWTYPE;

Line 2156: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;

2152: l_message_data VARCHAR2(2000);
2153:
2154: l_test_ids GMD_API_PUB.number_tab;
2155: l_results_tab GMD_API_PUB.gmd_results_tab;
2156: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
2157:
2158: l_event_spec_disp GMD_EVENT_SPEC_DISP%ROWTYPE;
2159: l_sample_spec_disp GMD_SAMPLE_SPEC_DISP%ROWTYPE;
2160: l_spec_result GMD_SPEC_RESULTS%ROWTYPE;

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

2217: -- Bug 3079877: Check that sample is not "Planning"
2218: IF (l_sample.sample_disposition = '0RT')
2219: AND (l_sample.sample_disposition = '0PL') THEN
2220: -- For retain sample no comparison, please!
2221: GMD_API_PUB.Log_Message('GMD_RETAIN_SAMPLE');
2222: RAISE FND_API.G_EXC_ERROR;
2223: END IF;
2224:
2225: -- Check that we have the Sampling Event

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

2225: -- Check that we have the Sampling Event
2226: -- Now, even in case where there is no Spec for the sample
2227: -- there still should be a sampling event as per new directions.
2228: IF (l_sample.sampling_event_id IS NULL) THEN
2229: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_MISSING');
2230: RAISE FND_API.G_EXC_ERROR;
2231: END IF;
2232:
2233: -- All the required validations are over so let's start

Line 2611: GMD_API_PUB.Log_Message('GMD_API_ERROR',

2607: x_return_status := FND_API.G_RET_STS_ERROR ;
2608: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2609: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2610: WHEN OTHERS THEN
2611: GMD_API_PUB.Log_Message('GMD_API_ERROR',
2612: 'PACKAGE','MAKE_TARGET_SPEC_THE_BASE_SPEC',
2613: 'ERROR', SUBSTR(SQLERRM,1,100));
2614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2615:

Line 2670: l_sample_ids GMD_API_PUB.number_tab;

2666: ;
2667:
2668: -- Local Variables
2669: l_sampling_event_id NUMBER;
2670: l_sample_ids GMD_API_PUB.number_tab;
2671: l_return_status VARCHAR2(1);
2672:
2673: BEGIN
2674:

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

2683: OPEN c_get_se_id (p_composite_spec_disp_id);
2684: FETCH c_get_se_id INTO l_sampling_event_id;
2685: IF c_get_se_id%NOTFOUND THEN
2686: CLOSE c_get_se_id;
2687: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_NOT_FOUND');
2688: RAISE FND_API.G_EXC_ERROR;
2689: END IF;
2690: CLOSE c_get_se_id;
2691:

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

2707: END IF;
2708:
2709: -- If the no of samples count is zero then error out
2710: IF (l_sample_ids.COUNT = 0) THEN
2711: GMD_API_PUB.Log_Message('GMD_NO_SAMPLE_TO_COMPOSITE');
2712: RAISE FND_API.G_EXC_ERROR;
2713: END IF;
2714:
2715: -- Now call "make_target_spec_the_base_spec" for each sample ID

Line 2749: GMD_API_PUB.Log_Message('GMD_API_ERROR',

2745: x_return_status := FND_API.G_RET_STS_ERROR ;
2746: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2747: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2748: WHEN OTHERS THEN
2749: GMD_API_PUB.Log_Message('GMD_API_ERROR',
2750: 'PACKAGE','USE_TARGET_SPEC_FOR_CMPST_RSLT',
2751: 'ERROR', SUBSTR(SQLERRM,1,100));
2752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2753:

Line 2822: x_test_ids GMD_API_PUB.number_tab;

2818: l_test_id NUMBER;
2819:
2820: l_results_rec_tbl GMD_RESULTS_GRP.gmd_results_rec_tbl;
2821:
2822: x_test_ids GMD_API_PUB.number_tab;
2823: l_sample_id GMD_API_PUB.number_tab;
2824: return_status VARCHAR2(1);
2825:
2826: /* Cursors */

Line 2823: l_sample_id GMD_API_PUB.number_tab;

2819:
2820: l_results_rec_tbl GMD_RESULTS_GRP.gmd_results_rec_tbl;
2821:
2822: x_test_ids GMD_API_PUB.number_tab;
2823: l_sample_id GMD_API_PUB.number_tab;
2824: return_status VARCHAR2(1);
2825:
2826: /* Cursors */
2827:

Line 3174: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3170: x_return_status := FND_API.G_RET_STS_ERROR ;
3171: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3173: WHEN OTHERS THEN
3174: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3175: 'PACKAGE','GET_SAMPLE_IDS_FOR_SE',
3176: 'ERROR', SUBSTR(SQLERRM,1,100));
3177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3178:

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

3235: x_composite_exist := 'N';
3236: x_composite_valid := 'N';
3237:
3238: IF (p_sampling_event_id IS NULL AND p_event_spec_disp_id IS NULL) THEN
3239: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
3240: RAISE FND_API.G_EXC_ERROR;
3241: END IF;
3242:
3243: IF (p_event_spec_disp_id IS NULL) THEN

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

3242:
3243: IF (p_event_spec_disp_id IS NULL) THEN
3244: l_event_spec_disp_id := get_current_event_spec_disp_id(p_sampling_event_id);
3245: IF (l_event_spec_disp_id IS NULL) THEN
3246: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOT_FOUND');
3247: RAISE FND_API.G_EXC_ERROR;
3248: END IF;
3249: ELSE
3250: l_event_spec_disp_id := p_event_spec_disp_id;

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

3276: OPEN c_composite_valid(p_sampling_event_id);
3277: FETCH c_composite_valid INTO l_recomposite_ind;
3278: IF c_composite_valid%NOTFOUND THEN
3279: CLOSE c_composite_valid;
3280: GMD_API_PUB.Log_Message('GMD_SAMPLING_EVENT_NOT_FOUND');
3281: RAISE FND_API.G_EXC_ERROR;
3282: END IF;
3283: CLOSE c_composite_valid;
3284:

Line 3309: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3305: x_return_status := FND_API.G_RET_STS_ERROR ;
3306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3307: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3308: WHEN OTHERS THEN
3309: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3310: 'PACKAGE','GET_SAMPLE_IDS_FOR_SE',
3311: 'ERROR', SUBSTR(SQLERRM,1,100));
3312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3313:

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

3356: -- Initialize API return status to success
3357: x_return_status := FND_API.G_RET_STS_SUCCESS;
3358:
3359: IF (p_sampling_event_id IS NULL AND p_event_spec_disp_id IS NULL) THEN
3360: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
3361: RAISE FND_API.G_EXC_ERROR;
3362: END IF;
3363:
3364: IF (p_event_spec_disp_id IS NULL) THEN

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

3363:
3364: IF (p_event_spec_disp_id IS NULL) THEN
3365: l_event_spec_disp_id := get_current_event_spec_disp_id(p_sampling_event_id);
3366: IF (l_event_spec_disp_id IS NULL) THEN
3367: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOT_FOUND');
3368: RAISE FND_API.G_EXC_ERROR;
3369: END IF;
3370: ELSE
3371: l_event_spec_disp_id := p_event_spec_disp_id;

Line 3394: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3390: x_return_status := FND_API.G_RET_STS_ERROR ;
3391: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3392: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3393: WHEN OTHERS THEN
3394: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3395: 'PACKAGE','GET_SAMPLE_IDS_FOR_SE',
3396: 'ERROR', SUBSTR(SQLERRM,1,100));
3397: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3398:

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

3442: -- Initialize API return status to success
3443: x_return_status := FND_API.G_RET_STS_SUCCESS;
3444:
3445: IF (p_result_id IS NULL OR p_event_spec_disp_id IS NULL) THEN
3446: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
3447: RAISE FND_API.G_EXC_ERROR;
3448: END IF;
3449:
3450: -- See if we have the composite for the result

Line 3473: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3469: x_return_status := FND_API.G_RET_STS_ERROR ;
3470: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3471: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3472: WHEN OTHERS THEN
3473: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3474: 'PACKAGE','GET_SAMPLE_IDS_FOR_SE',
3475: 'ERROR', SUBSTR(SQLERRM,1,100));
3476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3477:

Line 3505: , x_sample_ids OUT NOCOPY GMD_API_PUB.number_tab

3501:
3502: PROCEDURE get_sample_ids_for_se
3503: (
3504: p_sampling_event_id IN NUMBER
3505: , x_sample_ids OUT NOCOPY GMD_API_PUB.number_tab
3506: , x_return_status OUT NOCOPY VARCHAR2
3507: )
3508: IS
3509:

Line 3558: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3554: x_return_status := FND_API.G_RET_STS_ERROR ;
3555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3556: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3557: WHEN OTHERS THEN
3558: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3559: 'PACKAGE','GET_SAMPLE_IDS_FOR_SE',
3560: 'ERROR', SUBSTR(SQLERRM,1,100));
3561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3562:

Line 3607: p_sample_ids IN GMD_API_PUB.number_tab

3603: -- End of comments
3604:
3605: PROCEDURE populate_result_data_points
3606: (
3607: p_sample_ids IN GMD_API_PUB.number_tab
3608: , p_event_spec_disp_id IN NUMBER
3609: , x_return_status OUT NOCOPY VARCHAR2
3610: )
3611: IS

Line 3682: GMD_API_PUB.Log_Message('GMD_API_ERROR',

3678: x_return_status := FND_API.G_RET_STS_ERROR ;
3679: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3680: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3681: WHEN OTHERS THEN
3682: GMD_API_PUB.Log_Message('GMD_API_ERROR',
3683: 'PACKAGE','POPULATE_RESULT_DATA_POINTS',
3684: 'ERROR', SUBSTR(SQLERRM,1,100));
3685: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3686:

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

3830: OPEN c_spec_id(p_event_spec_disp_id);
3831: FETCH c_spec_id INTO l_spec_id;
3832: IF c_spec_id%NOTFOUND THEN
3833: CLOSE c_spec_id;
3834: GMD_API_PUB.Log_Message('GMD_SPEC_NOT_FOUND');
3835: END IF;
3836: CLOSE c_spec_id;
3837:
3838: IF (l_debug = 'Y') THEN

Line 4122: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4118: x_return_status := FND_API.G_RET_STS_ERROR ;
4119: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4121: WHEN OTHERS THEN
4122: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4123: 'PACKAGE','CREATE_COMPOSITE_ROWS',
4124: 'ERROR', SUBSTR(SQLERRM,1,100));
4125: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4126:

Line 4202: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4198: x_return_status := FND_API.G_RET_STS_ERROR ;
4199: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4201: WHEN OTHERS THEN
4202: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4203: 'PACKAGE','QC_MEAN',
4204: 'ERROR', SUBSTR(SQLERRM,1,100));
4205: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4206:

Line 4383: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4379: x_return_status := FND_API.G_RET_STS_ERROR ;
4380: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4381: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4382: WHEN OTHERS THEN
4383: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4384: 'PACKAGE','qc_median',
4385: 'ERROR', SUBSTR(SQLERRM,1,100));
4386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4387:

Line 4538: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4534: x_return_status := FND_API.G_RET_STS_ERROR ;
4535: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4537: WHEN OTHERS THEN
4538: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4539: 'PACKAGE','QC_MODE',
4540: 'ERROR', SUBSTR(SQLERRM,1,100));
4541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4542:

Line 4632: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4628: x_return_status := FND_API.G_RET_STS_ERROR ;
4629: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4631: WHEN OTHERS THEN
4632: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4633: 'PACKAGE','QC_HIGH',
4634: 'ERROR', SUBSTR(SQLERRM,1,100));
4635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4636:

Line 4727: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4723: x_return_status := FND_API.G_RET_STS_ERROR ;
4724: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4725: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4726: WHEN OTHERS THEN
4727: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4728: 'PACKAGE','QC_LOW',
4729: 'ERROR', SUBSTR(SQLERRM,1,100));
4730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4731:

Line 4808: GMD_API_PUB.Log_Message('GMD_API_ERROR',

4804: x_return_status := FND_API.G_RET_STS_ERROR ;
4805: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4806: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4807: WHEN OTHERS THEN
4808: GMD_API_PUB.Log_Message('GMD_API_ERROR',
4809: 'PACKAGE','qc_standard_deviation',
4810: 'ERROR', SUBSTR(SQLERRM,1,100));
4811: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4812:

Line 4858: x_test_ids GMD_API_PUB.number_tab;

4854: l_median_char VARCHAR2(80);
4855:
4856: l_comres_tab GMD_RESULTS_GRP.gmd_comres_tab;
4857: return_status VARCHAR2(1);
4858: x_test_ids GMD_API_PUB.number_tab;
4859:
4860:
4861: -- Cursors
4862:

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

5106: OPEN Cur_quality_config(p_organization_id);
5107: FETCH Cur_quality_config INTO l_reason_id ;
5108: IF Cur_quality_config%NOTFOUND THEN -- #1
5109: CLOSE Cur_quality_config;
5110: GMD_API_PUB.Log_Message('GMD_QM_INV_REASON_CODE');
5111: RAISE FND_API.G_EXC_ERROR;
5112: END IF; -- #1
5113: CLOSE Cur_quality_config;
5114:

Line 5138: GMD_API_PUB.Log_Message(l_message_data);

5134: , x_return_status => x_return_status
5135: , x_message_data => l_message_data );
5136:
5137: IF x_return_status <> 'S' THEN -- #4
5138: GMD_API_PUB.Log_Message(l_message_data);
5139: RAISE FND_API.G_EXC_ERROR;
5140: END IF; -- #4
5141: END IF; -- #3
5142:

Line 5154: GMD_API_PUB.Log_Message('GMD_API_ERROR',

5150: x_return_status := FND_API.G_RET_STS_ERROR ;
5151: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5152: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5153: WHEN OTHERS THEN
5154: GMD_API_PUB.Log_Message('GMD_API_ERROR',
5155: 'PACKAGE','CHANGE_LOT_STATUS','ERROR', SUBSTR(SQLERRM,1,100));
5156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5157: END change_lot_status;
5158:

Line 5316: GMD_API_PUB.Log_Message('GMD_API_ERROR',

5312: x_return_status := FND_API.G_RET_STS_ERROR ;
5313: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5315: WHEN OTHERS THEN
5316: GMD_API_PUB.Log_Message('GMD_API_ERROR',
5317: 'PACKAGE','CHECK_EXPERIMENTAL_ERROR','ERROR', SUBSTR(SQLERRM,1,100));
5318: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5319: END check_experimental_error;
5320:

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

5480: --#. Ensure the value is numeric. If not, return user to field
5481: --#. Apply decimal precision.
5482: --#. =========================================================
5483: IF NOT (is_value_numeric (p_result_rec.result)) THEN
5484: GMD_API_PUB.Log_Message('GMD', 'QC_NOTNUMERIC');
5485: RAISE FND_API.G_EXC_ERROR;
5486: END IF;
5487:
5488: L_num_result := ROUND(to_number(p_result_rec.result) ,

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

5506: , p_st_max => NULL
5507: , p_t_min => p_result_rec.min_num
5508: , p_t_max => p_result_rec.max_num
5509: ) THEN
5510: GMD_API_PUB.Log_Message('GMD', 'NOT_IN_RANGE');
5511: IF p_result_rec.test_type = 'E' THEN
5512: -- if expression give warning, not error
5513: x_return_status := 'E'; -- expected error
5514: ELSE

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

5611:
5612: IF (NOT isvalid_resource(p_result_rec.lab_organization_id,
5613: p_result_rec.planned_resource,
5614: p_result_rec.planned_resource_instance)) THEN
5615: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
5616: RAISE FND_API.G_EXC_ERROR;
5617: END IF;
5618:
5619: IF (NOT isvalid_resource(p_result_rec.lab_organization_id,

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

5618:
5619: IF (NOT isvalid_resource(p_result_rec.lab_organization_id,
5620: p_result_rec.actual_resource,
5621: p_result_rec.actual_resource_instance)) THEN
5622: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
5623: RAISE FND_API.G_EXC_ERROR;
5624: END IF;
5625:
5626: IF (l_debug = 'Y') THEN

Line 5639: GMD_API_PUB.Log_Message('GMD_API_ERROR',

5635: x_return_status := FND_API.G_RET_STS_ERROR ;
5636: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5638: WHEN OTHERS THEN
5639: GMD_API_PUB.Log_Message('GMD_API_ERROR',
5640: 'PACKAGE','VALIDATE_RESULT','ERROR', SUBSTR(SQLERRM,1,100));
5641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5642: END validate_result;
5643:

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

5683: IF (p_result_value IS NULL AND
5684: p_evaluation_ind IS NOT NULL AND
5685: p_evaluation_ind NOT IN ('4C', '5O', '1Z'))
5686: THEN
5687: GMD_API_PUB.Log_message ('GMD', 'GMD_QM_EVAL_BLANK_RESULT');
5688: RAISE FND_API.G_EXC_ERROR;
5689: END IF;
5690:
5691: IF nvl(p_in_spec_ind, 'N') = 'Y' THEN

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

5690:
5691: IF nvl(p_in_spec_ind, 'N') = 'Y' THEN
5692: -- Result is IN-SPEC
5693: IF (p_evaluation_ind = '3E') THEN
5694: GMD_API_PUB.Log_Message('GMD', 'GMD_QM_EVAL_NO_EXP_ERROR');
5695: RAISE FND_API.G_EXC_ERROR;
5696: END IF;
5697: ELSE
5698: -- else not in spec

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

5697: ELSE
5698: -- else not in spec
5699: -- Bug 3763419 - added GUARANTEED BY MANUFACTURER
5700: IF (p_evaluation_ind NOT IN ('1V', '2R', '4C', '5O', '1Z')) THEN
5701: GMD_API_PUB.Log_Message('GMD', 'GMD_QM_EVAL_OUT_OF_SPEC');
5702: RAISE FND_API.G_EXC_ERROR;
5703: END IF;
5704: END IF;
5705:

Line 5712: GMD_API_PUB.Log_Message('GMD_API_ERROR',

5708: x_return_status := FND_API.G_RET_STS_ERROR ;
5709: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5711: WHEN OTHERS THEN
5712: GMD_API_PUB.Log_Message('GMD_API_ERROR',
5713: 'PACKAGE','VALIDATE_EVALUATION_IND','ERROR', SUBSTR(SQLERRM,1,100));
5714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5715: END validate_evaluation_ind;
5716:

Line 5870: l_samples GMD_API_PUB.number_tab;

5866: l_display_value NUMBER;
5867: l_report_value NUMBER;
5868: l_ref_tests NUMBER := 0; --Bug#5097709
5869: l_ref_count NUMBER := 0;
5870: l_samples GMD_API_PUB.number_tab;
5871:
5872: BEGIN
5873:
5874: -- Initialize API return status to success

Line 6071: GMD_API_PUB.Log_Message('GMD_API_ERROR',

6067: x_return_status := FND_API.G_RET_STS_ERROR ;
6068: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6069: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6070: WHEN OTHERS THEN
6071: GMD_API_PUB.Log_Message('GMD_API_ERROR',
6072: 'PACKAGE','CALC_EXPRESSION','ERROR', SUBSTR(SQLERRM,1,100));
6073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6074: END calc_expression;
6075:

Line 6391: GMD_API_PUB.Log_Message('GMD_API_ERROR',

6387: x_return_status := FND_API.G_RET_STS_ERROR ;
6388: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6389: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6390: WHEN OTHERS THEN
6391: GMD_API_PUB.Log_Message('GMD_API_ERROR',
6392: 'PACKAGE','change_sample_disposition','ERROR', SUBSTR(SQLERRM,1,100));
6393: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6394:
6395: END change_sample_disposition;

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

6497: OPEN c_sample_dtl(p_sample_id);
6498: FETCH c_sample_dtl INTO l_sample_rec;
6499: IF c_sample_dtl%NOTFOUND THEN
6500: CLOSE c_sample_dtl;
6501: GMD_API_PUB.Log_Message('GMD_INVALID_PARAMETERS');
6502: RAISE FND_API.G_EXC_ERROR;
6503: END IF;
6504: CLOSE c_sample_dtl;
6505:

Line 6773: GMD_API_PUB.Log_Message(l_message_data);

6769: , p_to_disposition => l_change_disp_to
6770: , x_return_status => x_return_status
6771: , x_message_data => l_message_data);
6772: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
6773: GMD_API_PUB.Log_Message(l_message_data);
6774: RAISE FND_API.G_EXC_ERROR;
6775: END IF;
6776:
6777: -- The above procedure has changed the Sample Spec Disposition.

Line 6815: GMD_API_PUB.Log_Message('GMD_API_ERROR',

6811: x_return_status := FND_API.G_RET_STS_ERROR ;
6812: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6814: WHEN OTHERS THEN
6815: GMD_API_PUB.Log_Message('GMD_API_ERROR',
6816: 'PACKAGE','CHANGE_DISP_FOR_AUTO_LOT','ERROR', SUBSTR(SQLERRM,1,100));
6817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6818:
6819: END change_disp_for_auto_lot;

Line 6883: l_sample_ids GMD_API_PUB.number_tab;

6879: l_sampling_event GMD_SAMPLING_EVENTS%ROWTYPE;
6880: l_in_sampling_event GMD_SAMPLING_EVENTS%ROWTYPE;
6881:
6882: l_spec_dtl c_spec_dtl%ROWTYPE;
6883: l_sample_ids GMD_API_PUB.number_tab;
6884: l_update_disp_rec GMD_SAMPLES_GRP.update_disp_rec;
6885:
6886: l_event_spec_disp_id NUMBER;
6887: l_composite_spec_disp_id NUMBER;

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

6950:
6951: l_event_spec_disp_id := get_current_event_spec_disp_id
6952: (l_sampling_event.sampling_event_id);
6953: IF (l_event_spec_disp_id IS NULL) THEN
6954: GMD_API_PUB.Log_Message('GMD_EVENT_SPEC_NOT_FOUND');
6955: RAISE FND_API.G_EXC_ERROR;
6956: END IF;
6957:
6958: l_composite_exist := 'N';

Line 7121: GMD_API_PUB.Log_Message(l_message_data);

7117: , p_to_disposition => l_change_disp_to
7118: , x_return_status => l_return_status
7119: , x_message_data => l_message_data);
7120: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
7121: GMD_API_PUB.Log_Message(l_message_data);
7122: RAISE FND_API.G_EXC_ERROR;
7123: END IF;
7124:
7125: -- Disposition has been changed so now change the Lot Status in Inventory

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

7137: OPEN Cur_quality_config(l_organization_id);
7138: FETCH Cur_quality_config INTO l_reason_id ;
7139: IF Cur_quality_config%NOTFOUND THEN
7140: CLOSE Cur_quality_config;
7141: GMD_API_PUB.Log_Message('GMD_QM_INV_REASON_CODE');
7142: RAISE FND_API.G_EXC_ERROR;
7143: END IF;
7144: CLOSE Cur_quality_config;
7145:

Line 7163: GMD_API_PUB.Log_Message(l_message_data);

7159: , x_message_data => l_message_data );
7160:
7161:
7162: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
7163: GMD_API_PUB.Log_Message(l_message_data);
7164: RAISE FND_API.G_EXC_ERROR;
7165: END IF;
7166:
7167: END IF; -- l_lot_status IS NOT NULL

Line 7191: GMD_API_PUB.Log_Message('GMD_API_ERROR',

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

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

7258: END LOOP;
7259:
7260: EXCEPTION
7261: WHEN OTHERS THEN
7262: GMD_API_PUB.Log_Message('GMD_API_ERROR','PACKAGE','update_exptest_value_null','ERROR', SUBSTR(SQLERRM,1,100));
7263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7264:
7265: END update_exptest_value_null;
7266: