69: x_trip_id := p_trip_info.trip_id;
70: x_name := p_trip_info.name;
71:
72: --OTM R12, glog proj, use Global Variable
73: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
74:
75: -- If null, call the function
76: IF l_gc3_is_installed IS NULL THEN
77: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
73: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
74:
75: -- If null, call the function
76: IF l_gc3_is_installed IS NULL THEN
77: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
78: END IF;
79: IF l_gc3_is_installed = 'Y' THEN
80: l_ignore_for_planning := 'Y';
81: ELSE
327: p_trip_info.append_flag
328: )RETURNING rowid -- Bug 3821688
329: INTO x_rowid;
330:
331: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
332:
333: --/== Workflow Changes
334: IF l_debug_on THEN
335: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.START_WF_PROCESS',WSH_DEBUG_SV.C_PROC_LEVEL);
342: IF l_debug_on THEN
343: WSH_DEBUG_SV.log(l_module_name,'L_PROCESS_STARTED',l_process_started);
344: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
345: END IF;
346: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
347: NULL;
348: -- x_return_status := l_return_status;
349: -- Log an exception
350: END IF;
385: IF check_trip_ids%ISOPEN THEN
386: CLOSE check_trip_ids;
387: END IF;
388: FND_MESSAGE.Set_Name('FND', 'FORM_DUPLICATE_KEY_IN_INDEX');
389: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
390: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
391: --
392: -- Debug Statements
393: --
386: CLOSE check_trip_ids;
387: END IF;
388: FND_MESSAGE.Set_Name('FND', 'FORM_DUPLICATE_KEY_IN_INDEX');
389: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
390: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
391: --
392: -- Debug Statements
393: --
394: IF l_debug_on THEN
406: END IF;
407: IF check_trip_ids%ISOPEN THEN
408: CLOSE check_trip_ids;
409: END IF;
410: wsh_util_core.default_handler('WSH_TRIPS_PVT.CREATE_TRIP');
411: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
412: --
413: -- Debug Statements
414: --
407: IF check_trip_ids%ISOPEN THEN
408: CLOSE check_trip_ids;
409: END IF;
410: wsh_util_core.default_handler('WSH_TRIPS_PVT.CREATE_TRIP');
411: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
412: --
413: -- Debug Statements
414: --
415: IF l_debug_on THEN
457:
458:
459: l_stop_id NUMBER;
460: l_trip_id NUMBER;
461: l_del_ids WSH_UTIL_CORE.ID_TAB_TYPE;
462: l_return_status VARCHAR2(1);
463:
464: cannot_delete_trip EXCEPTION;
465: others EXCEPTION;
463:
464: cannot_delete_trip EXCEPTION;
465: others EXCEPTION;
466:
467: l_stop_tab WSH_UTIL_CORE.id_tab_type; -- DBI Project
468: l_dbi_rs VARCHAR2(1); -- DBI Project
469: l_debug_on BOOLEAN;
470:
471: --
491: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
492: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
493: END IF;
494: --
495: x_return_Status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
496:
497: l_trip_id := p_trip_id;
498:
499: IF p_rowid IS NOT NULL THEN
502: CLOSE get_trip_id_rowid;
503: END IF;
504:
505: --OTM R12, glog proj, use Global Variable
506: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
507:
508: -- If null, call the function
509: IF l_gc3_is_installed IS NULL THEN
510: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
506: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
507:
508: -- If null, call the function
509: IF l_gc3_is_installed IS NULL THEN
510: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
511: END IF;
512:
513: IF l_gc3_is_installed = 'Y' THEN
514: OPEN c_get_trip_status(l_trip_id);
526: END IF;
527:
528: -- Do not allow user to delete a trip if it is include for Planning and created by OTM
529: IF (l_ignore = 'N' AND l_tp_plan_name IS NOT NULL) THEN
530: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
531: RAISE e_gc3_trip;
532: END IF;
533: END IF;
534: -- end of OTM R12, glog proj
542: END IF;
543: --
544: wsh_trip_validations.check_trip_delete(l_trip_id, l_return_status, p_caller);
545:
546: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
547: RAISE cannot_delete_trip;
548: ELSE
549: x_return_status := l_return_status;
550: END IF;
568: END IF;
569: --
570: wsh_delivery_legs_actions.unassign_deliveries(l_del_ids, l_trip_id, NULL, NULL, l_return_status);
571:
572: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
573:
574: ROLLBACK TO SAVEPOINT unassign_del;
575: RAISE cannot_delete_trip;
576:
608:
609: IF l_debug_on THEN
610: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
611: END IF;
612: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
613: x_return_status := l_dbi_rs;
614: rollback;
615: -- just pass this return status to caller API
616: IF l_debug_on THEN
626: WHERE trip_id = l_trip_id;
627:
628: IF (SQL%NOTFOUND) THEN
629: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
630: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
631: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
632: END IF;
633: ELSE
634: raise others;
627:
628: IF (SQL%NOTFOUND) THEN
629: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
630: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
631: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
632: END IF;
633: ELSE
634: raise others;
635: END IF;
647: IF c_get_trip_status%ISOPEN THEN
648: CLOSE c_get_trip_status;
649: END IF;
650: FND_MESSAGE.SET_NAME('WSH','WSH_OTM_TRIP_DELETE_ERROR');
651: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
652: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
653: --
654: -- Debug Statements
655: --
648: CLOSE c_get_trip_status;
649: END IF;
650: FND_MESSAGE.SET_NAME('WSH','WSH_OTM_TRIP_DELETE_ERROR');
651: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
652: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
653: --
654: -- Debug Statements
655: --
656: IF l_debug_on THEN
664: IF c_get_trip_status%ISOPEN THEN
665: CLOSE c_get_trip_status;
666: END IF;
667: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
668: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
669: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
670: --
671: -- Debug Statements
672: --
665: CLOSE c_get_trip_status;
666: END IF;
667: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
668: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
669: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
670: --
671: -- Debug Statements
672: --
673: IF l_debug_on THEN
682: CLOSE c_get_trip_status;
683: END IF;
684: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_DELETE_ERROR');
685: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
686: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
687: wsh_util_core.add_message(x_return_status);
688: --
689: -- Debug Statements
690: --
683: END IF;
684: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_DELETE_ERROR');
685: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
686: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
687: wsh_util_core.add_message(x_return_status);
688: --
689: -- Debug Statements
690: --
691: IF l_debug_on THEN
697: -- OTM R12, glog proj
698: IF c_get_trip_status%ISOPEN THEN
699: CLOSE c_get_trip_status;
700: END IF;
701: wsh_util_core.default_handler('WSH_TRIPS_PVT.DELETE_TRIP');
702: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
703: --
704: -- Debug Statements
705: --
698: IF c_get_trip_status%ISOPEN THEN
699: CLOSE c_get_trip_status;
700: END IF;
701: wsh_util_core.default_handler('WSH_TRIPS_PVT.DELETE_TRIP');
702: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
703: --
704: -- Debug Statements
705: --
706: IF l_debug_on THEN
735: l_wh_type VARCHAR2(3);
736:
737: --WF: CMR
738: l_wf_rs VARCHAR2(1);
739: l_del_ids WSH_UTIL_CORE.ID_TAB_TYPE;
740: l_del_old_carrier_ids WSH_UTIL_CORE.ID_TAB_TYPE;
741:
742: --
743: l_debug_on BOOLEAN;
736:
737: --WF: CMR
738: l_wf_rs VARCHAR2(1);
739: l_del_ids WSH_UTIL_CORE.ID_TAB_TYPE;
740: l_del_old_carrier_ids WSH_UTIL_CORE.ID_TAB_TYPE;
741:
742: --
743: l_debug_on BOOLEAN;
744: --
916: p_del_old_carrier_ids => l_del_old_carrier_ids,
917: x_return_status => l_wf_rs);
918: END IF;
919: */
920: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
921:
922: --
923: -- Debug Statements
924: --
928: --
929: EXCEPTION
930: WHEN no_data_found THEN
931: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
932: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
933: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
934: --
935: -- Debug Statements
936: --
929: EXCEPTION
930: WHEN no_data_found THEN
931: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
932: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
933: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
934: --
935: -- Debug Statements
936: --
937: IF l_debug_on THEN
941: --
942: --Bug # 3268641
943: WHEN DUP_VAL_ON_INDEX THEN
944: FND_MESSAGE.SET_NAME('WSH','WSH_ASSIGN_NEW_TRIP');
945: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
946: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
947:
948: IF l_debug_on THEN
949: WSH_DEBUG_SV.logmsg(l_module_name,'DUP_VAL_ON_INDEX exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
942: --Bug # 3268641
943: WHEN DUP_VAL_ON_INDEX THEN
944: FND_MESSAGE.SET_NAME('WSH','WSH_ASSIGN_NEW_TRIP');
945: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
946: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
947:
948: IF l_debug_on THEN
949: WSH_DEBUG_SV.logmsg(l_module_name,'DUP_VAL_ON_INDEX exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
950: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DUP_VAL_ON_INDEX');
952: --
953:
954:
955: WHEN others THEN
956: wsh_util_core.default_handler('WSH_TRIPS_PVT.UPDATE_TRIP');
957: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
958:
959: --
960: -- Debug Statements
953:
954:
955: WHEN others THEN
956: wsh_util_core.default_handler('WSH_TRIPS_PVT.UPDATE_TRIP');
957: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
958:
959: --
960: -- Debug Statements
961: --
1112: END IF;
1113: --
1114:
1115: --OTM R12, glog proj, use Global Variable
1116: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
1117:
1118: -- If null, call the function
1119: IF l_gc3_is_installed IS NULL THEN
1120: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
1116: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
1117:
1118: -- If null, call the function
1119: IF l_gc3_is_installed IS NULL THEN
1120: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
1121: END IF;
1122:
1123: IF l_gc3_is_installed = 'Y' THEN
1124: l_ignore_flag := 'Y';
1485: raise others;
1486: END IF;
1487:
1488: --OTM R12, glog proj, use Global Variable
1489: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
1490:
1491: -- If null, call the function
1492: IF l_gc3_is_installed IS NULL THEN
1493: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
1489: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
1490:
1491: -- If null, call the function
1492: IF l_gc3_is_installed IS NULL THEN
1493: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
1494: END IF;
1495: IF l_gc3_is_installed = 'Y' THEN
1496: l_ignore_for_planning := 'Y';
1497: ELSE
1503: FETCH trip_record INTO x_trip_info;
1504:
1505: IF (trip_record%NOTFOUND) THEN
1506: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
1507: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1508: wsh_util_core.add_message(x_return_status);
1509: ELSE
1510: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1511: END IF;
1504:
1505: IF (trip_record%NOTFOUND) THEN
1506: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
1507: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1508: wsh_util_core.add_message(x_return_status);
1509: ELSE
1510: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1511: END IF;
1512:
1506: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
1507: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1508: wsh_util_core.add_message(x_return_status);
1509: ELSE
1510: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1511: END IF;
1512:
1513: CLOSE trip_record;
1514:
1520: END IF;
1521: --
1522: EXCEPTION
1523: WHEN others THEN
1524: wsh_util_core.default_handler('WSH_TRIPS_PVT.POPULATE_RECORD');
1525: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1526:
1527: --
1528: -- Debug Statements
1521: --
1522: EXCEPTION
1523: WHEN others THEN
1524: wsh_util_core.default_handler('WSH_TRIPS_PVT.POPULATE_RECORD');
1525: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1526:
1527: --
1528: -- Debug Statements
1529: --
1582: CLOSE get_name;
1583:
1584: IF (x_name IS NULL) THEN
1585: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
1586: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
1587: --
1588: -- Debug Statements
1589: --
1590: IF l_debug_on THEN
1605:
1606: EXCEPTION
1607:
1608: WHEN others THEN
1609: wsh_util_core.default_handler('WSH_TRIPS_PVT.GET_NAME');
1610: --
1611: -- Debug Statements
1612: --
1613: IF l_debug_on THEN
1628:
1629: procedure Lock_Trip(
1630: p_rec_attr_tab IN Trip_Attr_Tbl_Type,
1631: p_caller IN VARCHAR2,
1632: p_valid_index_tab IN wsh_util_core.id_tab_type,
1633: x_valid_ids_tab OUT NOCOPY wsh_util_core.id_tab_type,
1634: x_return_status OUT NOCOPY VARCHAR2
1635: )
1636: IS
1629: procedure Lock_Trip(
1630: p_rec_attr_tab IN Trip_Attr_Tbl_Type,
1631: p_caller IN VARCHAR2,
1632: p_valid_index_tab IN wsh_util_core.id_tab_type,
1633: x_valid_ids_tab OUT NOCOPY wsh_util_core.id_tab_type,
1634: x_return_status OUT NOCOPY VARCHAR2
1635: )
1636: IS
1637: --
1687: IF nvl(p_caller,FND_API.G_MISS_CHAR) = 'WSH_PUB'
1688: OR nvl(p_caller, '!') like 'FTE%' THEN
1689: FND_MESSAGE.SET_NAME('WSH', 'WSH_TRIP_LOCK_FAILED');
1690: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',p_rec_attr_tab(l_index).name);
1691: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
1692: END IF;
1693:
1694: l_num_errors := l_num_errors + 1;
1695: --
1705: --
1706: end loop;
1707:
1708: IF p_valid_index_tab.COUNT = 0 THEN
1709: x_return_status := wsh_util_core.g_ret_sts_success;
1710: ELSIF l_num_errors = p_valid_index_tab.COUNT THEN
1711: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PERFORMED');
1712: x_return_status := wsh_util_core.g_ret_sts_error;
1713: wsh_util_core.add_message(x_return_status,l_module_name);
1708: IF p_valid_index_tab.COUNT = 0 THEN
1709: x_return_status := wsh_util_core.g_ret_sts_success;
1710: ELSIF l_num_errors = p_valid_index_tab.COUNT THEN
1711: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PERFORMED');
1712: x_return_status := wsh_util_core.g_ret_sts_error;
1713: wsh_util_core.add_message(x_return_status,l_module_name);
1714: IF l_debug_on THEN
1715: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PERFORMED');
1716: END IF;
1709: x_return_status := wsh_util_core.g_ret_sts_success;
1710: ELSIF l_num_errors = p_valid_index_tab.COUNT THEN
1711: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PERFORMED');
1712: x_return_status := wsh_util_core.g_ret_sts_error;
1713: wsh_util_core.add_message(x_return_status,l_module_name);
1714: IF l_debug_on THEN
1715: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PERFORMED');
1716: END IF;
1717: RAISE FND_API.G_EXC_ERROR;
1716: END IF;
1717: RAISE FND_API.G_EXC_ERROR;
1718: ELSIF l_num_errors > 0 THEN
1719: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PROCESSED');
1720: x_return_status := wsh_util_core.g_ret_sts_warning;
1721: wsh_util_core.add_message(x_return_status,l_module_name);
1722: IF l_debug_on THEN
1723: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PROCESSED');
1724: END IF;
1717: RAISE FND_API.G_EXC_ERROR;
1718: ELSIF l_num_errors > 0 THEN
1719: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PROCESSED');
1720: x_return_status := wsh_util_core.g_ret_sts_warning;
1721: wsh_util_core.add_message(x_return_status,l_module_name);
1722: IF l_debug_on THEN
1723: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PROCESSED');
1724: END IF;
1725: raise wsh_util_core.g_exc_warning;
1721: wsh_util_core.add_message(x_return_status,l_module_name);
1722: IF l_debug_on THEN
1723: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PROCESSED');
1724: END IF;
1725: raise wsh_util_core.g_exc_warning;
1726: ELSE
1727: x_return_status := wsh_util_core.g_ret_sts_success;
1728: END IF;
1729:
1723: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PROCESSED');
1724: END IF;
1725: raise wsh_util_core.g_exc_warning;
1726: ELSE
1727: x_return_status := wsh_util_core.g_ret_sts_success;
1728: END IF;
1729:
1730: --
1731: IF l_debug_on THEN
1736: --
1737: --
1738: WHEN FND_API.G_EXC_ERROR THEN
1739: --
1740: x_return_status := wsh_util_core.g_ret_sts_error;
1741: --
1742: IF l_debug_on THEN
1743: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1744: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1744: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1745: END IF;
1746: --
1747: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1748: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
1749: --
1750: IF l_debug_on THEN
1751: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1752: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1751: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1752: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1753: END IF;
1754: --
1755: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1756: x_return_status := wsh_util_core.g_ret_sts_warning;
1757: --
1758: IF l_debug_on THEN
1759: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1752: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1753: END IF;
1754: --
1755: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1756: x_return_status := wsh_util_core.g_ret_sts_warning;
1757: --
1758: IF l_debug_on THEN
1759: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1760: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1755: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1756: x_return_status := wsh_util_core.g_ret_sts_warning;
1757: --
1758: IF l_debug_on THEN
1759: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1760: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1761: END IF;
1762: --
1763: WHEN OTHERS THEN
1756: x_return_status := wsh_util_core.g_ret_sts_warning;
1757: --
1758: IF l_debug_on THEN
1759: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1760: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1761: END IF;
1762: --
1763: WHEN OTHERS THEN
1764: --
1761: END IF;
1762: --
1763: WHEN OTHERS THEN
1764: --
1765: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
1766: --
1767: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.LOCK_TRIP_WRAPPER',l_module_name);
1768: --
1769: IF l_debug_on THEN
1763: WHEN OTHERS THEN
1764: --
1765: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
1766: --
1767: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.LOCK_TRIP_WRAPPER',l_module_name);
1768: --
1769: IF l_debug_on THEN
1770: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1771: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1824: RAISE;
1825:
1826: WHEN OTHERS THEN
1827: --
1828: wsh_util_core.default_handler('WSH_TRIPS_PVT.lock_trip_no_compare',l_module_name);
1829: --
1830: IF l_debug_on THEN
1831: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1832: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');