[Home] [Help]
2: /* $Header: FTEVDLGB.pls 120.3 2005/07/28 12:34:44 nltan ship $ */
3: --{
4: PROCEDURE search_segment_save
5: (
6: P_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
7: X_return_status OUT NOCOPY VARCHAR2,
8: X_msg_count OUT NOCOPY NUMBER,
9: X_msg_data OUT NOCOPY VARCHAR2,
10: p_delivery_id IN NUMBER,
81: --
82: -- Initialize message list if p_init_msg_list is set to TRUE.
83: --
84: --
85: IF FND_API.to_Boolean( p_init_msg_list )
86: THEN
87: FND_MSG_PUB.initialize;
88: END IF;
89: --
136: );
137: --}
138: EXCEPTION
139: --{
140: WHEN FND_API.G_EXC_ERROR THEN
141: ROLLBACK TO SEARCH_SEGMENT_SAVE_PUB;
142: x_return_status := FND_API.G_RET_STS_ERROR ;
143: FND_MSG_PUB.Count_And_Get
144: (
138: EXCEPTION
139: --{
140: WHEN FND_API.G_EXC_ERROR THEN
141: ROLLBACK TO SEARCH_SEGMENT_SAVE_PUB;
142: x_return_status := FND_API.G_RET_STS_ERROR ;
143: FND_MSG_PUB.Count_And_Get
144: (
145: p_count => x_msg_count,
146: p_data => x_msg_data,
143: FND_MSG_PUB.Count_And_Get
144: (
145: p_count => x_msg_count,
146: p_data => x_msg_data,
147: p_encoded => FND_API.G_FALSE
148: );
149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
150: ROLLBACK TO SEARCH_SEGMENT_SAVE_PUB;
151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
145: p_count => x_msg_count,
146: p_data => x_msg_data,
147: p_encoded => FND_API.G_FALSE
148: );
149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
150: ROLLBACK TO SEARCH_SEGMENT_SAVE_PUB;
151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
152: FND_MSG_PUB.Count_And_Get
153: (
147: p_encoded => FND_API.G_FALSE
148: );
149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
150: ROLLBACK TO SEARCH_SEGMENT_SAVE_PUB;
151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
152: FND_MSG_PUB.Count_And_Get
153: (
154: p_count => x_msg_count,
155: p_data => x_msg_data,
152: FND_MSG_PUB.Count_And_Get
153: (
154: p_count => x_msg_count,
155: p_data => x_msg_data,
156: p_encoded => FND_API.G_FALSE
157: );
158: WHEN OTHERS THEN
159: ROLLBACK TO SEARCH_SEGMENT_SAVE_PUB;
160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
156: p_encoded => FND_API.G_FALSE
157: );
158: WHEN OTHERS THEN
159: ROLLBACK TO SEARCH_SEGMENT_SAVE_PUB;
160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
161: --
162: --
163: wsh_util_core.default_handler('FTE_DELIVERY_LEGS_PVT.search_segment_save');
164: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
167: FND_MSG_PUB.Count_And_Get
168: (
169: p_count => x_msg_count,
170: p_data => x_msg_data,
171: p_encoded => FND_API.G_FALSE
172: );
173: --}
174: END search_segment_save;
175: --
175: --
176: --
177: PROCEDURE process_delivery_leg
178: (
179: P_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
180: X_return_status OUT NOCOPY VARCHAR2,
181: X_msg_count OUT NOCOPY NUMBER,
182: X_msg_data OUT NOCOPY VARCHAR2,
183: p_ui_page_name IN VARCHAR2 DEFAULT GK_DLEG_WB_PAGE,
352: --
353: -- Initialize message list if p_init_msg_list is set to TRUE.
354: --
355: --
356: IF FND_API.to_Boolean( p_init_msg_list )
357: THEN
358: FND_MSG_PUB.initialize;
359: END IF;
360: --
459: )
460: OR p_ui_page_name = GK_SEARCH_SEGMENTS_PAGE
461: THEN
462: --{
463: l_old_lane_id := FND_API.G_MISS_NUM;
464: l_old_schedule_id := FND_API.G_MISS_NUM;
465: l_old_carrier_id := FND_API.G_MISS_NUM;
466: l_old_mode_of_transport := FND_API.G_MISS_CHAR;
467: l_old_service_level := FND_API.G_MISS_CHAR;
460: OR p_ui_page_name = GK_SEARCH_SEGMENTS_PAGE
461: THEN
462: --{
463: l_old_lane_id := FND_API.G_MISS_NUM;
464: l_old_schedule_id := FND_API.G_MISS_NUM;
465: l_old_carrier_id := FND_API.G_MISS_NUM;
466: l_old_mode_of_transport := FND_API.G_MISS_CHAR;
467: l_old_service_level := FND_API.G_MISS_CHAR;
468: --
461: THEN
462: --{
463: l_old_lane_id := FND_API.G_MISS_NUM;
464: l_old_schedule_id := FND_API.G_MISS_NUM;
465: l_old_carrier_id := FND_API.G_MISS_NUM;
466: l_old_mode_of_transport := FND_API.G_MISS_CHAR;
467: l_old_service_level := FND_API.G_MISS_CHAR;
468: --
469: --
462: --{
463: l_old_lane_id := FND_API.G_MISS_NUM;
464: l_old_schedule_id := FND_API.G_MISS_NUM;
465: l_old_carrier_id := FND_API.G_MISS_NUM;
466: l_old_mode_of_transport := FND_API.G_MISS_CHAR;
467: l_old_service_level := FND_API.G_MISS_CHAR;
468: --
469: --
470: FOR wsh_trip_rec IN wsh_trip_cur
463: l_old_lane_id := FND_API.G_MISS_NUM;
464: l_old_schedule_id := FND_API.G_MISS_NUM;
465: l_old_carrier_id := FND_API.G_MISS_NUM;
466: l_old_mode_of_transport := FND_API.G_MISS_CHAR;
467: l_old_service_level := FND_API.G_MISS_CHAR;
468: --
469: --
470: FOR wsh_trip_rec IN wsh_trip_cur
471: (
473: )
474: LOOP
475: --{
476: l_old_lane_id
477: := NVL(wsh_trip_rec.lane_id,FND_API.G_MISS_NUM);
478: --
479: l_old_schedule_id
480: := NVL(wsh_trip_rec.schedule_id,FND_API.G_MISS_NUM);
481: --
476: l_old_lane_id
477: := NVL(wsh_trip_rec.lane_id,FND_API.G_MISS_NUM);
478: --
479: l_old_schedule_id
480: := NVL(wsh_trip_rec.schedule_id,FND_API.G_MISS_NUM);
481: --
482: l_old_carrier_id
483: := NVL(wsh_trip_rec.carrier_id,FND_API.G_MISS_NUM);
484: --
479: l_old_schedule_id
480: := NVL(wsh_trip_rec.schedule_id,FND_API.G_MISS_NUM);
481: --
482: l_old_carrier_id
483: := NVL(wsh_trip_rec.carrier_id,FND_API.G_MISS_NUM);
484: --
485: l_old_mode_of_transport
486: := NVL(wsh_trip_rec.mode_of_transport,FND_API.G_MISS_CHAR);
487: --
482: l_old_carrier_id
483: := NVL(wsh_trip_rec.carrier_id,FND_API.G_MISS_NUM);
484: --
485: l_old_mode_of_transport
486: := NVL(wsh_trip_rec.mode_of_transport,FND_API.G_MISS_CHAR);
487: --
488: l_old_service_level
489: := NVL(wsh_trip_rec.service_level,FND_API.G_MISS_CHAR);
490: --
485: l_old_mode_of_transport
486: := NVL(wsh_trip_rec.mode_of_transport,FND_API.G_MISS_CHAR);
487: --
488: l_old_service_level
489: := NVL(wsh_trip_rec.service_level,FND_API.G_MISS_CHAR);
490: --
491: --
492: IF wsh_trip_rec.consolidation_allowed = 'Y'
493: AND p_pricing_request_id IS NOT NULL
535: --
536: IF l_pickup_stop_id IS NOT NULL
537: THEN
538: --{
539: l_old_stop_location_id := FND_API.G_MISS_NUM;
540: --
541: --
542: FOR stop_location_rec IN stop_location_cur
543: (
566: --
567: IF l_dropoff_stop_id IS NOT NULL
568: THEN
569: --{
570: l_old_stop_location_id := FND_API.G_MISS_NUM;
571: --
572: --
573: FOR stop_location_rec IN stop_location_cur
574: (
643: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
644: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
645: THEN
646: --{
647: RAISE FND_API.G_EXC_ERROR;
648: --RETURN;
649: --}
650: END IF;
651: --}
687: END IF;
688: fte_mls_wrapper.create_update_stop
689: (
690: p_api_version_number => 1.0,
691: p_init_msg_list => FND_API.G_FALSE,
692: x_return_status => l_return_status,
693: x_msg_count => l_msg_count,
694: x_msg_data => l_msg_data,
695: p_action_code => K_UPDATE,
697: p_stop_location_id => stop_rec.stop_location_id,
698: pp_stop_location_id => stop_rec.stop_location_id,
699: pp_STOP_ID => stop_rec.stop_id,
700: pp_TRIP_ID => p_wsh_trip_id,
701: pp_STOP_SEQUENCE_NUMBER => FND_API.G_MISS_NUM,
702: x_stop_id => l_stop_id
703: );
704: --
705: --
721: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
722: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
723: THEN
724: --{
725: RAISE FND_API.G_EXC_ERROR;
726: --RETURN;
727: --}
728: END IF;
729: --
759: --{
760: fte_mls_wrapper.create_update_trip
761: (
762: p_api_version_number => 1.0,
763: p_init_msg_list => FND_API.G_FALSE,
764: x_return_status => l_return_status,
765: x_msg_count => l_msg_count,
766: x_msg_data => l_msg_data,
767: p_action_code => l_wsh_trip_action,
804: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
805: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
806: THEN
807: --{
808: RAISE FND_API.G_EXC_ERROR;
809: --RETURN;
810: --}
811: END IF;
812: --}
814: THEN
815: --{
816: assign_service_to_segment
817: (
818: p_init_msg_list => FND_API.G_FALSE,
819: x_return_status => l_return_status,
820: x_msg_count => l_msg_count,
821: x_msg_data => l_msg_data,
822: p_wsh_trip_id => l_wsh_trip_id,
863: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
864: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
865: THEN
866: --{
867: RAISE FND_API.G_EXC_ERROR;
868: --RETURN;
869: --}
870: END IF;
871: --}
899: END IF;
900: fte_mls_wrapper.create_update_stop
901: (
902: p_api_version_number => 1.0,
903: p_init_msg_list => FND_API.G_FALSE,
904: x_return_status => l_return_status,
905: x_msg_count => l_msg_count,
906: x_msg_data => l_msg_data,
907: p_action_code => l_pickup_stop_action,
908: p_trip_id => l_wsh_trip_id,
909: p_stop_location_id => p_pickup_location_id,
910: p_planned_dep_date => p_pickup_departure_date,
911: pp_TRIP_ID => l_wsh_trip_id,
912: pp_STOP_SEQUENCE_NUMBER => FND_API.G_MISS_NUM,
913: pp_STOP_LOCATION_ID => p_pickup_location_id,
914: pp_PLANNED_ARRIVAL_DATE => p_pickup_arrival_date,
915: pp_PLANNED_DEPARTURE_DATE => p_pickup_departure_date,
916: pp_WEIGHT_UOM_CODE => l_dlvy_weight_uom,
921: ELSE
922: fte_mls_wrapper.create_update_stop
923: (
924: p_api_version_number => 1.0,
925: p_init_msg_list => FND_API.G_FALSE,
926: x_return_status => l_return_status,
927: x_msg_count => l_msg_count,
928: x_msg_data => l_msg_data,
929: p_action_code => l_pickup_stop_action,
960: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
961: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
962: THEN
963: --{
964: RAISE FND_API.G_EXC_ERROR;
965: --RETURN;
966: --}
967: END IF;
968: --}
988: CLOSE dlvy_weight_volume_cur;
989: fte_mls_wrapper.create_update_stop
990: (
991: p_api_version_number => 1.0,
992: p_init_msg_list => FND_API.G_FALSE,
993: x_return_status => l_return_status,
994: x_msg_count => l_msg_count,
995: x_msg_data => l_msg_data,
996: p_action_code => l_dropoff_stop_action,
997: p_trip_id => l_wsh_trip_id,
998: p_stop_location_id => p_dropoff_location_id,
999: p_planned_dep_date => p_dropoff_departure_date,
1000: pp_TRIP_ID => l_wsh_trip_id,
1001: pp_STOP_SEQUENCE_NUMBER => FND_API.G_MISS_NUM,
1002: pp_STOP_LOCATION_ID => p_dropoff_location_id,
1003: pp_PLANNED_ARRIVAL_DATE => p_dropoff_arrival_date,
1004: pp_PLANNED_DEPARTURE_DATE => p_dropoff_departure_date,
1005: pp_WEIGHT_UOM_CODE => l_dlvy_weight_uom,
1010: ELSE
1011: fte_mls_wrapper.create_update_stop
1012: (
1013: p_api_version_number => 1.0,
1014: p_init_msg_list => FND_API.G_FALSE,
1015: x_return_status => l_return_status,
1016: x_msg_count => l_msg_count,
1017: x_msg_data => l_msg_data,
1018: p_action_code => l_dropoff_stop_action,
1053: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
1054: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1055: THEN
1056: --{
1057: RAISE FND_API.G_EXC_ERROR;
1058: --RETURN;
1059: --}
1060: END IF;
1061: --}
1067: --{
1068: fte_mls_wrapper.Delivery_Action
1069: (
1070: p_api_version_number => 1.0,
1071: p_init_msg_list => FND_API.G_FALSE,
1072: x_return_status => l_return_status,
1073: x_msg_count => l_msg_count,
1074: x_msg_data => l_msg_data,
1075: p_action_code => 'ASSIGN-TRIP',
1114: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
1115: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1116: THEN
1117: --{
1118: RAISE FND_API.G_EXC_ERROR;
1119: --RETURN;
1120: --}
1121: END IF;
1122: --}
1128: --{
1129: fte_trips_pvt.Create_Update_Delete_Fte_Trip
1130: (
1131: p_api_version_number => 1.0,
1132: p_init_msg_list => FND_API.G_FALSE,
1133: x_return_status => l_return_status,
1134: x_msg_count => l_msg_count,
1135: x_msg_data => l_msg_data,
1136: p_action_code => l_fte_trip_action,
1159: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
1160: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1161: THEN
1162: --{
1163: RAISE FND_API.G_EXC_ERROR;
1164: --RETURN;
1165: --}
1166: END IF;
1167: --
1167: --
1168: --
1169: fte_wsh_trips_pvt.Create_Update_Trip_Wrapper
1170: (
1171: p_init_msg_list => FND_API.G_FALSE,
1172: x_return_status => l_return_status,
1173: x_msg_count => l_msg_count,
1174: x_msg_data => l_msg_data,
1175: p_action_code => l_fte_trip_action,
1196: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
1197: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1198: THEN
1199: --{
1200: RAISE FND_API.G_EXC_ERROR;
1201: --RETURN;
1202: --}
1203: END IF;
1204: --}
1243: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
1244: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1245: THEN
1246: --{
1247: RAISE FND_API.G_EXC_ERROR;
1248: --RETURN;
1249: --}
1250: END IF;
1251: --}
1293: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
1294: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1295: THEN
1296: --{
1297: RAISE FND_API.G_EXC_ERROR;
1298: --RETURN;
1299: --}
1300: END IF;
1301: --}
1314: THEN
1315: --{
1316: FTE_FREIGHT_PRICING.MOVE_FC_TEMP_TO_MAIN
1317: (
1318: p_init_msg_list => FND_API.G_FALSE,
1319: x_return_status => l_return_status,
1320: p_delivery_leg_id => l_delivery_leg_id,
1321: p_lane_id => p_lane_id,
1322: p_schedule_id => p_schedule_id,
1343: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
1344: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1345: THEN
1346: --{
1347: RAISE FND_API.G_EXC_ERROR;
1348: --RETURN;
1349: --}
1350: END IF;
1351: --}
1386: FND_MSG_PUB.Count_And_Get
1387: (
1388: p_count => x_msg_count,
1389: p_data => x_msg_data,
1390: p_encoded => FND_API.G_FALSE
1391: );
1392: --
1393: --
1394: --}
1393: --
1394: --}
1395: EXCEPTION
1396: --{
1397: WHEN FND_API.G_EXC_ERROR THEN
1398: ROLLBACK TO PROCESS_DELIVERY_LEG_PUB;
1399: x_return_status := FND_API.G_RET_STS_ERROR ;
1400: FND_MSG_PUB.Count_And_Get
1401: (
1395: EXCEPTION
1396: --{
1397: WHEN FND_API.G_EXC_ERROR THEN
1398: ROLLBACK TO PROCESS_DELIVERY_LEG_PUB;
1399: x_return_status := FND_API.G_RET_STS_ERROR ;
1400: FND_MSG_PUB.Count_And_Get
1401: (
1402: p_count => x_msg_count,
1403: p_data => x_msg_data,
1400: FND_MSG_PUB.Count_And_Get
1401: (
1402: p_count => x_msg_count,
1403: p_data => x_msg_data,
1404: p_encoded => FND_API.G_FALSE
1405: );
1406: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1407: ROLLBACK TO PROCESS_DELIVERY_LEG_PUB;
1408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1402: p_count => x_msg_count,
1403: p_data => x_msg_data,
1404: p_encoded => FND_API.G_FALSE
1405: );
1406: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1407: ROLLBACK TO PROCESS_DELIVERY_LEG_PUB;
1408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1409: FND_MSG_PUB.Count_And_Get
1410: (
1404: p_encoded => FND_API.G_FALSE
1405: );
1406: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1407: ROLLBACK TO PROCESS_DELIVERY_LEG_PUB;
1408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1409: FND_MSG_PUB.Count_And_Get
1410: (
1411: p_count => x_msg_count,
1412: p_data => x_msg_data,
1409: FND_MSG_PUB.Count_And_Get
1410: (
1411: p_count => x_msg_count,
1412: p_data => x_msg_data,
1413: p_encoded => FND_API.G_FALSE
1414: );
1415: WHEN OTHERS THEN
1416: ROLLBACK TO PROCESS_DELIVERY_LEG_PUB;
1417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1413: p_encoded => FND_API.G_FALSE
1414: );
1415: WHEN OTHERS THEN
1416: ROLLBACK TO PROCESS_DELIVERY_LEG_PUB;
1417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1418: --
1419: --
1420: /* commented to be consistent with error handling as in WSH.
1421: IF FND_MSG_PUB.Check_Msg_Level
1434: FND_MSG_PUB.Count_And_Get
1435: (
1436: p_count => x_msg_count,
1437: p_data => x_msg_data,
1438: p_encoded => FND_API.G_FALSE
1439: );
1440: --}
1441: END process_delivery_leg;
1442: --
1442: --
1443: --
1444: PROCEDURE assign_service_to_segment
1445: (
1446: P_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1447: X_return_status OUT NOCOPY VARCHAR2,
1448: X_msg_count OUT NOCOPY NUMBER,
1449: X_msg_data OUT NOCOPY VARCHAR2,
1450: p_ui_page_name IN VARCHAR2 DEFAULT GK_DLEG_WB_PAGE,
1530: --
1531: -- Initialize message list if p_init_msg_list is set to TRUE.
1532: --
1533: --
1534: IF FND_API.to_Boolean( p_init_msg_list )
1535: THEN
1536: FND_MSG_PUB.initialize;
1537: END IF;
1538: --
1572: x_return_status => x_return_status
1573: );
1574: --
1575: --
1576: RAISE FND_API.G_EXC_ERROR;
1577: --}
1578: END IF;
1579: --}
1580: END IF;
1660: --
1661: fte_mls_wrapper.create_update_stop
1662: (
1663: p_api_version_number => 1.0,
1664: p_init_msg_list => FND_API.G_FALSE,
1665: x_return_status => l_return_status,
1666: x_msg_count => l_msg_count,
1667: x_msg_data => l_msg_data,
1668: p_action_code => 'UPDATE',
1697: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
1698: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1699: THEN
1700: --{
1701: RAISE FND_API.G_EXC_ERROR;
1702: --RETURN;
1703: --}
1704: END IF;
1705: --}
1716: --
1717: fte_mls_wrapper.create_update_stop
1718: (
1719: p_api_version_number => 1.0,
1720: p_init_msg_list => FND_API.G_FALSE,
1721: x_return_status => l_return_status,
1722: x_msg_count => l_msg_count,
1723: x_msg_data => l_msg_data,
1724: p_action_code => 'UPDATE',
1753: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
1754: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1755: THEN
1756: --{
1757: RAISE FND_API.G_EXC_ERROR;
1758: --RETURN;
1759: --}
1760: END IF;
1761: --}
1767: --{
1768: fte_mls_wrapper.create_update_trip
1769: (
1770: p_api_version_number => 1.0,
1771: p_init_msg_list => FND_API.G_FALSE,
1772: x_return_status => l_return_status,
1773: x_msg_count => l_msg_count,
1774: x_msg_data => l_msg_data,
1775: p_action_code => 'UPDATE',
1791: /*
1792: -- Need to add action code CREATE, leg/delivery/vehicle/vehOrg
1793: FTE_MLS_TEST_NT.UPDATE_SERVICE_ON_TRIP(
1794: p_API_VERSION_NUMBER => 1.0,
1795: p_INIT_MSG_LIST => FND_API.G_TRUE,
1796: p_COMMIT => FND_API.G_FALSE,
1797: p_CALLER => 'FTE',
1798: p_SERVICE_ACTION => 'UPDATE',
1799: p_DELIVERY_ID => p_delivery_id,
1792: -- Need to add action code CREATE, leg/delivery/vehicle/vehOrg
1793: FTE_MLS_TEST_NT.UPDATE_SERVICE_ON_TRIP(
1794: p_API_VERSION_NUMBER => 1.0,
1795: p_INIT_MSG_LIST => FND_API.G_TRUE,
1796: p_COMMIT => FND_API.G_FALSE,
1797: p_CALLER => 'FTE',
1798: p_SERVICE_ACTION => 'UPDATE',
1799: p_DELIVERY_ID => p_delivery_id,
1800: p_DELIVERY_LEG_ID => p_delivery_leg_id,
1828: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
1829: OR l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
1830: THEN
1831: --{
1832: RAISE FND_API.G_EXC_ERROR;
1833: --RETURN;
1834: --}
1835: END IF;
1836: --}
1853: FND_MSG_PUB.Count_And_Get
1854: (
1855: p_count => x_msg_count,
1856: p_data => x_msg_data,
1857: p_encoded => FND_API.G_FALSE
1858: );
1859: --
1860: --
1861: --}
1860: --
1861: --}
1862: EXCEPTION
1863: --{
1864: WHEN FND_API.G_EXC_ERROR THEN
1865: ROLLBACK TO ASSIGN_SERVICE_TO_SEGMENT_PUB;
1866: x_return_status := FND_API.G_RET_STS_ERROR ;
1867: FND_MSG_PUB.Count_And_Get
1868: (
1862: EXCEPTION
1863: --{
1864: WHEN FND_API.G_EXC_ERROR THEN
1865: ROLLBACK TO ASSIGN_SERVICE_TO_SEGMENT_PUB;
1866: x_return_status := FND_API.G_RET_STS_ERROR ;
1867: FND_MSG_PUB.Count_And_Get
1868: (
1869: p_count => x_msg_count,
1870: p_data => x_msg_data,
1867: FND_MSG_PUB.Count_And_Get
1868: (
1869: p_count => x_msg_count,
1870: p_data => x_msg_data,
1871: p_encoded => FND_API.G_FALSE
1872: );
1873: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1874: ROLLBACK TO ASSIGN_SERVICE_TO_SEGMENT_PUB;
1875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1869: p_count => x_msg_count,
1870: p_data => x_msg_data,
1871: p_encoded => FND_API.G_FALSE
1872: );
1873: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1874: ROLLBACK TO ASSIGN_SERVICE_TO_SEGMENT_PUB;
1875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1876: FND_MSG_PUB.Count_And_Get
1877: (
1871: p_encoded => FND_API.G_FALSE
1872: );
1873: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1874: ROLLBACK TO ASSIGN_SERVICE_TO_SEGMENT_PUB;
1875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1876: FND_MSG_PUB.Count_And_Get
1877: (
1878: p_count => x_msg_count,
1879: p_data => x_msg_data,
1876: FND_MSG_PUB.Count_And_Get
1877: (
1878: p_count => x_msg_count,
1879: p_data => x_msg_data,
1880: p_encoded => FND_API.G_FALSE
1881: );
1882: WHEN OTHERS THEN
1883: ROLLBACK TO ASSIGN_SERVICE_TO_SEGMENT_PUB;
1884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1880: p_encoded => FND_API.G_FALSE
1881: );
1882: WHEN OTHERS THEN
1883: ROLLBACK TO ASSIGN_SERVICE_TO_SEGMENT_PUB;
1884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1885: --
1886: --
1887: wsh_util_core.default_handler('FTE_DELIVERY_LEGS_PVT.assign_service_to_segment');
1888: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1891: FND_MSG_PUB.Count_And_Get
1892: (
1893: p_count => x_msg_count,
1894: p_data => x_msg_data,
1895: p_encoded => FND_API.G_FALSE
1896: );
1897: --}
1898: END assign_service_to_segment;
1899: --
1899: --
1900: --
1901: PROCEDURE build_delivery_leg_info
1902: (
1903: P_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1904: X_return_status OUT NOCOPY VARCHAR2,
1905: X_msg_count OUT NOCOPY NUMBER,
1906: X_msg_data OUT NOCOPY VARCHAR2,
1907: p_dleg_id IN NUMBER,
2128: wsh_debug_sv.push(l_module_name);
2129: END IF;
2130:
2131: --
2132: IF FND_API.to_Boolean( p_init_msg_list )
2133: THEN
2134: FND_MSG_PUB.initialize;
2135: END IF;
2136: --
2551: FND_MSG_PUB.Count_And_Get
2552: (
2553: p_count => x_msg_count,
2554: p_data => x_msg_data,
2555: p_encoded => FND_API.G_FALSE
2556: );
2557:
2558:
2559: IF l_debug_on THEN
2579: FND_MSG_PUB.Count_And_Get
2580: (
2581: p_count => x_msg_count,
2582: p_data => x_msg_data,
2583: p_encoded => FND_API.G_FALSE
2584: );
2585:
2586: IF l_debug_on THEN
2587: WSH_DEBUG_SV.logmsg(l_module_name,