32: IS
33: l_api_name CONSTANT VARCHAR2 (30) := 'RESCHEDULE_BATCH';
34:
35: /* Collections for details etc */
36: TYPE l_line_type_tbl_typ IS TABLE OF gme_material_details.line_type%TYPE
37: INDEX BY BINARY_INTEGER;
38:
39: l_line_type_tbl l_line_type_tbl_typ;
40: l_material_date DATE;
39: l_line_type_tbl l_line_type_tbl_typ;
40: l_material_date DATE;
41: l_loop_count_get_material NUMBER;
42: l_material_detail_ids gme_common_pvt.number_tab;
43: l_material_detail_rec gme_material_details%ROWTYPE;
44: l_batch_header_rec gme_batch_header%ROWTYPE;
45: l_in_batch_header_rec gme_batch_header%ROWTYPE;
46: /* Local variables */
47: l_return_status VARCHAR2 (1);
90:
91: CURSOR cur_get_material (v_batch_id NUMBER)
92: IS
93: SELECT material_detail_id, line_type
94: FROM gme_material_details
95: WHERE batch_id = v_batch_id;
96:
97: CURSOR cur_get_phant (v_batch_id NUMBER)
98: IS
97: CURSOR cur_get_phant (v_batch_id NUMBER)
98: IS
99: SELECT phantom_id, m.material_detail_id, release_type, line_type
100: ,i.batchstep_id
101: FROM gme_material_details m, gme_batch_step_items i
102: WHERE m.batch_id = v_batch_id
103: AND NVL (phantom_id, 0) > 0
104: AND m.batch_id = i.batch_id(+)
105: AND m.material_detail_id = i.material_detail_id(+);
134: WHERE wip_entity_id = v_batch_id;
135:
136: CURSOR get_prim_prod (
137: v_batch_id gme_batch_header.batch_id%TYPE
138: ,v_item_id gme_material_details.inventory_item_id%TYPE)
139: IS
140: SELECT plan_qty, dtl_um
141: FROM gme_material_details
142: WHERE batch_id = v_batch_id
137: v_batch_id gme_batch_header.batch_id%TYPE
138: ,v_item_id gme_material_details.inventory_item_id%TYPE)
139: IS
140: SELECT plan_qty, dtl_um
141: FROM gme_material_details
142: WHERE batch_id = v_batch_id
143: AND inventory_item_id = v_item_id
144: AND line_type = 1
145: ORDER BY line_no ASC;
144: AND line_type = 1
145: ORDER BY line_no ASC;
146:
147: CURSOR cur_item_no (
148: p_item_id gme_material_details.inventory_item_id%TYPE
149: ,p_organization_id gme_material_details.organization_id%TYPE)
150: IS
151: SELECT segment1
152: FROM mtl_system_items
145: ORDER BY line_no ASC;
146:
147: CURSOR cur_item_no (
148: p_item_id gme_material_details.inventory_item_id%TYPE
149: ,p_organization_id gme_material_details.organization_id%TYPE)
150: IS
151: SELECT segment1
152: FROM mtl_system_items
153: WHERE organization_id = p_organization_id