[Home] [Help]
168: , p_init_msg_lst IN VARCHAR2 DEFAULT FND_API.G_FALSE
169: ) IS
170: l_api_name CONSTANT VARCHAR2 (30) := 'VALIDATE_SUPPLY_DEMAND';
171:
172: l_material_details_rec GME_MATERIAL_DETAILS%ROWTYPE;
173: l_batch_header_rec GME_BATCH_HEADER%ROWTYPE;
174: l_step_status NUMBER;
175: l_mat_status NUMBER;
176: l_step_id NUMBER;
260: END IF;
261:
262: /* Retrieve material details record */
263: l_material_details_rec.material_detail_id := p_supply_demand_line_id;
264: IF (NOT(gme_material_details_dbl.fetch_row(l_material_details_rec, l_material_details_rec))) THEN
265: IF g_debug <= gme_debug.g_log_statement THEN
266: gme_debug.put_line(g_pkg_name||'.'||l_api_name||
267: 'Fetch failure against gme_material_details using id of '||p_supply_demand_line_id);
268: END IF;
263: l_material_details_rec.material_detail_id := p_supply_demand_line_id;
264: IF (NOT(gme_material_details_dbl.fetch_row(l_material_details_rec, l_material_details_rec))) THEN
265: IF g_debug <= gme_debug.g_log_statement THEN
266: gme_debug.put_line(g_pkg_name||'.'||l_api_name||
267: 'Fetch failure against gme_material_details using id of '||p_supply_demand_line_id);
268: END IF;
269: RAISE fetch_failure;
270: END IF;
271:
399: , p_init_msg_lst IN VARCHAR2 DEFAULT FND_API.G_FALSE
400: ) IS
401: l_api_name CONSTANT VARCHAR2 (30) := 'GET_AVAILABLE_SUPPLY_DEMAND';
402:
403: l_material_details_rec GME_MATERIAL_DETAILS%ROWTYPE;
404: l_batch_header_rec GME_BATCH_HEADER%ROWTYPE;
405: l_step_status NUMBER(5);
406: l_primary_uom_code VARCHAR2(3);
407: l_available_quantity NUMBER;
482: END IF;
483:
484: /* Retrieve material details record */
485: l_material_details_rec.material_detail_id := p_supply_demand_line_id;
486: IF (NOT(gme_material_details_dbl.fetch_row(l_material_details_rec, l_material_details_rec))) THEN
487: IF g_debug <= gme_debug.g_log_statement THEN
488: gme_debug.put_line(g_pkg_name||'.'||l_api_name||
489: 'Fetch failure against gme_material_details using id of '||p_supply_demand_line_id);
490: END IF;
485: l_material_details_rec.material_detail_id := p_supply_demand_line_id;
486: IF (NOT(gme_material_details_dbl.fetch_row(l_material_details_rec, l_material_details_rec))) THEN
487: IF g_debug <= gme_debug.g_log_statement THEN
488: gme_debug.put_line(g_pkg_name||'.'||l_api_name||
489: 'Fetch failure against gme_material_details using id of '||p_supply_demand_line_id);
490: END IF;
491: RAISE fetch_failure;
492: END IF;
493:
909: IS
910: l_api_name CONSTANT VARCHAR2 (30) := 'get_planning_open_qty';
911: l_open_qty NUMBER := 0;
912: l_return_status VARCHAR2 (1);
913: l_mtl_dtl_rec gme_material_details%ROWTYPE;
914: BEGIN
915: IF g_debug <= gme_debug.g_log_procedure THEN
916: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
917: || l_api_name);
1123: ) IS
1124: SELECT m.material_detail_id, m.batch_id, h.batch_no, m.material_requirement_date, m.line_no,
1125: m.formulaline_id, m.plan_qty, m.dtl_um, m.scale_multiple, h.formula_id,
1126: m.inventory_item_id, m.move_order_line_id, i.concatenated_segments item_no, h.organization_id, h.batch_type
1127: FROM gme_material_details m, gme_batch_header h, mtl_system_items_kfv i
1128: WHERE m.batch_id = h.batch_id
1129: AND h.organization_id = v_org_id
1130: AND h.batch_status = 1
1131: AND m.material_requirement_date >= v_start_date
1155: l_formula_tbl gmdfmval_pub.formula_detail_tbl;
1156: l_trolin_tbl inv_move_order_pub.trolin_tbl_type;
1157: l_material_details_tbl gme_common_pvt.material_details_tab;
1158: l_material_details_tbl_out gme_common_pvt.material_details_tab;
1159: l_material_detail_rec gme_material_details%ROWTYPE;
1160: l_return BOOLEAN;
1161: l_return_status VARCHAR2 (1);
1162: x_return_status VARCHAR2 (1);
1163: l_batch_header_rec gme_batch_header%ROWTYPE;
1286:
1287: -- Fetch material record for the rec.material_detail_id;
1288: l_material_detail_rec.material_detail_id := rec.material_detail_id;
1289:
1290: IF NOT gme_material_details_dbl.fetch_row (p_material_detail => l_material_detail_rec,
1291: x_material_detail => l_material_detail_rec
1292: ) THEN
1293: l_oneitem_error := TRUE;
1294: gme_common_pvt.count_and_get (x_count => l_message_count,
1589: END IF; --IF l_new_item_rec.mtl_transactions_enabled_flag = 'Y'
1590: END IF; -- IF l_batch_header_rec.update_inventory_ind = 'Y' THEN
1591:
1592: --Call material_line_dbl.update_rec
1593: l_return := gme_material_details_dbl.update_row (l_material_detail_rec);
1594:
1595: IF (l_return = FALSE) THEN
1596: gme_common_pvt.count_and_get (x_count => l_message_count,
1597: p_encoded => fnd_api.g_false,
1636: FETCH c_batchsteps INTO l_batchstep_rec;
1637: CLOSE c_batchsteps;
1638:
1639: /* FPBug#4351032 update original primary qty field as this field dont get updated
1640: using gme_material_details_dbl.update_row procedure */
1641: UPDATE gme_material_details
1642: SET original_primary_qty = l_material_detail_rec.original_primary_qty
1643: WHERE material_detail_id = l_material_detail_rec.material_detail_id;
1644:
1637: CLOSE c_batchsteps;
1638:
1639: /* FPBug#4351032 update original primary qty field as this field dont get updated
1640: using gme_material_details_dbl.update_row procedure */
1641: UPDATE gme_material_details
1642: SET original_primary_qty = l_material_detail_rec.original_primary_qty
1643: WHERE material_detail_id = l_material_detail_rec.material_detail_id;
1644:
1645: l_material_detail_rec.last_update_date := gme_common_pvt.get_timestamp;
1999: x_return_status OUT NOCOPY VARCHAR2)
2000: IS
2001: CURSOR get_primary_product_uom ( v_batch_id IN NUMBER )IS
2002: SELECT gm.dtl_um
2003: FROM gmd_recipe_validity_rules vr, gme_material_details gm, gme_batch_header bh
2004: WHERE bh.recipe_validity_rule_id = vr.recipe_validity_rule_id
2005: AND bh.batch_id = gm.batch_id
2006: AND vr.inventory_item_id = gm.inventory_item_id
2007: AND gm.line_type = 1 /*FPBug# 4684029 rework */
2009: AND rownum = 1 ;
2010:
2011: CURSOR get_quantities ( v_batch_id IN NUMBER, v_line_type IN NUMBER )IS
2012: SELECT inventory_item_id, plan_qty, wip_plan_qty, actual_qty, dtl_um
2013: FROM gme_material_details
2014: WHERE batch_id = v_batch_id
2015: AND line_type = v_line_type;
2016:
2017: l_api_name VARCHAR2 (30):= 'get_total_quantity';
2264: -- Namit S. 27-NOV-2006 bug#5674398
2265: ======================================================================*/
2266:
2267: FUNCTION get_ingr_sub_date (p_batch_id IN gme_batch_header.batch_id%TYPE,
2268: p_material_detail_id IN gme_material_details.material_detail_id%TYPE) RETURN DATE
2269: IS
2270: CURSOR cur_get_start_end_Date(
2271: p_batch_id IN gme_batch_header.batch_id%TYPE
2272: ) IS
2274: FROM gme_batch_header
2275: WHERE batch_id = p_batch_id;
2276:
2277: CURSOR cur_get_matl_requirement_dt(
2278: p_material_detail_id gme_material_details.material_detail_id%TYPE
2279: ) IS
2280: SELECT material_requirement_date
2281: FROM gme_material_details
2282: WHERE material_detail_id = p_material_detail_id;
2277: CURSOR cur_get_matl_requirement_dt(
2278: p_material_detail_id gme_material_details.material_detail_id%TYPE
2279: ) IS
2280: SELECT material_requirement_date
2281: FROM gme_material_details
2282: WHERE material_detail_id = p_material_detail_id;
2283:
2284: l_plan_start_date DATE;
2285: l_plan_cmplt_date DATE;