[Home] [Help]
79: Changed select from inline calculation to using variables and making sure that
80: denominator cannot be zero. Procedure: update_step_mtq
81:
82: G. Muratore 26-FEB-2009 Bug 7710435
83: Changed call to gme_material_details_dbl.update_row which now accepts a p_called_by parameter. This allows
84: us to disregard the timestamp used for record locking. It is not required to lock records, during batch create,
85: which are not committed to the database yet. Sometimes, the timestamp in the database record did not match
86: the one in the memory table and therefore updates were failing. Also refetch the material records after the
87: last call to update_row to update the memory tables. PROCEDURE: create_batch.
252: l_formula_master fm_form_mst%ROWTYPE;
253: l_formula_material fm_matl_dtl%ROWTYPE;
254: l_recipe_validity_rule gmd_recipe_validity_rules%ROWTYPE;
255: l_item_master mtl_system_items_kfv%ROWTYPE;
256: l_gme_material_detail gme_material_details%ROWTYPE;
257: l_text_header gme_text_header%ROWTYPE;
258: l_text_string gme_text_table.text%TYPE;
259: l_material_details gme_common_pvt.material_details_tab;
260: p_material_details gme_common_pvt.material_details_tab;
258: l_text_string gme_text_table.text%TYPE;
259: l_material_details gme_common_pvt.material_details_tab;
260: p_material_details gme_common_pvt.material_details_tab;
261: l_in_material_details gme_common_pvt.material_details_tab;
262: l_material_details_in gme_material_details%ROWTYPE;
263: l_item_masters gme_common_pvt.item_masters_tab;
264: l_text_table gme_common_pvt.text_tab;
265: l_recipe gmd_recipes%ROWTYPE;
266: l_from_uom mtl_units_of_measure.uom_code%TYPE;
320: l_phantom_exc_material_tbl_out gme_common_pvt.exceptions_tab; -- nsinghi bug#5200395
321: l_batch_header_rec gme_batch_header%ROWTYPE;
322: l_batchstep_rec gme_batch_steps%ROWTYPE;
323: x_batchstep_rec gme_batch_steps%ROWTYPE;
324: l_in_material_detail gme_material_details%ROWTYPE;
325: l_item_substituted BOOLEAN;
326: l_curr_item_substituted BOOLEAN;
327: l_ingred_req_date DATE;
328: material_dtl_fetch_failure EXCEPTION;
448:
449: CURSOR get_prim_prod (v_batch_id NUMBER, v_inventory_item_id NUMBER)
450: IS
451: SELECT plan_qty, dtl_um
452: FROM gme_material_details
453: WHERE batch_id = v_batch_id
454: AND inventory_item_id = v_inventory_item_id
455: AND line_type = gme_common_pvt.g_line_type_prod
456: ORDER BY line_no ASC;
469: ,dtl_um
470: ,p_batch_size_uom
471: ,NULL
472: ,NULL) ), 1 as line_no
473: FROM gme_material_details
474: WHERE batch_id = v_batch_id
475: AND inventory_item_id = v_inventory_item_id
476: AND line_type = gme_common_pvt.g_line_type_prod
477: AND v_sum_all_prod_lines = 'A'
482: ,dtl_um
483: ,p_batch_size_uom
484: ,NULL
485: ,NULL), line_no
486: FROM gme_material_details
487: WHERE batch_id = v_batch_id
488: AND inventory_item_id = v_inventory_item_id
489: AND line_type = gme_common_pvt.g_line_type_prod
490: AND v_sum_all_prod_lines <> 'A'
492:
493: /*CURSOR cur_batch_qty (v_batch_id NUMBER, v_inventory_item_id NUMBER)
494: IS
495: SELECT SUM (plan_qty )
496: FROM gme_material_details
497: WHERE batch_id = v_batch_id
498: AND inventory_item_id = v_inventory_item_id
499: AND line_type = gme_common_pvt.g_line_type_prod; */
500:
1754:
1755: IF l_fm_text_tbl_row.line_no = -1 THEN
1756: -- Start constructing key field for text code.
1757: l_text_string :=
1758: 'gme_material_details'
1759: || '|'
1760: || TO_CHAR
1761: (l_material_details (l_row_count).batch_id)
1762: || '|';
1827: gme_debug.put_line ('MATERTIAL lines to be INSERTED ' || l_row_count);
1828: END IF;
1829:
1830: l_return :=
1831: gme_material_details_dbl.insert_row
1832: (l_material_details (l_row_count)
1833: ,l_material_details (l_row_count) );
1834:
1835: IF (g_debug = gme_debug.g_log_statement) THEN
2358: --FPBug#4351032 End
2359:
2360: -- Bug 7710435 - Added p_called_by parameter.
2361: l_return :=
2362: gme_material_details_dbl.update_row (p_material_detail => l_material_details (l_row_count),
2363: p_called_by =>'C' );
2364:
2365: /* FPBug#4351032 Updating original primary qty field manually
2366: as this update is not allowed in above dbl procedure */
2364:
2365: /* FPBug#4351032 Updating original primary qty field manually
2366: as this update is not allowed in above dbl procedure */
2367:
2368: UPDATE gme_material_details
2369: SET original_primary_qty = l_material_details (l_row_count).original_primary_qty
2370: WHERE material_detail_id = l_material_details (l_row_count).material_detail_id;
2371:
2372: -- nsinghi bug#5674398
2433: /* nsinghi bug#5674398 Added the FETCH condition. Reschedule_batch will update the
2434: material_requirement_date, hence requery material detail records */
2435:
2436: l_in_material_detail.batch_id := x_batch_header_rec.batch_id;
2437: IF NOT gme_material_details_dbl.fetch_tab(l_in_material_detail, l_material_details) THEN
2438: RAISE material_dtl_fetch_failure;
2439: END IF;
2440: UPDATE gme_batch_header
2441: SET due_date =
2708: /* Update material details table we have computed material requirement date and move_order_line_id */
2709: FOR i IN 1 .. l_material_details.COUNT LOOP
2710: -- Bug 7710435 - Added p_called_by parameter.
2711: l_return :=
2712: gme_material_details_dbl.update_row (p_material_detail => l_material_details (i),
2713: p_called_by =>'C' );
2714: END LOOP;
2715:
2716: -- Bug 7710435 - Let's refetch the detail row since the data has been updated.
2714: END LOOP;
2715:
2716: -- Bug 7710435 - Let's refetch the detail row since the data has been updated.
2717: l_in_material_detail.batch_id := x_batch_header_rec.batch_id;
2718: IF NOT gme_material_details_dbl.fetch_tab(l_in_material_detail, l_material_details) THEN
2719: RAISE material_dtl_fetch_failure;
2720: END IF;
2721:
2722: /* Create High Level Reservations */