[Home] [Help]
407: -- action code as 'D'
408:
409: SELECT item_type_code
410: INTO l_item_type_code
411: FROM oe_order_lines
412: WHERE line_id = l_line_id;
413:
414: --{ bug3831490 starts
415: IF l_item_type_code <> 'CONFIG' THEN
501:
502:
503: SELECT shipping_interfaced_flag, header_id
504: INTO l_shipping_interfaced_flag, l_header_id
505: FROM oe_order_lines
506: WHERE line_id = l_line_id;
507: IF g_debug_call > 0 THEN
508: G_DEBUG_MSG := G_DEBUG_MSG || '10,';
509: END IF;
758:
759: /* AG: Change to check if the ASO is installed and then only
760: call Process_Requests_And_Notify */
761:
762: UPDATE oe_order_lines
763: SET flow_status_code = 'SHIPPED',
764: shipped_quantity = 0,
765: last_update_date = SYSDATE,
766: last_updated_by = FND_GLOBAL.USER_ID,
1328: ;
1329: IF ( l_exist_dd_count > 0 ) THEN
1330: SELECT Count(*)
1331: INTO l_non_cxl_dd_count
1332: FROM wsh_delivery_details wdd, oe_order_lines line
1333: WHERE wdd.source_line_id = line.line_id
1334: AND wdd.source_code = 'OE'
1335: AND wdd.source_line_id = l_changed_attributes(I).source_line_id
1336: AND Nvl(wdd.released_status, 'N') <> 'D'
1380:
1381: ELSE ------- success, call catch DCP code ----------
1382:
1383: -- temp for testing only
1384: -- update oe_order_lines set ship_from_org_id = 99
1385: -- where line_id = l_changed_attributes(1).source_line_id;
1386:
1387: IF l_changed_attributes.COUNT = 1 AND
1388: l_changed_attributes(1).action_flag = 'D' THEN
1397: l_header_id := nvl(l_line_rec.header_id, l_header_id);
1398: IF l_header_id is NULL THEN
1399: SELECT header_id
1400: INTO l_header_id
1401: FROM oe_order_lines
1402: WHERE line_id = l_changed_attributes(1).source_line_id;
1403: END IF;
1404:
1405:
1717: l_line_rec.item_type_code,
1718: l_line_rec.inventory_item_id,
1719: l_line_rec.order_quantity_uom,
1720: l_line_rec.shipping_quantity_uom
1721: FROM OE_ORDER_LINES
1722: WHERE line_id = p_line_rec.top_model_line_id;
1723:
1724: IF l_debug_level > 0 THEN
1725: oe_debug_pub.add('SHIPPED QUANTITY : '
2415: oe_debug_pub.add( 'ONE OF THE LINE HAS BEEN OVER SHIPPED , MAKE THE MODEL REMNANT '||P_X_LINE_TBL ( 1 ) .TOP_MODEL_LINE_ID , 3 ) ;
2416: END IF;
2417:
2418:
2419: update oe_order_lines
2420: set model_remnant_flag = 'Y'
2421: where top_model_line_id = p_x_line_tbl(1).top_model_line_id;
2422:
2423: IF l_debug_level > 0 THEN
2892: IF nvl(l_line_tbl(l_top_model_index).ship_tolerance_below,0) <> 0 OR
2893: nvl(l_line_tbl(l_top_model_index).ship_tolerance_above,0) <> 0 THEN
2894:
2895:
2896: UPDATE OE_ORDER_LINES_ALL
2897: SET SHIP_TOLERANCE_BELOW = 0,
2898: SHIP_TOLERANCE_ABOVE = 0
2899: WHERE TOP_MODEL_LINE_ID = l_line_tbl(l_top_model_index).line_id;
2900:
3382: INTO l_shipped_quantity, l_requested_qty_uom
3383: FROM wsh_delivery_details
3384: WHERE source_line_id in
3385: (SELECT line_id
3386: FROM oe_order_lines
3387: WHERE line_set_id = l_line_rec.line_set_id
3388: AND shipped_quantity IS NULL
3389: AND line_id <> l_line_rec.line_id)
3390: AND source_code = 'OE'
3712: IF l_line_rec.item_type_code = 'CONFIG' THEN
3713:
3714: SELECT ato_line_id
3715: INTO l_line_rec.ato_line_id
3716: FROM oe_order_lines
3717: WHERE line_id = l_line_rec.line_id;
3718:
3719: Handle_Config_Parent
3720: ( p_ato_line_id => l_line_rec.ato_line_id);
4764: --
4765:
4766: CURSOR c_lines IS
4767: SELECT line_id
4768: FROM oe_order_lines,wf_item_activity_statuses wias,
4769: wf_process_activities wpa
4770: WHERE header_id = l_header_id
4771: AND top_model_line_id = l_top_model_line_id
4772: AND link_to_line_id = p_line_id
4870: l_item_type_code,
4871: l_header_id,
4872: l_model_remnant_flag,
4873: l_ship_from_org_id
4874: FROM OE_ORDER_LINES_ALL
4875: WHERE LINE_ID = p_line_id;
4876:
4877: END IF; -- bulk mode switch
4878:
5196: END IF;
5197:
5198: SELECT explosion_date
5199: INTO l_parent_explosion_date
5200: FROM oe_order_lines
5201: WHERE top_model_line_id = l_top_model_line_id
5202: AND header_id = l_header_id
5203: AND line_id = l_link_to_line_id;
5204:
5501:
5502: BEGIN
5503: SELECT 'X'
5504: INTO l_dummy
5505: FROM oe_order_lines
5506: WHERE top_model_line_id = p_top_model_line_id
5507: AND ato_line_id = l_line_tbl(l_line_index).ato_line_id
5508: AND item_type_code = 'CONFIG';
5509: EXCEPTION
5726:
5727: CURSOR split_lines IS
5728: SELECT /* MOAC_SQL_CHANGE */ line_id, line_set_id, ordered_quantity, ordered_quantity2,
5729: order_quantity_uom, ordered_quantity_uom2, inventory_item_id
5730: FROM oe_order_lines_all oe
5731: WHERE line_id in
5732: (SELECT line_id
5733: FROM oe_order_lines_all
5734: WHERE line_set_id = p_line_rec.line_set_id
5729: order_quantity_uom, ordered_quantity_uom2, inventory_item_id
5730: FROM oe_order_lines_all oe
5731: WHERE line_id in
5732: (SELECT line_id
5733: FROM oe_order_lines_all
5734: WHERE line_set_id = p_line_rec.line_set_id
5735: AND line_id <> p_line_rec.line_id)
5736: AND open_flag = 'Y'
5737: AND shipped_quantity is NULL
5811: RAISE FND_API.G_EXC_ERROR;
5812: END IF;
5813:
5814:
5815: UPDATE OE_ORDER_LINES
5816: SET shipping_quantity = l_line_set_rec.shipping_quantity,
5817: shipped_quantity = l_line_set_rec.shipped_quantity,
5818: shipping_quantity2 = l_line_set_rec.shipping_quantity2,
5819: shipped_quantity2 = l_line_set_rec.shipped_quantity2,
6061: l_firm_flag := 'Y';
6062: END IF;
6063:
6064: FORALL I in p_line_rec.line_id.FIRST..p_line_rec.line_id.LAST
6065: UPDATE oe_order_lines
6066: SET shipping_interfaced_flag = 'Y',
6067: flow_status_code = 'AWAITING_SHIPPING',
6068: firm_demand_flag = NVL(l_firm_flag,firm_demand_flag)
6069: WHERE line_id = p_line_rec.line_id(I)