DBA Data[Home] [Help]

APPS.WSH_USA_ACTIONS_PVT dependencies on WSH_UTIL_CORE

Line 22: l_detail_tab WSH_UTIL_CORE.id_tab_type; -- DBI Project

18: l_debug_on BOOLEAN;
19: --
20: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'IMPORT_RECORDS';
21: --
22: l_detail_tab WSH_UTIL_CORE.id_tab_type; -- DBI Project
23: l_organization_tab WSH_UTIL_CORE.id_tab_type; --Pick To POD WF Project
24: l_wf_rs VARCHAR2(1); --Pick To POD WF Project
25: l_dbi_rs VARCHAR2(1); -- DBI Project
26:

Line 23: l_organization_tab WSH_UTIL_CORE.id_tab_type; --Pick To POD WF Project

19: --
20: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'IMPORT_RECORDS';
21: --
22: l_detail_tab WSH_UTIL_CORE.id_tab_type; -- DBI Project
23: l_organization_tab WSH_UTIL_CORE.id_tab_type; --Pick To POD WF Project
24: l_wf_rs VARCHAR2(1); --Pick To POD WF Project
25: l_dbi_rs VARCHAR2(1); -- DBI Project
26:
27: BEGIN

Line 42: l_rs := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

38: WSH_DEBUG_SV.push(l_module_name);
39: --
40: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
41: END IF;
42: l_rs := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
43: <>
44: FOR l_counter IN p_changed_attributes.FIRST .. p_changed_attributes.LAST LOOP
45: IF p_changed_attributes(l_counter).action_flag = 'I' THEN
46: Import_Delivery_Details(

Line 50: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

46: Import_Delivery_Details(
47: p_source_line_id => p_changed_attributes(l_counter).source_line_id,
48: p_source_code => p_source_code,
49: x_return_status => l_rs);
50: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
51: EXIT records_loop;
52: END IF;
53:
54: IF (NVL(p_changed_attributes(l_counter).released_status,'@') <> FND_API.G_MISS_CHAR) THEN

Line 104: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN

100:
101: IF l_debug_on THEN
102: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
103: END IF;
104: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
105: x_return_status := l_dbi_rs;
106: -- just pass this return status to caller API
107: IF l_debug_on THEN
108: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);

Line 130: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

126: END IF;
127: --
128: EXCEPTION
129: WHEN OTHERS THEN
130: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
131: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.Import_Records',l_module_name);
132: --
133: IF l_debug_on THEN
134: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 131: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.Import_Records',l_module_name);

127: --
128: EXCEPTION
129: WHEN OTHERS THEN
130: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
131: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.Import_Records',l_module_name);
132: --
133: IF l_debug_on THEN
134: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
135: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 153: PROCEDURE sort_splits ( p_index_tab IN OUT NOCOPY WSH_UTIL_CORE.id_tab_type ,

149: -- source_line_id desc
150: -- date_requested desc
151: --
152:
153: PROCEDURE sort_splits ( p_index_tab IN OUT NOCOPY WSH_UTIL_CORE.id_tab_type ,
154: p_split_table IN OUT NOCOPY split_Table_tab_type,
155: x_return_status OUT NOCOPY VARCHAR2 )
156: IS
157: l_tmp NUMBER ;

Line 184: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

180: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
181: END IF;
182:
183: -- add the original line also in the l_split_table
184: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
185:
186: IF l_debug_on THEN
187: WSH_DEBUG_SV.logmsg(l_module_name,'Inside sort splits ' );
188: END IF;

Line 287: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

283:
284:
285: EXCEPTION
286: WHEN OTHERS THEN
287: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
288: IF l_debug_on THEN
289: WSH_DEBUG_SV.logmsg(l_module_name,'Exception in sort_splits' );
290: WSH_DEBUG_SV.logmsg(l_module_name, SQLERRM || ' : ' || SQLCODE );
291: END IF;

Line 314: p_index_tab IN WSH_UTIL_CORE.ID_Tab_Type ,

310: PROCEDURE Split_Records_Int (
311: p_source_code IN VARCHAR2,
312: p_changed_attributes IN WSH_INTERFACE.ChangedAttributeTabType,
313: p_interface_flag IN VARCHAR2,
314: p_index_tab IN WSH_UTIL_CORE.ID_Tab_Type ,
315: p_split_lines IN WSH_USA_ACTIONS_PVT.split_Table_Tab_type ,
316: x_return_status OUT NOCOPY VARCHAR2
317: ) IS
318:

Line 487: l_delete_dds WSH_UTIL_CORE.Id_Tab_Type ; -- to delete delivery lines pending overpick

483: l_detailed_qty NUMBER;
484: l_detailed_qty2 NUMBER;
485: l_prev_source_line_id NUMBER;
486:
487: l_delete_dds WSH_UTIL_CORE.Id_Tab_Type ; -- to delete delivery lines pending overpick
488:
489: l_detail_tab WSH_UTIL_CORE.id_tab_type; -- DBI Project
490: l_dbi_rs VARCHAR2(1); -- DBI Project
491:

Line 489: l_detail_tab WSH_UTIL_CORE.id_tab_type; -- DBI Project

485: l_prev_source_line_id NUMBER;
486:
487: l_delete_dds WSH_UTIL_CORE.Id_Tab_Type ; -- to delete delivery lines pending overpick
488:
489: l_detail_tab WSH_UTIL_CORE.id_tab_type; -- DBI Project
490: l_dbi_rs VARCHAR2(1); -- DBI Project
491:
492:
493: --

Line 512: l_total_rsv_to_split WSH_UTIL_CORE.id_Tab_type ;

508:
509: l_total_spare_rsv NUMBER ;
510: -- HW OPMCONV - Added Qty2
511: l_total_spare_rsv2 NUMBER ;
512: l_total_rsv_to_split WSH_UTIL_CORE.id_Tab_type ;
513: -- HW OPMCONV - Added Qty2
514: l_total_rsv_to_split2 WSH_UTIL_CORE.id_Tab_type ;
515:
516: l_inventory_item_id NUMBER;

Line 514: l_total_rsv_to_split2 WSH_UTIL_CORE.id_Tab_type ;

510: -- HW OPMCONV - Added Qty2
511: l_total_spare_rsv2 NUMBER ;
512: l_total_rsv_to_split WSH_UTIL_CORE.id_Tab_type ;
513: -- HW OPMCONV - Added Qty2
514: l_total_rsv_to_split2 WSH_UTIL_CORE.id_Tab_type ;
515:
516: l_inventory_item_id NUMBER;
517: l_organization_id NUMBER;
518: l_last_orig_line_id NUMBER;

Line 522: l_sdd_tab WSH_UTIL_CORE.Id_Tab_Type ; -- to store delivery details marked as 'R'

518: l_last_orig_line_id NUMBER;
519:
520: l_pickable_flag VARCHAR2(1);
521:
522: l_sdd_tab WSH_UTIL_CORE.Id_Tab_Type ; -- to store delivery details marked as 'R'
523: l_total_reserved_quantity NUMBER ;
524: -- HW OPMCONV - Added Qty2
525: l_total_reserved_quantity2 NUMBER ;
526: l_total_requested_quantity NUMBER ;

Line 570: l_rs := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

566: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
567: WSH_DEBUG_SV.log(l_module_name,'P_INTERFACE_FLAG',P_INTERFACE_FLAG);
568: END IF;
569: --
570: l_rs := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
571: SAVEPOINT before_splits;
572:
573: l_total_requested_quantity := 0 ;
574: -- HW OPMCONV - Added Qty2

Line 603: l_fulfillment_base := WSH_UTIL_CORE.Get_Line_Fulfillment_Base('OE',l_last_orig_line_id);

599:
600: l_last_orig_line_id := p_changed_attributes(l_counter).original_source_line_id ;
601:
602: -- muom
603: l_fulfillment_base := WSH_UTIL_CORE.Get_Line_Fulfillment_Base('OE',l_last_orig_line_id);
604:
605: <>
606: FOR c IN c_details(p_source_code,
607: p_changed_attributes(l_counter).original_source_line_id,

Line 638: WSH_UTIL_CORE.add_message(l_rs,l_module_name);

634: --in Rel. to warehouse status as described above, the flow needs to
635: --stop
636: FND_MESSAGE.SET_NAME('WSH', 'WSH_SPLIT_NOT_ALLOWED');
637: FND_MESSAGE.SET_TOKEN('ORDER', c.source_header_number);
638: WSH_UTIL_CORE.add_message(l_rs,l_module_name);
639: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
640: ROLLBACK to before_splits;
641: IF l_debug_on THEN
642: WSH_DEBUG_SV.logmsg(l_module_name,'RAISE ERROR AS SPLIT IS NOT ALLOWED');

Line 639: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

635: --stop
636: FND_MESSAGE.SET_NAME('WSH', 'WSH_SPLIT_NOT_ALLOWED');
637: FND_MESSAGE.SET_TOKEN('ORDER', c.source_header_number);
638: WSH_UTIL_CORE.add_message(l_rs,l_module_name);
639: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
640: ROLLBACK to before_splits;
641: IF l_debug_on THEN
642: WSH_DEBUG_SV.logmsg(l_module_name,'RAISE ERROR AS SPLIT IS NOT ALLOWED');
643: WSH_DEBUG_SV.pop(l_module_name);

Line 723: l_rs := WSH_UTIL_CORE.G_RET_STS_ERROR;

719:
720: -- muom
721: IF ((l_fulfillment_base = 'P' AND p_changed_attributes(l_counter).ordered_quantity > 0 AND l_quantity_to_split <= 0) OR
722: (l_fulfillment_base = 'S' AND p_changed_attributes(l_counter).ordered_quantity2 > 0 AND l_quantity_to_split2 <= 0)) THEN
723: l_rs := WSH_UTIL_CORE.G_RET_STS_ERROR;
724: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_CANNOT_SPLIT');
725: WSH_UTIL_CORE.add_message(l_rs,l_module_name);
726: EXIT records_loop;
727: END IF;

Line 725: WSH_UTIL_CORE.add_message(l_rs,l_module_name);

721: IF ((l_fulfillment_base = 'P' AND p_changed_attributes(l_counter).ordered_quantity > 0 AND l_quantity_to_split <= 0) OR
722: (l_fulfillment_base = 'S' AND p_changed_attributes(l_counter).ordered_quantity2 > 0 AND l_quantity_to_split2 <= 0)) THEN
723: l_rs := WSH_UTIL_CORE.G_RET_STS_ERROR;
724: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_CANNOT_SPLIT');
725: WSH_UTIL_CORE.add_message(l_rs,l_module_name);
726: EXIT records_loop;
727: END IF;
728: END IF; -- NOT l_uom_converted --}
729:

Line 825: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

821: x_detailed_qty => l_detailed_qty,
822: x_detailed_qty2 => l_detailed_qty2,
823: x_return_status => x_return_status);
824:
825: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
826: IF l_debug_on THEN
827: WSH_DEBUG_SV.log(l_module_name,'get_detailed_quantity returned error');
828: EXIT records_loop;
829: END IF;

Line 949: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

945:
946: IF l_debug_on THEN
947: WSH_DEBUG_SV.log(l_module_name,'l_rs',l_rs);
948: END IF;
949: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
950: EXIT records_loop;
951: END IF;
952:
953: --bug# 6719369 (replenishment project) (begin) : call WMS for whenever there is split on replenishment requested

Line 968: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN

964: p_primary_quantity => c.requested_quantity - l_quantity_split,
965: p_split_delivery_detail_id => l_working_detail_id,
966: p_split_source_line_id => p_changed_attributes(l_counter).source_line_id,
967: x_return_status => x_return_status);
968: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
969: --{
970: IF l_debug_on THEN
971: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR FROM WMS_REPLENISHMENT_PUB.UPDATE_DELIVERY_DETAIL');
972: WSH_DEBUG_SV.pop(l_module_name);

Line 1035: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN

1031: IF l_debug_on THEN
1032: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
1033: END IF;
1034: --{
1035: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1036: x_return_status := l_dbi_rs;
1037: ROLLBACK to before_splits;
1038: -- just pass this return status to caller API
1039: IF l_debug_on THEN

Line 1118: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1114: x_detailed_qty => l_detailed_qty,
1115: x_detailed_qty2 => l_detailed_qty2,
1116: x_return_status => x_return_status);
1117:
1118: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1119: IF l_debug_on THEN
1120: WSH_DEBUG_SV.log(l_module_name,'get_detailed_quantity returned error');
1121: EXIT records_loop;
1122: END IF;

Line 1188: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1184: p_cancellation_quantity2 =>l_res_qty2_to_transfer,
1185: x_return_status => l_rs);
1186:
1187:
1188: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1189: IF l_debug_on THEN
1190: WSH_DEBUG_SV.logmsg(l_module_name,'unexpected error after WSH_USA_INV_PVT.cancel_staged_reservation ');
1191: END IF;
1192: exit records_loop ;

Line 1215: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1211: p_direction_flag => p_split_lines(i).direction_flag ,
1212: p_shipped_flag => p_changed_attributes(l_counter).shipped_flag,
1213: x_return_status => l_rs);
1214:
1215: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1216: EXIT records_loop;
1217: END IF;
1218: END IF; --if ship_from_org_id
1219:

Line 1298: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1294: p_order_line_id => p_changed_attributes(l_counter).source_line_id,
1295: x_return_status => l_rs,
1296: x_msg_count => l_msg_count,
1297: x_msg_data => l_msg_data);
1298: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1299: IF l_debug_on THEN
1300: WSH_DEBUG_SV.log(l_module_name,'wf_update_after_inv_unreserv returned error');
1301: END IF;
1302: EXIT records_loop;

Line 1314: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1310: p_order_line_id => p_changed_attributes(l_counter).original_source_line_id,
1311: x_return_status => l_rs,
1312: x_msg_count => l_msg_count,
1313: x_msg_data => l_msg_data);
1314: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1315: IF l_debug_on THEN
1316: WSH_DEBUG_SV.log(l_module_name,'wf_update_after_inv_unreserv returned error');
1317: END IF;
1318: EXIT records_loop;

Line 1351: IF l_rs NOT IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN -- {

1347: -- IF Condition added for bug 10105817
1348: -- Proceed further only l_rs is SUCCESS/WARNING.
1349: -- Added If Condition, since ITS proceeds further and completes normally even if API
1350: -- WSH_USA_INV_PVT.Split_Reservation returs Expected/Unexpected error.
1351: IF l_rs NOT IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN -- {
1352: -- Loop here to calculate the reservations to split for each p_changed_attribute
1353:
1354:
1355: l_total_spare_rsv := 0; --bugfix 8780988

Line 1518: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1514: x_detailed_qty => l_detailed_qty,
1515: x_detailed_qty2 => l_detailed_qty2,
1516: x_return_status => x_return_status);
1517:
1518: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1519: IF l_debug_on THEN
1520: WSH_DEBUG_SV.log(l_module_name,'get_detailed_quantity returned error');
1521: EXIT unstaged_rsv_loop;
1522: END IF;

Line 1631: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1627: p_direction_flag => l_direction_flag,
1628: p_shipped_flag => p_changed_attributes(l_counter).shipped_flag,
1629: x_return_status => l_rs);
1630:
1631: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1632: IF l_debug_on THEN
1633: WSH_DEBUG_SV.logmsg(l_module_name,'unexpected error after WSH_USA_INV_PVT.Split_Reservation ');
1634: END IF;
1635: exit unstaged_rsv_loop ;

Line 1695: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1691: p_cancellation_quantity => l_Cancel_Reservation_Tab_Type(i).cancelled_quantity,
1692: p_cancellation_quantity2 => l_Cancel_Reservation_Tab_Type(i).cancelled_quantity2,
1693: x_return_status => l_rs);
1694: --
1695: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1696: IF l_debug_on THEN
1697: WSH_DEBUG_SV.logmsg(l_module_name,'unexpected error after WSH_USA_INV_PVT.cancel_nonstaged_reservation');
1698: END IF;
1699: END IF;

Line 1709: IF l_rs NOT IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)

1705:
1706: END IF; -- } Added for bug 10105817
1707: --
1708: -- purge delivery details pending overpick
1709: IF l_rs NOT IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1710: AND l_delete_dds.count > 0 THEN
1711: WSH_INTERFACE.Delete_Details(
1712: p_details_id => l_delete_dds,
1713: x_return_status => l_rs

Line 1717: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1713: x_return_status => l_rs
1714: );
1715: END IF;
1716:
1717: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1718: ROLLBACK to before_splits;
1719: END IF;
1720:
1721: x_return_status := l_rs;

Line 1731: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

1727: --
1728: EXCEPTION
1729: WHEN OTHERS THEN
1730: ROLLBACK TO before_splits;
1731: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1732: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_USA_ACTIONS_PVT.Split_Records_Int',l_module_name);
1733: --
1734: IF l_debug_on THEN
1735: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 1732: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_USA_ACTIONS_PVT.Split_Records_Int',l_module_name);

1728: EXCEPTION
1729: WHEN OTHERS THEN
1730: ROLLBACK TO before_splits;
1731: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1732: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_USA_ACTIONS_PVT.Split_Records_Int',l_module_name);
1733: --
1734: IF l_debug_on THEN
1735: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1736: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 1749: l_index_tab WSH_UTIL_CORE.ID_Tab_Type ;

1745: x_return_status OUT NOCOPY VARCHAR2
1746: ) IS
1747: l_index number ;
1748: l_direction_flag direction_flag_tab_type ;
1749: l_index_tab WSH_UTIL_CORE.ID_Tab_Type ;
1750: l_split_table split_Table_Tab_Type ;
1751: l_smallest_orig_line_id NUMBER ;
1752: l_updates_count NUMBER ;
1753: l_original_line_found BOOLEAN ;

Line 1776: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

1772: WSH_DEBUG_SV.log(l_module_name,'P_INTERFACE_FLAG',P_INTERFACE_FLAG);
1773: WSH_DEBUG_SV.logmsg(l_module_name,'Inside Split_Records');
1774: END IF;
1775:
1776: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1777:
1778: -- Populate p_split_table
1779: l_smallest_orig_line_id := 0 ;
1780: l_updates_count := 0 ;

Line 1855: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN

1851: sort_splits (p_index_tab => l_index_tab ,
1852: p_split_table => l_split_table,
1853: x_return_status => l_return_status );
1854:
1855: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1856: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1857: return ;
1858: END IF;
1859: end if ;

Line 1856: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

1852: p_split_table => l_split_table,
1853: x_return_status => l_return_status );
1854:
1855: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1856: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1857: return ;
1858: END IF;
1859: end if ;
1860:

Line 1886: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN

1882: p_split_lines => l_split_table,
1883: x_return_status => l_return_status
1884: ) ;
1885:
1886: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1887: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1888: IF l_debug_on THEN
1889: WSH_DEBUG_SV.logmsg(l_module_name,' Error in split_records_int ' );
1890: END IF;

Line 1887: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

1883: x_return_status => l_return_status
1884: ) ;
1885:
1886: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1887: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1888: IF l_debug_on THEN
1889: WSH_DEBUG_SV.logmsg(l_module_name,' Error in split_records_int ' );
1890: END IF;
1891: END IF;

Line 1906: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_USA_ACTIONS_PVT.Split_records ');

1902: --
1903: EXCEPTION
1904:
1905: WHEN others THEN
1906: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_USA_ACTIONS_PVT.Split_records ');
1907: IF l_debug_on THEN
1908: WSH_DEBUG_SV.logmsg(l_module_name,SQLCODE || ' : ' || SQLERRM );
1909: END IF;
1910: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

Line 1910: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

1906: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_USA_ACTIONS_PVT.Split_records ');
1907: IF l_debug_on THEN
1908: WSH_DEBUG_SV.logmsg(l_module_name,SQLCODE || ' : ' || SQLERRM );
1909: END IF;
1910: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1911:
1912: END split_Records ;
1913:
1914: PROCEDURE Update_Records(

Line 1947: l_rs := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

1943: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1944: WSH_DEBUG_SV.log(l_module_name,'P_INTERFACE_FLAG',P_INTERFACE_FLAG);
1945: END IF;
1946: --
1947: l_rs := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1948: <>
1949: FOR l_counter IN p_changed_attributes.FIRST .. p_changed_attributes.LAST LOOP
1950:
1951: IF p_changed_attributes(l_counter).action_flag IN ('S', 'U') THEN

Line 1975: IF NVL(l_rs, 'X') <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN

1971: -- bug 5387341: to prevent data corruption, we should return
1972: -- error when update is not allowed, since that means that
1973: -- the delivery detail(s) will not be synchronized with the
1974: -- order line.
1975: IF NVL(l_rs, 'X') <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1976: l_rs := WSH_UTIL_CORE.G_RET_STS_ERROR;
1977: END IF;
1978: END IF;
1979:

Line 1976: l_rs := WSH_UTIL_CORE.G_RET_STS_ERROR;

1972: -- error when update is not allowed, since that means that
1973: -- the delivery detail(s) will not be synchronized with the
1974: -- order line.
1975: IF NVL(l_rs, 'X') <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1976: l_rs := WSH_UTIL_CORE.G_RET_STS_ERROR;
1977: END IF;
1978: END IF;
1979:
1980: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

Line 1980: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1976: l_rs := WSH_UTIL_CORE.G_RET_STS_ERROR;
1977: END IF;
1978: END IF;
1979:
1980: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1981: EXIT records_loop;
1982: END IF;
1983: --
1984: END IF; -- p_interface_flag = 'Y'

Line 1994: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN

1990: p_changed_detail => l_changed_detail,
1991: p_interface_flag => p_interface_flag, --bugfix 10175902
1992: x_return_status => l_rs);
1993:
1994: IF l_rs IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1995: EXIT records_loop;
1996: END IF;
1997: --
1998: IF l_debug_on THEN

Line 2017: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

2013: END IF;
2014: --
2015: EXCEPTION
2016: WHEN OTHERS THEN
2017: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2018: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.Update_Records',l_module_name);
2019: --
2020: IF l_debug_on THEN
2021: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 2018: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.Update_Records',l_module_name);

2014: --
2015: EXCEPTION
2016: WHEN OTHERS THEN
2017: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2018: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.Update_Records',l_module_name);
2019: --
2020: IF l_debug_on THEN
2021: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2022: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 2124: l_in_ids wsh_util_core.id_tab_type;

2120: l_wh_type VARCHAR2(3);
2121: l_ignore_for_planning VARCHAR2(1);
2122: l_groupbysmc VARCHAR2(1);
2123: l_groupbycarrier VARCHAR2(1);
2124: l_in_ids wsh_util_core.id_tab_type;
2125: l_datetype VARCHAR2(30);
2126: l_smc wsh_delivery_details.ship_method_code%TYPE;
2127: l_carrierid wsh_delivery_details.carrier_id%TYPE;
2128: l_orgid wsh_delivery_details.organization_id%TYPE;

Line 2138: l_details_marked WSH_UTIL_CORE.Id_Tab_Type;

2134:
2135: l_mark_reprice_flag VARCHAR2(1) := 'N';
2136: l_delivery_detail_id NUMBER ;
2137: m NUMBER := 0;
2138: l_details_marked WSH_UTIL_CORE.Id_Tab_Type;
2139: --4410272
2140: l_tp_details WSH_UTIL_CORE.Id_Tab_Type;
2141: l_return_status VARCHAR2(1);
2142: mark_reprice_error EXCEPTION;

Line 2140: l_tp_details WSH_UTIL_CORE.Id_Tab_Type;

2136: l_delivery_detail_id NUMBER ;
2137: m NUMBER := 0;
2138: l_details_marked WSH_UTIL_CORE.Id_Tab_Type;
2139: --4410272
2140: l_tp_details WSH_UTIL_CORE.Id_Tab_Type;
2141: l_return_status VARCHAR2(1);
2142: mark_reprice_error EXCEPTION;
2143:
2144:

Line 2196: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

2192: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
2193: WSH_DEBUG_SV.log(l_module_name,'p_interface_flag',p_interface_flag);
2194: END IF;
2195: --
2196: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2197:
2198: --OTM R12 Start Org-Specific
2199: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
2200: IF l_gc3_is_installed IS NULL THEN

Line 2199: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;

2195: --
2196: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2197:
2198: --OTM R12 Start Org-Specific
2199: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
2200: IF l_gc3_is_installed IS NULL THEN
2201: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
2202: END IF;
2203: IF l_debug_on THEN

Line 2201: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;

2197:
2198: --OTM R12 Start Org-Specific
2199: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
2200: IF l_gc3_is_installed IS NULL THEN
2201: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
2202: END IF;
2203: IF l_debug_on THEN
2204: WSH_DEBUG_SV.log(l_module_name,'l_gc3_is_installed',l_gc3_is_installed);
2205: END IF;

Line 2280: WSH_UTIL_CORE.GET_LOCATION_ID('ORG', p_attributes_rec.ship_from_org_id,

2276: -- bug#6407943 (end):Needs to change items org dependent attributes when org changes.
2277:
2278: IF p_attributes_rec.ship_from_org_id <> FND_API.G_MISS_NUM THEN
2279:
2280: WSH_UTIL_CORE.GET_LOCATION_ID('ORG', p_attributes_rec.ship_from_org_id,
2281: l_ship_from_location_id, x_return_status);
2282:
2283: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2284: IF l_debug_on THEN

Line 2283: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

2279:
2280: WSH_UTIL_CORE.GET_LOCATION_ID('ORG', p_attributes_rec.ship_from_org_id,
2281: l_ship_from_location_id, x_return_status);
2282:
2283: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2284: IF l_debug_on THEN
2285: WSH_DEBUG_SV.log(l_module_name,'get_reservable_flag returned error');
2286: END IF;
2287: raise Update_Failed;

Line 2308: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.ship_to_org_id,

2304: x_pickable_flag => l_pickable_flag);
2305:
2306: IF p_attributes_rec.ship_to_org_id <> FND_API.G_MISS_NUM THEN
2307:
2308: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.ship_to_org_id,
2309: l_ship_to_location_id, x_return_status);
2310:
2311: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2312: IF l_debug_on THEN

Line 2311: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

2307:
2308: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.ship_to_org_id,
2309: l_ship_to_location_id, x_return_status);
2310:
2311: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2312: IF l_debug_on THEN
2313: WSH_DEBUG_SV.log(l_module_name,'GET_LOCATION_ID failed');
2314: END IF;
2315: raise Update_Failed;

Line 2322: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.deliver_to_org_id,

2318: END IF;
2319:
2320: IF (p_attributes_rec.deliver_to_org_id IS NOT NULL)
2321: AND (p_attributes_rec.deliver_to_org_id <> FND_API.G_MISS_NUM) THEN
2322: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.deliver_to_org_id,
2323: l_deliver_to_location_id, x_return_status);
2324:
2325: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2326: IF l_debug_on THEN

Line 2325: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

2321: AND (p_attributes_rec.deliver_to_org_id <> FND_API.G_MISS_NUM) THEN
2322: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.deliver_to_org_id,
2323: l_deliver_to_location_id, x_return_status);
2324:
2325: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2326: IF l_debug_on THEN
2327: WSH_DEBUG_SV.log(l_module_name,'procedure GET_LOCATION_ID failed');
2328: END IF;
2329: raise Update_Failed;

Line 2337: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.intmed_ship_to_org_id,

2333:
2334: IF (p_attributes_rec.intmed_ship_to_org_id IS NOT NULL)
2335: AND (p_attributes_rec.intmed_ship_to_org_id <> FND_API.G_MISS_NUM) THEN
2336: --
2337: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.intmed_ship_to_org_id,
2338: l_intmed_ship_to_location_id, x_return_status);
2339:
2340: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2341: IF l_debug_on THEN

Line 2340: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

2336: --
2337: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.intmed_ship_to_org_id,
2338: l_intmed_ship_to_location_id, x_return_status);
2339:
2340: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2341: IF l_debug_on THEN
2342: WSH_DEBUG_SV.log(l_module_name,'program GET_LOCATION_ID failed');
2343: END IF;
2344: raise Update_Failed;

Line 2354: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.ship_to_org_id,

2350: l_deliver_to_location_id := l_ship_to_location_id;
2351: ELSIF (l_deliver_to_location_id is NULL) AND (l_ship_to_location_id IS NULL)
2352: AND (p_attributes_rec.ship_to_org_id <> FND_API.G_MISS_NUM) THEN
2353: --
2354: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.ship_to_org_id,
2355: l_deliver_to_location_id, x_return_status);
2356:
2357: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2358: IF l_debug_on THEN

Line 2357: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

2353: --
2354: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', p_attributes_rec.ship_to_org_id,
2355: l_deliver_to_location_id, x_return_status);
2356:
2357: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2358: IF l_debug_on THEN
2359: WSH_DEBUG_SV.log(l_module_name,'GET_LOCATION_ID failed for ship_to');
2360: END IF;
2361: raise Update_Failed;

Line 2383: IF (l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN

2379: WSH_DEBUG_SV.log(l_module_name,'After call to WSH_SHIPPING_PARAMS_PVT.Get l_return_status ',l_return_status);
2380: WSH_DEBUG_SV.log(l_module_name,'l_shipping_param_info.otm_enabled ',l_shipping_param_info.otm_enabled);
2381: END IF;
2382:
2383: IF (l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2384: Raise Update_failed;
2385: END IF;
2386: End If;
2387: END IF;

Line 2391: IF (WSH_UTIL_CORE.TP_IS_INSTALLED = 'Y') OR

2387: END IF;
2388: --OTM R12 End
2389:
2390: /* J TP Release */
2391: IF (WSH_UTIL_CORE.TP_IS_INSTALLED = 'Y') OR
2392: (l_gc3_is_installed = 'Y')THEN --OTM R12 Org-Specific. Added the second OR condition.
2393: b_ignore:=FALSE;
2394: --find atleast 1 detail with null or 'N' ignore
2395: OPEN c_get_tpdetails;

Line 2440: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN

2436: IF l_debug_on THEN
2437: WSH_DEBUG_SV.log(l_module_name,' Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
2438: END IF;
2439:
2440: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2441: IF l_debug_on THEN
2442: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type failed');
2443: END IF;
2444: raise Update_Failed;

Line 2486: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

2482: WSH_CARRIERS_GRP.get_carrier_service_mode(
2483: p_carrier_service_inout_rec => l_carrier_rec,
2484: x_return_status => x_return_status);
2485:
2486: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2487: IF l_debug_on THEN
2488: WSH_DEBUG_SV.log(l_module_name,'procedure get_carrier_service_mode failed');
2489: END IF;
2490: raise Update_Failed;

Line 3033: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN

3029: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
3030: p_entity_type => 'DELIVERY_DETAIL',
3031: p_entity_ids => l_details_marked,
3032: x_return_status => l_return_status);
3033: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3034: raise mark_reprice_error;
3035: END IF;
3036: END IF;
3037: END IF;

Line 3054: IF (l_return_status NOT IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN

3050: p_entity => 'DLVB',
3051: p_entity_ids => l_tp_details,
3052: x_return_status => l_return_status);
3053: -- }
3054: IF (l_return_status NOT IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
3055: WSH_INTERFACE.PrintMsg(name=>'WSH_CALC_CONT_DEL_TPDATES',
3056: txt=>'Error in calculating Container/Delivery TP dates ');
3057: IF l_debug_on THEN
3058: WSH_DEBUG_SV.log(l_module_name,'Error in calculating Container/Delivery TP dates ');

Line 3078: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN

3074:
3075: IF l_debug_on THEN
3076: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
3077: END IF;
3078: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3079: x_return_status := l_dbi_rs;
3080: ROLLBACK to before_changes;
3081: -- just pass this return status to caller API
3082: IF l_debug_on THEN

Line 3099: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);

3095: EXCEPTION
3096: WHEN mark_reprice_error then
3097: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
3098: x_return_status := l_return_status;
3099: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
3100: --
3101: IF l_debug_on THEN
3102: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3103: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');

Line 3120: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

3116: CLOSE c_is_reservable;
3117: END IF;
3118: --
3119: ROLLBACK TO before_changes;
3120: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3121: wsh_util_core.default_handler('WSH_USA_ACTIONS.Update_Attributes',l_module_name);
3122: --
3123: IF l_debug_on THEN
3124: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 3121: wsh_util_core.default_handler('WSH_USA_ACTIONS.Update_Attributes',l_module_name);

3117: END IF;
3118: --
3119: ROLLBACK TO before_changes;
3120: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3121: wsh_util_core.default_handler('WSH_USA_ACTIONS.Update_Attributes',l_module_name);
3122: --
3123: IF l_debug_on THEN
3124: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3125: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 3510: l_item_quantity_uom_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;

3506:
3507: --OTM R12
3508: l_delivery_detail_tab WSH_ENTITY_INFO_TAB;
3509: l_delivery_detail_rec WSH_ENTITY_INFO_REC;
3510: l_item_quantity_uom_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
3511: l_gc3_is_installed VARCHAR2(1);
3512: --
3513:
3514: --

Line 3535: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;

3531: --
3532: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
3533: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3534: END IF;
3535: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3536:
3537: --OTM R12, initialize
3538: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
3539: IF l_gc3_is_installed IS NULL THEN

Line 3538: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;

3534: END IF;
3535: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3536:
3537: --OTM R12, initialize
3538: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
3539: IF l_gc3_is_installed IS NULL THEN
3540: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
3541: END IF;
3542: IF (l_gc3_is_installed = 'Y') THEN

Line 3540: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;

3536:
3537: --OTM R12, initialize
3538: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
3539: IF l_gc3_is_installed IS NULL THEN
3540: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
3541: END IF;
3542: IF (l_gc3_is_installed = 'Y') THEN
3543: l_delivery_detail_tab := WSH_ENTITY_INFO_TAB();
3544: l_delivery_detail_tab.EXTEND;

Line 3552: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

3548: i := 0;
3549: IF (P_SOURCE_CODE <> 'OE') THEN
3550: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_SOURCE_CODE');
3551: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
3552: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3553: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
3554: --
3555: IF l_debug_on THEN
3556: WSH_DEBUG_SV.pop(l_module_name);

Line 3553: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);

3549: IF (P_SOURCE_CODE <> 'OE') THEN
3550: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_SOURCE_CODE');
3551: FND_MESSAGE.SET_TOKEN('SOURCE_CODE', p_source_code);
3552: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3553: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
3554: --
3555: IF l_debug_on THEN
3556: WSH_DEBUG_SV.pop(l_module_name);
3557: END IF;

Line 3612: WSH_UTIL_CORE.GET_LOCATION_ID('ORG', ln_rec_info.ship_from_org_id,

3608: FETCH C_SPECIFIC_ITEM_INFO INTO haz_class_id, prim_uom_code, weight_uom, unit_weight,
3609: volume_uom, unit_volume, transactable_flag;
3610: CLOSE c_specific_item_info;
3611: WSH_INTERFACE.PrintMsg(txt=>'Importing order line ' || ln_rec_info.line_id);
3612: WSH_UTIL_CORE.GET_LOCATION_ID('ORG', ln_rec_info.ship_from_org_id,
3613: l_ship_from_location_id, l_location_status);
3614:
3615: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3616: IF l_debug_on THEN

Line 3615: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

3611: WSH_INTERFACE.PrintMsg(txt=>'Importing order line ' || ln_rec_info.line_id);
3612: WSH_UTIL_CORE.GET_LOCATION_ID('ORG', ln_rec_info.ship_from_org_id,
3613: l_ship_from_location_id, l_location_status);
3614:
3615: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3616: IF l_debug_on THEN
3617: WSH_DEBUG_SV.log(l_module_name,'Failed to get location for line: '||ln_rec_info.line_id||' org:'||ln_rec_info.ship_from_org_id);
3618: END IF;
3619: l_booked_ln_excpn := TRUE;

Line 3624: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', ln_rec_info.ship_to_org_id,

3620: GOTO start_over;
3621: END IF;
3622: WSH_INTERFACE.PrintMsg(txt=>'From organization:'|| ln_rec_info.ship_from_org_id||' loc:'|| l_ship_from_location_id );
3623:
3624: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', ln_rec_info.ship_to_org_id,
3625: l_ship_to_location_id, l_location_status);
3626: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3627: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_NO_LOCATION_FOR_ORG',
3628: txt=>'Failed to get location for line: '||ln_rec_info.line_id||

Line 3626: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

3622: WSH_INTERFACE.PrintMsg(txt=>'From organization:'|| ln_rec_info.ship_from_org_id||' loc:'|| l_ship_from_location_id );
3623:
3624: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', ln_rec_info.ship_to_org_id,
3625: l_ship_to_location_id, l_location_status);
3626: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3627: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_NO_LOCATION_FOR_ORG',
3628: txt=>'Failed to get location for line: '||ln_rec_info.line_id||
3629: ' ship to org:'||ln_rec_info.ship_to_org_id);
3630: IF l_debug_on THEN

Line 3639: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', ln_rec_info.deliver_to_org_id,

3635: END IF;
3636: WSH_INTERFACE.PrintMsg(txt=>'To organization:'|| ln_rec_info.ship_to_org_id||' loc:'|| l_ship_to_location_id );
3637:
3638: IF (ln_rec_info.deliver_to_org_id IS NOT NULL) THEN
3639: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', ln_rec_info.deliver_to_org_id,
3640: l_deliver_to_location_id, l_location_status);
3641: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3642: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_NO_LOCATION_FOR_ORG',
3643: txt=> 'Failed to get location for line: '||ln_rec_info.line_id||

Line 3641: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

3637:
3638: IF (ln_rec_info.deliver_to_org_id IS NOT NULL) THEN
3639: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', ln_rec_info.deliver_to_org_id,
3640: l_deliver_to_location_id, l_location_status);
3641: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3642: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_NO_LOCATION_FOR_ORG',
3643: txt=> 'Failed to get location for line: '||ln_rec_info.line_id||
3644: ' delivery to org:'||ln_rec_info.deliver_to_org_id);
3645: IF l_debug_on THEN

Line 3655: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', ln_rec_info.intmed_ship_to_org_id,

3651: END IF;
3652: WSH_INTERFACE.PrintMsg(txt=>'Deliver to org:'|| ln_rec_info.deliver_to_org_id||' loc:'|| l_deliver_to_location_id );
3653:
3654: IF (ln_rec_info.intmed_ship_to_org_id IS NOT NULL) THEN
3655: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', ln_rec_info.intmed_ship_to_org_id,
3656: l_intmed_ship_to_location_id, l_location_status);
3657: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3658: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_NO_LOCATION_FOR_ORG',
3659: txt=> 'Failed to get location for line: '||ln_rec_info.line_id||

Line 3657: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

3653:
3654: IF (ln_rec_info.intmed_ship_to_org_id IS NOT NULL) THEN
3655: WSH_UTIL_CORE.GET_LOCATION_ID('CUSTOMER SITE', ln_rec_info.intmed_ship_to_org_id,
3656: l_intmed_ship_to_location_id, l_location_status);
3657: IF (l_location_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3658: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_NO_LOCATION_FOR_ORG',
3659: txt=> 'Failed to get location for line: '||ln_rec_info.line_id||
3660: ' intermediate ship to org:'||ln_rec_info.intmed_ship_to_org_id);
3661: IF l_debug_on THEN

Line 3727: IF (l_return_status NOT IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN

3723: x_latest_pickup_date => l_delivery_details_info.latest_pickup_date,
3724: x_earliest_dropoff_date => l_delivery_details_info.earliest_dropoff_date,
3725: x_latest_dropoff_date => l_delivery_details_info.latest_dropoff_date
3726: );
3727: IF (l_return_status NOT IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
3728: WSH_INTERFACE.PrintMsg(name=>'WSH_CALC_TP_DATES',
3729: txt=>'Error in calculating TP dates: '||ln_rec_info.order_date_type_code||ln_rec_info.latest_acceptable_date||ln_rec_info.promise_date||ln_rec_info.schedule_arrival_date||ln_rec_info.earliest_acceptable_date||ln_rec_info.earliest_ship_date);
3730: IF l_debug_on THEN
3731: WSH_DEBUG_SV.log(l_module_name,'Error in calculating TP dates: ' ||

Line 3952: IF (l_cr_dt_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

3948:
3949: WSH_DELIVERY_DETAILS_PKG.Create_Delivery_Details( l_delivery_details_info, dummy_rowid,
3950: DUMMY_DELIVERY_DETAIL_ID,
3951: l_cr_dt_status );
3952: IF (l_cr_dt_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3953: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_CREATE_DET_FAILED',
3954: txt=>'Create_delivery_details failed for line: ' || ln_rec_info.line_id );
3955: WSH_UTIL_CORE.Get_Messages('N', l_cr_as_summary, l_cr_as_details, l_cr_as_count);
3956: WSH_INTERFACE.PrintMsg(txt=>'Creation of the delivery details failed because of ' || l_cr_as_summary || ':'|| l_cr_as_details);

Line 3955: WSH_UTIL_CORE.Get_Messages('N', l_cr_as_summary, l_cr_as_details, l_cr_as_count);

3951: l_cr_dt_status );
3952: IF (l_cr_dt_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3953: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_CREATE_DET_FAILED',
3954: txt=>'Create_delivery_details failed for line: ' || ln_rec_info.line_id );
3955: WSH_UTIL_CORE.Get_Messages('N', l_cr_as_summary, l_cr_as_details, l_cr_as_count);
3956: WSH_INTERFACE.PrintMsg(txt=>'Creation of the delivery details failed because of ' || l_cr_as_summary || ':'|| l_cr_as_details);
3957: l_booked_ln_excpn := TRUE;
3958: GOTO start_over;
3959: END IF;

Line 3976: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

3972:
3973: -- Call default container after create a new delivery detail to populate
3974: -- default container
3975: WSH_INTERFACE.Default_Container(dummy_delivery_detail_id, l_return_status);
3976: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3977: WSH_INTERFACE.PrintMsg(txt=>'Default container failed for dd:'||dummy_delivery_detail_id);
3978: END IF;
3979:
3980: l_delivery_assignments_info.delivery_id := NULL;

Line 3989: IF (l_cr_as_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN

3985: WSH_DELIVERY_DETAILS_PKG.Create_Delivery_Assignments( l_delivery_assignments_info,
3986: dummy_assgn_rowid,
3987: DUMMY_DELIVERY_ASSIGNMENT_ID,
3988: l_cr_as_status);
3989: IF (l_cr_as_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3990: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_CREATE_AS_FAILED',
3991: txt=>'Create Delivery assignments failed for order line:' || ln_rec_info.line_id);
3992: WSH_UTIL_CORE.Get_Messages('N', l_cr_as_summary, l_cr_as_details, l_cr_as_count);
3993: WSH_INTERFACE.PrintMsg(txt=>'Creation of the delivery assignments failed because of ' || l_cr_as_summary || ':'|| l_cr_as_details);

Line 3992: WSH_UTIL_CORE.Get_Messages('N', l_cr_as_summary, l_cr_as_details, l_cr_as_count);

3988: l_cr_as_status);
3989: IF (l_cr_as_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3990: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_CREATE_AS_FAILED',
3991: txt=>'Create Delivery assignments failed for order line:' || ln_rec_info.line_id);
3992: WSH_UTIL_CORE.Get_Messages('N', l_cr_as_summary, l_cr_as_details, l_cr_as_count);
3993: WSH_INTERFACE.PrintMsg(txt=>'Creation of the delivery assignments failed because of ' || l_cr_as_summary || ':'|| l_cr_as_details);
3994: l_booked_ln_excpn := TRUE;
3995: GOTO start_over;
3996: END IF;

Line 4043: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN

4039: -- we will not fail based on l_return_status here because
4040: -- we do not want to stop the flow
4041: -- if the detail doesn't split, it will be caught later in
4042: -- delivery splitting and will have exception on the detail
4043: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4044: WSH_INTERFACE.PrintMsg(txt=>'Delivery detail split failed for dd:'||dummy_delivery_detail_id);
4045: END IF;
4046:
4047: END IF;

Line 4070: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) or (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)

4066: x_msg_count => l_msg_count,
4067: x_msg_data => l_msg_data);
4068:
4069:
4070: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) or (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
4071: THEN
4072: --
4073: IF l_debug_on THEN
4074: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: OE_SHIPPING_INTEGRATION_PUB.UPDATE_SHIPPING_INTERFACE RETURNED ' || L_RETURN_STATUS );

Line 4079: WSH_UTIL_CORE.Get_Messages('N',l_summary, l_details, l_get_msg_count);

4075: END IF;
4076: --
4077: WSH_INTERFACE.PrintMsg(name=>'WSH_DET_PROCESS_ORDER_FAILED',
4078: txt=>'Update_Shipping_Interface failed for line:' || ln_rec_info.line_id );
4079: WSH_UTIL_CORE.Get_Messages('N',l_summary, l_details, l_get_msg_count);
4080: WSH_INTERFACE.PrintMsg(txt=>'no. of OE messages :'||l_msg_count);
4081: FOR k IN 1 .. l_msg_count LOOP
4082: l_msg_data := OE_MSG_PUB.GET( p_msg_index => k, p_encoded => 'F');
4083: --

Line 4170: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);

4166: WSH_DEBUG_SV.logmsg(l_module_name, 'IN LOCK LINE ID EXCEPTION: WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS' );
4167: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: ' || SQLERRM );
4168: END IF;
4169: --
4170: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);
4171: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4172: CLOSE C_OE_LINES_REC_LOCK;
4173: END IF;
4174: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

Line 4174: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

4170: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);
4171: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4172: CLOSE C_OE_LINES_REC_LOCK;
4173: END IF;
4174: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4175: when invalid_org THEN
4176: --
4177: IF l_debug_on THEN
4178: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: INVALID_ORG' );

Line 4185: WSH_UTIL_CORE.add_message ('E',l_module_name);

4181: fnd_message.set_name('WSH', 'WSH_DET_NO_LOCATION_FOR_ORG');
4182: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4183: CLOSE C_OE_LINES_REC_LOCK;
4184: END IF;
4185: WSH_UTIL_CORE.add_message ('E',l_module_name);
4186: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4187: when invalid_cust_site THEN
4188: --
4189: IF l_debug_on THEN

Line 4186: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

4182: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4183: CLOSE C_OE_LINES_REC_LOCK;
4184: END IF;
4185: WSH_UTIL_CORE.add_message ('E',l_module_name);
4186: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4187: when invalid_cust_site THEN
4188: --
4189: IF l_debug_on THEN
4190: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: INVALID_CUST_SITE' );

Line 4197: WSH_UTIL_CORE.add_message ('E',l_module_name);

4193: fnd_message.set_name('WSH', 'WSH_DET_NO_LOCATION_FOR_SITE');
4194: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4195: CLOSE C_OE_LINES_REC_LOCK;
4196: END IF;
4197: WSH_UTIL_CORE.add_message ('E',l_module_name);
4198: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4199: when invalid_qty_or_uom THEN
4200: --
4201: IF l_debug_on THEN

Line 4198: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

4194: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4195: CLOSE C_OE_LINES_REC_LOCK;
4196: END IF;
4197: WSH_UTIL_CORE.add_message ('E',l_module_name);
4198: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4199: when invalid_qty_or_uom THEN
4200: --
4201: IF l_debug_on THEN
4202: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: INVALID_QTY_OR_UOM' );

Line 4209: WSH_UTIL_CORE.add_message ('E',l_module_name);

4205: fnd_message.set_name('WSH','WSH_QTY_OR_UOM_NOT_VALID');
4206: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4207: CLOSE C_OE_LINES_REC_LOCK;
4208: END IF;
4209: WSH_UTIL_CORE.add_message ('E',l_module_name);
4210: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4211: when process_order_failed THEN
4212: --
4213: IF l_debug_on THEN

Line 4210: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

4206: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4207: CLOSE C_OE_LINES_REC_LOCK;
4208: END IF;
4209: WSH_UTIL_CORE.add_message ('E',l_module_name);
4210: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4211: when process_order_failed THEN
4212: --
4213: IF l_debug_on THEN
4214: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: PROCESS_ORDER_FAILED' );

Line 4221: WSH_UTIL_CORE.add_message ('E',l_module_name);

4217: fnd_message.set_name('WSH', 'WSH_DET_PROCESS_ORDER_FAILED');
4218: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4219: CLOSE C_OE_LINES_REC_LOCK;
4220: END IF;
4221: WSH_UTIL_CORE.add_message ('E',l_module_name);
4222: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4223: when create_details_failed THEN
4224: --
4225: IF l_debug_on THEN

Line 4222: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

4218: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4219: CLOSE C_OE_LINES_REC_LOCK;
4220: END IF;
4221: WSH_UTIL_CORE.add_message ('E',l_module_name);
4222: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4223: when create_details_failed THEN
4224: --
4225: IF l_debug_on THEN
4226: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION:CREATE_DETAILS_FAILED' );

Line 4233: WSH_UTIL_CORE.add_message ('E',l_module_name);

4229: fnd_message.set_name('WSH', 'WSH_DET_CREATE_DET_FAILED');
4230: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4231: CLOSE C_OE_LINES_REC_LOCK;
4232: END IF;
4233: WSH_UTIL_CORE.add_message ('E',l_module_name);
4234: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4235: when create_assignments_failed THEN
4236: --
4237: IF l_debug_on THEN

Line 4234: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

4230: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4231: CLOSE C_OE_LINES_REC_LOCK;
4232: END IF;
4233: WSH_UTIL_CORE.add_message ('E',l_module_name);
4234: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4235: when create_assignments_failed THEN
4236: --
4237: IF l_debug_on THEN
4238: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: CREATE_ASSIGNMENTS_FAILED' );

Line 4245: WSH_UTIL_CORE.add_message ('E',l_module_name);

4241: fnd_message.set_name('WSH', 'WSH_DET_CREATE_AS_FAILED');
4242: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4243: CLOSE C_OE_LINES_REC_LOCK;
4244: END IF;
4245: WSH_UTIL_CORE.add_message ('E',l_module_name);
4246: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4247: WHEN invalid_ship_set THEN -- bug 2373131
4248: --
4249: IF l_debug_on THEN

Line 4246: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

4242: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4243: CLOSE C_OE_LINES_REC_LOCK;
4244: END IF;
4245: WSH_UTIL_CORE.add_message ('E',l_module_name);
4246: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4247: WHEN invalid_ship_set THEN -- bug 2373131
4248: --
4249: IF l_debug_on THEN
4250: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: INVALID SHIP SET' );

Line 4259: WSH_UTIL_CORE.add_message ('E',l_module_name);

4255: fnd_message.set_token('LINE_NUMBER',ln_rec_info.line_number);
4256: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4257: CLOSE C_OE_LINES_REC_LOCK;
4258: END IF;
4259: WSH_UTIL_CORE.add_message ('E',l_module_name);
4260: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4261:
4262: -- HW OPM BUG#:2677054
4263: -- HW OPMCONV. Removed OPM exceptions

Line 4260: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

4256: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4257: CLOSE C_OE_LINES_REC_LOCK;
4258: END IF;
4259: WSH_UTIL_CORE.add_message ('E',l_module_name);
4260: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4261:
4262: -- HW OPM BUG#:2677054
4263: -- HW OPMCONV. Removed OPM exceptions
4264:

Line 4271: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);

4267: IF l_debug_on THEN
4268: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION: OTHERS ' || SQLERRM );
4269: END IF;
4270: --
4271: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);
4272: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4273: CLOSE C_OE_LINES_REC_LOCK;
4274: END IF;
4275: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

Line 4275: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

4271: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);
4272: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4273: CLOSE C_OE_LINES_REC_LOCK;
4274: END IF;
4275: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4276: END; -- Lock Check Block (1902176)
4277: END IF; --} --Bugfix 6740363
4278:
4279: END LOOP;

Line 4292: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

4288: WSH_DEBUG_SV.log(l_module_name, 'l_pull_lines_count',l_pull_lines_count);
4289: END IF;
4290:
4291: IF (l_pull_lines_count = 0 and p_source_line_id IS NOT NULL) THEN
4292: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4293:
4294: fnd_message.set_name('WSH', 'WSH_DET_CREATE_LINE_FAILED');
4295: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
4296:

Line 4295: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);

4291: IF (l_pull_lines_count = 0 and p_source_line_id IS NOT NULL) THEN
4292: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4293:
4294: fnd_message.set_name('WSH', 'WSH_DET_CREATE_LINE_FAILED');
4295: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
4296:
4297:
4298: IF l_debug_on THEN
4299: WSH_DEBUG_SV.logmsg(l_module_name, 'Cursor C_PULL_DELIVERY_DETAIL DID NOT FOUND ANY LINES');

Line 4326: WSH_UTIL_CORE.add_message ('E',l_module_name);

4322: END IF;
4323: IF (C_PULL_ONE_LINE%ISOPEN) THEN
4324: CLOSE C_PULL_ONE_LINE;
4325: END IF;
4326: WSH_UTIL_CORE.add_message ('E',l_module_name);
4327: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4328: when others THEN
4329: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);
4330: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

Line 4327: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;

4323: IF (C_PULL_ONE_LINE%ISOPEN) THEN
4324: CLOSE C_PULL_ONE_LINE;
4325: END IF;
4326: WSH_UTIL_CORE.add_message ('E',l_module_name);
4327: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4328: when others THEN
4329: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);
4330: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4331: --

Line 4329: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);

4325: END IF;
4326: WSH_UTIL_CORE.add_message ('E',l_module_name);
4327: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4328: when others THEN
4329: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);
4330: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4331: --
4332: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4333: CLOSE C_OE_LINES_REC_LOCK;

Line 4330: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;

4326: WSH_UTIL_CORE.add_message ('E',l_module_name);
4327: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4328: when others THEN
4329: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.IMPORT_DELIVERY_DETAILS',l_module_name);
4330: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4331: --
4332: IF C_OE_LINES_REC_LOCK%ISOPEN THEN
4333: CLOSE C_OE_LINES_REC_LOCK;
4334: END IF;