[Home] [Help]
15: --========================================================================
16: -- PROCEDURE : Trip_Action PUBLIC
17: --
18: -- PARAMETERS: p_api_version_number known api version error number
19: -- p_init_msg_list FND_API.G_TRUE to reset list
20: -- x_return_status return status
21: -- x_msg_count number of messages in the list
22: -- x_msg_data text of messages
23: -- p_trip_info Attributes for the trip entity
94: WSH_DEBUG_SV.log(l_module_name,'FREIGHT_TERMS_CODE',p_trip_info.freight_terms_code);
95: WSH_DEBUG_SV.log(l_module_name,'LANE_ID',p_trip_info.lane_id);
96: END IF;
97: --
98: IF NOT FND_API.Compatible_API_Call
99: ( l_api_version_number
100: , p_api_version_number
101: , l_api_name
102: , G_PKG_NAME
101: , l_api_name
102: , G_PKG_NAME
103: )
104: THEN
105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106: END IF;
107:
108: -- Initialize message stack if required
109: IF FND_API.to_Boolean(p_init_msg_list) THEN
105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106: END IF;
107:
108: -- Initialize message stack if required
109: IF FND_API.to_Boolean(p_init_msg_list) THEN
110: FND_MSG_PUB.initialize;
111: END IF;
112:
113: wsh_util_validate.validate_trip_name( l_trip_id,
127: l_entity_id_tab(1) := l_trip_id;
128:
129: WSH_INTERFACE_GRP.Trip_Action
130: ( p_api_version_number => p_api_version_number,
131: p_init_msg_list => FND_API.G_FALSE,
132: p_commit => FND_API.G_TRUE,
133: p_entity_id_tab => l_entity_id_tab,
134: p_action_prms => l_action_prms,
135: x_trip_out_rec => p_trip_OUT_rec,
128:
129: WSH_INTERFACE_GRP.Trip_Action
130: ( p_api_version_number => p_api_version_number,
131: p_init_msg_list => FND_API.G_FALSE,
132: p_commit => FND_API.G_TRUE,
133: p_entity_id_tab => l_entity_id_tab,
134: p_action_prms => l_action_prms,
135: x_trip_out_rec => p_trip_OUT_rec,
136: x_return_status => x_return_status,
140:
141: FND_MSG_PUB.Count_And_Get
142: ( p_count => x_msg_count
143: , p_data => x_msg_data
144: ,p_encoded => FND_API.G_FALSE
145: );
146: --
147: IF l_debug_on THEN
148: WSH_DEBUG_SV.pop(l_module_name);
165: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_ACTION_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
166: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_ACTION_ERROR');
167: END IF;
168: --
169: WHEN FND_API.G_EXC_ERROR THEN
170: x_return_status := FND_API.G_RET_STS_ERROR;
171: -- Get message count and data
172: FND_MSG_PUB.Count_And_Get
173: ( p_count => x_msg_count
166: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_ACTION_ERROR');
167: END IF;
168: --
169: WHEN FND_API.G_EXC_ERROR THEN
170: x_return_status := FND_API.G_RET_STS_ERROR;
171: -- Get message count and data
172: FND_MSG_PUB.Count_And_Get
173: ( p_count => x_msg_count
174: , p_data => x_msg_data
174: , p_data => x_msg_data
175: );
176:
177: IF l_debug_on THEN
178: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
179: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
180: END IF;
181: --
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
175: );
176:
177: IF l_debug_on THEN
178: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
179: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
180: END IF;
181: --
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
178: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
179: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
180: END IF;
181: --
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
184: -- Get message count and data
185: FND_MSG_PUB.Count_And_Get
186: ( p_count => x_msg_count
179: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
180: END IF;
181: --
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
184: -- Get message count and data
185: FND_MSG_PUB.Count_And_Get
186: ( p_count => x_msg_count
187: , p_data => x_msg_data
186: ( p_count => x_msg_count
187: , p_data => x_msg_data
188: );
189: IF l_debug_on THEN
190: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
191: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
192: END IF;
193: --
194: WHEN OTHERS THEN
187: , p_data => x_msg_data
188: );
189: IF l_debug_on THEN
190: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
191: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
192: END IF;
193: --
194: WHEN OTHERS THEN
195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
191: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
192: END IF;
193: --
194: WHEN OTHERS THEN
195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
196: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
197: THEN
198: FND_MSG_PUB.Add_Exc_Msg
199: ( G_PKG_NAME
218: --========================================================================
219: -- PROCEDURE : Trip_Action PUBLIC
220: --
221: -- PARAMETERS: p_api_version_number known api version error number
222: -- p_init_msg_list FND_API.G_TRUE to reset list
223: -- x_return_status return status
224: -- x_msg_count number of messages in the list
225: -- x_msg_data text of messages
226: -- p_action_code Trip action code. Valid action codes are
289: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_NAME',P_TRIP_NAME);
290: WSH_DEBUG_SV.log(l_module_name,'P_WV_OVERRIDE_FLAG',P_WV_OVERRIDE_FLAG);
291: END IF;
292: --
293: IF NOT FND_API.Compatible_API_Call
294: ( l_api_version_number
295: , p_api_version_number
296: , l_api_name
297: , G_PKG_NAME
296: , l_api_name
297: , G_PKG_NAME
298: )
299: THEN
300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
301: END IF;
302:
303: -- Initialize message stack if required
304: IF FND_API.to_Boolean(p_init_msg_list) THEN
300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
301: END IF;
302:
303: -- Initialize message stack if required
304: IF FND_API.to_Boolean(p_init_msg_list) THEN
305: FND_MSG_PUB.initialize;
306: END IF;
307:
308: IF l_debug_on THEN
321: l_action_prms.override_flag := p_wv_override_flag;
322:
323: WSH_INTERFACE_GRP.Trip_Action
324: ( p_api_version_number => p_api_version_number,
325: p_init_msg_list => FND_API.G_FALSE,
326: p_commit => FND_API.G_TRUE,
327: p_entity_id_tab => l_trip_rows,
328: p_action_prms => l_action_prms,
329: x_trip_out_rec => l_trip_out_rec,
322:
323: WSH_INTERFACE_GRP.Trip_Action
324: ( p_api_version_number => p_api_version_number,
325: p_init_msg_list => FND_API.G_FALSE,
326: p_commit => FND_API.G_TRUE,
327: p_entity_id_tab => l_trip_rows,
328: p_action_prms => l_action_prms,
329: x_trip_out_rec => l_trip_out_rec,
330: x_return_status => x_return_status,
333:
334: FND_MSG_PUB.Count_And_Get
335: ( p_count => x_msg_count
336: , p_data => x_msg_data
337: ,p_encoded => FND_API.G_FALSE
338: );
339: --
340: IF l_debug_on THEN
341: WSH_DEBUG_SV.pop(l_module_name);
363: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_ACTION_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
364: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_ACTION_ERROR');
365: END IF;
366: --
367: WHEN FND_API.G_EXC_ERROR THEN
368: x_return_status := FND_API.G_RET_STS_ERROR;
369: -- Get message count and data
370: FND_MSG_PUB.Count_And_Get
371: ( p_count => x_msg_count
364: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_ACTION_ERROR');
365: END IF;
366: --
367: WHEN FND_API.G_EXC_ERROR THEN
368: x_return_status := FND_API.G_RET_STS_ERROR;
369: -- Get message count and data
370: FND_MSG_PUB.Count_And_Get
371: ( p_count => x_msg_count
372: , p_data => x_msg_data
369: -- Get message count and data
370: FND_MSG_PUB.Count_And_Get
371: ( p_count => x_msg_count
372: , p_data => x_msg_data
373: ,p_encoded => FND_API.G_FALSE
374: );
375:
376: --
377: -- Debug Statements
376: --
377: -- Debug Statements
378: --
379: IF l_debug_on THEN
380: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
382: END IF;
383: --
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
377: -- Debug Statements
378: --
379: IF l_debug_on THEN
380: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
382: END IF;
383: --
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
380: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
382: END IF;
383: --
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
386: -- Get message count and data
387: FND_MSG_PUB.Count_And_Get
388: ( p_count => x_msg_count
381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
382: END IF;
383: --
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
386: -- Get message count and data
387: FND_MSG_PUB.Count_And_Get
388: ( p_count => x_msg_count
389: , p_data => x_msg_data
386: -- Get message count and data
387: FND_MSG_PUB.Count_And_Get
388: ( p_count => x_msg_count
389: , p_data => x_msg_data
390: ,p_encoded => FND_API.G_FALSE
391: );
392:
393: --
394: -- Debug Statements
393: --
394: -- Debug Statements
395: --
396: IF l_debug_on THEN
397: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
398: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
399: END IF;
400: --
401: WHEN OTHERS THEN
394: -- Debug Statements
395: --
396: IF l_debug_on THEN
397: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
398: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
399: END IF;
400: --
401: WHEN OTHERS THEN
402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
398: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
399: END IF;
400: --
401: WHEN OTHERS THEN
402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
403: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
404: THEN
405: FND_MSG_PUB.Add_Exc_Msg
406: ( G_PKG_NAME
410: -- Get message count and data
411: FND_MSG_PUB.Count_And_Get
412: ( p_count => x_msg_count
413: , p_data => x_msg_data
414: ,p_encoded => FND_API.G_FALSE
415: );
416:
417: --
418: -- Debug Statements
578: wsh_debug_sv.log (l_module_name,'caller',p_action_prms.caller);
579: wsh_debug_sv.log (l_module_name,'COUNT',p_rec_attr_tab.COUNT);
580: END IF;
581:
582: IF FND_API.to_Boolean(p_init_msg_list) THEN
583: FND_MSG_PUB.initialize;
584: END IF;
585:
586: IF NOT FND_API.Compatible_API_Call
582: IF FND_API.to_Boolean(p_init_msg_list) THEN
583: FND_MSG_PUB.initialize;
584: END IF;
585:
586: IF NOT FND_API.Compatible_API_Call
587: ( l_api_version_number
588: , p_api_version_number
589: , l_api_name
590: , G_PKG_NAME
589: , l_api_name
590: , G_PKG_NAME
591: )
592: THEN
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: END IF;
595:
596:
597: IF p_action_prms.action_code IS NULL THEN
749: IF l_debug_on THEN
750: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION');
751: END IF;
752: --
753: RAISE FND_API.G_EXC_ERROR;
754: --
755: END IF;
756:
757: IF l_debug_on THEN
775: --
776: IF p_action_prms.caller = 'WSH_FSTRX' THEN
777: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
778: ELSE
779: RAISE FND_API.G_EXC_ERROR;
780: END IF;
781: --
782: END IF;
783:
853: wsh_util_core.api_post_call(p_return_status =>l_return_status,
854: x_num_warnings =>l_num_warning,
855: x_num_errors =>l_num_errors);
856: EXCEPTION
857: WHEN FND_API.G_EXC_ERROR THEN
858: ROLLBACK TO s_clean_loop_grp;
859: IF l_debug_on THEN
860: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR in the loop');
861: END IF;
858: ROLLBACK TO s_clean_loop_grp;
859: IF l_debug_on THEN
860: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR in the loop');
861: END IF;
862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
863: ROLLBACK TO s_clean_loop_grp;
864: IF l_debug_on THEN
865: wsh_debug_sv.log (l_module_name,
866: 'G_EXC_UNEXPECTED_ERROR in the loop');
871: IF l_num_errors >= l_trip_id_tab.COUNT THEN
872: IF l_debug_on THEN
873: wsh_debug_sv.log (l_module_name,'All failed in the loop');
874: END IF;
875: RAISE FND_API.G_EXC_ERROR;
876: END IF;
877:
878: IF l_num_errors >0 THEN
879: IF l_debug_on THEN
968: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
969: IF l_debug_on THEN
970: wsh_debug_sv.log (l_module_name,'WSH_DOC_MISSING');
971: END IF;
972: RAISE FND_API.G_EXC_ERROR;
973: END IF;
974: WSH_UTIL_VALIDATE.validate_report_set(
975: p_report_set_id => l_report_set_id,
976: p_report_set_name => NULL,
1045: FND_MSG_PUB.ADD;
1046: IF l_debug_on THEN
1047: wsh_debug_sv.log (l_module_name,'WSH_UI_MULTI_SELECTION');
1048: END IF;
1049: RAISE FND_API.G_EXC_ERROR;
1050: ELSIF p_rec_attr_tab.COUNT = 1
1051: AND p_action_prms.caller <> 'WSH_FSTRX' THEN
1052: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
1053: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_action_prms.action_code );
1054: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
1055: IF l_debug_on THEN
1056: wsh_debug_sv.log (l_module_name,'WSH_INVALID_ACTION_CODE COUNT');
1057: END IF;
1058: RAISE FND_API.G_EXC_ERROR;
1059: END IF;
1060: -- Modified by 4493263
1061: ELSIF p_action_prms.action_code in ( 'GENERATE-PACK-SLIP', 'PRINT-PACK-SLIP' ) THEN
1062:
1078: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NO_PICKUP_ERROR');
1079: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
1080: x_return_status := wsh_util_core.g_ret_sts_error;
1081: wsh_util_core.add_message(x_return_status,l_module_name);
1082: RAISE FND_API.G_EXC_ERROR;
1083: --}
1084: ELSE
1085: l_action_prms.caller := 'WSH_GRP';
1086: l_action_prms.phase := p_action_prms.phase;
1087: l_action_prms.action_code := p_action_prms.action_code;
1088: --
1089: wsh_interface_grp.Delivery_Action(
1090: p_api_version_number => p_api_version_number,
1091: p_init_msg_list => FND_API.G_FALSE,
1092: p_commit => FND_API.G_FALSE,
1093: p_action_prms => l_action_prms,
1094: p_delivery_id_tab => l_delivery_id_tab,
1095: x_delivery_out_rec => l_del_action_out_rec,
1088: --
1089: wsh_interface_grp.Delivery_Action(
1090: p_api_version_number => p_api_version_number,
1091: p_init_msg_list => FND_API.G_FALSE,
1092: p_commit => FND_API.G_FALSE,
1093: p_action_prms => l_action_prms,
1094: p_delivery_id_tab => l_delivery_id_tab,
1095: x_delivery_out_rec => l_del_action_out_rec,
1096: x_return_status => l_return_status,
1127: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NO_PICKUP_ERROR');
1128: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
1129: x_return_status := wsh_util_core.g_ret_sts_error;
1130: wsh_util_core.add_message(x_return_status,l_module_name);
1131: RAISE FND_API.G_EXC_ERROR;
1132: --}
1133: ELSE
1134: l_action_prms.caller := 'WSH_GRP';
1135: l_action_prms.phase := p_action_prms.phase;
1136: l_action_prms.action_code := p_action_prms.action_code;
1137: --
1138: wsh_interface_grp.Delivery_Action(
1139: p_api_version_number => p_api_version_number,
1140: p_init_msg_list => FND_API.G_FALSE,
1141: p_commit => FND_API.G_FALSE,
1142: p_action_prms => l_action_prms,
1143: p_delivery_id_tab => l_delivery_id_tab,
1144: x_delivery_out_rec => l_del_action_out_rec,
1137: --
1138: wsh_interface_grp.Delivery_Action(
1139: p_api_version_number => p_api_version_number,
1140: p_init_msg_list => FND_API.G_FALSE,
1141: p_commit => FND_API.G_FALSE,
1142: p_action_prms => l_action_prms,
1143: p_delivery_id_tab => l_delivery_id_tab,
1144: x_delivery_out_rec => l_del_action_out_rec,
1145: x_return_status => l_return_status,
1239: --FND_MSG_PUB.ADD;
1240: IF l_debug_on THEN
1241: wsh_debug_sv.log (l_module_name,'WSH_UI_MULTI_SELECTION');
1242: END IF;
1243: RAISE FND_API.G_EXC_ERROR;
1244: END IF;
1245:
1246: WSH_TRIPS_ACTIONS.PROCESS_CARRIER_SELECTION(
1247: p_init_msg_list => FND_API.G_FALSE,
1243: RAISE FND_API.G_EXC_ERROR;
1244: END IF;
1245:
1246: WSH_TRIPS_ACTIONS.PROCESS_CARRIER_SELECTION(
1247: p_init_msg_list => FND_API.G_FALSE,
1248: p_trip_id_tab => l_trip_id_tab,
1249: p_caller => p_action_prms.caller, -- WSH_FSTRX / WSH_PUB / WSH_GROUP/ FTE
1250: x_msg_count => l_msg_count,
1251: x_msg_data => l_msg_data,
1261: wsh_util_core.add_message(x_return_status,l_module_name);
1262: IF l_debug_on THEN
1263: wsh_debug_sv.logmsg(l_module_name,'FTE_NOT_INSTALLED');
1264: END IF;
1265: RAISE FND_API.G_EXC_ERROR;
1266: END IF;
1267:
1268: */ -- Hiding project
1269: ELSIF p_action_prms.action_code IN ('REMOVE-CONSOL', 'UNASSIGN-ALL') THEN
1300: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
1301: IF l_debug_on THEN
1302: wsh_debug_sv.log (l_module_name,'WSH_INVALID_ACTION_CODE');
1303: END IF;
1304: RAISE FND_API.G_EXC_ERROR;
1305: END IF;
1306:
1307: -- TP call back to unfirm continuous move or delete continuous move or
1308: -- any other action that will be done in the future based on the action performed
1308: -- any other action that will be done in the future based on the action performed
1309: IF WSH_UTIL_CORE.TP_IS_INSTALLED='Y' THEN
1310: WSH_FTE_TP_INTEGRATION.trip_callback (
1311: p_api_version_number => 1.0,
1312: p_init_msg_list => FND_API.G_TRUE,
1313: x_return_status => l_return_status,
1314: x_msg_count => l_msg_count,
1315: x_msg_data => l_msg_data,
1316: p_action_prms => p_action_prms,
1373: --
1374: --
1375: -- K LPN CONV. rv
1376:
1377: IF p_commit = FND_API.G_TRUE THEN
1378: --
1379: -- Start code for Bugfix 4070732 for commit
1380: --
1381: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1414: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1415: THEN --{
1416: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1417:
1418: IF p_commit = FND_API.G_TRUE THEN
1419:
1420: IF l_debug_on THEN
1421: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1422: END IF;
1454:
1455: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1456: OR x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1457: THEN
1458: IF p_commit = FND_API.G_TRUE THEN
1459: null;
1460: ELSE
1461: ROLLBACK TO s_trip_action_grp;
1462: END IF;
1471: --
1472: FND_MSG_PUB.Count_And_Get
1473: ( p_count => x_msg_count
1474: , p_data => x_msg_data
1475: ,p_encoded => FND_API.G_FALSE
1476: );
1477:
1478: IF l_debug_on THEN
1479: WSH_DEBUG_SV.pop(l_module_name);
1513:
1514: FND_MSG_PUB.Count_And_Get
1515: ( p_count => x_msg_count
1516: , p_data => x_msg_data
1517: ,p_encoded => FND_API.G_FALSE
1518: );
1519: IF l_debug_on THEN
1520: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR');
1521: WSH_DEBUG_SV.pop(l_module_name);
1521: WSH_DEBUG_SV.pop(l_module_name);
1522: END IF;
1523:
1524:
1525: WHEN FND_API.G_EXC_ERROR THEN
1526: ROLLBACK TO s_trip_action_grp;
1527: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1528:
1529: --
1554: --
1555: FND_MSG_PUB.Count_And_Get
1556: ( p_count => x_msg_count
1557: , p_data => x_msg_data
1558: ,p_encoded => FND_API.G_FALSE
1559: );
1560:
1561: IF l_debug_on THEN
1562: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
1562: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
1563: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR');
1564: WSH_DEBUG_SV.pop(l_module_name);
1565: END IF;
1566: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1567: ROLLBACK TO s_trip_action_grp;
1568: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1569:
1570: --
1592: --
1593: FND_MSG_PUB.Count_And_Get
1594: ( p_count => x_msg_count
1595: , p_data => x_msg_data
1596: ,p_encoded => FND_API.G_FALSE
1597: );
1598:
1599: IF l_debug_on THEN
1600: wsh_debug_sv.log (l_module_name,'G_EXC_UNEXPECTED_ERROR');
1667: --
1668: FND_MSG_PUB.Count_And_Get
1669: ( p_count => x_msg_count
1670: , p_data => x_msg_data
1671: ,p_encoded => FND_API.G_FALSE
1672: );
1673:
1674: IF l_debug_on THEN
1675: wsh_debug_sv.log (l_module_name,'G_EXC_WARNING');
1709:
1710: FND_MSG_PUB.Count_And_Get
1711: ( p_count => x_msg_count
1712: , p_data => x_msg_data
1713: ,p_encoded => FND_API.G_FALSE
1714: );
1715: IF l_debug_on THEN
1716: wsh_debug_sv.log (l_module_name,'Others',substr(sqlerrm,1,200));
1717: WSH_DEBUG_SV.pop(l_module_name);
1930:
1931: --get the trip info from db for these specific validations
1932: IF ( WSH_ACTIONS_LEVELS.g_validation_level_tab(WSH_ACTIONS_LEVELS.C_FREIGHT_CARRIER_LVL) = 1 )
1933: OR ( WSH_ACTIONS_LEVELS.g_validation_level_tab(WSH_ACTIONS_LEVELS.C_VEH_ORG_LVL) = 1
1934: AND p_trip_info_tab(l_index).vehicle_organization_id = fnd_api.G_MISS_NUM )
1935: OR ( WSH_ACTIONS_LEVELS.g_validation_level_tab(WSH_ACTIONS_LEVELS.C_CONSOL_ALLW_LVL) = 1 ) THEN
1936:
1937: OPEN get_trip_info(p_trip_info_tab(l_index).trip_id);
1938: FETCH get_trip_info INTO
2019: x_num_warnings =>l_num_warnings,
2020: x_num_errors =>l_num_errors);
2021:
2022:
2023: IF (nvl(l_db_trip_info.ship_method_code,FND_API.G_MISS_CHAR) <>
2024: nvl( p_trip_info_tab(l_index).ship_method_code,FND_API.G_MISS_CHAR) ) THEN
2025: WSH_BOLS_PVT.cancel_bol
2026: ( p_trip_id => p_trip_info_tab(l_index).trip_id
2027: ,p_old_ship_method_code => l_db_trip_info.ship_method_code
2020: x_num_errors =>l_num_errors);
2021:
2022:
2023: IF (nvl(l_db_trip_info.ship_method_code,FND_API.G_MISS_CHAR) <>
2024: nvl( p_trip_info_tab(l_index).ship_method_code,FND_API.G_MISS_CHAR) ) THEN
2025: WSH_BOLS_PVT.cancel_bol
2026: ( p_trip_id => p_trip_info_tab(l_index).trip_id
2027: ,p_old_ship_method_code => l_db_trip_info.ship_method_code
2028: ,p_new_ship_method_code => p_trip_info_tab(l_index).ship_method_code
2107: END IF;
2108:
2109: IF ( WSH_ACTIONS_LEVELS.g_validation_level_tab(WSH_ACTIONS_LEVELS.C_VEH_ORG_LVL) = 1 ) THEN
2110:
2111: IF (p_trip_info_tab(l_index).vehicle_organization_id = fnd_api.G_MISS_NUM ) THEN --Bug 3534623
2112: p_trip_info_tab(l_index).vehicle_organization_id:=l_db_trip_info.vehicle_organization_id;
2113: END IF;
2114:
2115: IF (p_trip_info_tab(l_index).vehicle_organization_id IS NOT NULL ) THEN
2154: --Bug# 3565374 - Start
2155: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2156: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2157: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
2158: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2159: END IF;
2160: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => p_trip_info_tab(l_index).VEHICLE_ITEM_ID,
2161: p_organization_id => p_trip_info_tab(l_index).VEHICLE_ORGANIZATION_ID);
2162: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => p_trip_info_tab(l_index).VEHICLE_ORGANIZATION_ID);
2264: WSH_DEBUG_SV.logmsg(l_module_name,'e_mixed_trip_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2265: END IF;
2266: -- J-IB-NPARIKH-}
2267:
2268: WHEN fnd_api.g_exc_error THEN
2269: Rollback to validate_trip_loop_grp;
2270:
2271: WHEN fnd_api.g_exc_unexpected_error THEN
2272: Rollback to validate_trip_loop_grp;
2267:
2268: WHEN fnd_api.g_exc_error THEN
2269: Rollback to validate_trip_loop_grp;
2270:
2271: WHEN fnd_api.g_exc_unexpected_error THEN
2272: Rollback to validate_trip_loop_grp;
2273:
2274: WHEN others THEN
2275: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2273:
2274: WHEN others THEN
2275: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2276: ROLLBACK TO SAVEPOINT validate_trip_loop_grp;
2277: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2278:
2279: END;
2280: l_index := p_trip_info_tab.NEXT(l_index);
2281: END LOOP;
2293: IF l_debug_on THEN
2294: WSH_DEBUG_SV.pop(l_module_name);
2295: END IF;
2296: EXCEPTION
2297: WHEN FND_API.G_EXC_ERROR THEN
2298: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2299: FND_MSG_PUB.Count_And_Get (
2300: p_count => x_msg_count,
2301: p_data => x_msg_data,
2298: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2299: FND_MSG_PUB.Count_And_Get (
2300: p_count => x_msg_count,
2301: p_data => x_msg_data,
2302: p_encoded => FND_API.G_FALSE);
2303: IF l_debug_on THEN
2304: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',
2305: WSH_DEBUG_SV.C_EXCEP_LEVEL);
2306: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2300: p_count => x_msg_count,
2301: p_data => x_msg_data,
2302: p_encoded => FND_API.G_FALSE);
2303: IF l_debug_on THEN
2304: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',
2305: WSH_DEBUG_SV.C_EXCEP_LEVEL);
2306: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2307: END IF;
2308: ROLLBACK TO SAVEPOINT validate_trip_grp;
2302: p_encoded => FND_API.G_FALSE);
2303: IF l_debug_on THEN
2304: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',
2305: WSH_DEBUG_SV.C_EXCEP_LEVEL);
2306: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2307: END IF;
2308: ROLLBACK TO SAVEPOINT validate_trip_grp;
2309:
2310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2306: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2307: END IF;
2308: ROLLBACK TO SAVEPOINT validate_trip_grp;
2309:
2310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2311: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2312: FND_MSG_PUB.Count_And_Get (
2313: p_count => x_msg_count,
2314: p_data => x_msg_data,
2311: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2312: FND_MSG_PUB.Count_And_Get (
2313: p_count => x_msg_count,
2314: p_data => x_msg_data,
2315: p_encoded => FND_API.G_FALSE);
2316: IF l_debug_on THEN
2317: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',
2318: WSH_DEBUG_SV.C_EXCEP_LEVEL);
2319: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2313: p_count => x_msg_count,
2314: p_data => x_msg_data,
2315: p_encoded => FND_API.G_FALSE);
2316: IF l_debug_on THEN
2317: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',
2318: WSH_DEBUG_SV.C_EXCEP_LEVEL);
2319: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2320: END IF;
2321: ROLLBACK TO SAVEPOINT validate_trip_grp;
2315: p_encoded => FND_API.G_FALSE);
2316: IF l_debug_on THEN
2317: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',
2318: WSH_DEBUG_SV.C_EXCEP_LEVEL);
2319: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2320: END IF;
2321: ROLLBACK TO SAVEPOINT validate_trip_grp;
2322:
2323: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2324: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2325: FND_MSG_PUB.Count_And_Get (
2326: p_count => x_msg_count,
2327: p_data => x_msg_data,
2328: p_encoded => FND_API.G_FALSE);
2329: IF l_debug_on THEN
2330: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',
2331: WSH_DEBUG_SV.C_EXCEP_LEVEL);
2332: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2339: wsh_util_core.default_handler ('WSH_TRIP_STOPS_GRP.Validate_Trip');
2340: FND_MSG_PUB.Count_And_Get (
2341: p_count => x_msg_count,
2342: p_data => x_msg_data,
2343: p_encoded => FND_API.G_FALSE);
2344: IF l_debug_on THEN
2345: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2346: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2347: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2354: --========================================================================
2355: -- PROCEDURE : Create_Update_Trip CORE API
2356: --
2357: -- PARAMETERS: p_api_version_number known api versionerror buffer
2358: -- p_init_msg_list FND_API.G_TRUE to reset list
2359: -- x_return_status return status
2360: -- x_msg_count number of messages in the list
2361: -- x_msg_data text of messages
2362: -- p_trip_info_tab Table of Attributes for the trip entity
2459: wsh_debug_sv.log (l_module_name,'p_shipmethod_code',p_trip_info_tab(i).ship_method_code);
2460: END LOOP;
2461: END IF;
2462:
2463: IF NOT FND_API.Compatible_API_Call(l_api_version_number, p_api_version_number,l_api_name,G_PKG_NAME) THEN
2464: IF l_debug_on THEN
2465: WSH_DEBUG_SV.logmsg(l_module_name,'Not compatible');
2466: END IF;
2467: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2463: IF NOT FND_API.Compatible_API_Call(l_api_version_number, p_api_version_number,l_api_name,G_PKG_NAME) THEN
2464: IF l_debug_on THEN
2465: WSH_DEBUG_SV.logmsg(l_module_name,'Not compatible');
2466: END IF;
2467: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2468: END IF;
2469:
2470: IF FND_API.to_Boolean(p_init_msg_list) THEN
2471: FND_MSG_PUB.initialize;
2466: END IF;
2467: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2468: END IF;
2469:
2470: IF FND_API.to_Boolean(p_init_msg_list) THEN
2471: FND_MSG_PUB.initialize;
2472: END IF;
2473:
2474: IF (p_in_rec.caller IS NULL) THEN
2474: IF (p_in_rec.caller IS NULL) THEN
2475: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2476: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_in_rec.caller');
2477: wsh_util_core.add_message(x_return_status,l_module_name);
2478: raise fnd_api.g_exc_error;
2479: END IF;
2480:
2481: -- for Load Tender
2482: IF (p_in_rec.action_code IS NULL OR p_in_rec.action_code NOT IN ('CREATE','UPDATE','FTE_LOAD_TENDER') ) THEN
2482: IF (p_in_rec.action_code IS NULL OR p_in_rec.action_code NOT IN ('CREATE','UPDATE','FTE_LOAD_TENDER') ) THEN
2483: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2484: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_in_rec.action_code');
2485: wsh_util_core.add_message(x_return_status,l_module_name);
2486: raise fnd_api.g_exc_error;
2487: END IF;
2488:
2489: IF (nvl(p_in_rec.phase,1) < 1) THEN
2490: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2489: IF (nvl(p_in_rec.phase,1) < 1) THEN
2490: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2491: FND_MESSAGE.SET_TOKEN('FIELD_NAME','p_in_rec.phase');
2492: wsh_util_core.add_message(x_return_status,l_module_name);
2493: raise fnd_api.g_exc_error;
2494: END IF;
2495:
2496: IF (p_trip_info_tab.count = 0 ) THEN
2497: l_p_trip_info_tab(1):=l_pvt_trip_rec;
2531: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
2532: x_num_warnings =>l_num_warnings,
2533: x_num_errors =>l_num_errors);
2534: EXCEPTION
2535: WHEN fnd_api.g_exc_error THEN
2536: Rollback to l_sp_disabled_list;
2537:
2538: WHEN fnd_api.g_exc_unexpected_error THEN
2539: Rollback to l_sp_disabled_list;
2534: EXCEPTION
2535: WHEN fnd_api.g_exc_error THEN
2536: Rollback to l_sp_disabled_list;
2537:
2538: WHEN fnd_api.g_exc_unexpected_error THEN
2539: Rollback to l_sp_disabled_list;
2540:
2541: WHEN others THEN
2542: Rollback to l_sp_disabled_list;
2540:
2541: WHEN others THEN
2542: Rollback to l_sp_disabled_list;
2543: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2544: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2545: END;
2546: l_index := l_p_trip_info_tab.NEXT(l_index);
2547: END LOOP;
2548:
2546: l_index := l_p_trip_info_tab.NEXT(l_index);
2547: END LOOP;
2548:
2549: IF (l_num_errors = l_p_trip_info_tab.COUNT) THEN
2550: raise fnd_api.g_exc_error;
2551: END IF;
2552: ELSE
2553: l_trip_info_tab := l_p_trip_info_tab;
2554: END IF;
2787:
2788: --if org is a tpw/cms and current ignore plan is 'N', change ignore plan by
2789: --calling api.
2790:
2791: IF nvl(l_wh_type, FND_API.G_MISS_CHAR) IN ('TPW','CMS') THEN
2792: l_trip_ids(1):=l_trip_info_tab(x_valid_index_tab(l_index)).trip_id;
2793: wsh_tp_release.change_ignoreplan_status
2794: (p_entity => 'TRIP',
2795: p_in_ids => l_trip_ids,
2811: l_action_prms.action_code:=p_in_rec.action_code;
2812: l_action_prms.caller:=p_in_rec.caller;
2813: WSH_FTE_TP_INTEGRATION.trip_callback (
2814: p_api_version_number => 1.0,
2815: p_init_msg_list => FND_API.G_TRUE,
2816: x_return_status => l_return_status,
2817: x_msg_count => l_msg_count,
2818: x_msg_data => l_msg_data,
2819: p_action_prms => l_action_prms,
2835:
2836: END IF;--create or update
2837:
2838: EXCEPTION
2839: WHEN fnd_api.g_exc_error THEN
2840: Rollback to l_trip;
2841:
2842: WHEN fnd_api.g_exc_unexpected_error THEN
2843: Rollback to l_trip;
2838: EXCEPTION
2839: WHEN fnd_api.g_exc_error THEN
2840: Rollback to l_trip;
2841:
2842: WHEN fnd_api.g_exc_unexpected_error THEN
2843: Rollback to l_trip;
2844:
2845: WHEN others THEN
2846: Rollback to l_trip;
2843: Rollback to l_trip;
2844:
2845: WHEN others THEN
2846: Rollback to l_trip;
2847: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2848: END;
2849: l_index := x_valid_index_tab.NEXT(l_index);
2850: END LOOP;
2851:
2858: ELSE
2859: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2860: END IF;
2861:
2862: IF FND_API.To_Boolean( p_commit ) THEN
2863: COMMIT WORK;
2864: END IF;
2865:
2866: FND_MSG_PUB.Count_And_Get
2865:
2866: FND_MSG_PUB.Count_And_Get
2867: ( p_count => x_msg_count,
2868: p_data => x_msg_data,
2869: p_encoded => FND_API.G_FALSE );
2870:
2871: IF l_debug_on THEN
2872: WSH_DEBUG_SV.pop(l_module_name);
2873: END IF;
2878: wsh_util_core.add_message(x_return_status,l_module_name);
2879: FND_MSG_PUB.Count_And_Get (
2880: p_count => x_msg_count,
2881: p_data => x_msg_data,
2882: p_encoded => FND_API.G_FALSE);
2883: IF l_debug_on THEN
2884: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2885: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
2886: END IF;
2885: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
2886: END IF;
2887: ROLLBACK TO create_update_trip_grp;
2888:
2889: WHEN FND_API.G_EXC_ERROR THEN
2890: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2891: FND_MSG_PUB.Count_And_Get (
2892: p_count => x_msg_count,
2893: p_data => x_msg_data,
2890: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2891: FND_MSG_PUB.Count_And_Get (
2892: p_count => x_msg_count,
2893: p_data => x_msg_data,
2894: p_encoded => FND_API.G_FALSE);
2895: IF l_debug_on THEN
2896: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2897: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2898: END IF;
2892: p_count => x_msg_count,
2893: p_data => x_msg_data,
2894: p_encoded => FND_API.G_FALSE);
2895: IF l_debug_on THEN
2896: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2897: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2898: END IF;
2899: ROLLBACK TO create_update_trip_grp;
2900:
2893: p_data => x_msg_data,
2894: p_encoded => FND_API.G_FALSE);
2895: IF l_debug_on THEN
2896: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2897: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2898: END IF;
2899: ROLLBACK TO create_update_trip_grp;
2900:
2901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2897: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2898: END IF;
2899: ROLLBACK TO create_update_trip_grp;
2900:
2901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2902: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2903: FND_MSG_PUB.Count_And_Get (
2904: p_count => x_msg_count,
2905: p_data => x_msg_data,
2902: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2903: FND_MSG_PUB.Count_And_Get (
2904: p_count => x_msg_count,
2905: p_data => x_msg_data,
2906: p_encoded => FND_API.G_FALSE);
2907: IF l_debug_on THEN
2908: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2909: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2910: END IF;
2904: p_count => x_msg_count,
2905: p_data => x_msg_data,
2906: p_encoded => FND_API.G_FALSE);
2907: IF l_debug_on THEN
2908: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2909: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2910: END IF;
2911: ROLLBACK TO create_update_trip_grp;
2912:
2905: p_data => x_msg_data,
2906: p_encoded => FND_API.G_FALSE);
2907: IF l_debug_on THEN
2908: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2909: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2910: END IF;
2911: ROLLBACK TO create_update_trip_grp;
2912:
2913: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2914: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2915: FND_MSG_PUB.Count_And_Get (
2916: p_count => x_msg_count,
2917: p_data => x_msg_data,
2918: p_encoded => FND_API.G_FALSE);
2919: IF l_debug_on THEN
2920: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2921: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2922: END IF;
2928: wsh_util_core.default_handler ('WSH_TRIP_STOPS_GRP.CREATE_UPDATE_STOP');
2929: FND_MSG_PUB.Count_And_Get (
2930: p_count => x_msg_count,
2931: p_data => x_msg_data,
2932: p_encoded => FND_API.G_FALSE);
2933: IF l_debug_on THEN
2934: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2935: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2936: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2942: --========================================================================
2943: -- PROCEDURE : Create_Update_Trip Wrapper
2944: --
2945: -- PARAMETERS: p_api_version_number known api versionerror buffer
2946: -- p_init_msg_list FND_API.G_TRUE to reset list
2947: -- x_return_status return status
2948: -- x_msg_count number of messages in the list
2949: -- x_msg_data text of messages
2950: -- p_trip_info Attributes for the trip entity
3010: WSH_DEBUG_SV.log(l_module_name,'LANE_ID',p_trip_info.lane_id);
3011: END IF;
3012: --
3013:
3014: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3015: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3016: END IF;
3017:
3018: IF FND_API.to_Boolean(p_init_msg_list) THEN
3011: END IF;
3012: --
3013:
3014: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3015: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3016: END IF;
3017:
3018: IF FND_API.to_Boolean(p_init_msg_list) THEN
3019: FND_MSG_PUB.initialize;
3014: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3015: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3016: END IF;
3017:
3018: IF FND_API.to_Boolean(p_init_msg_list) THEN
3019: FND_MSG_PUB.initialize;
3020: END IF;
3021:
3022: map_tripgrp_to_pvt (
3026: IF l_debug_on THEN
3027: wsh_debug_sv.log (l_module_name, 'map_tripgrp_to_pvt x_return_status',x_return_status);
3028: END IF;
3029: IF ( x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3030: raise FND_API.G_EXC_ERROR;
3031: END IF;
3032:
3033: l_trip_info_tab(1):= l_pvt_trip_rec;
3034:
3070: IF l_debug_on THEN
3071: WSH_DEBUG_SV.pop(l_module_name);
3072: END IF;
3073: EXCEPTION
3074: WHEN FND_API.G_EXC_ERROR THEN
3075: IF l_debug_on THEN
3076: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3077: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3078: END IF;
3072: END IF;
3073: EXCEPTION
3074: WHEN FND_API.G_EXC_ERROR THEN
3075: IF l_debug_on THEN
3076: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3077: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3078: END IF;
3079:
3080: WHEN OTHERS THEN
3073: EXCEPTION
3074: WHEN FND_API.G_EXC_ERROR THEN
3075: IF l_debug_on THEN
3076: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3077: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3078: END IF;
3079:
3080: WHEN OTHERS THEN
3081: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3091: --========================================================================
3092: -- PROCEDURE : Create_Update_Trip Wrapper
3093: --
3094: -- PARAMETERS: p_api_version_number known api versionerror buffer
3095: -- p_init_msg_list FND_API.G_TRUE to reset list
3096: -- x_return_status return status
3097: -- x_msg_count number of messages in the list
3098: -- x_msg_data text of messages
3099: -- p_trip_info Attributes for the trip entity
3113: x_msg_count OUT NOCOPY NUMBER,
3114: x_msg_data OUT NOCOPY VARCHAR2,
3115: p_action_code IN VARCHAR2,
3116: p_trip_info IN OUT NOCOPY Trip_Pub_Rec_Type,
3117: p_trip_name IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR,
3118: x_trip_id OUT NOCOPY NUMBER,
3119: x_trip_name OUT NOCOPY VARCHAR2) IS
3120:
3121: l_api_version_number CONSTANT NUMBER := 1.0;
3160: WSH_DEBUG_SV.log(l_module_name,'FREIGHT_TERMS_CODE',p_trip_info.freight_terms_code);
3161: WSH_DEBUG_SV.log(l_module_name,'LANE_ID',p_trip_info.lane_id);
3162: END IF;
3163:
3164: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3166: END IF;
3167:
3168: IF FND_API.to_Boolean(p_init_msg_list) THEN
3161: WSH_DEBUG_SV.log(l_module_name,'LANE_ID',p_trip_info.lane_id);
3162: END IF;
3163:
3164: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3166: END IF;
3167:
3168: IF FND_API.to_Boolean(p_init_msg_list) THEN
3169: FND_MSG_PUB.initialize;
3164: IF NOT FND_API.Compatible_API_Call (l_api_version_number,p_api_version_number ,l_api_name ,G_PKG_NAME) THEN
3165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3166: END IF;
3167:
3168: IF FND_API.to_Boolean(p_init_msg_list) THEN
3169: FND_MSG_PUB.initialize;
3170: END IF;
3171:
3172: map_tripgrp_to_pvt (
3176: IF l_debug_on THEN
3177: wsh_debug_sv.log (l_module_name, 'map_tripgrp_to_pvt x_return_status',x_return_status);
3178: END IF;
3179: IF ( x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3180: raise FND_API.G_EXC_ERROR;
3181: END IF;
3182:
3183: IF (p_trip_name IS NOT NULL) AND (p_trip_name <> FND_API.G_MISS_CHAR) THEN
3184: l_pvt_trip_rec.name := p_trip_name;
3179: IF ( x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3180: raise FND_API.G_EXC_ERROR;
3181: END IF;
3182:
3183: IF (p_trip_name IS NOT NULL) AND (p_trip_name <> FND_API.G_MISS_CHAR) THEN
3184: l_pvt_trip_rec.name := p_trip_name;
3185: END IF;
3186:
3187: l_in_rec.caller:='WSH_GRP';
3228: IF l_debug_on THEN
3229: WSH_DEBUG_SV.pop(l_module_name);
3230: END IF;
3231: EXCEPTION
3232: WHEN FND_API.G_EXC_ERROR THEN
3233: IF l_debug_on THEN
3234: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3235: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3236: END IF;
3230: END IF;
3231: EXCEPTION
3232: WHEN FND_API.G_EXC_ERROR THEN
3233: IF l_debug_on THEN
3234: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3235: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3236: END IF;
3237:
3238: WHEN OTHERS THEN
3231: EXCEPTION
3232: WHEN FND_API.G_EXC_ERROR THEN
3233: IF l_debug_on THEN
3234: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3235: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3236: END IF;
3237:
3238: WHEN OTHERS THEN
3239: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3255: CURSOR c_old_trip_details(v_trip_id IN NUMBER) IS
3256: SELECT TRIP_ID,
3257: NAME,
3258: ARRIVE_AFTER_TRIP_ID,
3259: --FND_API.G_MISS_CHAR, -- ARRIVE_AFTER_TRIP_NAME
3260: VEHICLE_ITEM_ID,
3261: --FND_API.G_MISS_CHAR, -- VEHICLE_ITEM_DESC
3262: VEHICLE_ORGANIZATION_ID,
3263: --FND_API.G_MISS_CHAR, -- VEHICLE_ORGANIZATION_CODE
3257: NAME,
3258: ARRIVE_AFTER_TRIP_ID,
3259: --FND_API.G_MISS_CHAR, -- ARRIVE_AFTER_TRIP_NAME
3260: VEHICLE_ITEM_ID,
3261: --FND_API.G_MISS_CHAR, -- VEHICLE_ITEM_DESC
3262: VEHICLE_ORGANIZATION_ID,
3263: --FND_API.G_MISS_CHAR, -- VEHICLE_ORGANIZATION_CODE
3264: VEHICLE_NUMBER,
3265: VEHICLE_NUM_PREFIX,
3259: --FND_API.G_MISS_CHAR, -- ARRIVE_AFTER_TRIP_NAME
3260: VEHICLE_ITEM_ID,
3261: --FND_API.G_MISS_CHAR, -- VEHICLE_ITEM_DESC
3262: VEHICLE_ORGANIZATION_ID,
3263: --FND_API.G_MISS_CHAR, -- VEHICLE_ORGANIZATION_CODE
3264: VEHICLE_NUMBER,
3265: VEHICLE_NUM_PREFIX,
3266: CARRIER_ID,
3267: SHIP_METHOD_CODE,
3264: VEHICLE_NUMBER,
3265: VEHICLE_NUM_PREFIX,
3266: CARRIER_ID,
3267: SHIP_METHOD_CODE,
3268: --FND_API.G_MISS_CHAR, -- SHIP_METHOD_NAME
3269: ROUTE_ID,
3270: ROUTING_INSTRUCTIONS,
3271: ATTRIBUTE_CATEGORY,
3272: ATTRIBUTE1,