2011: -- create assignment with l_del_detail_id and p_container_instance_id;
2012:
2013: --
2014: IF l_debug_on THEN
2015: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_CONT',WSH_DEBUG_SV.C_PROC_LEVEL);
2016: END IF;
2017: --
2018: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Detail_To_Cont (
2019: l_del_detail_id,
2014: IF l_debug_on THEN
2015: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_CONT',WSH_DEBUG_SV.C_PROC_LEVEL);
2016: END IF;
2017: --
2018: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Detail_To_Cont (
2019: l_del_detail_id,
2020: p_container_instance_id,
2021: x_return_status);
2022:
2399:
2400: END IF;
2401: --
2402: IF l_debug_on THEN
2403: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_MULTIPLE_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
2404: END IF;
2405: --
2406: WSH_DELIVERY_DETAILS_ACTIONS.Unassign_Multiple_Details (
2407: l_del_detail_rec,
2402: IF l_debug_on THEN
2403: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_MULTIPLE_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
2404: END IF;
2405: --
2406: WSH_DELIVERY_DETAILS_ACTIONS.Unassign_Multiple_Details (
2407: l_del_detail_rec,
2408: p_del_unassign,
2409: p_cont_unassign,
2410: x_return_status,
3486: END IF;
3487: --
3488: --
3489: IF l_debug_on THEN
3490: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
3491: END IF;
3492: --
3493: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Detail_to_Delivery(
3494: P_DETAIL_ID =>p_container_instance_id ,
3489: IF l_debug_on THEN
3490: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
3491: END IF;
3492: --
3493: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Detail_to_Delivery(
3494: P_DETAIL_ID =>p_container_instance_id ,
3495: P_DELIVERY_ID => p_delivery_id,
3496: X_RETURN_STATUS =>x_return_status,
3497: x_dlvy_has_lines => x_dlvy_has_lines,
4023: --dbms_output.put_line('creating assignment of cont ' || p_det_cont_inst_id || ' to container ' || p_par_cont_inst_id);
4024: -- just create assignment of child container to parent.
4025: --
4026: IF l_debug_on THEN
4027: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',WSH_DEBUG_SV.C_PROC_LEVEL);
4028: END IF;
4029: --
4030: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Cont_To_Cont (
4031: p_det_cont_inst_id,
4026: IF l_debug_on THEN
4027: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',WSH_DEBUG_SV.C_PROC_LEVEL);
4028: END IF;
4029: --
4030: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Cont_To_Cont (
4031: p_det_cont_inst_id,
4032: p_par_cont_inst_id,
4033: x_return_status);
4034:
4088:
4089: -- just create assignment of child container to parent.
4090: --
4091: IF l_debug_on THEN
4092: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',WSH_DEBUG_SV.C_PROC_LEVEL);
4093: END IF;
4094: --
4095: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Cont_To_Cont (
4096: p_det_cont_inst_id,
4091: IF l_debug_on THEN
4092: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',WSH_DEBUG_SV.C_PROC_LEVEL);
4093: END IF;
4094: --
4095: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Cont_To_Cont (
4096: p_det_cont_inst_id,
4097: p_par_cont_inst_id,
4098: x_return_status);
4099:
4177:
4178: -- just create assignment of child container to parent.
4179: --
4180: IF l_debug_on THEN
4181: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',WSH_DEBUG_SV.C_PROC_LEVEL);
4182: END IF;
4183: --
4184: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Cont_To_Cont (
4185: p_det_cont_inst_id,
4180: IF l_debug_on THEN
4181: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',WSH_DEBUG_SV.C_PROC_LEVEL);
4182: END IF;
4183: --
4184: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Cont_To_Cont (
4185: p_det_cont_inst_id,
4186: p_par_cont_inst_id,
4187: x_return_status);
4188:
4307:
4308: -- create assignment between child and parent container
4309: --
4310: IF l_debug_on THEN
4311: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',WSH_DEBUG_SV.C_PROC_LEVEL);
4312: END IF;
4313: --
4314: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Cont_To_Cont (
4315: p_det_cont_inst_id,
4310: IF l_debug_on THEN
4311: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',WSH_DEBUG_SV.C_PROC_LEVEL);
4312: END IF;
4313: --
4314: WSH_DELIVERY_DETAILS_ACTIONS.Assign_Cont_To_Cont (
4315: p_det_cont_inst_id,
4316: p_par_cont_inst_id,
4317: x_return_status);
4318:
5094:
5095: --dbms_output.put_line('Splitting dd '||p_line_cont_rec.delivery_detail_id||' with qty '||l_tmp_split_qty);
5096: --
5097: IF l_debug_on THEN
5098: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
5099: WSH_DEBUG_SV.logmsg(l_module_name,'SPLIT QTY IS'||l_tmp_split_qty);
5100: END IF;
5101: --
5102:
5104: -- empty container logic, need to test and modify this
5105: -- the value for p_num_of_split is passed as 1
5106: -- so that split occurs once
5107:
5108: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details_bulk (
5109: p_from_detail_id => p_line_cont_rec.delivery_detail_id,
5110: p_req_quantity => l_tmp_split_qty,
5111: p_req_quantity2 => l_tmp_split_qty2,
5112: p_manual_split => 'C',
5122: --dbms_output.put_line('STATUS after SPLITDD in empty'||l_return_status||l_dd_id_tab.count);
5123:
5124: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5125: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5126: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5127: x_return_status := C_ERROR_STATUS;
5128: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '||x_return_status);
5129: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5130: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5124: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5125: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5126: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5127: x_return_status := C_ERROR_STATUS;
5128: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '||x_return_status);
5129: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5130: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5131: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5132: --
5343: -- End BugFix#3475352
5344:
5345: --dbms_output.put_line('Splitting dd '||p_line_cont_rec.delivery_detail_id||' with qty '||l_split_qty);
5346: IF l_debug_on THEN
5347: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
5348: WSH_DEBUG_SV.logmsg(l_module_name,'Split Qty is'||l_split_qty);
5349: WSH_DEBUG_SV.logmsg(l_module_name,'Number of split is'||l_num_of_split);
5350: END IF;
5351:
5353: -- Call BULK Split API
5354:
5355: --dbms_output.put_line('======BEFORE SPLIT'||l_dd_id_tab.count||'<'||l_num_of_split);
5356:
5357: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details_bulk (
5358: p_from_detail_id => p_line_cont_rec.delivery_detail_id,
5359: p_req_quantity => l_split_qty,
5360: p_req_quantity2 => l_split_qty2,
5361: p_manual_split => 'C',
5370: END IF;
5371:
5372: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5373: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5374: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5375: x_return_status := C_ERROR_STATUS;
5376: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5377: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5378: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7283: l_mdc_id_tab(l_mdc_index_j) := l_ddlist(l_mdc_index_i);
7284: l_mdc_index_i := l_ddlist.next(l_mdc_index_i);
7285:
7286: END LOOP;
7287: WSH_DELIVERY_DETAILS_ACTIONS.Delete_Consol_Record(
7288: p_detail_id_tab => l_mdc_id_tab,
7289: x_return_status => x_return_status);
7290:
7291: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
7723: l_mdc_index_i := l_contlist1.next(l_mdc_index_i);
7724:
7725: END LOOP;
7726:
7727: WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record(
7728: p_detail_id_tab => l_mdc_id_tab,
7729: x_return_status => x_return_status);
7730:
7731: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
9161: WSH_DEBUG_SV.log(l_module_name,'l_split_qty',l_split_qty);
9162: WSH_DEBUG_SV.log(l_module_name,'l_split_qty2',l_split_qty2);
9163: WSH_DEBUG_SV.log(l_module_name,'l_det_pack_qty2',l_det_pack_qty2);
9164: WSH_DEBUG_SV.log(l_module_name,'l_det_pack_qty',l_det_pack_qty);
9165: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
9166: END IF;
9167: --
9168:
9169: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details (
9165: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
9166: END IF;
9167: --
9168:
9169: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details (
9170: p_from_detail_id => l_det_tab(j).delivery_detail_id,
9171: p_req_quantity => l_split_qty,
9172: p_req_quantity2 => l_split_qty2,
9173: x_new_detail_id => l_split_det_id,
9480: WSH_DEBUG_SV.log(l_module_name,'l_split_qty',l_split_qty);
9481: WSH_DEBUG_SV.log(l_module_name,'l_split_qty2',l_split_qty2);
9482: WSH_DEBUG_SV.log(l_module_name,'l_det_pack_qty2',l_det_pack_qty2);
9483: WSH_DEBUG_SV.log(l_module_name,'l_det_pack_qty',l_det_pack_qty);
9484: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
9485: END IF;
9486:
9487: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details (
9488: p_from_detail_id => l_det_tab(j).delivery_detail_id,
9483: WSH_DEBUG_SV.log(l_module_name,'l_det_pack_qty',l_det_pack_qty);
9484: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
9485: END IF;
9486:
9487: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details (
9488: p_from_detail_id => l_det_tab(j).delivery_detail_id,
9489: p_req_quantity => l_split_qty,
9490: p_req_quantity2 => l_split_qty2,
9491: x_new_detail_id => l_split_det_id,