[Home] [Help]
38: msn.lot_number,
39: 0,
40: msn.current_status,
41: mms.status_code
42: FROM mtl_serial_numbers msn, mtl_cc_serial_numbers mcsn,
43: mtl_material_statuses_vl mms, mtl_cycle_count_entries mcce
44: WHERE msn.inventory_item_id = p_inventory_item_id
45: AND msn.current_organization_id = p_organization_id
46: AND msn.current_status IN (1, 3)
83: msn.lot_number,
84: 0,
85: msn.current_status,
86: mms.status_code
87: FROM mtl_serial_numbers msn, mtl_cc_serial_numbers mcsn,
88: mtl_material_statuses_vl mms, mtl_cycle_count_entries mcce
89: WHERE msn.inventory_item_id = p_inventory_item_id
90: AND msn.group_mark_id = 1
91: AND msn.current_organization_id = p_organization_id
127: WHERE inventory_item_id = p_inventory_item_id
128: AND current_organization_id = p_organization_id
129: AND serial_number IN
130: (SELECT UNIQUE msn.serial_number
131: FROM mtl_serial_numbers msn, mtl_cc_serial_numbers mcsn,
132: mtl_material_statuses_vl mms, mtl_cycle_count_entries mcce
133: WHERE msn.inventory_item_id = p_inventory_item_id
134: AND msn.current_organization_id = p_organization_id
135: AND msn.current_status IN (1, 3)
180: WHERE inventory_item_id = p_inventory_item_id
181: AND current_organization_id = p_organization_id
182: AND serial_number IN
183: (SELECT UNIQUE msn.serial_number
184: FROM mtl_serial_numbers msn, mtl_cc_serial_numbers mcsn,
185: mtl_material_statuses_vl mms, mtl_cycle_count_entries mcce
186: WHERE msn.inventory_item_id = p_inventory_item_id
187: AND msn.current_organization_id = p_organization_id
188: AND ( msn.current_status IN (1, 3)
254: WHERE inventory_item_id = p_inventory_item_id
255: AND current_organization_id = p_organization_id
256: AND serial_number IN
257: (SELECT UNIQUE msn.serial_number
258: FROM mtl_serial_numbers msn, mtl_cc_serial_numbers mcsn,
259: mtl_material_statuses_vl mms, mtl_cycle_count_entries mcce
260: WHERE msn.inventory_item_id = p_inventory_item_id
261: AND msn.current_organization_id = p_organization_id
262: AND msn.current_status IN (1, 3)
313: WHERE inventory_item_id = p_inventory_item_id
314: AND current_organization_id = p_organization_id
315: AND serial_number IN
316: (SELECT UNIQUE msn.serial_number
317: FROM mtl_serial_numbers msn, mtl_cc_serial_numbers mcsn,
318: mtl_material_statuses_vl mms, mtl_cycle_count_entries mcce
319: WHERE msn.inventory_item_id = p_inventory_item_id
320: AND msn.current_organization_id = p_organization_id
321: AND msn.current_status IN (1, 3)
351:
352: BEGIN
353: SELECT COUNT(*)
354: INTO x_number
355: FROM mtl_serial_numbers msn, mtl_cc_serial_numbers mcsn,
356: mtl_material_statuses_vl mms, mtl_cycle_count_entries mcce
357: WHERE msn.inventory_item_id = p_inventory_item_id
358: AND msn.group_mark_id = 1
359: AND msn.current_organization_id = p_organization_id
393:
394: END exist_Serial_number;
395:
396: /* Bug# 3595723 */
397: /* Inserts the serial number into mtl_cc_Serial_numbers if its new, else updates the same */
398: PROCEDURE insert_serial_number
399: (p_serial_number IN VARCHAR2 ,
400: p_cycle_count_header_id IN NUMBER,
401: p_organization_id IN NUMBER ,
445:
446: /* Check if the serial number already exists */
447: SELECT number_of_counts, unit_status_current, unit_status_first
448: INTO l_number_of_counts, l_unit_status_prior, l_unit_status_first
449: FROM mtl_cc_serial_numbers
450: WHERE cycle_count_entry_id = l_cycle_count_entry_id
451: AND serial_number = p_serial_number;
452:
453: print_debug('serial number ' || p_serial_number || ' already exists in mtl_cc_serial_numbers');
449: FROM mtl_cc_serial_numbers
450: WHERE cycle_count_entry_id = l_cycle_count_entry_id
451: AND serial_number = p_serial_number;
452:
453: print_debug('serial number ' || p_serial_number || ' already exists in mtl_cc_serial_numbers');
454: print_debug('l_number_of_counts ' || l_number_of_counts);
455: print_debug('l_unit_status_prior ' || l_unit_status_prior);
456: print_debug('l_unit_status_first ' || l_unit_status_first);
457:
459: l_unit_status_current := 1; -- 1 -> Present in the count location, 2 -> Absent
460: l_pos_adjustment_qty := 0; -- 1 -> New serial number found at the location
461: l_neg_adjustment_qty := 0; -- 1 -> Serial number not found at the location
462:
463: UPDATE MTL_CC_SERIAL_NUMBERS
464: SET
465: last_update_date = SYSDATE,
466: last_updated_by = fnd_global.user_id,
467: last_update_login = fnd_global.login_id,
486: l_neg_adjustment_qty := NULL;
487:
488: print_debug('could not find serial number ' || p_serial_number);
489:
490: INSERT INTO MTL_CC_SERIAL_NUMBERS(
491: cycle_count_entry_id,
492: serial_number,
493: last_update_date,
494: last_updated_by,
566: NULL;
567: END insert_Serial_number;
568:
569: /*Bug # 3646068
570: Remove the serial numbers from mtl_cc_Serial_numbers and unmark the serials in mtl_serial_numbers
571: for serials that have been entered till now */
572: PROCEDURE remove_serial_number
573: (p_cycle_count_header_id IN NUMBER,
574: p_organization_id IN NUMBER ,
585:
586: CURSOR serial_cur IS
587: SELECT serial_number,
588: pos_adjustment_qty
589: FROM mtl_cc_Serial_numbers
590: WHERE cycle_count_entry_id = l_cycle_count_entry_id;
591:
592: BEGIN
593:
609: LOOP
610: FETCH serial_cur INTO l_serial_number, l_pos_adjustment_qty;
611: EXIT WHEN serial_cur%NOTFOUND;
612: IF(nvl(l_pos_adjustment_qty,0) = 1) THEN
613: --This was inserted as part of call to insert_serial_number, Delete from mtl_cc_Serial_numbers
614: BEGIN
615: DELETE FROM mtl_cc_serial_numbers
616: WHERE cycle_count_entry_id = l_cycle_count_entry_id
617: AND serial_number = l_serial_number;
611: EXIT WHEN serial_cur%NOTFOUND;
612: IF(nvl(l_pos_adjustment_qty,0) = 1) THEN
613: --This was inserted as part of call to insert_serial_number, Delete from mtl_cc_Serial_numbers
614: BEGIN
615: DELETE FROM mtl_cc_serial_numbers
616: WHERE cycle_count_entry_id = l_cycle_count_entry_id
617: AND serial_number = l_serial_number;
618: EXCEPTION
619: WHEN OTHERS THEN
616: WHERE cycle_count_entry_id = l_cycle_count_entry_id
617: AND serial_number = l_serial_number;
618: EXCEPTION
619: WHEN OTHERS THEN
620: print_debug('Exception while trying to delete from mtl_cc_serial_numbers for serial ' || l_serial_number);
621: END;
622: END IF;
623:
624: --Unmark the serial number in mtl_Serial_numbers