APPS.AHL_PRD_SERN_CHANGE_PVT dependencies on MTL_SERIAL_NUMBERS

Line 167: CURSOR mtl_serial_numbers_csr(c_Inventory_id IN NUMBER,

163: p_serial_number_control IN NUMBER,
164: p_serialnum_tag_code IN VARCHAR2,
165: p_concatenated_segments IN VARCHAR2) IS
166:
167: CURSOR mtl_serial_numbers_csr(c_Inventory_id IN NUMBER,
168: c_Serial_Number IN VARCHAR2) IS
169: SELECT 1
170: FROM mtl_serial_numbers
171: WHERE inventory_item_id = c_Inventory_id

Line 170: FROM mtl_serial_numbers

166:
167: CURSOR mtl_serial_numbers_csr(c_Inventory_id IN NUMBER,
168: c_Serial_Number IN VARCHAR2) IS
169: SELECT 1
170: FROM mtl_serial_numbers
171: WHERE inventory_item_id = c_Inventory_id
172: AND Serial_Number = c_Serial_Number;
173:
174:

Line 191: OPEN mtl_serial_numbers_csr(p_Inventory_id,p_Serial_Number);

187: --dbms_output.put_line('Serial Number is null');
188: ELSE
189: -- If serial tag code = INVENTORY then validate serial number against inventory.
190: IF (p_serialnum_tag_code = 'INVENTORY') THEN
191: OPEN mtl_serial_numbers_csr(p_Inventory_id,p_Serial_Number);
192: FETCH mtl_serial_numbers_csr INTO l_junk;
193: IF (mtl_serial_numbers_csr%NOTFOUND) THEN
194: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_INVALID');
195: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);

Line 192: FETCH mtl_serial_numbers_csr INTO l_junk;

188: ELSE
189: -- If serial tag code = INVENTORY then validate serial number against inventory.
190: IF (p_serialnum_tag_code = 'INVENTORY') THEN
191: OPEN mtl_serial_numbers_csr(p_Inventory_id,p_Serial_Number);
192: FETCH mtl_serial_numbers_csr INTO l_junk;
193: IF (mtl_serial_numbers_csr%NOTFOUND) THEN
194: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_INVALID');
195: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);
196: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);

Line 193: IF (mtl_serial_numbers_csr%NOTFOUND) THEN

189: -- If serial tag code = INVENTORY then validate serial number against inventory.
190: IF (p_serialnum_tag_code = 'INVENTORY') THEN
191: OPEN mtl_serial_numbers_csr(p_Inventory_id,p_Serial_Number);
192: FETCH mtl_serial_numbers_csr INTO l_junk;
193: IF (mtl_serial_numbers_csr%NOTFOUND) THEN
194: FND_MESSAGE.Set_Name('AHL','AHL_PRD_SERIAL_INVALID');
195: FND_MESSAGE.Set_Token('SERIAL',p_Serial_Number);
196: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);
197: FND_MSG_PUB.ADD;

Line 200: CLOSE mtl_serial_numbers_csr;

196: FND_MESSAGE.Set_Token('INV_ITEM',p_concatenated_segments);
197: FND_MSG_PUB.ADD;
198: --dbms_output.put_line('Serial Number does not exist in master ');
199: END IF;
200: CLOSE mtl_serial_numbers_csr;
201: END IF;
202:
203:
204: END IF;