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_GRP dependencies on GMD_SAMPLES

Line 1: PACKAGE BODY GMD_SAMPLES_GRP AS

1: PACKAGE BODY GMD_SAMPLES_GRP AS
2: --$Header: GMDGSMPB.pls 120.29.12000000.3 2007/02/07 12:01:32 rlnagara ship $
3: -- Global variables
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'GMD_SAMPLES_GRP';
5:

Line 4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'GMD_SAMPLES_GRP';

1: PACKAGE BODY GMD_SAMPLES_GRP AS
2: --$Header: GMDGSMPB.pls 120.29.12000000.3 2007/02/07 12:01:32 rlnagara ship $
3: -- Global variables
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'GMD_SAMPLES_GRP';
5:
6: --Bug 3222090, magupta removed call to FND_PROFILE.VALUE('AFLOG_ENABLED')
7: --forward decl.
8: FUNCTION set_debug_flag RETURN VARCHAR2;

Line 28: --| Package Name : GMD_Samples_GRP |

24: --| Redwood Shores, CA, USA |
25: --| All rights reserved. |
26: --+==========================================================================+
27: --| File Name : GMDGSMPB.pls |
28: --| Package Name : GMD_Samples_GRP |
29: --| Type : Group |
30: --| |
31: --| Notes |
32: --| This package contains group layer APIs for Specification Entity |

Line 118: p_sample IN gmd_samples%ROWTYPE

114: -- End of comments
115:
116: FUNCTION sampling_event_with_vr_id
117: (
118: p_sample IN gmd_samples%ROWTYPE
119: , x_sampling_event_id OUT NOCOPY NUMBER
120: , p_spec_vr_id IN NUMBER DEFAULT NULL
121: ) RETURN BOOLEAN IS
122:

Line 504: p_sample IN gmd_samples%ROWTYPE

500:
501:
502: FUNCTION sampling_event_exist
503: (
504: p_sample IN gmd_samples%ROWTYPE
505: , x_sampling_event_id OUT NOCOPY NUMBER
506: , p_spec_vr_id IN NUMBER DEFAULT NULL
507: ) RETURN BOOLEAN IS
508:

Line 895: p_sample IN gmd_samples%ROWTYPE

891: -- End of comments
892:
893: FUNCTION sampling_event_exist_wo_spec
894: (
895: p_sample IN gmd_samples%ROWTYPE
896: , x_sampling_event_id OUT NOCOPY NUMBER
897: ) RETURN BOOLEAN IS
898:
899: CURSOR c_inv_sampling_event IS

Line 1187: FROM gmd_samples

1183: RETURN BOOLEAN IS
1184:
1185: CURSOR c_sample_no (p_organization_id VARCHAR2, p_sample_no VARCHAR2) IS
1186: SELECT 1
1187: FROM gmd_samples
1188: WHERE organization_id = p_organization_id
1189: AND sample_no = p_sample_no
1190: ;
1191:

Line 1249: p_sample IN gmd_samples%ROWTYPE

1245: -- End of comments
1246:
1247: PROCEDURE validate_sample
1248: (
1249: p_sample IN gmd_samples%ROWTYPE
1250: , p_called_from IN VARCHAR2
1251: , p_operation IN VARCHAR2
1252: , x_return_status OUT NOCOPY VARCHAR2
1253: ) IS

Line 1472: l_step_id GMD_SAMPLES.step_id%TYPE;

1468: l_final_event_disp VARCHAR2(4);
1469: l_sample_disp_curr_flag VARCHAR2(1);
1470: l_temp_numb NUMBER;
1471: -- Begin bug 4951244
1472: l_step_id GMD_SAMPLES.step_id%TYPE;
1473: l_sample_type GMD_SAMPLES.sample_type%TYPE;
1474: l_source GMD_SAMPLES.source%TYPE;
1475: return_status VARCHAR2(20);
1476: l_dummy_cnt NUMBER :=0;

Line 1473: l_sample_type GMD_SAMPLES.sample_type%TYPE;

1469: l_sample_disp_curr_flag VARCHAR2(1);
1470: l_temp_numb NUMBER;
1471: -- Begin bug 4951244
1472: l_step_id GMD_SAMPLES.step_id%TYPE;
1473: l_sample_type GMD_SAMPLES.sample_type%TYPE;
1474: l_source GMD_SAMPLES.source%TYPE;
1475: return_status VARCHAR2(20);
1476: l_dummy_cnt NUMBER :=0;
1477: l_data VARCHAR2(2000);

Line 1474: l_source GMD_SAMPLES.source%TYPE;

1470: l_temp_numb NUMBER;
1471: -- Begin bug 4951244
1472: l_step_id GMD_SAMPLES.step_id%TYPE;
1473: l_sample_type GMD_SAMPLES.sample_type%TYPE;
1474: l_source GMD_SAMPLES.source%TYPE;
1475: return_status VARCHAR2(20);
1476: l_dummy_cnt NUMBER :=0;
1477: l_data VARCHAR2(2000);
1478: l_batch_organization_id NUMBER;

Line 1482: FROM gmd_samples

1478: l_batch_organization_id NUMBER;
1479:
1480: Cursor cur_sample_details IS
1481: SELECT step_id,organization_id,sample_type,source
1482: FROM gmd_samples
1483: WHERE sample_id = p_update_disp_rec.sample_id;
1484: -- End bug 4951244
1485:
1486: --Bug# 5440347 start

Line 1490: FROM GMD_WIP_SPEC_VRS wip,GMD_SAMPLING_EVENTS gse,GMD_SAMPLES gs

1486: --Bug# 5440347 start
1487: --this cursor is used for single samples
1488: CURSOR cur_auto_complete_bstep IS
1489: SELECT NVL(wip.AUTO_COMPLETE_BATCH_STEP,'N')
1490: FROM GMD_WIP_SPEC_VRS wip,GMD_SAMPLING_EVENTS gse,GMD_SAMPLES gs
1491: WHERE gs.SAMPLE_ID = p_update_disp_rec.sample_id
1492: AND gse.SAMPLING_EVENT_ID = gs.SAMPLING_EVENT_ID
1493: AND wip.SPEC_VR_ID = gse.ORIGINAL_SPEC_VR_ID;
1494:

Line 1949: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');

1945: WHERE sampling_event_id = l_sampling_event_id ;
1946:
1947:
1948: EXCEPTION WHEN REQ_FIELDS_MISSING THEN
1949: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');
1950: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1951: x_return_status := FND_API.G_RET_STS_ERROR ;
1952: WHEN INVALID_PARAMETER THEN
1953: gmd_api_pub.log_message('GMD_INVALID_PARAM','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');

Line 1953: gmd_api_pub.log_message('GMD_INVALID_PARAM','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');

1949: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');
1950: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1951: x_return_status := FND_API.G_RET_STS_ERROR ;
1952: WHEN INVALID_PARAMETER THEN
1953: gmd_api_pub.log_message('GMD_INVALID_PARAM','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');
1954: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1955: x_return_status := FND_API.G_RET_STS_ERROR ;
1956: WHEN SAMPLE_SPEC_CHANGED THEN
1957: gmd_api_pub.log_message('GMD_SAMPLE_SPEC_CHANGED','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');

Line 1957: gmd_api_pub.log_message('GMD_SAMPLE_SPEC_CHANGED','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');

1953: gmd_api_pub.log_message('GMD_INVALID_PARAM','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');
1954: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1955: x_return_status := FND_API.G_RET_STS_ERROR ;
1956: WHEN SAMPLE_SPEC_CHANGED THEN
1957: gmd_api_pub.log_message('GMD_SAMPLE_SPEC_CHANGED','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');
1958: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1959: x_return_status := FND_API.G_RET_STS_ERROR ;
1960: WHEN SAMPLE_DISP_CHANGED THEN
1961: gmd_api_pub.log_message('GMD_SMPL_DISP_CHANGE','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');

Line 1961: gmd_api_pub.log_message('GMD_SMPL_DISP_CHANGE','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');

1957: gmd_api_pub.log_message('GMD_SAMPLE_SPEC_CHANGED','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');
1958: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1959: x_return_status := FND_API.G_RET_STS_ERROR ;
1960: WHEN SAMPLE_DISP_CHANGED THEN
1961: gmd_api_pub.log_message('GMD_SMPL_DISP_CHANGE','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');
1962: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1963: x_return_status := FND_API.G_RET_STS_ERROR ;
1964: WHEN OTHERS THEN
1965: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_position);

Line 1965: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_position);

1961: gmd_api_pub.log_message('GMD_SMPL_DISP_CHANGE','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');
1962: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1963: x_return_status := FND_API.G_RET_STS_ERROR ;
1964: WHEN OTHERS THEN
1965: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_position);
1966: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
1967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1968:
1969: END update_sample_comp_disp ;

Line 2075: gmd_api_pub.log_message('GMD_QM_CHANGE_DISP_ERR','PACKAGE','GMD_SAMPLES_GRP.UPDATE_CHANGE_DISP_TABLE');

2071: );
2072:
2073:
2074: IF SQL%NOTFOUND THEN
2075: gmd_api_pub.log_message('GMD_QM_CHANGE_DISP_ERR','PACKAGE','GMD_SAMPLES_GRP.UPDATE_CHANGE_DISP_TABLE');
2076: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
2077: x_return_status := FND_API.G_RET_STS_ERROR ;
2078: END IF; -- SQL%NOTFOUND THEN
2079:

Line 2148: gmd_api_pub.log_message('GMD_QM_CHANGE_LOT_ERR','PACKAGE','GMD_SAMPLES_GRP.UPDATE_CHANGE_DISP_TABLE');

2144:
2145: END IF; -- (p_update_change_disp_rec.LOT_NUMBER IS NOT NULL)
2146:
2147: IF SQL%NOTFOUND THEN
2148: gmd_api_pub.log_message('GMD_QM_CHANGE_LOT_ERR','PACKAGE','GMD_SAMPLES_GRP.UPDATE_CHANGE_DISP_TABLE');
2149: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
2150: x_return_status := FND_API.G_RET_STS_ERROR ;
2151: END IF; -- SQL%NOTFOUND THEN
2152:

Line 2305: FROM GMD_WIP_SPEC_VRS wip,GMD_SAMPLING_EVENTS gse,GMD_SAMPLES gs

2301: --Bug# 5440347 start
2302: --this cursor is used for single samples
2303: CURSOR cur_auto_complete_bstep_smpl IS
2304: SELECT NVL(wip.AUTO_COMPLETE_BATCH_STEP,'N')
2305: FROM GMD_WIP_SPEC_VRS wip,GMD_SAMPLING_EVENTS gse,GMD_SAMPLES gs
2306: WHERE gs.SAMPLE_ID = p_sample_id
2307: AND gse.SAMPLING_EVENT_ID = gs.SAMPLING_EVENT_ID
2308: AND wip.SPEC_VR_ID = gse.ORIGINAL_SPEC_VR_ID;
2309:

Line 2370: FROM GMD_SAMPLES gs,

2366: l_batch_id,
2367: l_step_no,
2368: l_locator_id, -- 50061731
2369: l_subinventory -- 50061731
2370: FROM GMD_SAMPLES gs,
2371: MTL_SYSTEM_ITEMS_b_kfv iim
2372: WHERE gs.sample_id = p_sample_id
2373: AND gs.inventory_item_id = iim.inventory_item_id
2374: AND gs.organization_id = iim.organization_id;

Line 2407: --FROM GMD_SAMPLES

2403: -- select the orgn_code from the first sample.
2404: -- Bug 4165704: took out the following code since orgn is now kept on sampling event.
2405: -- added organization to select statement above
2406: --SELECT orgn_code INTO l_orgn_code
2407: --FROM GMD_SAMPLES
2408: --WHERE sampling_event_id = l_sampling_event_id
2409: --AND rownum = 1 ;
2410:
2411: END IF;

Line 2903: gmd_api_pub.log_message('GMD_QM_CURRENT_LOT_VALUE_CHANG','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');

2899:
2900: EXCEPTION
2901: WHEN SAMPLE_DISP_CHANGED THEN
2902: --RLNAGARA B5668965 Changed the message from GMD_SMPL_DISP_CHANGE to GMD_QM_CURRENT_LOT_VALUE_CHANG
2903: gmd_api_pub.log_message('GMD_QM_CURRENT_LOT_VALUE_CHANG','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');
2904: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
2905: x_return_status := FND_API.G_RET_STS_ERROR ;
2906: WHEN REQ_FIELDS_MISSING THEN
2907: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_SAMPLES_GRP.UPDATE_LOT_GRADE_BATCH');

Line 2907: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_SAMPLES_GRP.UPDATE_LOT_GRADE_BATCH');

2903: gmd_api_pub.log_message('GMD_QM_CURRENT_LOT_VALUE_CHANG','PACKAGE','GMD_SAMPLES_GRP.UPDATE_SAMPLE_COMP_DISP');
2904: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
2905: x_return_status := FND_API.G_RET_STS_ERROR ;
2906: WHEN REQ_FIELDS_MISSING THEN
2907: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_SAMPLES_GRP.UPDATE_LOT_GRADE_BATCH');
2908: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
2909: x_return_status := FND_API.G_RET_STS_ERROR ;
2910: WHEN INVALID_SAMPLE THEN
2911: gmd_api_pub.log_message('GMD_QM_INVALID_SAMPLE');

Line 2931: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SAMPLES_GRP.UPDATE_LOT_GRADE_BATCH','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_position);

2927: END IF;
2928: IF get_curr_lot_status_cv%ISOPEN THEN
2929: CLOSE get_curr_lot_status_cv;
2930: END IF;
2931: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_SAMPLES_GRP.UPDATE_LOT_GRADE_BATCH','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_position);
2932: x_message_data := FND_MSG_PUB.GET(FND_MSG_PUB.G_LAST,FND_API.G_FALSE);
2933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2934: END update_lot_grade_batch ;
2935:

Line 2974: p_sample IN gmd_samples%ROWTYPE

2970: -- End of comments
2971:
2972: PROCEDURE check_for_null_and_fks_in_smpl
2973: (
2974: p_sample IN gmd_samples%ROWTYPE
2975: , x_return_status OUT NOCOPY VARCHAR2
2976: ) IS
2977:
2978: -- Bug 4165704: changed for inventory convergence

Line 3652: ( p_sample IN GMD_SAMPLES%ROWTYPE

3648: --| and changed length of l_msg_data from 200 to 2000 |
3649: --+========================================================================+
3650:
3651: PROCEDURE create_inv_txn
3652: ( p_sample IN GMD_SAMPLES%ROWTYPE
3653: , p_user_name IN NUMBER
3654: , x_return_status OUT NOCOPY VARCHAR2
3655: , x_message_count OUT NOCOPY NUMBER
3656: , x_message_data OUT NOCOPY VARCHAR2

Line 3808: -- Gmd_samples_grp.Get_item_values( p_sample_display => l_item_rec);

3804: -- Bug 4165704: uom convergence not needed after inventory convergence
3805: -- l_item_rec.inventory_item_id := p_sample.inventory_item_id;
3806: -- l_item_rec.organization_id := p_sample.organization_id;
3807:
3808: -- Gmd_samples_grp.Get_item_values( p_sample_display => l_item_rec);
3809:
3810: -- IF l_item_rec.Dual_uom_control = 3 THEN
3811: -- l_trans_rec.trans_qty2
3812: -- := INV_CONVERT.inv_um_convert(

Line 3976: ( p_sample IN GMD_SAMPLES%ROWTYPE

3972: --+========================================================================+
3973: -- End of comments
3974:
3975: PROCEDURE create_wip_txn
3976: ( p_sample IN GMD_SAMPLES%ROWTYPE
3977: , x_return_status OUT NOCOPY VARCHAR2
3978: , x_message_count OUT NOCOPY NUMBER
3979: , x_message_data OUT NOCOPY VARCHAR2
3980: )

Line 4439: SELECT 'x' from gmd_samples

4435:
4436:
4437: -- added this code to prevent locking error if sample is locked by another form.
4438: CURSOR C_lock_sample(samp_id NUMBER) IS
4439: SELECT 'x' from gmd_samples
4440: where sample_id = samp_id
4441: for update of sample_id NOWAIT ;
4442:
4443: record_lock EXCEPTION ;

Line 4447: l_in_samples gmd_samples%ROWTYPE;

4443: record_lock EXCEPTION ;
4444: pragma exception_init(record_lock,-00054) ;
4445: -- end update for locking error
4446:
4447: l_in_samples gmd_samples%ROWTYPE;
4448: l_samples gmd_samples%ROWTYPE;
4449:
4450: l_in_results gmd_results%ROWTYPE;
4451: l_results gmd_results%ROWTYPE;

Line 4448: l_samples gmd_samples%ROWTYPE;

4444: pragma exception_init(record_lock,-00054) ;
4445: -- end update for locking error
4446:
4447: l_in_samples gmd_samples%ROWTYPE;
4448: l_samples gmd_samples%ROWTYPE;
4449:
4450: l_in_results gmd_results%ROWTYPE;
4451: l_results gmd_results%ROWTYPE;
4452:

Line 4508: result := GMD_SAMPLES_PVT.fetch_row(

4504: gmd_debug.put_line('sample id changed to: ');
4505: gmd_debug.put_line(' Sample ID: ' || l_in_samples.sample_id);
4506: END IF;
4507:
4508: result := GMD_SAMPLES_PVT.fetch_row(
4509: p_samples => l_in_samples,
4510: x_samples => l_samples);
4511:
4512: IF (l_debug = 'Y') THEN

Line 4581: UPDATE gmd_samples

4577: -- added this code to prevent locking error if sample is locked by another form.
4578: OPEN C_lock_sample(l_samples.sample_id);
4579: CLOSE C_lock_sample;
4580:
4581: UPDATE gmd_samples
4582: SET remaining_qty = remaining_qty - converted_qty
4583: WHERE sample_id = l_samples.sample_id;
4584:
4585: ELSE

Line 4601: UPDATE gmd_samples

4597: -- added this code to prevent locking error if sample is locked by another form.
4598: OPEN C_lock_sample(l_samples.sample_id);
4599: CLOSE C_lock_sample;
4600:
4601: UPDATE gmd_samples
4602: SET remaining_qty = remaining_qty - qty
4603: WHERE sample_id = l_samples.sample_id;
4604:
4605: ELSE

Line 4681: in_sample gmd_samples%ROWTYPE;

4677: WHERE ssd.sample_id = p_sample_id
4678: AND l.lookup_type = 'GMD_QC_SAMPLE_DISP'
4679: AND l.lookup_code = ssd.disposition ;
4680:
4681: in_sample gmd_samples%ROWTYPE;
4682: out_sample gmd_samples%ROWTYPE;
4683: in_sampling_event gmd_sampling_events%ROWTYPE;
4684: out_sampling_event gmd_sampling_events%ROWTYPE;
4685: sampling_event gmd_sampling_events%ROWTYPE;

Line 4682: out_sample gmd_samples%ROWTYPE;

4678: AND l.lookup_type = 'GMD_QC_SAMPLE_DISP'
4679: AND l.lookup_code = ssd.disposition ;
4680:
4681: in_sample gmd_samples%ROWTYPE;
4682: out_sample gmd_samples%ROWTYPE;
4683: in_sampling_event gmd_sampling_events%ROWTYPE;
4684: out_sampling_event gmd_sampling_events%ROWTYPE;
4685: sampling_event gmd_sampling_events%ROWTYPE;
4686:

Line 4707: IF NOT ( gmd_samples_pvt.fetch_row(p_samples => in_sample,

4703:
4704: -- test for whether sample id or sampling event id was passed
4705: IF p_type = 'SAMPLE' THEN -- sample_id is passed
4706: in_sample.sample_id := p_id;
4707: IF NOT ( gmd_samples_pvt.fetch_row(p_samples => in_sample,
4708: x_samples => out_sample))
4709: THEN
4710: -- Fetch Error.
4711: RAISE e_sample_fetch_error;

Line 4784: Gmd_samples_grp.get_item_values(p_sample_display => x_display);

4780: x_display.sample_active_cnt := out_sampling_event.sample_active_cnt;
4781:
4782: END IF;
4783:
4784: Gmd_samples_grp.get_item_values(p_sample_display => x_display);
4785:
4786: IF out_sample.source = 'I' THEN
4787: Gmd_samples_grp.Inventory_source(p_locator_id => out_sample.locator_id
4788: , p_subinventory => out_sample.subinventory

Line 4787: Gmd_samples_grp.Inventory_source(p_locator_id => out_sample.locator_id

4783:
4784: Gmd_samples_grp.get_item_values(p_sample_display => x_display);
4785:
4786: IF out_sample.source = 'I' THEN
4787: Gmd_samples_grp.Inventory_source(p_locator_id => out_sample.locator_id
4788: , p_subinventory => out_sample.subinventory
4789: , p_organization_id => out_sample.organization_id
4790: , x_display => x_display);
4791: ELSIF out_sample.source = 'C' THEN

Line 4792: Gmd_samples_grp.customer_source(p_org_id => out_sample.org_id

4788: , p_subinventory => out_sample.subinventory
4789: , p_organization_id => out_sample.organization_id
4790: , x_display => x_display);
4791: ELSIF out_sample.source = 'C' THEN
4792: Gmd_samples_grp.customer_source(p_org_id => out_sample.org_id
4793: , p_ship_to_site_id => out_sample.ship_to_site_id
4794: , p_order_id => out_sample.order_id
4795: , p_order_line_id => out_sample.order_line_id
4796: , p_cust_id => out_sample.cust_id

Line 4799: Gmd_samples_grp.supplier_source(p_supplier_id => out_sample.supplier_id

4795: , p_order_line_id => out_sample.order_line_id
4796: , p_cust_id => out_sample.cust_id
4797: , x_display => x_display);
4798: ELSIF out_sample.source = 'S' THEN
4799: Gmd_samples_grp.supplier_source(p_supplier_id => out_sample.supplier_id
4800: , p_po_header_id => out_sample.po_header_id
4801: , p_po_line_id => out_sample.po_line_id
4802: , p_receipt_id => out_sample.receipt_id
4803: , p_receipt_line_id => out_sample.receipt_line_id

Line 4810: Gmd_samples_grp.wip_source(p_batch_id => out_sample.batch_id

4806: , p_organization_id => out_sample.organization_id
4807: , p_subinventory => out_sample.subinventory
4808: , x_display => x_display);
4809: ELSIF out_sample.source = 'W' THEN
4810: Gmd_samples_grp.wip_source(p_batch_id => out_sample.batch_id
4811: , p_step_id => out_sample.step_id
4812: , p_recipe_id => out_sample.recipe_id
4813: , p_formula_id => out_sample.formula_id
4814: , p_formulaline_id => out_sample.formulaline_id

Line 4822: Gmd_samples_grp.stability_study_source(p_variant_id => out_sample.variant_id

4818: , p_inventory_item_id => out_sample.inventory_item_id
4819: , p_organization_id => out_sample.organization_id
4820: , x_display => x_display);
4821: ELSIF out_sample.source = 'T' THEN
4822: Gmd_samples_grp.stability_study_source(p_variant_id => out_sample.variant_id
4823: ,p_time_point_id => out_sample.time_point_id
4824: , x_display => x_display);
4825: ELSIF out_sample.source = 'L' THEN
4826: Gmd_samples_grp.physical_location_source(p_locator_id => out_sample.locator_id

Line 4826: Gmd_samples_grp.physical_location_source(p_locator_id => out_sample.locator_id

4822: Gmd_samples_grp.stability_study_source(p_variant_id => out_sample.variant_id
4823: ,p_time_point_id => out_sample.time_point_id
4824: , x_display => x_display);
4825: ELSIF out_sample.source = 'L' THEN
4826: Gmd_samples_grp.physical_location_source(p_locator_id => out_sample.locator_id
4827: , p_subinventory => out_sample.subinventory
4828: , p_organization_id => out_sample.organization_id
4829: , x_display => x_display);
4830: ELSIF out_sample.source = 'R' THEN

Line 4831: Gmd_samples_grp.resource_source(p_instance_id => out_sample.instance_id

4827: , p_subinventory => out_sample.subinventory
4828: , p_organization_id => out_sample.organization_id
4829: , x_display => x_display);
4830: ELSIF out_sample.source = 'R' THEN
4831: Gmd_samples_grp.resource_source(p_instance_id => out_sample.instance_id
4832: , x_display => x_display);
4833: END IF;
4834:
4835: ELSIF p_type = 'EVENT' THEN -- sampling_event_id is passed

Line 4855: Gmd_samples_grp.get_item_values(p_sample_display => x_display);

4851: x_display.organization_id := out_sampling_event.organization_id;
4852: x_display.creation_date := out_sampling_event.creation_date ;
4853: x_display.subinventory := out_sampling_event.subinventory ; --RLNAGARA Bug# 4868950
4854:
4855: Gmd_samples_grp.get_item_values(p_sample_display => x_display);
4856:
4857: IF out_sampling_event.source = 'I' THEN
4858: Gmd_samples_grp.Inventory_source(p_locator_id => out_sampling_event.locator_id
4859: , p_subinventory => out_sampling_event.subinventory

Line 4858: Gmd_samples_grp.Inventory_source(p_locator_id => out_sampling_event.locator_id

4854:
4855: Gmd_samples_grp.get_item_values(p_sample_display => x_display);
4856:
4857: IF out_sampling_event.source = 'I' THEN
4858: Gmd_samples_grp.Inventory_source(p_locator_id => out_sampling_event.locator_id
4859: , p_subinventory => out_sampling_event.subinventory
4860: , p_organization_id => out_sampling_event.organization_id
4861: , x_display => x_display);
4862: ELSIF out_sampling_event.source = 'C' THEN

Line 4863: Gmd_samples_grp.customer_source(p_org_id => out_sampling_event.org_id

4859: , p_subinventory => out_sampling_event.subinventory
4860: , p_organization_id => out_sampling_event.organization_id
4861: , x_display => x_display);
4862: ELSIF out_sampling_event.source = 'C' THEN
4863: Gmd_samples_grp.customer_source(p_org_id => out_sampling_event.org_id
4864: , p_ship_to_site_id => out_sampling_event.ship_to_site_id
4865: , p_order_id => out_sampling_event.order_id
4866: , p_order_line_id => out_sampling_event.order_line_id
4867: , p_cust_id => out_sampling_event.cust_id

Line 4870: Gmd_samples_grp.supplier_source(p_supplier_id => out_sampling_event.supplier_id

4866: , p_order_line_id => out_sampling_event.order_line_id
4867: , p_cust_id => out_sampling_event.cust_id
4868: , x_display => x_display);
4869: ELSIF out_sampling_event.source = 'S' THEN
4870: Gmd_samples_grp.supplier_source(p_supplier_id => out_sampling_event.supplier_id
4871: , p_po_header_id => out_sampling_event.po_header_id
4872: , p_po_line_id => out_sampling_event.po_line_id
4873: , p_receipt_id => out_sampling_event.receipt_id
4874: , p_receipt_line_id => out_sampling_event.receipt_line_id

Line 4881: Gmd_samples_grp.wip_source(p_batch_id => out_sampling_event.batch_id

4877: , p_organization_id => out_sampling_event.organization_id
4878: , p_subinventory => out_sampling_event.subinventory
4879: , x_display => x_display);
4880: ELSIF out_sampling_event.source = 'W' THEN
4881: Gmd_samples_grp.wip_source(p_batch_id => out_sampling_event.batch_id
4882: , p_step_id => out_sampling_event.step_id
4883: , p_recipe_id => out_sampling_event.recipe_id
4884: , p_formula_id => out_sampling_event.formula_id
4885: , p_formulaline_id => out_sampling_event.formulaline_id

Line 4893: Gmd_samples_grp.stability_study_source(p_variant_id => out_sampling_event.variant_id

4889: , p_inventory_item_id => out_sampling_event.inventory_item_id
4890: , p_organization_id => out_sample.organization_id
4891: , x_display => x_display);
4892: ELSIF out_sampling_event.source = 'T' THEN
4893: Gmd_samples_grp.stability_study_source(p_variant_id => out_sampling_event.variant_id
4894: ,p_time_point_id => out_sampling_event.time_point_id
4895: , x_display => x_display);
4896: ELSIF out_sampling_event.source = 'L' THEN
4897: Gmd_samples_grp.physical_location_source(p_locator_id => out_sampling_event.locator_id

Line 4897: Gmd_samples_grp.physical_location_source(p_locator_id => out_sampling_event.locator_id

4893: Gmd_samples_grp.stability_study_source(p_variant_id => out_sampling_event.variant_id
4894: ,p_time_point_id => out_sampling_event.time_point_id
4895: , x_display => x_display);
4896: ELSIF out_sampling_event.source = 'L' THEN
4897: Gmd_samples_grp.physical_location_source(p_locator_id => out_sampling_event.locator_id
4898: , p_subinventory => out_sampling_event.subinventory
4899: , p_organization_id => out_sampling_event.organization_id
4900: , x_display => x_display);
4901: ELSIF out_sampling_event.source = 'R' THEN

Line 4902: Gmd_samples_grp.resource_source(p_instance_id => out_sampling_event.instance_id

4898: , p_subinventory => out_sampling_event.subinventory
4899: , p_organization_id => out_sampling_event.organization_id
4900: , x_display => x_display);
4901: ELSIF out_sampling_event.source = 'R' THEN
4902: Gmd_samples_grp.resource_source(p_instance_id => out_sampling_event.instance_id
4903: , x_display => x_display);
4904: END IF;
4905: ELSE -- p_type parameter incorrect
4906: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 5381: Gmd_samples_grp.Inventory_source (

5377: IS
5378: o_display sample_display_rec;
5379:
5380: BEGIN
5381: Gmd_samples_grp.Inventory_source (
5382: p_locator_id => p_locator_id
5383: , p_subinventory => p_subinventory
5384: , p_organization_id => p_organization_id
5385: , x_display => o_display);

Line 5598: gmd_samples s,

5594: d.meaning sample_disposition,
5595: e.meaning source
5596: FROM gmd_sample_spec_disp b,
5597: gmd_event_spec_disp c,
5598: gmd_samples s,
5599: fnd_lookup_values_vl d,
5600: fnd_lookup_values_vl e
5601: WHERE b.sample_id = p_sample.sample_id
5602: and b.event_spec_disp_id = c.event_spec_disp_id

Line 5615: gmd_samples s,

5611: d.meaning sample_disposition,
5612: e.meaning source
5613: FROM gmd_sample_spec_disp b,
5614: gmd_event_spec_disp c,
5615: gmd_samples s,
5616: fnd_lookup_values d,
5617: fnd_lookup_values e
5618: WHERE b.sample_id =p_sample.sample_id
5619: and b.event_spec_disp_id = c.event_spec_disp_id

Line 5647: END GMD_SAMPLES_GRP;

5643:
5644: END get_sample_spec_disposition;
5645:
5646:
5647: END GMD_SAMPLES_GRP;
5648: