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_SAMPLES_PUB dependencies on GMD_API_PUB

Line 163: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab

159: , x_qc_samples_rec OUT NOCOPY GMD_SAMPLES%ROWTYPE
160: , x_sampling_events_rec OUT NOCOPY GMD_SAMPLING_EVENTS%ROWTYPE
161: , x_sample_spec_disp OUT NOCOPY GMD_SAMPLE_SPEC_DISP%ROWTYPE
162: , x_event_spec_disp_rec OUT NOCOPY GMD_EVENT_SPEC_DISP%ROWTYPE
163: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
164: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
165: , x_return_status OUT NOCOPY VARCHAR2
166: , x_msg_count OUT NOCOPY NUMBER
167: , x_msg_data OUT NOCOPY VARCHAR2

Line 164: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab

160: , x_sampling_events_rec OUT NOCOPY GMD_SAMPLING_EVENTS%ROWTYPE
161: , x_sample_spec_disp OUT NOCOPY GMD_SAMPLE_SPEC_DISP%ROWTYPE
162: , x_event_spec_disp_rec OUT NOCOPY GMD_EVENT_SPEC_DISP%ROWTYPE
163: , x_results_tab OUT NOCOPY GMD_API_PUB.gmd_results_tab
164: , x_spec_results_tab OUT NOCOPY GMD_API_PUB.gmd_spec_results_tab
165: , x_return_status OUT NOCOPY VARCHAR2
166: , x_msg_count OUT NOCOPY NUMBER
167: , x_msg_data OUT NOCOPY VARCHAR2
168: )

Line 182: l_results_tab GMD_API_PUB.gmd_results_tab;

178: l_sample_spec_disp GMD_SAMPLE_SPEC_DISP%ROWTYPE;
179: l_event_spec_disp_rec GMD_EVENT_SPEC_DISP%ROWTYPE;
180: l_sampling_events GMD_SAMPLING_EVENTS%ROWTYPE;
181: l_sampling_events_out GMD_SAMPLING_EVENTS%ROWTYPE;
182: l_results_tab GMD_API_PUB.gmd_results_tab;
183: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
184: l_user_id NUMBER(15);
185: l_assign_type NUMBER;
186: l_sampling_event_id NUMBER;

Line 183: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;

179: l_event_spec_disp_rec GMD_EVENT_SPEC_DISP%ROWTYPE;
180: l_sampling_events GMD_SAMPLING_EVENTS%ROWTYPE;
181: l_sampling_events_out GMD_SAMPLING_EVENTS%ROWTYPE;
182: l_results_tab GMD_API_PUB.gmd_results_tab;
183: l_spec_results_tab GMD_API_PUB.gmd_spec_results_tab;
184: l_user_id NUMBER(15);
185: l_assign_type NUMBER;
186: l_sampling_event_id NUMBER;
187: l_sample_req_cnt NUMBER;

Line 326: GMD_API_PUB.Log_Message('GMD_INVALID_USER_NAME',

322: ,x_user_id => l_user_id);
323:
324: IF NVL(l_user_id, -1) < 0
325: THEN
326: GMD_API_PUB.Log_Message('GMD_INVALID_USER_NAME',
327: 'L_USER_NAME', p_user_name);
328: RAISE FND_API.G_EXC_ERROR;
329: ELSE
330: -- Added below for BUG 2711643. Hverddin

Line 331: GMD_API_PUB.SET_USER_CONTEXT(p_user_id => l_user_id,

327: 'L_USER_NAME', p_user_name);
328: RAISE FND_API.G_EXC_ERROR;
329: ELSE
330: -- Added below for BUG 2711643. Hverddin
331: GMD_API_PUB.SET_USER_CONTEXT(p_user_id => l_user_id,
332: x_return_status => l_return_status);
333:
334: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
335: RAISE FND_API.G_EXC_ERROR;

Line 345: GMD_API_PUB.Log_Message('GMD_ORGN_CODE_REQD');

341:
342:
343: -- Validate organization_id Passed.
344: IF (l_samples_val_rec.organization_id IS NULL) THEN
345: GMD_API_PUB.Log_Message('GMD_ORGN_CODE_REQD');
346: RAISE FND_API.G_EXC_ERROR;
347: END IF;
348:
349:

Line 353: GMD_API_PUB.Log_Message('GMD_PLANNED_RETAINED_SAMPLES');

349:
350: -- Validate RETAIN_AS Passed.
351: IF ((l_samples_val_rec.sample_disposition NOT IN ('0RT', '0PL'))
352: AND (l_samples_val_rec.retain_as IS NOT NULL)) THEN
353: GMD_API_PUB.Log_Message('GMD_PLANNED_RETAINED_SAMPLES');
354: RAISE FND_API.G_EXC_ERROR;
355: END IF;
356:
357: -- Determine Type of Doc Sequencing defined for sample no.

Line 362: -- GMD_API_PUB.Log_Message('GMD_ORGN_DOC_SEQ',

358: -- Bug 4165704: doc numbering now kept in quality parameters table
359: -- OPEN c_doc_numbering(l_samples_val_rec.orgn_code);
360: -- FETCH c_doc_numbering INTO l_assign_type;
361: -- IF c_doc_numbering%NOTFOUND THEN
362: -- GMD_API_PUB.Log_Message('GMD_ORGN_DOC_SEQ',
363: -- 'ORGN_CODE', l_samples_val_rec.orgn_code,
364: -- 'DOC_TYPE' , p_user_name);
365: -- END IF;
366: -- CLOSE c_doc_numbering;

Line 375: GMD_API_PUB.Log_Message('GMD_QM_ORG_PARAMETER');

371: , x_return_status => l_return_status
372: , x_orgn_found => found );
373:
374: IF (l_return_status <> 'S') THEN
375: GMD_API_PUB.Log_Message('GMD_QM_ORG_PARAMETER');
376: RAISE FND_API.G_EXC_ERROR;
377: END IF;
378:
379: l_assign_type := quality_config.sample_assignment_type;

Line 407: GMD_API_PUB.Log_Message('WMS_ONLY_FUNCTIONALITY');

403: FETCH get_wms_flag INTO l_wms_enabled_flag;
404: CLOSE get_wms_flag;
405:
406: IF l_wms_enabled_flag = 'N' then
407: GMD_API_PUB.Log_Message('WMS_ONLY_FUNCTIONALITY');
408: RAISE FND_API.G_EXC_ERROR;
409: END IF;
410:
411: END IF; -- IF l_samples_val_rec.lpn IS NOT NULL ) THEN

Line 418: GMD_API_PUB.Log_Message('WMS_LPN_NOT_FOUND');

414: OPEN get_lpn_no(p_lpn);
415: FETCH get_lpn_no INTO l_samples_val_rec.lpn_id;
416: IF get_lpn_no%NOTFOUND THEN
417: CLOSE get_lpn_no;
418: GMD_API_PUB.Log_Message('WMS_LPN_NOT_FOUND');
419: RAISE FND_API.G_EXC_ERROR;
420: END IF;
421: CLOSE get_lpn_no;
422: END IF;

Line 429: GMD_API_PUB.Log_Message('WMS_LPN_NOT_FOUND');

425: OPEN get_lpn;
426: FETCH get_lpn INTO dummy;
427: IF get_lpn%NOTFOUND THEN
428: CLOSE get_lpn;
429: GMD_API_PUB.Log_Message('WMS_LPN_NOT_FOUND');
430: RAISE FND_API.G_EXC_ERROR;
431: END IF;
432: CLOSE get_lpn;
433: END IF;

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

476: x_spec_vr_id => l_spec_vr_id,
477: x_return_status => l_return_status,
478: x_msg_data => l_msg_data
479: )THEN
480: GMD_API_PUB.Log_Message('GMD_SPEC_NOT_FOUND');
481: RAISE FND_API.G_EXC_ERROR;
482: END IF;
483:
484: IF l_qc_samples_rec.source IN ('I','C','W','S') AND p_qc_samples_rec.sample_inv_trans_ind IS NULL THEN

Line 509: GMD_API_PUB.Log_Message('GMD_QM_LOT_REQUIRED'); -- 8276017 added this message instead.

505:
506: IF NVL(L_LOT_OPTIONAL_ON_SAMPLE,'N') <> 'Y' AND NVL(G_LOT_CTL,0) = 2 then
507: IF ((l_qc_samples_rec.lot_number IS NULL)
508: AND ((l_qc_samples_rec.parent_lot_number IS NULL) AND (NVL(G_CHILD_LOT_FLAG,'N') = 'Y'))) THEN
509: GMD_API_PUB.Log_Message('GMD_QM_LOT_REQUIRED'); -- 8276017 added this message instead.
510: --GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
511: -- 'WHAT', 'lot_number');
512: RAISE FND_API.G_EXC_ERROR;
513:

Line 510: --GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

506: IF NVL(L_LOT_OPTIONAL_ON_SAMPLE,'N') <> 'Y' AND NVL(G_LOT_CTL,0) = 2 then
507: IF ((l_qc_samples_rec.lot_number IS NULL)
508: AND ((l_qc_samples_rec.parent_lot_number IS NULL) AND (NVL(G_CHILD_LOT_FLAG,'N') = 'Y'))) THEN
509: GMD_API_PUB.Log_Message('GMD_QM_LOT_REQUIRED'); -- 8276017 added this message instead.
510: --GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
511: -- 'WHAT', 'lot_number');
512: RAISE FND_API.G_EXC_ERROR;
513:
514: END IF;

Line 573: GMD_API_PUB.Log_Message('GMD_SAMPLE_DISPOSITION_INVALID');

569: l_sample_active_cnt := 0;
570: ELSIF (l_qc_samples_rec.sample_disposition = '1P') THEN
571: l_sample_active_cnt := 1;
572: ELSE
573: GMD_API_PUB.Log_Message('GMD_SAMPLE_DISPOSITION_INVALID');
574: RAISE FND_API.G_EXC_ERROR;
575: END IF;
576:
577:

Line 712: GMD_API_PUB.Log_Message('GMD_LOCKING_FAILURE',

708: IF NOT GMD_SAMPLING_EVENTS_PVT.lock_row
709: (
710: p_sampling_event_id => l_sampling_events.sampling_event_id
711: ) THEN
712: GMD_API_PUB.Log_Message('GMD_LOCKING_FAILURE',
713: 'l_table_name', 'GMD_SAMPLING_EVENTS',
714: 'l_column_name','SAMPLING_EVENT_ID',
715: 'l_key_value', l_sampling_events.sampling_event_id);
716: RAISE FND_API.G_EXC_ERROR;

Line 889: GMD_API_PUB.Log_Message('GMD_QM_NO_INVENTORY_TRANS_API2');

885: l_qc_samples_out_rec.locator_id := l_qc_samples_out_rec.source_locator_id;
886: END IF; -- source = 'S'
887:
888: IF (l_qc_samples_out_rec.source_subinventory IS NULL ) THEN
889: GMD_API_PUB.Log_Message('GMD_QM_NO_INVENTORY_TRANS_API2');
890: RAISE FND_API.G_EXC_ERROR;
891: ELSIF (l_qc_samples_out_rec.receipt_line_id IS NULL ) THEN
892: GMD_API_PUB.Log_Message('GMD_QM_NO_INVENTORY_TRANS_API');
893: RAISE FND_API.G_EXC_ERROR;

Line 892: GMD_API_PUB.Log_Message('GMD_QM_NO_INVENTORY_TRANS_API');

888: IF (l_qc_samples_out_rec.source_subinventory IS NULL ) THEN
889: GMD_API_PUB.Log_Message('GMD_QM_NO_INVENTORY_TRANS_API2');
890: RAISE FND_API.G_EXC_ERROR;
891: ELSIF (l_qc_samples_out_rec.receipt_line_id IS NULL ) THEN
892: GMD_API_PUB.Log_Message('GMD_QM_NO_INVENTORY_TRANS_API');
893: RAISE FND_API.G_EXC_ERROR;
894: END IF;
895:
896: --END IF; -- end Bug 3516802

Line 900: GMD_API_PUB.Log_Message('GMD_QM_WHSE_REQ_INV');

896: --END IF; -- end Bug 3516802
897:
898: -- Bug 3491783: if whse is not specified, can not generate inv trans
899: ELSIF (l_qc_samples_out_rec.subinventory IS NULL) THEN
900: GMD_API_PUB.Log_Message('GMD_QM_WHSE_REQ_INV');
901: RAISE FND_API.G_EXC_ERROR;
902: END IF; -- end bug
903:
904:

Line 938: -- GMD_API_PUB.Log_Message('GMD_REPLENISH_WHSE_NOT_FOUND');

934: -- OPEN Cur_replenish_whse_plant;
935: -- FETCH Cur_replenish_whse_plant INTO l_qc_samples_out_rec.source_whse ;
936: -- IF Cur_replenish_whse_plant%NOTFOUND THEN
937: -- CLOSE Cur_replenish_whse_plant;
938: -- GMD_API_PUB.Log_Message('GMD_REPLENISH_WHSE_NOT_FOUND');
939: -- RAISE FND_API.G_EXC_ERROR;
940: -- END IF;
941: -- CLOSE Cur_replenish_whse_plant;
942: -- ELSE

Line 1303: GMD_API_PUB.Log_Message('GMD_SAMPLE_SOURCE_INVALID',

1299: END IF;
1300:
1301: -- end Bug #3401377 : added get spec for location, resource and stability samples
1302: ELSE
1303: GMD_API_PUB.Log_Message('GMD_SAMPLE_SOURCE_INVALID',
1304: 'l_source', p_samples_rec.source);
1305: RAISE FND_API.G_EXC_ERROR;
1306: END IF;
1307:

Line 1378: GMD_API_PUB.Log_Message('GMD_INVALID_USER_NAME',

1374: ,x_user_id => l_user_id);
1375:
1376: IF NVL(l_user_id, -1) < 0
1377: THEN
1378: GMD_API_PUB.Log_Message('GMD_INVALID_USER_NAME',
1379: 'l_user_name', p_user_name);
1380: RAISE FND_API.G_EXC_ERROR;
1381: END IF;
1382:

Line 1389: -- GMD_API_PUB.Log_Message('GMD_SAMPLE_SOURCE_INVALID');

1385: IF ( p_qc_samples_rec.sample_id is NULL) THEN
1386: -- Validate that composite keys are present
1387:
1388: IF ( p_qc_samples_rec.sample_no is NULL) THEN
1389: -- GMD_API_PUB.Log_Message('GMD_SAMPLE_SOURCE_INVALID');
1390: /* GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
1391: 'SAMPLE NO', ' IS NULL');*/
1392: GMD_API_PUB.Log_Message('GMD_SAMPLE_NUM_NULL');
1393: RAISE FND_API.G_EXC_ERROR;

Line 1390: /* GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

1386: -- Validate that composite keys are present
1387:
1388: IF ( p_qc_samples_rec.sample_no is NULL) THEN
1389: -- GMD_API_PUB.Log_Message('GMD_SAMPLE_SOURCE_INVALID');
1390: /* GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
1391: 'SAMPLE NO', ' IS NULL');*/
1392: GMD_API_PUB.Log_Message('GMD_SAMPLE_NUM_NULL');
1393: RAISE FND_API.G_EXC_ERROR;
1394: END IF;

Line 1392: GMD_API_PUB.Log_Message('GMD_SAMPLE_NUM_NULL');

1388: IF ( p_qc_samples_rec.sample_no is NULL) THEN
1389: -- GMD_API_PUB.Log_Message('GMD_SAMPLE_SOURCE_INVALID');
1390: /* GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
1391: 'SAMPLE NO', ' IS NULL');*/
1392: GMD_API_PUB.Log_Message('GMD_SAMPLE_NUM_NULL');
1393: RAISE FND_API.G_EXC_ERROR;
1394: END IF;
1395:
1396: IF ( p_qc_samples_rec.organization_id is NULL) THEN

Line 1397: GMD_API_PUB.Log_Message('GMD_SAMPLE_ORGN_CODE_REQD');

1393: RAISE FND_API.G_EXC_ERROR;
1394: END IF;
1395:
1396: IF ( p_qc_samples_rec.organization_id is NULL) THEN
1397: GMD_API_PUB.Log_Message('GMD_SAMPLE_ORGN_CODE_REQD');
1398: RAISE FND_API.G_EXC_ERROR;
1399: END IF;
1400:
1401: END IF; -- Key Sample values Present

Line 1416: GMD_API_PUB.Log_Message('GMD_RECORD_DELETE_MARKED',

1412:
1413: -- Validate that the Sample Header is Not Already Marked For Purge
1414:
1415: IF l_qc_samples_out_rec.delete_mark = 1 THEN
1416: GMD_API_PUB.Log_Message('GMD_RECORD_DELETE_MARKED',
1417: 'l_table_name', 'GMD_SAMPLES',
1418: 'l_column_name', 'SAMPLE_ID',
1419: 'l_key_value', l_qc_samples_out_rec.sample_id);
1420: RAISE FND_API.G_EXC_ERROR;

Line 1432: GMD_API_PUB.Log_Message('GMD_FAILED_TO_DELETE_ROW',

1428: p_sample_id => l_qc_samples_out_rec.sample_id,
1429: p_organization_id => l_qc_samples_out_rec.organization_id,
1430: p_sample_no => l_qc_samples_out_rec.sample_no
1431: ) THEN
1432: GMD_API_PUB.Log_Message('GMD_FAILED_TO_DELETE_ROW',
1433: 'l_table_name', 'GMD_SAMPLES',
1434: 'l_column_name','SAMPLE_ID',
1435: 'l_key_value', l_qc_samples_out_rec.sample_id);
1436:

Line 1450: GMD_API_PUB.Log_Message('GMD_LOCKING_FAILURE',

1446: -- Lock Sampling event row
1447: IF NOT GMD_SAMPLING_EVENTS_PVT.lock_row
1448: ( p_sampling_event_id => l_qc_samples_out_rec.sampling_event_id
1449: ) THEN
1450: GMD_API_PUB.Log_Message('GMD_LOCKING_FAILURE',
1451: 'l_table_name', 'GMD_SAMPLING_EVENTS',
1452: 'l_column_name','SAMPLING_EVENT_ID',
1453: 'l_key_value', l_qc_samples_out_rec.sampling_event_id);
1454: RAISE FND_API.G_EXC_ERROR;

Line 1593: GMD_API_PUB.Log_Message('GMD_SPEC_ITEM_REQD');

1589: -- We should only be validating W,I,C,S source type which
1590: -- all reqire the ite to exist.
1591:
1592: IF (l_sample_rec.inventory_item_id IS NULL) THEN
1593: GMD_API_PUB.Log_Message('GMD_SPEC_ITEM_REQD');
1594: RAISE FND_API.G_EXC_ERROR;
1595: ELSE
1596: -- Validate that the item is valid.
1597: -- Bug 4165704: validation is now done with call to get_item_values

Line 1602: -- GMD_API_PUB.Log_Message('GMD_SPEC_ITEM_NOT_FOUND');

1598: -- OPEN c_item_controls;
1599: -- FETCH c_item_controls INTO l_status_ctl, l_lot_ctl , l_sublot_ctl, l_item_loct_ctl;
1600: -- IF (c_item_controls%NOTFOUND) THEN
1601: -- CLOSE c_item_controls;
1602: -- GMD_API_PUB.Log_Message('GMD_SPEC_ITEM_NOT_FOUND');
1603: -- RAISE FND_API.G_EXC_ERROR;
1604: -- END IF;
1605: -- CLOSE c_item_controls;
1606:

Line 1614: GMD_API_PUB.Log_Message('GMD_SPEC_ITEM_NOT_FOUND');

1610: gmd_samples_grp.get_item_values(p_sample_display => l_sample_display);
1611:
1612: -- test for whether an item was found
1613: IF l_sample_display.item_number IS NULL THEN
1614: GMD_API_PUB.Log_Message('GMD_SPEC_ITEM_NOT_FOUND');
1615: RAISE FND_API.G_EXC_ERROR;
1616:
1617: ELSE
1618: l_lot_ctl := l_sample_display.lot_control_code ;

Line 1635: GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

1631:
1632: -- 5283854 - move the below check to CREATE_SAMPLE
1633: /* IF ((l_sample_rec.lot_number IS NULL)
1634: AND ((l_sample_rec.parent_lot_number IS NULL) AND (l_sample_display.child_lot_flag = 'Y'))) THEN
1635: GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
1636: 'WHAT', 'lot_number');
1637: RAISE FND_API.G_EXC_ERROR;
1638:
1639: END IF; */

Line 1647: GMD_API_PUB.Log_Message('GMD_QM_PARENT_LOT_NULL');

1643: IF ((l_sample_rec.lot_number IS NOT NULL)
1644: OR (l_sample_rec.parent_lot_number IS NOT NULL)) THEN
1645:
1646: IF ( l_child_lot_flag = 'N') AND ( l_sample_rec.parent_lot_number IS NOT NULL) THEN
1647: GMD_API_PUB.Log_Message('GMD_QM_PARENT_LOT_NULL');
1648: RAISE FND_API.G_EXC_ERROR;
1649: END IF; -- If item is not child lot controlled parent lot shouldn't exist.
1650:
1651:

Line 1656: GMD_API_PUB.Log_Message('GMD_ITEM_LOT_NOT_FOUND',

1652: OPEN c_item_lot(l_child_lot_flag); --srakrish bug 5687499: Passing the child lot flags to the cursor.
1653: FETCH c_item_lot INTO l_dummy;
1654: IF (c_item_lot%NOTFOUND) THEN
1655: CLOSE c_item_lot;
1656: GMD_API_PUB.Log_Message('GMD_ITEM_LOT_NOT_FOUND',
1657: 'LOT_NUMBER', l_sample_rec.lot_number);
1658: RAISE FND_API.G_EXC_ERROR;
1659: END IF;
1660: CLOSE c_item_lot;

Line 1670: --GMD_API_PUB.Log_Message('GMD_ITEM_SUBLOT_NOT_FOUND',

1666: --OPEN c_item_sublot;
1667: --FETCH c_item_sublot INTO l_lot_id;
1668: --IF (c_item_sublot%NOTFOUND) THEN
1669: --CLOSE c_item_sublot;
1670: --GMD_API_PUB.Log_Message('GMD_ITEM_SUBLOT_NOT_FOUND',
1671: -- 'SUBLOT_NO', l_sample_rec.sublot_no);
1672: --RAISE FND_API.G_EXC_ERROR;
1673: --END IF;
1674: --CLOSE c_item_sublot;

Line 1680: -- GMD_API_PUB.Log_Message('GMD_QM_LOT_REQUIRED');

1676: --END IF; -- validating lot/sublot
1677: --END IF; -- if item is lot/sublot controlled.
1678: -- 8276017 - move the below check to CREATE_SAMPLE as we needed to check lot optional on svr - SO comment out below 3 lines
1679: --ELSIF ( l_child_lot_flag = 'N') THEN --srakrish bug 5687499: Included the else part to check for the lot when the item is not child lot controlled. Lot is a required field.
1680: -- GMD_API_PUB.Log_Message('GMD_QM_LOT_REQUIRED');
1681: -- RAISE FND_API.G_EXC_ERROR;
1682: END IF; -- If item is lot controlled an lot_id specified.
1683: END IF; --lot control = 2
1684:

Line 1691: GMD_API_PUB.Log_Message('GMD_GRADE_MUST_NULL');

1687:
1688:
1689: -- Bug 4165704: added grade control check here
1690: IF (l_sample_display.grade_control_flag = 'N' AND p_grade is NOT NULL) THEN
1691: GMD_API_PUB.Log_Message('GMD_GRADE_MUST_NULL');
1692: RAISE FND_API.G_EXC_ERROR;
1693: END IF;
1694:
1695: -- Bug 5283854 : added revision control check here

Line 1698: GMD_API_PUB.Log_Message('GMD_API_REVISION_CTRL');

1694:
1695: -- Bug 5283854 : added revision control check here
1696: IF l_sample_display.Revision_qty_control_code = 2 then
1697: IF (l_sample_rec.revision IS NULL) THEN
1698: GMD_API_PUB.Log_Message('GMD_API_REVISION_CTRL');
1699: RAISE FND_API.G_EXC_ERROR;
1700:
1701: END IF;
1702:

Line 1762: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');

1758:
1759: -- Validate the location
1760: IF (l_locator_control = 1) THEN
1761: IF (p_sample_rec.locator_id IS NOT NULL) THEN
1762: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');
1763: RAISE FND_API.G_EXC_ERROR;
1764: END IF;
1765: ELSIF (l_locator_control > 1 ) THEN -- Item is location controlled.
1766: IF (p_sample_rec.locator_id IS NOT NULL) THEN

Line 1772: GMD_API_PUB.Log_Message('GMD_LOCT_NOT_FOUND',

1768: OPEN c_subinventory_loct;
1769: FETCH c_subinventory_loct INTO l_dummy;
1770: IF (c_subinventory_loct%NOTFOUND) THEN
1771: -- CLOSE c_subinventory_loct;
1772: GMD_API_PUB.Log_Message('GMD_LOCT_NOT_FOUND',
1773: 'LOCATION', p_sample_rec.locator_id);
1774: -- RAISE FND_API.G_EXC_ERROR;
1775: END IF;
1776: CLOSE c_subinventory_loct;

Line 1778: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');

1774: -- RAISE FND_API.G_EXC_ERROR;
1775: END IF;
1776: CLOSE c_subinventory_loct;
1777: ELSE -- location CANNOT NULL
1778: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');
1779: RAISE FND_API.G_EXC_ERROR;
1780: END IF; -- location IS NOT NULL
1781: END IF; -- l_locator_control
1782:

Line 1935: GMD_API_PUB.Log_Message('GMD_NO_WIP_PARAM');

1931:
1932:
1933: -- For WIP sample the batch_id must be specified.
1934: IF (p_sample_rec.batch_id IS NULL ) THEN
1935: GMD_API_PUB.Log_Message('GMD_NO_WIP_PARAM');
1936: RAISE FND_API.G_EXC_ERROR;
1937: END IF;
1938:
1939: ----------------------------------------------

Line 1954: GMD_API_PUB.Log_Message('GMD_ORDER_NOT_FOUND');

1950: l_sample_rec.formula_id,
1951: l_sample_rec.routing_id;
1952: IF (batch_no_formula%NOTFOUND) THEN
1953: CLOSE batch_no_formula;
1954: GMD_API_PUB.Log_Message('GMD_ORDER_NOT_FOUND');
1955: -- GMD_API_PUB.Log_Message('GMD_BATCH_NOT_FOUND');
1956: RAISE FND_API.G_EXC_ERROR;
1957: END IF;
1958: CLOSE batch_no_formula;

Line 1955: -- GMD_API_PUB.Log_Message('GMD_BATCH_NOT_FOUND');

1951: l_sample_rec.routing_id;
1952: IF (batch_no_formula%NOTFOUND) THEN
1953: CLOSE batch_no_formula;
1954: GMD_API_PUB.Log_Message('GMD_ORDER_NOT_FOUND');
1955: -- GMD_API_PUB.Log_Message('GMD_BATCH_NOT_FOUND');
1956: RAISE FND_API.G_EXC_ERROR;
1957: END IF;
1958: CLOSE batch_no_formula;
1959:

Line 1969: GMD_API_PUB.Log_Message('GMD_BATCH_NOT_FOUND');

1965: l_sample_rec.formula_id,
1966: l_sample_rec.routing_id;
1967: IF (c_batch%NOTFOUND) THEN
1968: CLOSE c_batch;
1969: GMD_API_PUB.Log_Message('GMD_BATCH_NOT_FOUND');
1970: RAISE FND_API.G_EXC_ERROR;
1971: END IF;
1972: CLOSE c_batch;
1973:

Line 1989: GMD_API_PUB.Log_Message('GMD_FORMULA_LINE_NOT_FOUND');

1985: OPEN c_formulaline_id ( l_sample_rec.formula_id);
1986: FETCH c_formulaline_id INTO l_dummy;
1987: IF (c_formulaline_id%NOTFOUND) THEN
1988: CLOSE c_formulaline_id;
1989: GMD_API_PUB.Log_Message('GMD_FORMULA_LINE_NOT_FOUND');
1990: RAISE FND_API.G_EXC_ERROR;
1991: END IF;
1992: CLOSE c_formulaline_id;
1993: END IF;

Line 2001: GMD_API_PUB.Log_Message('GMD_MATERIAL_DTL_NOT_FOUND');

1997: OPEN c_material_detail_id ( l_sample_rec.batch_id);
1998: FETCH c_material_detail_id INTO l_dummy;
1999: IF (c_material_detail_id%NOTFOUND) THEN
2000: CLOSE c_material_detail_id;
2001: GMD_API_PUB.Log_Message('GMD_MATERIAL_DTL_NOT_FOUND');
2002: RAISE FND_API.G_EXC_ERROR;
2003: END IF;
2004: CLOSE c_material_detail_id;
2005: END IF;

Line 2019: GMD_API_PUB.Log_Message('GMD_BATCH_STEP_NOT_FOUND');

2015: FETCH c_batchstep
2016: INTO l_sample_rec.step_no,l_sample_rec.oprn_id;
2017: IF (c_batchstep%NOTFOUND) THEN
2018: CLOSE c_batchstep;
2019: GMD_API_PUB.Log_Message('GMD_BATCH_STEP_NOT_FOUND');
2020: RAISE FND_API.G_EXC_ERROR;
2021: END IF;
2022: CLOSE c_batchstep;
2023:

Line 2034: GMD_API_PUB.Log_Message('GMD_BATCH_STEP_NOT_FOUND');

2030: FETCH c_oprn
2031: INTO l_dummy;
2032: IF (c_oprn%NOTFOUND) THEN
2033: CLOSE c_oprn;
2034: GMD_API_PUB.Log_Message('GMD_BATCH_STEP_NOT_FOUND');
2035: RAISE FND_API.G_EXC_ERROR;
2036: END IF;
2037: CLOSE c_oprn;
2038: END IF;

Line 2160: GMD_API_PUB.Log_Message('GMD_CUSTOMER_REQD');

2156: -- For A Customer Sample Source the Cust_id
2157: -- Must be Specified. This also validates the Org_id
2158:
2159: IF (p_sample_rec.cust_id IS NULL) THEN
2160: GMD_API_PUB.Log_Message('GMD_CUSTOMER_REQD');
2161: RAISE FND_API.G_EXC_ERROR;
2162: ELSE
2163: OPEN c_cust;
2164: FETCH c_cust

Line 2168: GMD_API_PUB.Log_Message('GMD_CUSTOMER_NOT_FOUND');

2164: FETCH c_cust
2165: INTO l_dummy;
2166: IF (c_cust%NOTFOUND) THEN
2167: CLOSE c_cust;
2168: GMD_API_PUB.Log_Message('GMD_CUSTOMER_NOT_FOUND');
2169: RAISE FND_API.G_EXC_ERROR;
2170: END IF;
2171: CLOSE c_cust;
2172: END IF;

Line 2182: GMD_API_PUB.Log_Message('GMD_SHIP_TO_NOT_FOUND');

2178: FETCH c_ship_to
2179: INTO l_dummy;
2180: IF (c_ship_to%NOTFOUND) THEN
2181: CLOSE c_ship_to;
2182: GMD_API_PUB.Log_Message('GMD_SHIP_TO_NOT_FOUND');
2183: RAISE FND_API.G_EXC_ERROR;
2184: END IF;
2185: CLOSE c_ship_to;
2186: END IF;

Line 2198: GMD_API_PUB.Log_Message('GMD_ORDER_NOT_FOUND');

2194: INTO l_dummy;
2195: IF (c_order%NOTFOUND)
2196: THEN
2197: CLOSE c_order;
2198: GMD_API_PUB.Log_Message('GMD_ORDER_NOT_FOUND');
2199: RAISE FND_API.G_EXC_ERROR;
2200: END IF;
2201: CLOSE c_order;
2202: END IF;

Line 2210: GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2206:
2207: /* IF (p_sample_rec.order_line_id IS NOT NULL
2208: AND p_sample_rec.order_id IS NOT NULL) THEN
2209:
2210: GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2211: 'WHAT', 'the order_id must not be NULL');
2212: RAISE FND_API.G_EXC_ERROR;
2213: ELSE
2214:

Line 2220: GMD_API_PUB.Log_Message('GMD_ORDER_LINE_NOT_FOUND');

2216: FETCH c_order_line
2217: INTO l_dummy;
2218: IF (c_order_line%NOTFOUND) THEN
2219: CLOSE c_order_line;
2220: GMD_API_PUB.Log_Message('GMD_ORDER_LINE_NOT_FOUND');
2221: RAISE FND_API.G_EXC_ERROR;
2222: END IF;
2223: CLOSE c_order_line;
2224: END IF; */

Line 2228: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2224: END IF; */
2225:
2226: IF (p_sample_rec.order_line_id IS NOT NULL) THEN
2227: IF (p_sample_rec.order_id IS NULL) THEN
2228: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2229: 'WHAT', 'the order_id must not be NULL');*/
2230: GMD_API_PUB.Log_Message('GMD_ORDER_ID_MUST_NOT_NULL');
2231: RAISE FND_API.G_EXC_ERROR;
2232: END IF;

Line 2230: GMD_API_PUB.Log_Message('GMD_ORDER_ID_MUST_NOT_NULL');

2226: IF (p_sample_rec.order_line_id IS NOT NULL) THEN
2227: IF (p_sample_rec.order_id IS NULL) THEN
2228: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2229: 'WHAT', 'the order_id must not be NULL');*/
2230: GMD_API_PUB.Log_Message('GMD_ORDER_ID_MUST_NOT_NULL');
2231: RAISE FND_API.G_EXC_ERROR;
2232: END IF;
2233:
2234: OPEN c_order_line;

Line 2240: GMD_API_PUB.Log_Message('GMD_ORDER_LINE_NOT_FOUND');

2236: INTO l_dummy;
2237:
2238: IF (c_order_line%NOTFOUND) THEN
2239: CLOSE c_order_line;
2240: GMD_API_PUB.Log_Message('GMD_ORDER_LINE_NOT_FOUND');
2241: RAISE FND_API.G_EXC_ERROR;
2242: END IF;
2243: CLOSE c_order_line;
2244:

Line 2369: GMD_API_PUB.Log_Message('GMD_SUPPLIER_REQD');

2365: -- supplier_id : This field is mandatory
2366:
2367: IF (p_sample_rec.supplier_id IS NULL)
2368: THEN
2369: GMD_API_PUB.Log_Message('GMD_SUPPLIER_REQD');
2370: RAISE FND_API.G_EXC_ERROR;
2371: ELSE
2372: OPEN c_supplier;
2373: FETCH c_supplier INTO l_dummy;

Line 2377: GMD_API_PUB.Log_Message('GMD_SUPPLIER_NOT_FOUND');

2373: FETCH c_supplier INTO l_dummy;
2374: IF (c_supplier%NOTFOUND)
2375: THEN
2376: CLOSE c_supplier;
2377: GMD_API_PUB.Log_Message('GMD_SUPPLIER_NOT_FOUND');
2378: RAISE FND_API.G_EXC_ERROR;
2379: END IF;
2380: CLOSE c_supplier;
2381: END IF;

Line 2412: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2408: IF (p_sample_rec.po_header_id IS NOT NULL)
2409: THEN
2410: IF (p_sample_rec.supplier_site_id IS NULL)
2411: THEN
2412: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2413: 'WHAT', 'supplier_site_id must not be NULL');*/
2414: GMD_API_PUB.Log_Message('GMD_SUPP_SITE_MUST_NOT_NULL');
2415: RAISE FND_API.G_EXC_ERROR;
2416: END IF;

Line 2414: GMD_API_PUB.Log_Message('GMD_SUPP_SITE_MUST_NOT_NULL');

2410: IF (p_sample_rec.supplier_site_id IS NULL)
2411: THEN
2412: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2413: 'WHAT', 'supplier_site_id must not be NULL');*/
2414: GMD_API_PUB.Log_Message('GMD_SUPP_SITE_MUST_NOT_NULL');
2415: RAISE FND_API.G_EXC_ERROR;
2416: END IF;
2417:
2418: OPEN c_po;

Line 2423: GMD_API_PUB.Log_Message('GMD_PO_NOT_FOUND');

2419: FETCH c_po INTO l_dummy;
2420: IF (c_po%NOTFOUND)
2421: THEN
2422: CLOSE c_po;
2423: GMD_API_PUB.Log_Message('GMD_PO_NOT_FOUND');
2424: RAISE FND_API.G_EXC_ERROR;
2425: END IF;
2426: CLOSE c_po;
2427: END IF;

Line 2439: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2435: IF (p_sample_rec.po_line_id IS NOT NULL)
2436: THEN
2437: IF (p_sample_rec.po_header_id IS NULL)
2438: THEN
2439: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2440: 'WHAT', 'po_header_id must not be NULL');*/
2441: GMD_API_PUB.Log_Message('GMD_PO_HEADER_MUST_NOT_NULL');
2442: RAISE FND_API.G_EXC_ERROR;
2443: END IF;

Line 2441: GMD_API_PUB.Log_Message('GMD_PO_HEADER_MUST_NOT_NULL');

2437: IF (p_sample_rec.po_header_id IS NULL)
2438: THEN
2439: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2440: 'WHAT', 'po_header_id must not be NULL');*/
2441: GMD_API_PUB.Log_Message('GMD_PO_HEADER_MUST_NOT_NULL');
2442: RAISE FND_API.G_EXC_ERROR;
2443: END IF;
2444:
2445: IF (p_sample_rec.supplier_site_id IS NULL)

Line 2447: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2443: END IF;
2444:
2445: IF (p_sample_rec.supplier_site_id IS NULL)
2446: THEN
2447: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2448: 'WHAT', 'supplier site must not be NULL');*/
2449: GMD_API_PUB.Log_Message('GMD_SUPP_SITE_MUST_NOT_NULL');
2450: RAISE FND_API.G_EXC_ERROR;
2451: END IF;

Line 2449: GMD_API_PUB.Log_Message('GMD_SUPP_SITE_MUST_NOT_NULL');

2445: IF (p_sample_rec.supplier_site_id IS NULL)
2446: THEN
2447: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2448: 'WHAT', 'supplier site must not be NULL');*/
2449: GMD_API_PUB.Log_Message('GMD_SUPP_SITE_MUST_NOT_NULL');
2450: RAISE FND_API.G_EXC_ERROR;
2451: END IF;
2452:
2453: OPEN c_po_line;

Line 2458: GMD_API_PUB.Log_Message('GMD_PO_LINE_NOT_FOUND');

2454: FETCH c_po_line INTO l_dummy;
2455: IF (c_po_line%NOTFOUND)
2456: THEN
2457: CLOSE c_po_line;
2458: GMD_API_PUB.Log_Message('GMD_PO_LINE_NOT_FOUND');
2459: RAISE FND_API.G_EXC_ERROR;
2460: END IF;
2461: CLOSE c_po_line;
2462: END IF;

Line 2474: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2470: IF(p_sample_rec.receipt_id IS NOT NULL OR p_sample_rec.receipt_line_id IS NOT NULL)
2471: THEN
2472: IF (p_sample_rec.po_header_id IS NULL)
2473: THEN
2474: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2475: 'WHAT', 'po_header_id must not be NULL');*/
2476: GMD_API_PUB.Log_Message('GMD_PO_HEADER_MUST_NOT_NULL');
2477: RAISE FND_API.G_EXC_ERROR;
2478: END IF;

Line 2476: GMD_API_PUB.Log_Message('GMD_PO_HEADER_MUST_NOT_NULL');

2472: IF (p_sample_rec.po_header_id IS NULL)
2473: THEN
2474: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2475: 'WHAT', 'po_header_id must not be NULL');*/
2476: GMD_API_PUB.Log_Message('GMD_PO_HEADER_MUST_NOT_NULL');
2477: RAISE FND_API.G_EXC_ERROR;
2478: END IF;
2479: IF (p_sample_rec.po_line_id IS NULL)
2480: THEN

Line 2481: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2477: RAISE FND_API.G_EXC_ERROR;
2478: END IF;
2479: IF (p_sample_rec.po_line_id IS NULL)
2480: THEN
2481: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2482: 'WHAT', 'po_line_id must not be NULL');*/
2483: GMD_API_PUB.Log_Message('GMD_PO_LINE_MUST_NOT_NULL');
2484: RAISE FND_API.G_EXC_ERROR;
2485: END IF;

Line 2483: GMD_API_PUB.Log_Message('GMD_PO_LINE_MUST_NOT_NULL');

2479: IF (p_sample_rec.po_line_id IS NULL)
2480: THEN
2481: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2482: 'WHAT', 'po_line_id must not be NULL');*/
2483: GMD_API_PUB.Log_Message('GMD_PO_LINE_MUST_NOT_NULL');
2484: RAISE FND_API.G_EXC_ERROR;
2485: END IF;
2486: END IF;
2487:

Line 2490: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2486: END IF;
2487:
2488: IF (p_sample_rec.receipt_id IS NOT NULL AND p_sample_rec.receipt_line_id IS NULL)
2489: THEN
2490: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2491: 'WHAT', 'receipt_line_id must not be NULL');*/
2492: GMD_API_PUB.Log_Message('GMD_RECEIPT_LINE_MUST_NOT_NULL');
2493: RAISE FND_API.G_EXC_ERROR;
2494: END IF;

Line 2492: GMD_API_PUB.Log_Message('GMD_RECEIPT_LINE_MUST_NOT_NULL');

2488: IF (p_sample_rec.receipt_id IS NOT NULL AND p_sample_rec.receipt_line_id IS NULL)
2489: THEN
2490: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2491: 'WHAT', 'receipt_line_id must not be NULL');*/
2492: GMD_API_PUB.Log_Message('GMD_RECEIPT_LINE_MUST_NOT_NULL');
2493: RAISE FND_API.G_EXC_ERROR;
2494: END IF;
2495:
2496: IF (p_sample_rec.receipt_line_id IS NOT NULL AND p_sample_rec.receipt_id IS NULL)

Line 2498: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2494: END IF;
2495:
2496: IF (p_sample_rec.receipt_line_id IS NOT NULL AND p_sample_rec.receipt_id IS NULL)
2497: THEN
2498: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2499: 'WHAT', 'receipt_id must not be NULL');*/
2500: GMD_API_PUB.Log_Message('GMD_RECEIPT_MUST_NOT_NULL');
2501: RAISE FND_API.G_EXC_ERROR;
2502: END IF;

Line 2500: GMD_API_PUB.Log_Message('GMD_RECEIPT_MUST_NOT_NULL');

2496: IF (p_sample_rec.receipt_line_id IS NOT NULL AND p_sample_rec.receipt_id IS NULL)
2497: THEN
2498: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2499: 'WHAT', 'receipt_id must not be NULL');*/
2500: GMD_API_PUB.Log_Message('GMD_RECEIPT_MUST_NOT_NULL');
2501: RAISE FND_API.G_EXC_ERROR;
2502: END IF;
2503:
2504: IF(p_sample_rec.receipt_id IS NOT NULL AND p_sample_rec.receipt_line_id IS NOT NULL)

Line 2511: GMD_API_PUB.Log_Message('GMD_RECEIPT_NOT_FOUND');

2507: FETCH c_receipt_info INTO l_dummy;
2508: IF (c_receipt_info%NOTFOUND)
2509: THEN
2510: CLOSE c_receipt_info;
2511: GMD_API_PUB.Log_Message('GMD_RECEIPT_NOT_FOUND');
2512: RAISE FND_API.G_EXC_ERROR;
2513: END IF;
2514: CLOSE c_receipt_info;
2515: END IF;

Line 2573: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2569: l_return_status := FND_API.G_RET_STS_SUCCESS;
2570:
2571: IF ((p_sample_rec.inventory_item_id IS NOT NULL)
2572: OR (p_sample_rec.lot_number IS NOT NULL)) THEN
2573: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2574: 'Item and Lot', ' should not be specified for Monitor sample');*/
2575: GMD_API_PUB.Log_Message('GMD_ITEM_LOT_MONITOR_SAMPLE');
2576: RAISE FND_API.G_EXC_ERROR;
2577: END IF; -- test item sources

Line 2575: GMD_API_PUB.Log_Message('GMD_ITEM_LOT_MONITOR_SAMPLE');

2571: IF ((p_sample_rec.inventory_item_id IS NOT NULL)
2572: OR (p_sample_rec.lot_number IS NOT NULL)) THEN
2573: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2574: 'Item and Lot', ' should not be specified for Monitor sample');*/
2575: GMD_API_PUB.Log_Message('GMD_ITEM_LOT_MONITOR_SAMPLE');
2576: RAISE FND_API.G_EXC_ERROR;
2577: END IF; -- test item sources
2578:
2579: IF ((p_sample_rec.sample_qty IS NOT NULL)

Line 2581: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2577: END IF; -- test item sources
2578:
2579: IF ((p_sample_rec.sample_qty IS NOT NULL)
2580: OR (p_sample_rec.sample_qty_uom IS NOT NULL)) THEN
2581: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2582: 'Quantity and UOM', ' should not be specified for Monitor sample');*/
2583: GMD_API_PUB.Log_Message('GMD_QTY_UOM_MONITOR_SAMPLE');
2584: RAISE FND_API.G_EXC_ERROR;
2585: END IF; -- test item sources

Line 2583: GMD_API_PUB.Log_Message('GMD_QTY_UOM_MONITOR_SAMPLE');

2579: IF ((p_sample_rec.sample_qty IS NOT NULL)
2580: OR (p_sample_rec.sample_qty_uom IS NOT NULL)) THEN
2581: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2582: 'Quantity and UOM', ' should not be specified for Monitor sample');*/
2583: GMD_API_PUB.Log_Message('GMD_QTY_UOM_MONITOR_SAMPLE');
2584: RAISE FND_API.G_EXC_ERROR;
2585: END IF; -- test item sources
2586:
2587: IF p_sample_rec.resources IS NULL THEN

Line 2588: GMD_API_PUB.Log_Message('GMD_QC_RESOURCE_REQD');

2584: RAISE FND_API.G_EXC_ERROR;
2585: END IF; -- test item sources
2586:
2587: IF p_sample_rec.resources IS NULL THEN
2588: GMD_API_PUB.Log_Message('GMD_QC_RESOURCE_REQD');
2589: RAISE FND_API.G_EXC_ERROR;
2590: END IF; -- test item sources
2591:
2592: -- validate resource

Line 2600: GMD_API_PUB.Log_Message('GMD_RESOURCE_NOT_FOUND',

2596: FETCH c_resource INTO l_dummy;
2597: IF (c_resource%NOTFOUND)
2598: THEN
2599: CLOSE c_resource;
2600: GMD_API_PUB.Log_Message('GMD_RESOURCE_NOT_FOUND',
2601: 'RESOURCE', p_sample_rec.resources);
2602: RAISE FND_API.G_EXC_ERROR;
2603: END IF;
2604: CLOSE c_resource;

Line 2653: GMD_API_PUB.Log_Message('GMD_ITEM_LOT_MONITOR_SAMPLE');

2649: l_return_status := FND_API.G_RET_STS_SUCCESS;
2650:
2651: IF ((p_sample_rec.inventory_item_id IS NOT NULL)
2652: OR (p_sample_rec.lot_number IS NOT NULL)) THEN
2653: GMD_API_PUB.Log_Message('GMD_ITEM_LOT_MONITOR_SAMPLE');
2654: RAISE FND_API.G_EXC_ERROR;
2655: END IF; -- test item sources
2656:
2657: IF ((p_sample_rec.sample_qty IS NOT NULL)

Line 2659: GMD_API_PUB.Log_Message('GMD_QTY_UOM_MONITOR_SAMPLE');

2655: END IF; -- test item sources
2656:
2657: IF ((p_sample_rec.sample_qty IS NOT NULL)
2658: OR (p_sample_rec.sample_qty_uom IS NOT NULL)) THEN
2659: GMD_API_PUB.Log_Message('GMD_QTY_UOM_MONITOR_SAMPLE');
2660: RAISE FND_API.G_EXC_ERROR;
2661: END IF; -- test item sources
2662:
2663: IF p_sample_rec.subinventory IS NULL THEN

Line 2664: GMD_API_PUB.Log_Message('GMD_QC_WHSE_REQD');

2660: RAISE FND_API.G_EXC_ERROR;
2661: END IF; -- test item sources
2662:
2663: IF p_sample_rec.subinventory IS NULL THEN
2664: GMD_API_PUB.Log_Message('GMD_QC_WHSE_REQD');
2665: RAISE FND_API.G_EXC_ERROR;
2666: END IF; -- test item sources
2667:
2668: -- This Procedure Assumes that the whse and item have been validated.

Line 2697: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');

2693: --=========================================================================
2694:
2695: IF (p_locator_control = 1) THEN
2696: IF (p_sample_rec.locator_id IS NOT NULL) THEN
2697: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');
2698: RAISE FND_API.G_EXC_ERROR;
2699: END IF;
2700: ELSE
2701: -- Item is location controlled.

Line 2704: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');

2700: ELSE
2701: -- Item is location controlled.
2702: IF (p_sample_rec.locator_id IS NULL) THEN
2703: -- Location cannot be NULL in this case.
2704: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');
2705: RAISE FND_API.G_EXC_ERROR;
2706: ELSE
2707: -- Check that Location exist in MTL_ITEM_LOCATIONS
2708: OPEN c_subinventory_loct;

Line 2712: GMD_API_PUB.Log_Message('GMD_LOCT_NOT_FOUND',

2708: OPEN c_subinventory_loct;
2709: FETCH c_subinventory_loct INTO l_dummy;
2710: IF (c_subinventory_loct%NOTFOUND) THEN
2711: --CLOSE c_subinventory_loct;
2712: GMD_API_PUB.Log_Message('GMD_LOCT_NOT_FOUND',
2713: 'LOCATION', p_sample_rec.locator_id);
2714: --RAISE FND_API.G_EXC_ERROR;
2715: END IF;
2716: CLOSE c_subinventory_loct;

Line 2868: GMD_API_PUB.Log_Message('GMD_ORGN_CODE_REQD');

2864: ----------------------------------
2865:
2866: -- Orgn Code
2867: IF (p_sample_rec.organization_id IS NULL) THEN
2868: GMD_API_PUB.Log_Message('GMD_ORGN_CODE_REQD');
2869: RAISE FND_API.G_EXC_ERROR;
2870: ELSE
2871: -- Check that orgn Code exist in SY_ORGN_MST
2872: OPEN c_orgn(p_sample_rec.organization_id);

Line 2876: GMD_API_PUB.Log_Message('GMD_ORGN_CODE_NOT_FOUND',

2872: OPEN c_orgn(p_sample_rec.organization_id);
2873: FETCH c_orgn INTO l_dummy;
2874: IF c_orgn%NOTFOUND THEN
2875: CLOSE c_orgn;
2876: GMD_API_PUB.Log_Message('GMD_ORGN_CODE_NOT_FOUND',
2877: 'ORGN', p_sample_rec.organization_id);
2878: RAISE FND_API.G_EXC_ERROR;
2879: END IF;
2880: CLOSE c_orgn;

Line 2886: GMD_API_PUB.Log_Message('GMD_SAMPLER_ID_REQD');

2882:
2883: -- Sampler Id Validation
2884:
2885: IF (p_sample_rec.sampler_id IS NULL ) THEN
2886: GMD_API_PUB.Log_Message('GMD_SAMPLER_ID_REQD');
2887: RAISE FND_API.G_EXC_ERROR;
2888: ELSE
2889: -- Check that orgn Code exist in mtl_parameters
2890: OPEN c_sampler(p_sample_rec.organization_id, p_sample_rec.sampler_id);

Line 2893: GMD_API_PUB.Log_Message('GMD_SAMPLER_ID_NOTFOUND',

2889: -- Check that orgn Code exist in mtl_parameters
2890: OPEN c_sampler(p_sample_rec.organization_id, p_sample_rec.sampler_id);
2891: FETCH c_sampler INTO l_dummy;
2892: IF c_sampler%NOTFOUND THEN
2893: GMD_API_PUB.Log_Message('GMD_SAMPLER_ID_NOTFOUND',
2894: 'SAMPLER', p_sample_rec.sampler_id);
2895: RAISE FND_API.G_EXC_ERROR;
2896: CLOSE c_sampler;
2897: END IF;

Line 2903: GMD_API_PUB.Log_Message('GMD_SAMPLE_NUMBER_REQD');

2899: END IF;
2900:
2901: -- Sample No
2902: IF (ltrim(rtrim(p_sample_rec.sample_no)) IS NULL) THEN
2903: GMD_API_PUB.Log_Message('GMD_SAMPLE_NUMBER_REQD');
2904: RAISE FND_API.G_EXC_ERROR;
2905: END IF;
2906:
2907:

Line 2910: GMD_API_PUB.Log_Message('GMD_QC_LAB_ORGN_CODE_REQD');

2906:
2907:
2908: -- QC Lab Orgn Code
2909: IF (p_sample_rec.lab_organization_id IS NULL) THEN
2910: GMD_API_PUB.Log_Message('GMD_QC_LAB_ORGN_CODE_REQD');
2911: RAISE FND_API.G_EXC_ERROR;
2912: ELSE
2913: -- Check that QC Lab Orgn Code exist in SY_ORGN_MST
2914: OPEN c_lab_orgn(p_sample_rec.lab_organization_id);

Line 2918: GMD_API_PUB.Log_Message('GMD_QC_LAB_ORGN_CODE_NOT_FOUND',

2914: OPEN c_lab_orgn(p_sample_rec.lab_organization_id);
2915: FETCH c_lab_orgn INTO l_dummy;
2916: IF c_lab_orgn%NOTFOUND THEN
2917: CLOSE c_lab_orgn;
2918: GMD_API_PUB.Log_Message('GMD_QC_LAB_ORGN_CODE_NOT_FOUND',
2919: 'ORGN', p_sample_rec.lab_organization_id);
2920: RAISE FND_API.G_EXC_ERROR;
2921: END IF;
2922: CLOSE c_lab_orgn;

Line 2930: GMD_API_PUB.Log_Message('GMD_SAMPLE_DISPOSITION_INVALID');

2926: -- Bug 3401377: added planned samples to MPL
2927: IF ((p_sample_rec.sample_disposition IS NULL) OR
2928: (NOT (p_sample_rec.sample_disposition in ('0RT', '0PL', '1P')))) THEN
2929: -- Now, what is the disposition of this sample?
2930: GMD_API_PUB.Log_Message('GMD_SAMPLE_DISPOSITION_INVALID');
2931: RAISE FND_API.G_EXC_ERROR;
2932: END IF;
2933:
2934: -- Sample Source

Line 2940: GMD_API_PUB.Log_Message('GMD_SAMPLE_SOURCE_INVALID');

2936: IF (p_sample_rec.source IS NULL OR
2937: (NOT (p_sample_rec.source in ('I', 'W', 'C', 'S', 'T','L','R')))
2938: ) THEN
2939: -- Now, what is the source of this sample? Where did it come from?
2940: GMD_API_PUB.Log_Message('GMD_SAMPLE_SOURCE_INVALID');
2941: RAISE FND_API.G_EXC_ERROR;
2942:
2943: ELSE -- VAlidate that sample type is Correct
2944:

Line 2946: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2942:
2943: ELSE -- VAlidate that sample type is Correct
2944:
2945: IF ( p_sample_rec.sample_type is NULL ) THEN
2946: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2947: 'WHAT', 'SAMPLE TYPE must be Specified');*/
2948: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE');
2949: RAISE FND_API.G_EXC_ERROR;
2950:

Line 2948: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE');

2944:
2945: IF ( p_sample_rec.sample_type is NULL ) THEN
2946: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2947: 'WHAT', 'SAMPLE TYPE must be Specified');*/
2948: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE');
2949: RAISE FND_API.G_EXC_ERROR;
2950:
2951: --ELSIF ( p_sample_rec.sample_type <> 'I') THEN
2952: ELSIF ( p_sample_rec.sample_type NOT IN ('M' , 'I')) THEN

Line 2954: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2950:
2951: --ELSIF ( p_sample_rec.sample_type <> 'I') THEN
2952: ELSIF ( p_sample_rec.sample_type NOT IN ('M' , 'I')) THEN
2953:
2954: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2955: 'WHAT', 'Only sample_type = M or I are Suppported');*/
2956: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE_SUPPORTED');
2957: RAISE FND_API.G_EXC_ERROR;
2958:

Line 2956: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE_SUPPORTED');

2952: ELSIF ( p_sample_rec.sample_type NOT IN ('M' , 'I')) THEN
2953:
2954: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2955: 'WHAT', 'Only sample_type = M or I are Suppported');*/
2956: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE_SUPPORTED');
2957: RAISE FND_API.G_EXC_ERROR;
2958:
2959: ELSIF ( p_sample_rec.sample_type = 'I')
2960: AND ( NOT (p_sample_rec.source in ('I', 'W', 'C', 'S', 'T'))) THEN

Line 2961: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2957: RAISE FND_API.G_EXC_ERROR;
2958:
2959: ELSIF ( p_sample_rec.sample_type = 'I')
2960: AND ( NOT (p_sample_rec.source in ('I', 'W', 'C', 'S', 'T'))) THEN
2961: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2962: 'WHAT', 'SAMPLE TYPE Inventory does not match source');*/
2963: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE_INVENTORY');
2964: RAISE FND_API.G_EXC_ERROR;
2965:

Line 2963: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE_INVENTORY');

2959: ELSIF ( p_sample_rec.sample_type = 'I')
2960: AND ( NOT (p_sample_rec.source in ('I', 'W', 'C', 'S', 'T'))) THEN
2961: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2962: 'WHAT', 'SAMPLE TYPE Inventory does not match source');*/
2963: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE_INVENTORY');
2964: RAISE FND_API.G_EXC_ERROR;
2965:
2966: ELSIF ( p_sample_rec.sample_type = 'M')
2967: AND ( NOT (p_sample_rec.source in ('R', 'L'))) THEN

Line 2968: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

2964: RAISE FND_API.G_EXC_ERROR;
2965:
2966: ELSIF ( p_sample_rec.sample_type = 'M')
2967: AND ( NOT (p_sample_rec.source in ('R', 'L'))) THEN
2968: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2969: 'WHAT', 'SAMPLE TYPE Monitor does not match source');*/
2970: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE_MONITOR');
2971: RAISE FND_API.G_EXC_ERROR;
2972: END IF;

Line 2970: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE_MONITOR');

2966: ELSIF ( p_sample_rec.sample_type = 'M')
2967: AND ( NOT (p_sample_rec.source in ('R', 'L'))) THEN
2968: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
2969: 'WHAT', 'SAMPLE TYPE Monitor does not match source');*/
2970: GMD_API_PUB.Log_Message('GMD_SAMPLE_TYPE_MONITOR');
2971: RAISE FND_API.G_EXC_ERROR;
2972: END IF;
2973:
2974: END IF;

Line 2982: GMD_API_PUB.Log_Message('GMD_SAMPLE_UOM_REQD');

2978: IF p_sample_rec.sample_type <> 'M' then
2979: OPEN uom;
2980: FETCH uom INTO l_uom;
2981: IF (uom%NOTFOUND) THEN
2982: GMD_API_PUB.Log_Message('GMD_SAMPLE_UOM_REQD');
2983: RAISE FND_API.G_EXC_ERROR;
2984: END IF;
2985: CLOSE uom;
2986:

Line 3000: GMD_API_PUB.Log_Message('FM_UOMMUSTCONVERT');

2996: lot_number => 0,
2997: from_name => NULL,
2998: to_name => NULL);
2999: IF (l_test_qty < 0 ) THEN
3000: GMD_API_PUB.Log_Message('FM_UOMMUSTCONVERT');
3001: RAISE FND_API.G_EXC_ERROR;
3002: END IF;
3003:
3004: END IF; -- IF p_sample_rec.sample_qty_uom <> l_uom THEN

Line 3016: GMD_API_PUB.Log_Message('GMD_SAMPLE_QTY_REQD');

3012: -- Sample Qty
3013: -- Bug 3401377: Monitor samples do not have a qty or uom
3014: IF ((p_sample_rec.sample_qty IS NULL)
3015: AND (p_sample_rec.sample_type = 'I' )) THEN
3016: GMD_API_PUB.Log_Message('GMD_SAMPLE_QTY_REQD');
3017: RAISE FND_API.G_EXC_ERROR;
3018: END IF;
3019:
3020: -- Sample UOM

Line 3024: GMD_API_PUB.Log_Message('GMD_SAMPLE_UOM_REQD');

3020: -- Sample UOM
3021: -- Bug 3401377: Monitor samples do not have a qty or uom
3022: IF ( (p_sample_rec.sample_qty_uom IS NULL)
3023: AND (p_sample_rec.sample_type = 'I' )) THEN
3024: GMD_API_PUB.Log_Message('GMD_SAMPLE_UOM_REQD');
3025: RAISE FND_API.G_EXC_ERROR;
3026: END IF;
3027:
3028: -- Validate Whse_code if passed.

Line 3038: GMD_API_PUB.Log_Message('GMD_WHSE_NOT_FOUND',

3034: OPEN c_subinventory;
3035: FETCH c_subinventory INTO l_dummy;
3036: IF (c_subinventory%NOTFOUND) THEN
3037: CLOSE c_subinventory;
3038: GMD_API_PUB.Log_Message('GMD_WHSE_NOT_FOUND',
3039: 'WHSE_CODE', p_sample_rec.subinventory);
3040: RAISE FND_API.G_EXC_ERROR;
3041: END IF;
3042: CLOSE c_subinventory;

Line 3050: -- GMD_API_PUB.Log_Message('GMD_WHSE_AND_ORGN_CODE');

3046: --OPEN c_orgn_whse;
3047: --FETCH c_orgn_whse INTO l_dummy;
3048: --IF (c_orgn_whse%NOTFOUND) THEN
3049: -- CLOSE c_orgn_whse;
3050: -- GMD_API_PUB.Log_Message('GMD_WHSE_AND_ORGN_CODE');
3051: -- RAISE FND_API.G_EXC_ERROR;
3052: -- END IF;
3053: -- CLOSE c_orgn_whse;
3054: END IF;

Line 3060: GMD_API_PUB.Log_Message('GMD_API_LOCATOR_NOT_REQD');

3056: -- Validate location
3057:
3058: -- 5283854 if subinv is not specified and locator is then error out
3059: IF p_sample_rec.subinventory IS NULL and p_sample_rec.locator_id is NOT NULL THEN
3060: GMD_API_PUB.Log_Message('GMD_API_LOCATOR_NOT_REQD');
3061: RAISE FND_API.G_EXC_ERROR;
3062: END IF;
3063: -- end 5283854
3064:

Line 3078: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

3074:
3075: IF ( l_locator_control = 1 ) THEN -- Not location controlled.
3076:
3077: IF ( p_sample_rec.locator_id is NOT NULL) THEN
3078: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
3079: 'WHAT', 'Location should be NULL');*/
3080: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');
3081: RAISE FND_API.G_EXC_ERROR;
3082: END IF;

Line 3080: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');

3076:
3077: IF ( p_sample_rec.locator_id is NOT NULL) THEN
3078: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
3079: 'WHAT', 'Location should be NULL');*/
3080: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');
3081: RAISE FND_API.G_EXC_ERROR;
3082: END IF;
3083:
3084: ELSIF ( l_locator_control > 1) THEN -- Validate that location exists in whse

Line 3089: GMD_API_PUB.Log_Message('GMD_API_SUBINV_REQD');

3085: -- Bug 4165704: updated for locator and subinventory
3086:
3087: -- 5283854 if subinv is specified and locator is NOT then error out
3088: IF p_sample_rec.subinventory IS NOT NULL and p_sample_rec.locator_id is NULL THEN
3089: GMD_API_PUB.Log_Message('GMD_API_SUBINV_REQD');
3090: RAISE FND_API.G_EXC_ERROR;
3091: END IF;
3092: -- end 5283854
3093:

Line 3100: GMD_API_PUB.Log_Message('GMD_LOCT_NOT_FOUND',

3096: OPEN c_subinventory_locator;
3097: FETCH c_subinventory_locator INTO l_dummy;
3098: IF (c_subinventory_locator%NOTFOUND) THEN
3099: --CLOSE c_subinventory_locator;
3100: GMD_API_PUB.Log_Message('GMD_LOCT_NOT_FOUND',
3101: 'LOCATOR', p_sample_rec.locator_id);
3102: RAISE FND_API.G_EXC_ERROR; -- 5283854 rework - take out -- from this line
3103: END IF;
3104: CLOSE c_subinventory_locator;

Line 3115: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');

3111:
3112:
3113: IF p_sample_rec.storage_organization_id is NULL and ( p_sample_rec.storage_subinventory IS NOT NULL or p_sample_rec.storage_locator_id is NOT NULL )
3114: then
3115: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');
3116: RAISE FND_API.G_EXC_ERROR;
3117: END IF;
3118:
3119:

Line 3128: GMD_API_PUB.Log_Message('GMD_API_LOCATOR_NOT_REQD');

3124:
3125:
3126: -- if subinv is not specified and locator is then error out
3127: IF p_sample_rec.storage_subinventory IS NULL and p_sample_rec.storage_locator_id is NOT NULL THEN
3128: GMD_API_PUB.Log_Message('GMD_API_LOCATOR_NOT_REQD');
3129: RAISE FND_API.G_EXC_ERROR;
3130: END IF;
3131:
3132:

Line 3143: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

3139:
3140: IF ( l_locator_control = 1 ) THEN -- Not location controlled.
3141:
3142: IF ( p_sample_rec.storage_locator_id is NOT NULL) THEN
3143: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
3144: 'WHAT', 'Location should be NULL');*/
3145: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');
3146: RAISE FND_API.G_EXC_ERROR;
3147: END IF;

Line 3145: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');

3141:
3142: IF ( p_sample_rec.storage_locator_id is NOT NULL) THEN
3143: /*GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
3144: 'WHAT', 'Location should be NULL');*/
3145: GMD_API_PUB.Log_Message('GMD_LOCATION_MUST_NULL');
3146: RAISE FND_API.G_EXC_ERROR;
3147: END IF;
3148:
3149: ELSIF ( l_locator_control > 1) THEN -- Validate that locater exists in subinv

Line 3154: GMD_API_PUB.Log_Message('GMD_API_SUBINV_REQD');

3150:
3151:
3152: -- if subinv is specified and locator is NOT then error out
3153: IF p_sample_rec.storage_subinventory IS NOT NULL and p_sample_rec.storage_locator_id is NULL THEN
3154: GMD_API_PUB.Log_Message('GMD_API_SUBINV_REQD');
3155: RAISE FND_API.G_EXC_ERROR;
3156: END IF;
3157:
3158: IF ( p_sample_rec.storage_locator_id is NOT NULL) THEN -- location specified

Line 3163: GMD_API_PUB.Log_Message('GMD_LOCT_NOT_FOUND',

3159:
3160: OPEN c_storage_subinventory_locator;
3161: FETCH c_storage_subinventory_locator INTO l_dummy;
3162: IF (c_storage_subinventory_locator%NOTFOUND) THEN
3163: GMD_API_PUB.Log_Message('GMD_LOCT_NOT_FOUND',
3164: 'LOCATOR', p_sample_rec.storage_locator_id);
3165: RAISE FND_API.G_EXC_ERROR;
3166: END IF;
3167: CLOSE c_storage_subinventory_locator;

Line 3328: GMD_API_PUB.Log_Message('GMD_INVALID_TEST_PRIORITY');

3324:
3325: ELSIF (NOT GMD_QC_TESTS_GRP.validate_test_priority
3326: (p_test_priority => l_sample_rec.priority)
3327: ) THEN
3328: GMD_API_PUB.Log_Message('GMD_INVALID_TEST_PRIORITY');
3329: RAISE FND_API.G_EXC_ERROR;
3330: END IF;
3331:
3332: --dbms_output.put_line('after validate_test_priority');

Line 3337: GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',

3333:
3334: -- bug 2995114
3335:
3336: IF NVL(l_sample_rec.sample_inv_trans_ind ,'N') NOT IN ('N','Y') THEN
3337: GMD_API_PUB.Log_Message('GMD_WRONG_VALUE',
3338: 'WHAT', 'SAMPLE_INV_TRANS_IND');
3339:
3340: RAISE FND_API.G_EXC_ERROR;
3341: END IF;