[Home] [Help]
68: x_selected_del_tab.delete;
69:
70: l_sc_SELECT := l_sc_SELECT || ' wnd.delivery_id , wnd.organization_id, wnd.initial_pickup_location_id ';
71:
72: l_sc_FROM := l_sc_FROM || 'wsh_new_deliveries wnd ';
73:
74: IF p_input_info.process_mode = G_SHIP_CONFIRM THEN
75: l_sc_WHERE := l_sc_WHERE || 'NVL(wnd.auto_sc_exclude_flag, ''N'') = ''N'' ';
76: ELSIF p_input_info.process_mode = G_AUTO_PACK THEN
489: initial_pickup_date,
490: organization_id,
491: ship_method_code,
492: initial_pickup_location_id
493: FROM wsh_new_deliveries
494: WHERE delivery_id = c_delivery_id and
495: status_code = 'OP' AND
496: NVL(auto_sc_exclude_flag, 'N')= 'N' FOR UPDATE NOWAIT;
497:
509: AND st.trip_id = wt.trip_id
510: AND wt.ship_method_code IS NOT NULL
511: AND rownum = 1;
512:
513: l_ship_method_code WSH_NEW_DELIVERIES.SHIP_METHOD_CODE%TYPE;
514:
515: l_delivery_rec get_delivery%ROWTYPE;
516: l_tmp_del_tab WSH_UTIL_CORE.Id_Tab_Type;
517: l_err_entity_ids WSH_UTIL_CORE.Id_Tab_Type;
517: l_err_entity_ids WSH_UTIL_CORE.Id_Tab_Type;
518: l_return_status VARCHAR2(1) := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
519: l_actual_dep_date DATE ;
520: l_action_prms WSH_DELIVERIES_GRP.action_parameters_rectype;
521: l_rec_attr_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
522: l_delivery_out_rec WSH_DELIVERIES_GRP.Delivery_Action_Out_Rec_Type;
523: l_defaults_rec WSH_DELIVERIES_GRP.default_parameters_rectype;
524: l_msg_count NUMBER;
525: l_msg_data VARCHAR2(4000);
558: IF l_debug_on THEN
559: WSH_DEBUG_SV.log(l_module_name, 'Check if ship confirm is allowed for delivery ID: ' || to_char(l_tmp_del_tab(1)));
560: END IF;
561:
562: UPDATE WSH_NEW_DELIVERIES SET BATCH_ID = p_sc_batch_id
563: WHERE delivery_id = p_delivery_id;
564:
565: SAVEPOINT beginning_of_loop;
566:
884:
885: -- 3667595
886: CURSOR get_pick_up_stops IS
887: SELECT DISTINCT wtp.trip_id, wst.stop_sequence_number, wst.stop_id, wst.stop_location_id
888: FROM wsh_new_deliveries wnd,
889: wsh_delivery_legs wlg,
890: wsh_trip_stops wst,
891: wsh_trips wtp
892: WHERE wnd.delivery_id = wlg.delivery_id AND
908: --Modified the following SQL as part of bug 4280371 ( 30-Jun-2005 ).
909: CURSOR get_all_stops IS
910: select wsto.trip_id, wsto.stop_sequence_number, wsto.stop_id , wsto.stop_location_id
911: from wsh_trip_stops wsto
912: , wsh_new_deliveries wnd
913: , wsh_delivery_legs wlg
914: , wsh_trip_stops wst
915: where wnd.batch_id = p_sc_batch_id
916: and wnd.status_code = 'CO'
933: CURSOR c_batch_stop(p_batch_id NUMBER)IS
934: SELECT wts.stop_id
935: FROM wsh_trip_stops wts,
936: wsh_delivery_legs wdl,
937: wsh_new_deliveries wnd,
938: wsh_picking_batches wpb
939: WHERE p_batch_id IS NOT NULL
940: AND wnd.batch_id = p_batch_id
941: AND wdl.delivery_id = wnd.delivery_id
1122: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1123: x_results_summary.success := x_results_summary.success + 1;
1124: l_sc_confirmed_dels(l_sc_confirmed_dels.count+1):= p_del_tab(i).delivery_id;
1125: IF l_debug_on THEN
1126: select status_code into l_status_code from wsh_new_deliveries where delivery_id = p_del_tab(i).delivery_id;
1127: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery ID ' || to_char(p_del_tab(i).delivery_id)||' is ship confirmed successfully with status '|| l_status_code);
1128: END IF;
1129:
1130:
1460: planned_flag,
1461: initial_pickup_date,
1462: organization_id,
1463: ship_method_code
1464: FROM wsh_new_deliveries
1465: WHERE delivery_id = c_delivery_id and
1466: status_code = 'OP' AND
1467: NVL(auto_ap_exclude_flag, 'N')= 'N' FOR UPDATE NOWAIT;
1468:
1474: l_err_entity_ids WSH_UTIL_CORE.Id_Tab_Type;
1475: l_cont_instance_tab WSH_UTIL_CORE.Id_Tab_Type;
1476: l_return_status VARCHAR2(1) := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1477: l_action_prms WSH_DELIVERIES_GRP.action_parameters_rectype;
1478: l_rec_attr_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
1479: l_delivery_out_rec WSH_DELIVERIES_GRP.Delivery_Action_Out_Rec_Type;
1480: l_defaults_rec WSH_DELIVERIES_GRP.default_parameters_rectype;
1481: l_msg_count NUMBER;
1482: l_msg_data VARCHAR2(4000);
1528:
1529:
1530: SAVEPOINT beginning_of_loop;
1531:
1532: UPDATE WSH_NEW_DELIVERIES SET AP_BATCH_ID = p_ap_batch_id
1533: WHERE delivery_id = p_delivery_id;
1534:
1535: fnd_msg_pub.initialize; -- clear messages
1536: