30: WHERE inventory_item_id = p_inventory_item_id
31: AND inventory_org_id = p_inventory_org_id;
32:
33:
34: CURSOR mtl_parameters_csr(p_inventory_org_id IN NUMBER) IS
35: SELECT organization_code,
36: master_organization_id
37: FROM mtl_parameters
38: WHERE organization_id = p_inventory_org_id;
33:
34: CURSOR mtl_parameters_csr(p_inventory_org_id IN NUMBER) IS
35: SELECT organization_code,
36: master_organization_id
37: FROM mtl_parameters
38: WHERE organization_id = p_inventory_org_id;
39:
40: l_instance_track VARCHAR2(1);
41: l_segment1 ahl_mtl_items_ou_v.concatenated_segments%TYPE;
40: l_instance_track VARCHAR2(1);
41: l_segment1 ahl_mtl_items_ou_v.concatenated_segments%TYPE;
42: l_serial_number_control NUMBER;
43: l_revision_qty_control_code NUMBER;
44: l_organization_code mtl_parameters.organization_code%TYPE;
45: l_master_org_id NUMBER;
46:
47: BEGIN
48:
46:
47: BEGIN
48:
49: -- For organization code
50: OPEN mtl_parameters_csr(p_inventory_org_id);
51: FETCH mtl_parameters_csr INTO l_organization_code,l_master_org_id;
52: IF (mtl_parameters_csr%NOTFOUND) THEN
53: FND_MESSAGE.Set_Name('AHL','AHL_MC_ORG_INVALID');
54: FND_MESSAGE.Set_Token('ORG',p_inventory_org_id);
47: BEGIN
48:
49: -- For organization code
50: OPEN mtl_parameters_csr(p_inventory_org_id);
51: FETCH mtl_parameters_csr INTO l_organization_code,l_master_org_id;
52: IF (mtl_parameters_csr%NOTFOUND) THEN
53: FND_MESSAGE.Set_Name('AHL','AHL_MC_ORG_INVALID');
54: FND_MESSAGE.Set_Token('ORG',p_inventory_org_id);
55: FND_MSG_PUB.ADD;
48:
49: -- For organization code
50: OPEN mtl_parameters_csr(p_inventory_org_id);
51: FETCH mtl_parameters_csr INTO l_organization_code,l_master_org_id;
52: IF (mtl_parameters_csr%NOTFOUND) THEN
53: FND_MESSAGE.Set_Name('AHL','AHL_MC_ORG_INVALID');
54: FND_MESSAGE.Set_Token('ORG',p_inventory_org_id);
55: FND_MSG_PUB.ADD;
56: ELSE
60: FND_MESSAGE.Set_Token('ORG',p_master_org_id);
61: FND_MSG_PUB.ADD;
62: */
63: END IF;
64: CLOSE mtl_parameters_csr;
65:
66:
67: OPEN mtl_system_items_non_ou_csr(p_inventory_item_id,p_inventory_org_id);
68: FETCH mtl_system_items_non_ou_csr INTO l_instance_track, l_segment1, l_serial_number_control,