[Home] [Help]
31: --
32: -- PROCEDURE : Stop_Action_new PUBLIC
33: --
34: -- PARAMETERS: p_api_version_number known api version error number
35: -- p_init_msg_list FND_API.G_TRUE to reset list
36: -- x_return_status return status
37: -- x_msg_count number of messages in the list
38: -- x_msg_data text of messages
39: -- p_stop_info Attributes for the stop entity
54:
55: PROCEDURE Stop_Action_New
56: ( p_api_version_number IN NUMBER,
57: p_init_msg_list IN VARCHAR2,
58: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
59: x_return_status OUT NOCOPY VARCHAR2,
60: x_msg_count OUT NOCOPY NUMBER,
61: x_msg_data OUT NOCOPY VARCHAR2,
62: p_stop_info IN OUT NOCOPY WSH_TRIP_STOPS_GRP.Trip_Stop_Pub_Rec_Type,
108: WSH_DEBUG_SV.log(l_module_name,'planned_departure_date', p_stop_info.planned_departure_date);
109: END IF;
110:
111: -- Standard call to check for call compatibility
112: IF NOT FND_API.Compatible_API_Call
113: ( l_api_version_number
114: , p_api_version_number
115: , l_api_name
116: , G_PKG_NAME
115: , l_api_name
116: , G_PKG_NAME
117: )
118: THEN
119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
120: END IF;
121:
122: -- Initialize message stack if required
123: IF FND_API.to_Boolean(p_init_msg_list) THEN
119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
120: END IF;
121:
122: -- Initialize message stack if required
123: IF FND_API.to_Boolean(p_init_msg_list) THEN
124: FND_MSG_PUB.initialize;
125: END IF;
126:
127: wsh_util_validate.validate_trip_name(
164: x_num_warnings =>l_num_warning,
165: x_num_errors =>l_num_errors);
166:
167: IF (l_stop_id IS NULL) THEN
168: raise FND_API.G_EXC_ERROR;
169: END IF;
170:
171: l_stop_rows(1) := p_stop_info.stop_id;
172: l_action_prms.caller := 'WSH_API';
176: l_action_prms.defer_interface_flag := p_stop_IN_rec.defer_interface_flag;
177:
178: wsh_interface_grp.stop_action(
179: p_api_version_number => p_api_version_number,
180: p_init_msg_list => FND_API.G_FALSE,
181: p_commit => p_commit,
182: p_entity_id_tab => l_stop_rows,
183: p_action_prms => l_action_prms,
184: x_stop_out_rec => x_stop_OUT_rec,
195: WSH_DEBUG_SV.pop(l_module_name);
196: END IF;
197: EXCEPTION
198:
199: WHEN FND_API.G_EXC_ERROR THEN
200: x_return_status := FND_API.G_RET_STS_ERROR;
201: FND_MESSAGE.SET_NAME('WSH','WSH_OI_STOP_ACTION_ERROR');
202: FND_MESSAGE.SET_TOKEN('STOP_NAME', wsh_trip_stops_pvt.get_name(l_stop_id));
203: FND_MESSAGE.SET_TOKEN('ACTION', wsh_util_core.get_action_meaning('STOP',p_stop_IN_rec.action_code));
196: END IF;
197: EXCEPTION
198:
199: WHEN FND_API.G_EXC_ERROR THEN
200: x_return_status := FND_API.G_RET_STS_ERROR;
201: FND_MESSAGE.SET_NAME('WSH','WSH_OI_STOP_ACTION_ERROR');
202: FND_MESSAGE.SET_TOKEN('STOP_NAME', wsh_trip_stops_pvt.get_name(l_stop_id));
203: FND_MESSAGE.SET_TOKEN('ACTION', wsh_util_core.get_action_meaning('STOP',p_stop_IN_rec.action_code));
204: wsh_util_core.add_message(x_return_status,l_module_name);
212: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:G_EXC_ERROR ');
213: END IF;
214:
215:
216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
218: FND_MESSAGE.SET_NAME('WSH','WSH_OI_STOP_ACTION_ERROR');
219: FND_MESSAGE.SET_TOKEN('STOP_NAME', wsh_trip_stops_pvt.get_name(l_stop_id));
220: FND_MESSAGE.SET_TOKEN('ACTION', wsh_util_core.get_action_meaning('STOP',p_stop_IN_rec.action_code));
213: END IF;
214:
215:
216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
218: FND_MESSAGE.SET_NAME('WSH','WSH_OI_STOP_ACTION_ERROR');
219: FND_MESSAGE.SET_TOKEN('STOP_NAME', wsh_trip_stops_pvt.get_name(l_stop_id));
220: FND_MESSAGE.SET_TOKEN('ACTION', wsh_util_core.get_action_meaning('STOP',p_stop_IN_rec.action_code));
221: wsh_util_core.add_message(x_return_status,l_module_name);
225: , p_count => x_msg_count
226: , p_data => x_msg_data
227: );
228: IF l_debug_on THEN
229: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
230: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
231: END IF;
232:
233: WHEN OTHERS THEN
226: , p_data => x_msg_data
227: );
228: IF l_debug_on THEN
229: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
230: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
231: END IF;
232:
233: WHEN OTHERS THEN
234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
230: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
231: END IF;
232:
233: WHEN OTHERS THEN
234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
235: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
236: THEN
237: FND_MSG_PUB.Add_Exc_Msg
238: ( G_PKG_NAME
257: -- PROCEDURE : Stop_Action PUBLIC
258: -- THIS PROCEDURE WOULD BE OBSOLETE SOON
259: --
260: -- PARAMETERS: p_api_version_number known api version error number
261: -- p_init_msg_list FND_API.G_TRUE to reset list
262: -- x_return_status return status
263: -- x_msg_count number of messages in the list
264: -- x_msg_data text of messages
265: -- p_action_code Stop action code. Valid action codes are
346: wsh_debug_sv.log (l_module_name,'p_defer_interface_flag',p_defer_interface_flag);
347: END IF;
348:
349: -- Standard call to check for call compatibility
350: IF NOT FND_API.Compatible_API_Call
351: ( l_api_version_number
352: , p_api_version_number
353: , l_api_name
354: , G_PKG_NAME
353: , l_api_name
354: , G_PKG_NAME
355: )
356: THEN
357: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
358: END IF;
359:
360: -- Initialize message stack if required
361: IF FND_API.to_Boolean(p_init_msg_list) THEN
357: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
358: END IF;
359:
360: -- Initialize message stack if required
361: IF FND_API.to_Boolean(p_init_msg_list) THEN
362: FND_MSG_PUB.initialize;
363: END IF;
364:
365: wsh_util_validate.validate_trip_name(
402: x_num_warnings =>l_num_warning,
403: x_num_errors =>l_num_errors);
404:
405: IF (l_stop_id IS NULL) THEN
406: raise FND_API.G_EXC_ERROR;
407: END IF;
408: l_stop_rows(1) := p_stop_id;
409: l_action_prms.caller := 'WSH_API';
410: l_action_prms.action_code := p_action_code;
412: l_action_prms.defer_interface_flag := p_defer_interface_flag;
413:
414: wsh_interface_grp.stop_action(
415: p_api_version_number => p_api_version_number,
416: p_init_msg_list => FND_API.G_FALSE,
417: p_commit => FND_API.G_TRUE,
418: p_entity_id_tab => l_stop_rows,
419: p_action_prms => l_action_prms,
420: x_stop_out_rec => l_stop_OUT_rec,
413:
414: wsh_interface_grp.stop_action(
415: p_api_version_number => p_api_version_number,
416: p_init_msg_list => FND_API.G_FALSE,
417: p_commit => FND_API.G_TRUE,
418: p_entity_id_tab => l_stop_rows,
419: p_action_prms => l_action_prms,
420: x_stop_out_rec => l_stop_OUT_rec,
421: x_return_status => x_return_status,
432: wsh_debug_sv.pop (l_module_name);
433: END IF;
434: EXCEPTION
435:
436: WHEN FND_API.G_EXC_ERROR THEN
437: x_return_status := FND_API.G_RET_STS_ERROR;
438: -- Get message count and data
439: FND_MESSAGE.SET_NAME('WSH','WSH_OI_STOP_ACTION_ERROR');
440: FND_MESSAGE.SET_TOKEN('STOP_NAME', wsh_trip_stops_pvt.get_name(l_stop_id));
433: END IF;
434: EXCEPTION
435:
436: WHEN FND_API.G_EXC_ERROR THEN
437: x_return_status := FND_API.G_RET_STS_ERROR;
438: -- Get message count and data
439: FND_MESSAGE.SET_NAME('WSH','WSH_OI_STOP_ACTION_ERROR');
440: FND_MESSAGE.SET_TOKEN('STOP_NAME', wsh_trip_stops_pvt.get_name(l_stop_id));
441: FND_MESSAGE.SET_TOKEN('ACTION', wsh_util_core.get_action_meaning('STOP',p_action_code));
445: , p_count => x_msg_count
446: , p_data => x_msg_data
447: );
448: IF l_debug_on THEN
449: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
450: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
451: END IF;
452:
453: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
446: , p_data => x_msg_data
447: );
448: IF l_debug_on THEN
449: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
450: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
451: END IF;
452:
453: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
449: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
450: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
451: END IF;
452:
453: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
455: FND_MESSAGE.SET_NAME('WSH','WSH_OI_STOP_ACTION_ERROR');
456: FND_MESSAGE.SET_TOKEN('STOP_NAME', wsh_trip_stops_pvt.get_name(l_stop_id));
457: FND_MESSAGE.SET_TOKEN('ACTION', wsh_util_core.get_action_meaning('STOP',p_action_code));
450: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
451: END IF;
452:
453: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
455: FND_MESSAGE.SET_NAME('WSH','WSH_OI_STOP_ACTION_ERROR');
456: FND_MESSAGE.SET_TOKEN('STOP_NAME', wsh_trip_stops_pvt.get_name(l_stop_id));
457: FND_MESSAGE.SET_TOKEN('ACTION', wsh_util_core.get_action_meaning('STOP',p_action_code));
458: wsh_util_core.add_message(x_return_status,l_module_name);
462: , p_count => x_msg_count
463: , p_data => x_msg_data
464: );
465: IF l_debug_on THEN
466: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
467: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
468: END IF;
469:
470: WHEN OTHERS THEN
463: , p_data => x_msg_data
464: );
465: IF l_debug_on THEN
466: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
467: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
468: END IF;
469:
470: WHEN OTHERS THEN
471: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
467: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
468: END IF;
469:
470: WHEN OTHERS THEN
471: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
472: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
473: THEN
474: FND_MSG_PUB.Add_Exc_Msg
475: ( G_PKG_NAME
620: wsh_debug_sv.log (l_module_name,'caller',p_action_prms.caller);
621: wsh_debug_sv.log (l_module_name,'COUNT',p_rec_attr_tab.COUNT);
622: END IF;
623:
624: IF FND_API.to_Boolean(p_init_msg_list) THEN
625: FND_MSG_PUB.initialize;
626: END IF;
627:
628: IF NOT FND_API.Compatible_API_Call
624: IF FND_API.to_Boolean(p_init_msg_list) THEN
625: FND_MSG_PUB.initialize;
626: END IF;
627:
628: IF NOT FND_API.Compatible_API_Call
629: ( l_api_version_number
630: , p_api_version_number
631: , l_api_name
632: , G_PKG_NAME
631: , l_api_name
632: , G_PKG_NAME
633: )
634: THEN
635: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
636: END IF;
637:
638:
639: IF p_action_prms.action_code IS NULL THEN
780: IF l_debug_on THEN
781: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION');
782: END IF;
783: --
784: RAISE FND_API.G_EXC_ERROR;
785: --}
786: END IF;
787:
788: IF l_debug_on THEN
875: --
876: IF p_action_prms.caller = 'WSH_FSTRX' THEN
877: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
878: ELSE
879: RAISE FND_API.G_EXC_ERROR;
880: END IF;
881: --}
882: END IF;
883:
919: IF wsh_util_core.fte_is_installed='Y' THEN
920:
921: WSH_FTE_COMP_CONSTRAINT_PKG.validate_constraint_main(
922: p_api_version_number => p_api_version_number,
923: p_init_msg_list => FND_API.G_FALSE,
924: p_entity_type => 'S',
925: p_target_id => null,
926: p_action_code => p_action_prms.action_code,
927: p_del_attr_tab => l_cc_del_attr_tab,
1091: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
1092: IF l_debug_on THEN
1093: wsh_debug_sv.log (l_module_name,'WSH_DOC_MISSING');
1094: END IF;
1095: RAISE FND_API.G_EXC_ERROR;
1096: END IF;
1097: WSH_UTIL_VALIDATE.validate_report_set(
1098: p_report_set_id => l_report_set_id,
1099: p_report_set_name => NULL,
1207: wsh_util_core.api_post_call(p_return_status =>l_return_status,
1208: x_num_warnings =>l_num_warning,
1209: x_num_errors =>l_num_errors);
1210: EXCEPTION
1211: WHEN FND_API.G_EXC_ERROR THEN
1212: ROLLBACK TO s_clean_loop_grp;
1213: IF l_debug_on THEN
1214: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR in the loop');
1215: END IF;
1212: ROLLBACK TO s_clean_loop_grp;
1213: IF l_debug_on THEN
1214: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR in the loop');
1215: END IF;
1216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1217: ROLLBACK TO s_clean_loop_grp;
1218: IF l_debug_on THEN
1219: wsh_debug_sv.log (l_module_name,
1220: 'G_EXC_UNEXPECTED_ERROR in the loop');
1225: IF l_num_errors >= l_stop_id_tab.COUNT THEN
1226: IF l_debug_on THEN
1227: wsh_debug_sv.log (l_module_name,'All failed in the loop');
1228: END IF;
1229: RAISE FND_API.G_EXC_ERROR;
1230: END IF;
1231:
1232: IF l_num_errors >0 THEN
1233: IF l_debug_on THEN
1365: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
1366: IF l_debug_on THEN
1367: wsh_debug_sv.log (l_module_name,'WSH_UI_MULTI_SELECTION');
1368: END IF;
1369: RAISE FND_API.G_EXC_ERROR;
1370: ELSIF p_rec_attr_tab.COUNT = 1
1371: AND p_action_prms.caller <> 'WSH_FSTRX' THEN
1372: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
1373: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_action_prms.action_code );
1374: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
1375: IF l_debug_on THEN
1376: wsh_debug_sv.log (l_module_name,'WSH_INVALID_ACTION_CODE COUNT');
1377: END IF;
1378: RAISE FND_API.G_EXC_ERROR;
1379: END IF;
1380:
1381: ELSE
1382: -- give message for invalid action
1385: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
1386: IF l_debug_on THEN
1387: wsh_debug_sv.log (l_module_name,'WSH_INVALID_ACTION_CODE');
1388: END IF;
1389: RAISE FND_API.G_EXC_ERROR;
1390: END IF;
1391:
1392: -- TP call back to unfirm continuous move or delete continuous move or
1393: -- any other action that will be done in the future based on the action performed
1393: -- any other action that will be done in the future based on the action performed
1394: IF WSH_UTIL_CORE.TP_IS_INSTALLED='Y' THEN
1395: WSH_FTE_TP_INTEGRATION.stop_callback (
1396: p_api_version_number => 1.0,
1397: p_init_msg_list => FND_API.G_TRUE,
1398: x_return_status => l_return_status,
1399: x_msg_count => l_msg_count,
1400: x_msg_data => l_msg_data,
1401: p_action_prms => p_action_prms,
1452: ELSE
1453: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1454: END IF;
1455:
1456: IF p_commit = FND_API.G_TRUE THEN
1457: --Bugfix 4070732 {
1458: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1459: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1460:
1492: --Bugfix 4070732 { logical end of the API
1493: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN --{
1494: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1495:
1496: IF p_commit = FND_API.G_TRUE THEN
1497:
1498: IF l_debug_on THEN
1499: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1500: END IF;
1531: END IF; --}
1532: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1533: OR x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1534: THEN
1535: IF p_commit = FND_API.G_TRUE THEN
1536: null;
1537: ELSE
1538: ROLLBACK TO s_stop_action_grp;
1539: END IF;
1549: --
1550: FND_MSG_PUB.Count_And_Get
1551: ( p_count => x_msg_count
1552: , p_data => x_msg_data
1553: , p_encoded => FND_API.G_FALSE
1554: );
1555:
1556: IF l_debug_on THEN
1557: WSH_DEBUG_SV.pop(l_module_name);
1557: WSH_DEBUG_SV.pop(l_module_name);
1558: END IF;
1559:
1560: EXCEPTION
1561: WHEN FND_API.G_EXC_ERROR THEN
1562: ROLLBACK TO s_stop_action_grp;
1563: IF c_check_trip_close%ISOPEN THEN
1564: CLOSE c_check_trip_close;
1565: END IF;
1587: --}
1588: FND_MSG_PUB.Count_And_Get
1589: ( p_count => x_msg_count
1590: , p_data => x_msg_data
1591: , p_encoded => FND_API.G_FALSE
1592: );
1593: IF l_debug_on THEN
1594: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR');
1595: WSH_DEBUG_SV.pop(l_module_name);
1621: --}
1622: FND_MSG_PUB.Count_And_Get
1623: ( p_count => x_msg_count
1624: , p_data => x_msg_data
1625: , p_encoded => FND_API.G_FALSE
1626: );
1627: IF l_debug_on THEN
1628: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR');
1629: WSH_DEBUG_SV.pop(l_module_name);
1627: IF l_debug_on THEN
1628: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR');
1629: WSH_DEBUG_SV.pop(l_module_name);
1630: END IF;
1631: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1632: ROLLBACK TO s_stop_action_grp;
1633: IF c_check_trip_close%ISOPEN THEN
1634: CLOSE c_check_trip_close;
1635: END IF;
1655:
1656: FND_MSG_PUB.Count_And_Get
1657: ( p_count => x_msg_count
1658: , p_data => x_msg_data
1659: , p_encoded => FND_API.G_FALSE
1660: );
1661: IF l_debug_on THEN
1662: wsh_debug_sv.log (l_module_name,'G_EXC_UNEXPECTED_ERROR');
1663: WSH_DEBUG_SV.pop(l_module_name);
1721: --}
1722: FND_MSG_PUB.Count_And_Get
1723: ( p_count => x_msg_count
1724: , p_data => x_msg_data
1725: , p_encoded => FND_API.G_FALSE
1726: );
1727: IF l_debug_on THEN
1728: wsh_debug_sv.log (l_module_name,'G_EXC_WARNING');
1729: WSH_DEBUG_SV.pop(l_module_name);
1758: --}
1759: FND_MSG_PUB.Count_And_Get
1760: ( p_count => x_msg_count
1761: , p_data => x_msg_data
1762: , p_encoded => FND_API.G_FALSE
1763: );
1764: IF l_debug_on THEN
1765: wsh_debug_sv.log (l_module_name,'Others',substr(sqlerrm,1,200));
1766: WSH_DEBUG_SV.pop(l_module_name);
2161: nvl(p_rec_attr_tab(l_index).DEPARTURE_NET_WEIGHT,0) > 0 THEN
2162: IF p_rec_attr_tab(l_index). WEIGHT_UOM_CODE IS NULL THEN
2163: FND_MESSAGE.SET_NAME('WSH', 'WSH_WTVOL_NULL');
2164: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
2165: RAISE fnd_api.g_exc_error;
2166: END IF;
2167: END IF;
2168: --Bug 4140359
2169: IF nvl(p_rec_attr_tab(l_index).DEPARTURE_VOLUME,0) > 0
2169: IF nvl(p_rec_attr_tab(l_index).DEPARTURE_VOLUME,0) > 0
2170: AND p_rec_attr_tab(l_index).VOLUME_UOM_CODE IS NULL THEN
2171: FND_MESSAGE.SET_NAME('WSH', 'WSH_WTVOL_NULL');
2172: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
2173: RAISE fnd_api.g_exc_error;
2174: END IF;
2175: END IF; --}
2176: x_valid_id_index_tab(x_valid_id_index_tab.COUNT + 1) := l_index;
2177:
2190: WSH_DEBUG_SV.logmsg(l_module_name,'e_mixed_Stop_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2191: END IF;
2192: -- J-IB-NPARIKH-}
2193:
2194: WHEN fnd_api.g_exc_error THEN
2195: Rollback to validate_stop_loop_grp;
2196:
2197: WHEN fnd_api.g_exc_unexpected_error THEN
2198: Rollback to validate_stop_loop_grp;
2193:
2194: WHEN fnd_api.g_exc_error THEN
2195: Rollback to validate_stop_loop_grp;
2196:
2197: WHEN fnd_api.g_exc_unexpected_error THEN
2198: Rollback to validate_stop_loop_grp;
2199:
2200: WHEN others THEN
2201: ROLLBACK TO SAVEPOINT validate_stop_loop_grp;
2198: Rollback to validate_stop_loop_grp;
2199:
2200: WHEN others THEN
2201: ROLLBACK TO SAVEPOINT validate_stop_loop_grp;
2202: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2203:
2204: END;
2205: l_index := p_rec_attr_tab.NEXT(l_index);
2206: END LOOP;
2219: IF l_debug_on THEN
2220: WSH_DEBUG_SV.pop(l_module_name);
2221: END IF;
2222: EXCEPTION
2223: WHEN FND_API.G_EXC_ERROR THEN
2224: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2225: FND_MSG_PUB.Count_And_Get (
2226: p_count => x_msg_count,
2227: p_data => x_msg_data,
2224: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2225: FND_MSG_PUB.Count_And_Get (
2226: p_count => x_msg_count,
2227: p_data => x_msg_data,
2228: p_encoded => FND_API.G_FALSE);
2229: IF l_debug_on THEN
2230: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2231: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2232: END IF;
2226: p_count => x_msg_count,
2227: p_data => x_msg_data,
2228: p_encoded => FND_API.G_FALSE);
2229: IF l_debug_on THEN
2230: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2231: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2232: END IF;
2233: ROLLBACK TO SAVEPOINT validate_stop_grp;
2234:
2227: p_data => x_msg_data,
2228: p_encoded => FND_API.G_FALSE);
2229: IF l_debug_on THEN
2230: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2231: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2232: END IF;
2233: ROLLBACK TO SAVEPOINT validate_stop_grp;
2234:
2235: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2231: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2232: END IF;
2233: ROLLBACK TO SAVEPOINT validate_stop_grp;
2234:
2235: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2236: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2237: FND_MSG_PUB.Count_And_Get (
2238: p_count => x_msg_count,
2239: p_data => x_msg_data,
2236: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2237: FND_MSG_PUB.Count_And_Get (
2238: p_count => x_msg_count,
2239: p_data => x_msg_data,
2240: p_encoded => FND_API.G_FALSE);
2241: IF l_debug_on THEN
2242: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2244: END IF;
2238: p_count => x_msg_count,
2239: p_data => x_msg_data,
2240: p_encoded => FND_API.G_FALSE);
2241: IF l_debug_on THEN
2242: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2244: END IF;
2245: ROLLBACK TO SAVEPOINT validate_stop_grp;
2246:
2239: p_data => x_msg_data,
2240: p_encoded => FND_API.G_FALSE);
2241: IF l_debug_on THEN
2242: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2244: END IF;
2245: ROLLBACK TO SAVEPOINT validate_stop_grp;
2246:
2247: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2248: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2249: FND_MSG_PUB.Count_And_Get (
2250: p_count => x_msg_count,
2251: p_data => x_msg_data,
2252: p_encoded => FND_API.G_FALSE);
2253: IF l_debug_on THEN
2254: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2255: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2256: END IF;
2260: wsh_util_core.default_handler ('WSH_TRIP_STOPS_GRP.Validate_Stop');
2261: FND_MSG_PUB.Count_And_Get (
2262: p_count => x_msg_count,
2263: p_data => x_msg_data,
2264: p_encoded => FND_API.G_FALSE);
2265: IF l_debug_on THEN
2266: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2267: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2268: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2273: --========================================================================
2274: -- PROCEDURE : Create_Update_Stop CORE API
2275: --
2276: -- PARAMETERS: p_api_version_number known api versionerror buffer
2277: -- p_init_msg_list FND_API.G_TRUE to reset list
2278: -- p_commit 'T'/'F'
2279: -- p_in_rec stopInRecType
2280: -- p_rec_attr_tab Table of Attributes for the stop entity
2281: -- p_stop_OUT_tab Table of Output Attributes for the stop entity
2426: wsh_debug_sv.log (l_module_name,'p_in_rec.phase',p_in_rec.phase);
2427: wsh_debug_sv.log (l_module_name,'(p_rec_attr_tab.count',p_rec_attr_tab.count);
2428: END IF;
2429:
2430: IF NOT FND_API.Compatible_API_Call(l_api_version_number, p_api_version_number,l_api_name,G_PKG_NAME) THEN
2431: IF l_debug_on THEN
2432: WSH_DEBUG_SV.logmsg(l_module_name,'Not compatible');
2433: END IF;
2434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2430: IF NOT FND_API.Compatible_API_Call(l_api_version_number, p_api_version_number,l_api_name,G_PKG_NAME) THEN
2431: IF l_debug_on THEN
2432: WSH_DEBUG_SV.logmsg(l_module_name,'Not compatible');
2433: END IF;
2434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2435: END IF;
2436:
2437: IF FND_API.to_Boolean(p_init_msg_list) THEN
2438: FND_MSG_PUB.initialize;
2433: END IF;
2434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2435: END IF;
2436:
2437: IF FND_API.to_Boolean(p_init_msg_list) THEN
2438: FND_MSG_PUB.initialize;
2439: END IF;
2440:
2441: -- Initialize the Variables
2455: IF (p_in_rec.caller IS NULL) THEN
2456: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2457: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_in_rec.caller');
2458: wsh_util_core.add_message(x_return_status,l_module_name);
2459: raise fnd_api.g_exc_error;
2460: END IF;
2461: IF (p_in_rec.action_code IS NULL OR p_in_rec.action_code NOT IN ('CREATE','UPDATE') ) THEN
2462: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2463: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_in_rec.action_code');
2461: IF (p_in_rec.action_code IS NULL OR p_in_rec.action_code NOT IN ('CREATE','UPDATE') ) THEN
2462: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2463: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_in_rec.action_code');
2464: wsh_util_core.add_message(x_return_status,l_module_name);
2465: raise fnd_api.g_exc_error;
2466: END IF;
2467:
2468: IF (nvl(p_in_rec.phase,1) < 1) THEN
2469: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2468: IF (nvl(p_in_rec.phase,1) < 1) THEN
2469: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2470: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_in_rec.phase');
2471: wsh_util_core.add_message(x_return_status,l_module_name);
2472: raise fnd_api.g_exc_error;
2473: END IF;
2474:
2475: IF (p_rec_attr_tab.count < 0 ) THEN
2476: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2475: IF (p_rec_attr_tab.count < 0 ) THEN
2476: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2477: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_rec_attr_tab.count');
2478: wsh_util_core.add_message(x_return_status,l_module_name);
2479: raise fnd_api.g_exc_error;
2480: END IF;
2481:
2482: WSH_ACTIONS_LEVELS.set_validation_level (
2483: p_entity => 'STOP',
2518: x_num_warnings =>l_num_warnings,
2519: x_num_errors =>l_num_errors);
2520:
2521: EXCEPTION
2522: WHEN fnd_api.g_exc_error THEN
2523: Rollback to s_stop_disabled_list_grp;
2524:
2525: WHEN fnd_api.g_exc_unexpected_error THEN
2526: Rollback to s_stop_disabled_list_grp;
2521: EXCEPTION
2522: WHEN fnd_api.g_exc_error THEN
2523: Rollback to s_stop_disabled_list_grp;
2524:
2525: WHEN fnd_api.g_exc_unexpected_error THEN
2526: Rollback to s_stop_disabled_list_grp;
2527:
2528: WHEN others THEN
2529: Rollback to s_stop_disabled_list_grp;
2526: Rollback to s_stop_disabled_list_grp;
2527:
2528: WHEN others THEN
2529: Rollback to s_stop_disabled_list_grp;
2530: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2531: END;
2532:
2533: l_index := p_rec_attr_tab.NEXT(l_index);
2534: END LOOP;
2533: l_index := p_rec_attr_tab.NEXT(l_index);
2534: END LOOP;
2535:
2536: IF (l_num_errors = p_rec_attr_tab.count ) THEN
2537: raise fnd_api.g_exc_error;
2538: END IF;
2539:
2540: ELSE
2541: l_rec_attr_tab := p_rec_attr_tab;
2557: p_internal_cust_location_id => l_rec_attr_tab(i).stop_location_id,
2558: x_internal_org_location_id => l_rec_attr_tab(i).physical_location_id,
2559: x_return_status => l_return_status);
2560:
2561: IF l_return_status in (FND_API.G_RET_STS_UNEXP_ERROR, FND_API.G_RET_STS_ERROR) THEN
2562: RAISE get_physical_loc_err;
2563: END IF;
2564: i := l_rec_attr_tab.next(i);
2565: END LOOP;
2566:
2567:
2568: WSH_FTE_COMP_CONSTRAINT_PKG.validate_constraint_main(
2569: p_api_version_number => p_api_version_number,
2570: p_init_msg_list => FND_API.G_FALSE,
2571: p_entity_type => 'S',
2572: p_target_id => null,
2573: p_action_code => p_in_rec.action_code,
2574: p_del_attr_tab => l_cc_del_attr_tab,
2787: p_internal_cust_location_id => l_rec_attr_tab(x_index_id_tab(l_index)).stop_location_id,
2788: x_internal_org_location_id => l_rec_attr_tab(x_index_id_tab(l_index)).physical_location_id,
2789: x_return_status => l_return_status);
2790:
2791: IF l_return_status in (FND_API.G_RET_STS_UNEXP_ERROR, FND_API.G_RET_STS_ERROR) THEN
2792: RAISE get_physical_loc_err;
2793: END IF;
2794: IF l_debug_on THEN
2795: wsh_debug_sv.log(l_module_name,'l_stop_rec.physical_location_id' , l_stop_rec.physical_location_id);
2922: wsh_debug_sv.log(l_module_name,'l_stop_rec.planned_departure_date', l_stop_rec.planned_departure_date);
2923: END IF;
2924:
2925:
2926: IF (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_arrival_date, FND_API.G_MISS_DATE) <>
2927: NVL(l_stop_rec.planned_arrival_date, FND_API.G_MISS_DATE))
2928: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_departure_date, FND_API.G_MISS_DATE) <>
2929: NVL(l_stop_rec.planned_departure_date, FND_API.G_MISS_DATE))
2930: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).stop_location_id, FND_API.G_MISS_NUM) <>
2923: END IF;
2924:
2925:
2926: IF (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_arrival_date, FND_API.G_MISS_DATE) <>
2927: NVL(l_stop_rec.planned_arrival_date, FND_API.G_MISS_DATE))
2928: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_departure_date, FND_API.G_MISS_DATE) <>
2929: NVL(l_stop_rec.planned_departure_date, FND_API.G_MISS_DATE))
2930: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).stop_location_id, FND_API.G_MISS_NUM) <>
2931: NVL(l_stop_rec.stop_location_id, FND_API.G_MISS_NUM)) THEN
2924:
2925:
2926: IF (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_arrival_date, FND_API.G_MISS_DATE) <>
2927: NVL(l_stop_rec.planned_arrival_date, FND_API.G_MISS_DATE))
2928: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_departure_date, FND_API.G_MISS_DATE) <>
2929: NVL(l_stop_rec.planned_departure_date, FND_API.G_MISS_DATE))
2930: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).stop_location_id, FND_API.G_MISS_NUM) <>
2931: NVL(l_stop_rec.stop_location_id, FND_API.G_MISS_NUM)) THEN
2932:
2925:
2926: IF (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_arrival_date, FND_API.G_MISS_DATE) <>
2927: NVL(l_stop_rec.planned_arrival_date, FND_API.G_MISS_DATE))
2928: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_departure_date, FND_API.G_MISS_DATE) <>
2929: NVL(l_stop_rec.planned_departure_date, FND_API.G_MISS_DATE))
2930: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).stop_location_id, FND_API.G_MISS_NUM) <>
2931: NVL(l_stop_rec.stop_location_id, FND_API.G_MISS_NUM)) THEN
2932:
2933: IF l_debug_on THEN
2926: IF (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_arrival_date, FND_API.G_MISS_DATE) <>
2927: NVL(l_stop_rec.planned_arrival_date, FND_API.G_MISS_DATE))
2928: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_departure_date, FND_API.G_MISS_DATE) <>
2929: NVL(l_stop_rec.planned_departure_date, FND_API.G_MISS_DATE))
2930: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).stop_location_id, FND_API.G_MISS_NUM) <>
2931: NVL(l_stop_rec.stop_location_id, FND_API.G_MISS_NUM)) THEN
2932:
2933: IF l_debug_on THEN
2934: wsh_debug_sv.log(l_module_name,'details marked count', l_details_marked.COUNT);
2927: NVL(l_stop_rec.planned_arrival_date, FND_API.G_MISS_DATE))
2928: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).planned_departure_date, FND_API.G_MISS_DATE) <>
2929: NVL(l_stop_rec.planned_departure_date, FND_API.G_MISS_DATE))
2930: OR (NVL(l_rec_attr_tab(x_index_id_tab(l_index)).stop_location_id, FND_API.G_MISS_NUM) <>
2931: NVL(l_stop_rec.stop_location_id, FND_API.G_MISS_NUM)) THEN
2932:
2933: IF l_debug_on THEN
2934: wsh_debug_sv.log(l_module_name,'details marked count', l_details_marked.COUNT);
2935: END IF;
2939: IF l_debug_on THEN
2940: wsh_debug_sv.log(l_module_name,'details marked count', l_details_marked.COUNT);
2941: END IF;
2942:
2943: ELSIF NVL(l_rec_attr_tab(x_index_id_tab(l_index)).WKEND_LAYOVER_STOPS, FND_API.G_MISS_NUM) <>
2944: NVL(l_stop_rec.WKEND_LAYOVER_STOPS, FND_API.G_MISS_NUM)
2945: OR NVL(l_rec_attr_tab(x_index_id_tab(l_index)).WKDAY_LAYOVER_STOPS, FND_API.G_MISS_NUM) <>
2946: NVL(l_stop_rec.WKDAY_LAYOVER_STOPS, FND_API.G_MISS_NUM) THEN
2947:
2940: wsh_debug_sv.log(l_module_name,'details marked count', l_details_marked.COUNT);
2941: END IF;
2942:
2943: ELSIF NVL(l_rec_attr_tab(x_index_id_tab(l_index)).WKEND_LAYOVER_STOPS, FND_API.G_MISS_NUM) <>
2944: NVL(l_stop_rec.WKEND_LAYOVER_STOPS, FND_API.G_MISS_NUM)
2945: OR NVL(l_rec_attr_tab(x_index_id_tab(l_index)).WKDAY_LAYOVER_STOPS, FND_API.G_MISS_NUM) <>
2946: NVL(l_stop_rec.WKDAY_LAYOVER_STOPS, FND_API.G_MISS_NUM) THEN
2947:
2948: IF l_mode_of_transport = 'TRUCK' THEN
2941: END IF;
2942:
2943: ELSIF NVL(l_rec_attr_tab(x_index_id_tab(l_index)).WKEND_LAYOVER_STOPS, FND_API.G_MISS_NUM) <>
2944: NVL(l_stop_rec.WKEND_LAYOVER_STOPS, FND_API.G_MISS_NUM)
2945: OR NVL(l_rec_attr_tab(x_index_id_tab(l_index)).WKDAY_LAYOVER_STOPS, FND_API.G_MISS_NUM) <>
2946: NVL(l_stop_rec.WKDAY_LAYOVER_STOPS, FND_API.G_MISS_NUM) THEN
2947:
2948: IF l_mode_of_transport = 'TRUCK' THEN
2949:
2942:
2943: ELSIF NVL(l_rec_attr_tab(x_index_id_tab(l_index)).WKEND_LAYOVER_STOPS, FND_API.G_MISS_NUM) <>
2944: NVL(l_stop_rec.WKEND_LAYOVER_STOPS, FND_API.G_MISS_NUM)
2945: OR NVL(l_rec_attr_tab(x_index_id_tab(l_index)).WKDAY_LAYOVER_STOPS, FND_API.G_MISS_NUM) <>
2946: NVL(l_stop_rec.WKDAY_LAYOVER_STOPS, FND_API.G_MISS_NUM) THEN
2947:
2948: IF l_mode_of_transport = 'TRUCK' THEN
2949:
2950: l_details_marked(l_details_marked.COUNT+1):=l_rec_attr_tab(x_index_id_tab(l_index)).stop_id;
3007: END IF;
3008: --
3009:
3010:
3011: WHEN fnd_api.g_exc_error THEN
3012: Rollback to s_trip_stop_grp;
3013: --OTM R12, glog proj
3014: IF c_trip_info%ISOPEN THEN
3015: CLOSE c_trip_info;
3014: IF c_trip_info%ISOPEN THEN
3015: CLOSE c_trip_info;
3016: END IF;
3017:
3018: WHEN fnd_api.g_exc_unexpected_error THEN
3019: Rollback to s_trip_stop_grp;
3020: --OTM R12, glog proj
3021: IF c_trip_info%ISOPEN THEN
3022: CLOSE c_trip_info;
3027: --OTM R12, glog proj
3028: IF c_trip_info%ISOPEN THEN
3029: CLOSE c_trip_info;
3030: END IF;
3031: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3032: END;
3033: l_index := x_index_id_tab.NEXT(l_index);
3034: END LOOP;
3035:
3040: l_action_prms.action_code:=p_in_rec.action_code;
3041: l_action_prms.caller:=p_in_rec.caller;
3042: WSH_FTE_TP_INTEGRATION.stop_callback (
3043: p_api_version_number => 1.0,
3044: p_init_msg_list => FND_API.G_TRUE,
3045: x_return_status => l_return_status,
3046: x_msg_count => l_msg_count,
3047: x_msg_data => l_msg_data,
3048: p_action_prms => l_action_prms,
3159: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3160: END IF;
3161:
3162:
3163: IF FND_API.To_Boolean( p_commit ) THEN
3164: --Bugfix 4070732 {
3165: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3166: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
3167:
3198: --Bugfix 4070732 {
3199: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN --{
3200: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
3201:
3202: IF FND_API.TO_BOOLEAN(p_commit) THEN
3203:
3204: IF l_debug_on THEN
3205: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3206: END IF;
3222: END IF;
3223:
3224: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
3225: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3226: IF NOT(FND_API.TO_BOOLEAN(p_commit)) THEN
3227: rollback to create_update_stop_grp;
3228: end if;
3229: END IF;
3230:
3249:
3250: FND_MSG_PUB.Count_And_Get
3251: ( p_count => x_msg_count,
3252: p_data => x_msg_data,
3253: p_encoded => FND_API.G_FALSE );
3254:
3255:
3256: IF l_debug_on THEN
3257: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
3294: --}
3295: FND_MSG_PUB.Count_And_Get (
3296: p_count => x_msg_count,
3297: p_data => x_msg_data,
3298: p_encoded => FND_API.G_FALSE);
3299: IF l_debug_on THEN
3300: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3301: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
3302: END IF;
3301: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
3302: END IF;
3303: ROLLBACK TO create_update_stop_grp;
3304:
3305: WHEN FND_API.G_EXC_ERROR THEN
3306: -- OTM R12, glog proj, close cursors
3307: IF c_get_all_trip_stops%ISOPEN THEN
3308: CLOSE c_get_all_trip_stops;
3309: END IF;
3335: --}
3336: FND_MSG_PUB.Count_And_Get (
3337: p_count => x_msg_count,
3338: p_data => x_msg_data,
3339: p_encoded => FND_API.G_FALSE);
3340: IF l_debug_on THEN
3341: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3342: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3343: END IF;
3337: p_count => x_msg_count,
3338: p_data => x_msg_data,
3339: p_encoded => FND_API.G_FALSE);
3340: IF l_debug_on THEN
3341: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3342: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3343: END IF;
3344:
3345: ROLLBACK TO create_update_stop_grp;
3338: p_data => x_msg_data,
3339: p_encoded => FND_API.G_FALSE);
3340: IF l_debug_on THEN
3341: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3342: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3343: END IF;
3344:
3345: ROLLBACK TO create_update_stop_grp;
3346:
3344:
3345: ROLLBACK TO create_update_stop_grp;
3346:
3347:
3348: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3349: -- OTM R12, glog proj, close cursors
3350: IF c_get_all_trip_stops%ISOPEN THEN
3351: CLOSE c_get_all_trip_stops;
3352: END IF;
3374: --}
3375: FND_MSG_PUB.Count_And_Get (
3376: p_count => x_msg_count,
3377: p_data => x_msg_data,
3378: p_encoded => FND_API.G_FALSE);
3379: IF l_debug_on THEN
3380: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3382: END IF;
3376: p_count => x_msg_count,
3377: p_data => x_msg_data,
3378: p_encoded => FND_API.G_FALSE);
3379: IF l_debug_on THEN
3380: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3382: END IF;
3383: ROLLBACK TO create_update_stop_grp;
3384:
3377: p_data => x_msg_data,
3378: p_encoded => FND_API.G_FALSE);
3379: IF l_debug_on THEN
3380: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3382: END IF;
3383: ROLLBACK TO create_update_stop_grp;
3384:
3385: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3447: --}
3448: FND_MSG_PUB.Count_And_Get (
3449: p_count => x_msg_count,
3450: p_data => x_msg_data,
3451: p_encoded => FND_API.G_FALSE);
3452: IF l_debug_on THEN
3453: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3454: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3455: END IF;
3484: --}
3485: FND_MSG_PUB.Count_And_Get (
3486: p_count => x_msg_count,
3487: p_data => x_msg_data,
3488: p_encoded => FND_API.G_FALSE);
3489: IF l_debug_on THEN
3490: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
3491: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3492: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3498: --========================================================================
3499: -- PROCEDURE : Create_Update_Stop Wrapper API
3500: --
3501: -- PARAMETERS: p_api_version_number known api versionerror buffer
3502: -- p_init_msg_list FND_API.G_TRUE to reset list
3503: -- x_return_status return status
3504: -- x_msg_count number of messages in the list
3505: -- x_msg_data text of messages
3506: -- p_stop_info Attributes for the stop entity
3524: x_msg_count OUT NOCOPY NUMBER,
3525: x_msg_data OUT NOCOPY VARCHAR2,
3526: p_action_code IN VARCHAR2,
3527: p_stop_info IN OUT NOCOPY WSH_TRIP_STOPS_GRP.Trip_Stop_Pub_Rec_Type,
3528: p_trip_id IN NUMBER DEFAULT FND_API.G_MISS_NUM,
3529: p_trip_name IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3530: p_stop_location_id IN NUMBER DEFAULT FND_API.G_MISS_NUM,
3531: p_stop_location_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3532: p_planned_dep_date IN DATE DEFAULT FND_API.G_MISS_DATE,
3525: x_msg_data OUT NOCOPY VARCHAR2,
3526: p_action_code IN VARCHAR2,
3527: p_stop_info IN OUT NOCOPY WSH_TRIP_STOPS_GRP.Trip_Stop_Pub_Rec_Type,
3528: p_trip_id IN NUMBER DEFAULT FND_API.G_MISS_NUM,
3529: p_trip_name IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3530: p_stop_location_id IN NUMBER DEFAULT FND_API.G_MISS_NUM,
3531: p_stop_location_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3532: p_planned_dep_date IN DATE DEFAULT FND_API.G_MISS_DATE,
3533: x_stop_id OUT NOCOPY NUMBER) IS
3526: p_action_code IN VARCHAR2,
3527: p_stop_info IN OUT NOCOPY WSH_TRIP_STOPS_GRP.Trip_Stop_Pub_Rec_Type,
3528: p_trip_id IN NUMBER DEFAULT FND_API.G_MISS_NUM,
3529: p_trip_name IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3530: p_stop_location_id IN NUMBER DEFAULT FND_API.G_MISS_NUM,
3531: p_stop_location_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3532: p_planned_dep_date IN DATE DEFAULT FND_API.G_MISS_DATE,
3533: x_stop_id OUT NOCOPY NUMBER) IS
3534:
3527: p_stop_info IN OUT NOCOPY WSH_TRIP_STOPS_GRP.Trip_Stop_Pub_Rec_Type,
3528: p_trip_id IN NUMBER DEFAULT FND_API.G_MISS_NUM,
3529: p_trip_name IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3530: p_stop_location_id IN NUMBER DEFAULT FND_API.G_MISS_NUM,
3531: p_stop_location_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3532: p_planned_dep_date IN DATE DEFAULT FND_API.G_MISS_DATE,
3533: x_stop_id OUT NOCOPY NUMBER) IS
3534:
3535: l_api_version_number CONSTANT NUMBER := 1.0;
3528: p_trip_id IN NUMBER DEFAULT FND_API.G_MISS_NUM,
3529: p_trip_name IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3530: p_stop_location_id IN NUMBER DEFAULT FND_API.G_MISS_NUM,
3531: p_stop_location_code IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3532: p_planned_dep_date IN DATE DEFAULT FND_API.G_MISS_DATE,
3533: x_stop_id OUT NOCOPY NUMBER) IS
3534:
3535: l_api_version_number CONSTANT NUMBER := 1.0;
3536: l_api_name CONSTANT VARCHAR2(30):= 'Create_Update_Stop';
3569: IF l_debug_on THEN
3570: wsh_debug_sv.push (l_module_name, 'Create_Update_Stop');
3571: END IF;
3572:
3573: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3574: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3575: END IF;
3576:
3577: IF FND_API.to_Boolean(p_init_msg_list) THEN
3570: wsh_debug_sv.push (l_module_name, 'Create_Update_Stop');
3571: END IF;
3572:
3573: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3574: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3575: END IF;
3576:
3577: IF FND_API.to_Boolean(p_init_msg_list) THEN
3578: FND_MSG_PUB.initialize;
3573: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3574: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3575: END IF;
3576:
3577: IF FND_API.to_Boolean(p_init_msg_list) THEN
3578: FND_MSG_PUB.initialize;
3579: END IF;
3580:
3581: map_stopgrp_to_pvt (
3585: IF l_debug_on THEN
3586: wsh_debug_sv.log (l_module_name, 'map_stoppub_to_pvt x_return_status',x_return_status);
3587: END IF;
3588: IF ( x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3589: raise FND_API.G_EXC_ERROR;
3590: END IF;
3591:
3592: IF (p_trip_id IS NOT NULL) AND (p_trip_id <> FND_API.G_MISS_NUM) THEN
3593: l_pvt_stop_rec.trip_id := p_trip_id;
3588: IF ( x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3589: raise FND_API.G_EXC_ERROR;
3590: END IF;
3591:
3592: IF (p_trip_id IS NOT NULL) AND (p_trip_id <> FND_API.G_MISS_NUM) THEN
3593: l_pvt_stop_rec.trip_id := p_trip_id;
3594: END IF;
3595:
3596: IF (p_trip_name IS NOT NULL) AND (p_trip_name <> FND_API.G_MISS_CHAR) THEN
3592: IF (p_trip_id IS NOT NULL) AND (p_trip_id <> FND_API.G_MISS_NUM) THEN
3593: l_pvt_stop_rec.trip_id := p_trip_id;
3594: END IF;
3595:
3596: IF (p_trip_name IS NOT NULL) AND (p_trip_name <> FND_API.G_MISS_CHAR) THEN
3597: l_pvt_stop_rec.trip_name := p_trip_name;
3598: END IF;
3599: IF (p_stop_location_id IS NOT NULL) AND (p_stop_location_id <> FND_API.G_MISS_NUM) THEN
3600: l_pvt_stop_rec.stop_location_id := p_stop_location_id;
3595:
3596: IF (p_trip_name IS NOT NULL) AND (p_trip_name <> FND_API.G_MISS_CHAR) THEN
3597: l_pvt_stop_rec.trip_name := p_trip_name;
3598: END IF;
3599: IF (p_stop_location_id IS NOT NULL) AND (p_stop_location_id <> FND_API.G_MISS_NUM) THEN
3600: l_pvt_stop_rec.stop_location_id := p_stop_location_id;
3601: END IF;
3602:
3603: IF (p_stop_location_code IS NOT NULL) AND (p_stop_location_code <> FND_API.G_MISS_CHAR) THEN
3599: IF (p_stop_location_id IS NOT NULL) AND (p_stop_location_id <> FND_API.G_MISS_NUM) THEN
3600: l_pvt_stop_rec.stop_location_id := p_stop_location_id;
3601: END IF;
3602:
3603: IF (p_stop_location_code IS NOT NULL) AND (p_stop_location_code <> FND_API.G_MISS_CHAR) THEN
3604: l_pvt_stop_rec.stop_location_code := p_stop_location_code;
3605: END IF;
3606:
3607: IF (p_planned_dep_date IS NOT NULL) AND (p_planned_dep_date <> FND_API.G_MISS_DATE)THEN
3603: IF (p_stop_location_code IS NOT NULL) AND (p_stop_location_code <> FND_API.G_MISS_CHAR) THEN
3604: l_pvt_stop_rec.stop_location_code := p_stop_location_code;
3605: END IF;
3606:
3607: IF (p_planned_dep_date IS NOT NULL) AND (p_planned_dep_date <> FND_API.G_MISS_DATE)THEN
3608: l_pvt_stop_rec.planned_departure_date := p_planned_dep_date;
3609: END IF;
3610:
3611: l_in_rec.caller :='WSH_GRP';
3635:
3636: FND_MSG_PUB.Count_And_Get (
3637: p_count => x_msg_count,
3638: p_data => x_msg_data
3639: , p_encoded => FND_API.G_FALSE);
3640:
3641: IF l_debug_on THEN
3642: WSH_DEBUG_SV.pop(l_module_name);
3643: END IF;
3658: --========================================================================
3659: -- PROCEDURE : Create_Update_Stop_New Wrapper API PUBLIC
3660: --
3661: -- PARAMETERS: p_api_version_number known api versionerror buffer
3662: -- p_init_msg_list FND_API.G_TRUE to reset list
3663: -- x_return_status return status
3664: -- x_msg_count number of messages in the list
3665: -- x_msg_data text of messages
3666: -- p_stop_info Attributes for the stop entity
3675: --========================================================================
3676: PROCEDURE Create_Update_Stop_New
3677: ( p_api_version_number IN NUMBER,
3678: p_init_msg_list IN VARCHAR2,
3679: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3680: x_return_status OUT NOCOPY VARCHAR2,
3681: x_msg_count OUT NOCOPY NUMBER,
3682: x_msg_data OUT NOCOPY VARCHAR2,
3683: p_stop_info IN OUT NOCOPY WSH_TRIP_STOPS_GRP.Trip_Stop_Pub_Rec_Type,
3737: WSH_DEBUG_SV.log(l_module_name,'unloading_start_datetime', p_stop_info.unloading_start_datetime);
3738: WSH_DEBUG_SV.log(l_module_name,'unloading_end_datetime', p_stop_info.unloading_end_datetime);
3739: END IF;
3740:
3741: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3742: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3743: END IF;
3744:
3745: IF FND_API.to_Boolean(p_init_msg_list) THEN
3738: WSH_DEBUG_SV.log(l_module_name,'unloading_end_datetime', p_stop_info.unloading_end_datetime);
3739: END IF;
3740:
3741: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3742: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3743: END IF;
3744:
3745: IF FND_API.to_Boolean(p_init_msg_list) THEN
3746: FND_MSG_PUB.initialize;
3741: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3742: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3743: END IF;
3744:
3745: IF FND_API.to_Boolean(p_init_msg_list) THEN
3746: FND_MSG_PUB.initialize;
3747: END IF;
3748:
3749: map_stopgrp_to_pvt (
3753: IF l_debug_on THEN
3754: wsh_debug_sv.log (l_module_name, 'map_stoppub_to_pvt x_return_status',x_return_status);
3755: END IF;
3756: IF ( x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3757: raise FND_API.G_EXC_ERROR;
3758: END IF;
3759:
3760: l_rec_attr_tab(1):= l_pvt_stop_rec;
3761:
3780:
3781: FND_MSG_PUB.Count_And_Get (
3782: p_count => x_msg_count,
3783: p_data => x_msg_data
3784: , p_encoded => FND_API.G_FALSE);
3785:
3786: IF l_debug_on THEN
3787: WSH_DEBUG_SV.pop(l_module_name);
3788: END IF;
3786: IF l_debug_on THEN
3787: WSH_DEBUG_SV.pop(l_module_name);
3788: END IF;
3789: EXCEPTION
3790: WHEN FND_API.G_EXC_ERROR THEN
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3793: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3794: END IF;
3788: END IF;
3789: EXCEPTION
3790: WHEN FND_API.G_EXC_ERROR THEN
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3793: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3794: END IF;
3795:
3796: WHEN OTHERS THEN
3789: EXCEPTION
3790: WHEN FND_API.G_EXC_ERROR THEN
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3793: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3794: END IF;
3795:
3796: WHEN OTHERS THEN
3797: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4024: FND_MESSAGE.SET_NAME('WSH', 'WSH_STOP_DLVY_TRIP_LOCK');
4025: -- set token
4026: FND_MESSAGE.SET_TOKEN('STOP_ID', p_stop_attr_tab(l_index).stop_id);
4027: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
4028: WHEN FND_API.G_EXC_ERROR THEN
4029: ROLLBACK TO LOCK_RELATED_ENTITY_GRP_LOOP;
4030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4031: ROLLBACK TO LOCK_RELATED_ENTITY_GRP_LOOP;
4032: WHEN OTHERS THEN
4026: FND_MESSAGE.SET_TOKEN('STOP_ID', p_stop_attr_tab(l_index).stop_id);
4027: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
4028: WHEN FND_API.G_EXC_ERROR THEN
4029: ROLLBACK TO LOCK_RELATED_ENTITY_GRP_LOOP;
4030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4031: ROLLBACK TO LOCK_RELATED_ENTITY_GRP_LOOP;
4032: WHEN OTHERS THEN
4033: ROLLBACK TO LOCK_RELATED_ENTITY_GRP_LOOP;
4034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4030: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4031: ROLLBACK TO LOCK_RELATED_ENTITY_GRP_LOOP;
4032: WHEN OTHERS THEN
4033: ROLLBACK TO LOCK_RELATED_ENTITY_GRP_LOOP;
4034: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4035: --
4036: END;
4037: --
4038: l_index := p_stop_attr_tab.NEXT(l_index);
4050: -- {
4051: IF x_valid_ids_tab.count = 0
4052: THEN
4053: -- {
4054: RAISE FND_API.G_EXC_ERROR;
4055: ELSIF x_valid_ids_tab.count >0
4056: AND x_valid_ids_tab.count < p_stop_attr_tab.count
4057: THEN
4058: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
4070: WSH_DEBUG_SV.pop(l_module_name);
4071: END IF;
4072:
4073: EXCEPTION
4074: WHEN FND_API.G_EXC_ERROR THEN
4075: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4076: --
4077: IF l_debug_on THEN
4078: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4074: WHEN FND_API.G_EXC_ERROR THEN
4075: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4076: --
4077: IF l_debug_on THEN
4078: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4079: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4080: END IF;
4081: --
4082: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4075: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4076: --
4077: IF l_debug_on THEN
4078: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4079: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4080: END IF;
4081: --
4082: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4083: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4078: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4079: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4080: END IF;
4081: --
4082: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4083: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4084: --
4085: IF l_debug_on THEN
4086: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4083: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4084: --
4085: IF l_debug_on THEN
4086: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4087: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4088: END IF;
4089: --
4090: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4091: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4101:
4102: --
4103: IF l_debug_on THEN
4104: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4105: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4106: END IF;
4107: --
4108:
4109: END Lock_Related_Entity;