[Home] [Help]
369: BEGIN
370: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
371: --
372: IF l_debug_on IS NULL THEN
373: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
374: END IF;
375:
376: IF l_debug_on THEN
377: WSH_DEBUG_SV.push(l_module_name);
373: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
374: END IF;
375:
376: IF l_debug_on THEN
377: WSH_DEBUG_SV.push(l_module_name);
378: END IF;
379:
380: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
381:
384: SAVEPOINT before_group;
385: l_savepoint_set := TRUE;
386:
387: IF l_debug_on THEN
388: WSH_DEBUG_SV.log(l_module_name,'looping group_id', p_group_ids(l_index));
389: END IF;
390:
391: l_context.group_id := p_group_ids(l_index);
392: l_context.wms_in_group := FALSE;
548: GOTO next_record;
549:
550: <
551: IF l_debug_on THEN
552: WSH_DEBUG_SV.log(l_module_name,'return_status failing group', l_return_status);
553: END IF;
554: l_savepoint_set := FALSE;
555: ROLLBACK TO before_group;
556:
593: l_group_error_count := l_group_error_count + 1;
594:
595: <
596: IF l_debug_on THEN
597: WSH_DEBUG_SV.log(l_module_name,'finished group_id', p_group_ids(l_index));
598: END IF;
599:
600: l_savepoint_set := FALSE;
601: IF p_commit_flag = FND_API.G_TRUE THEN
609: END LOOP;
610:
611:
612: IF l_debug_on THEN
613: WSH_DEBUG_SV.log(l_module_name,'l_group_error_count', l_group_error_count);
614: END IF;
615:
616: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
617:
622: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
623: END IF;
624:
625: IF l_debug_on THEN
626: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
627: WSH_DEBUG_SV.pop(l_module_name);
628: END IF;
629:
630: EXCEPTION
623: END IF;
624:
625: IF l_debug_on THEN
626: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
627: WSH_DEBUG_SV.pop(l_module_name);
628: END IF;
629:
630: EXCEPTION
631: WHEN OTHERS THEN
637: 'WSH_TP_RELEASE.RELEASE_PLAN',
638: l_module_name);
639:
640: IF l_debug_on THEN
641: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
642: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
643: END IF;
644:
645: END release_plan;
638: l_module_name);
639:
640: IF l_debug_on THEN
641: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
642: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
643: END IF;
644:
645: END release_plan;
646:
672: BEGIN
673: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
674: --
675: IF l_debug_on IS NULL THEN
676: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
677: END IF;
678:
679: IF l_debug_on THEN
680: WSH_DEBUG_SV.push(l_module_name);
676: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
677: END IF;
678:
679: IF l_debug_on THEN
680: WSH_DEBUG_SV.push(l_module_name);
681: END IF;
682: --
683: --
684:
775:
776: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
777: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
778: IF l_debug_on THEN
779: WSH_DEBUG_SV.log(l_module_name, 'FTE interface tables failed: x_return_status', x_return_status);
780: WSH_DEBUG_SV.pop(l_module_name);
781: END IF;
782: RETURN;
783: END IF;
776: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
777: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
778: IF l_debug_on THEN
779: WSH_DEBUG_SV.log(l_module_name, 'FTE interface tables failed: x_return_status', x_return_status);
780: WSH_DEBUG_SV.pop(l_module_name);
781: END IF;
782: RETURN;
783: END IF;
784:
810:
811: --
812: --
813: IF l_debug_on THEN
814: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
815: WSH_DEBUG_SV.pop(l_module_name);
816: END IF;
817:
818: EXCEPTION
811: --
812: --
813: IF l_debug_on THEN
814: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
815: WSH_DEBUG_SV.pop(l_module_name);
816: END IF;
817:
818: EXCEPTION
819: WHEN OTHERS THEN
822: 'WSH_TP_RELEASE.PURGE_INTERFACE_TABLES',
823: l_module_name);
824:
825: IF l_debug_on THEN
826: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
827: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
828: END IF;
829: ROLLBACK TO before_purge;
830:
823: l_module_name);
824:
825: IF l_debug_on THEN
826: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
827: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
828: END IF;
829: ROLLBACK TO before_purge;
830:
831: END purge_interface_tables;
882: BEGIN
883: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
884: --
885: IF l_debug_on IS NULL THEN
886: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
887: END IF;
888:
889: IF l_debug_on THEN
890: WSH_DEBUG_SV.push(l_module_name);
886: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
887: END IF;
888:
889: IF l_debug_on THEN
890: WSH_DEBUG_SV.push(l_module_name);
891: END IF;
892: --
893: --
894:
920: x_context.auto_tender_flag := 'N';
921: END IF;
922:
923: IF l_debug_on THEN
924: WSH_DEBUG_SV.log(l_module_name, 'Auto Tender Flag', x_context.auto_tender_flag);
925: END IF;
926:
927: x_context.linked_trip_count := 0;
928:
928:
929: --
930: --
931: IF l_debug_on THEN
932: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
933: WSH_DEBUG_SV.pop(l_module_name);
934: END IF;
935:
936: EXCEPTION
929: --
930: --
931: IF l_debug_on THEN
932: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
933: WSH_DEBUG_SV.pop(l_module_name);
934: END IF;
935:
936: EXCEPTION
937: WHEN OTHERS THEN
940: 'WSH_TP_RELEASE.INIT_CONTEXT',
941: l_module_name);
942:
943: IF l_debug_on THEN
944: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
945: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
946: END IF;
947:
948: END init_context;
941: l_module_name);
942:
943: IF l_debug_on THEN
944: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
945: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
946: END IF;
947:
948: END init_context;
949:
1165: BEGIN
1166: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1167: --
1168: IF l_debug_on IS NULL THEN
1169: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1170: END IF;
1171:
1172: IF l_debug_on THEN
1173: WSH_DEBUG_SV.push(l_module_name);
1169: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1170: END IF;
1171:
1172: IF l_debug_on THEN
1173: WSH_DEBUG_SV.push(l_module_name);
1174: END IF;
1175: --
1176: --
1177:
1175: --
1176: --
1177:
1178: IF l_debug_on THEN
1179: WSH_DEBUG_SV.log(l_module_name, 'Bulk collect outbound interface lines in group', x_context.group_id);
1180: END IF;
1181:
1182: OPEN c_tp_released_lines (x_context.group_id, 'O', 'IO');
1183: FETCH c_tp_released_lines BULK COLLECT INTO
1191: l_tp_del_numbers;
1192: CLOSE c_tp_released_lines;
1193:
1194: IF l_debug_on THEN
1195: WSH_DEBUG_SV.log(l_module_name, 'l_dd_interface_id.COUNT (outbound)', l_dd_interface_id.COUNT);
1196: END IF;
1197:
1198: l_outbound_count := l_dd_interface_id.COUNT;
1199:
1206: l_delivery_detail := NVL(l_dd_id(i),
1207: l_split_from_dd_id(i));
1208:
1209: IF l_debug_on THEN
1210: WSH_DEBUG_SV.log(l_module_name, 'resync looping: dd_id', l_delivery_detail);
1211: END IF;
1212:
1213: OPEN c_check_detail_valid(l_delivery_detail);
1214: -- we should use valid delivery_detail_id to refresh source_line_set_id.
1267: RAISE WSH_INV_REL_STATUS_ERROR;
1268: END IF;
1269:
1270: IF l_debug_on THEN
1271: WSH_DEBUG_SV.log(l_module_name, 'to be refreshed by dd_id', l_delivery_detail);
1272: END IF;
1273:
1274: l_dd_id(i) := l_delivery_detail;
1275: END LOOP;
1275: END LOOP;
1276:
1277: -- Resync released lines' source_line_id, source_line_set_id.
1278: IF l_debug_on THEN
1279: WSH_DEBUG_SV.logmsg(l_module_name, 'Resync lines');
1280: END IF;
1281:
1282:
1283: FORALL i in 1..l_dd_interface_id.count
1293:
1294:
1295: -- inbound/drop: resync the interface records' po_shipment_line_id and po_shipment_line_number
1296: IF l_debug_on THEN
1297: WSH_DEBUG_SV.log(l_module_name, 'Bulk collect inbound/drop interface lines in group', x_context.group_id);
1298: END IF;
1299:
1300: OPEN c_tp_released_lines (x_context.group_id, 'I', 'D');
1301: FETCH c_tp_released_lines BULK COLLECT INTO
1309: l_tp_del_numbers;
1310: CLOSE c_tp_released_lines;
1311:
1312: IF l_debug_on THEN
1313: WSH_DEBUG_SV.log(l_module_name, 'l_dd_interface_id.COUNT (inbound)', l_dd_interface_id.COUNT);
1314: END IF;
1315:
1316: l_inbound_count := l_dd_interface_id.COUNT;
1317:
1376: x_errors_tab => x_errors_tab,
1377: x_return_status => l_return_status);
1378: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1379: IF l_debug_on THEN
1380: WSH_DEBUG_SV.pop(l_module_name);
1381: END IF;
1382: RETURN;
1383: END IF;
1384: END IF;
1387:
1388: --
1389: --
1390: IF l_debug_on THEN
1391: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
1392: WSH_DEBUG_SV.pop(l_module_name);
1393: END IF;
1394:
1395: EXCEPTION
1388: --
1389: --
1390: IF l_debug_on THEN
1391: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
1392: WSH_DEBUG_SV.pop(l_module_name);
1393: END IF;
1394:
1395: EXCEPTION
1396: WHEN WSH_INV_REL_STATUS_ERROR THEN
1416: CLOSE c_tp_dangling_conts;
1417: END IF;
1418: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1419: IF l_debug_on THEN
1420: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INV_REL_STATUS_ERROR');
1421: END IF;
1422:
1423: WHEN OTHERS THEN
1424: IF c_check_detail_valid%ISOPEN THEN
1447: 'WSH_TP_RELEASE.RESYNC_INTERFACE_TABLES',
1448: l_module_name);
1449:
1450: IF l_debug_on THEN
1451: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1452: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1453: END IF;
1454:
1455: END resync_interface_tables;
1448: l_module_name);
1449:
1450: IF l_debug_on THEN
1451: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1452: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1453: END IF;
1454:
1455: END resync_interface_tables;
1456:
1961: BEGIN
1962: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1963: --
1964: IF l_debug_on IS NULL THEN
1965: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1966: END IF;
1967:
1968: IF l_debug_on THEN
1969: WSH_DEBUG_SV.push(l_module_name);
1965: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1966: END IF;
1967:
1968: IF l_debug_on THEN
1969: WSH_DEBUG_SV.push(l_module_name);
1970: END IF;
1971: --
1972: --
1973:
1979: l_new_index := 0;
1980: FOR idel IN c_tp_interface_dels(p_group_id => x_context.group_id) LOOP
1981:
1982: IF l_debug_on THEN
1983: WSH_DEBUG_SV.log(l_module_name,
1984: 'idel looping: delivery_interface_id',
1985: idel.delivery_interface_id);
1986: END IF;
1987:
2036: x_context.wms_in_group := TRUE;
2037: END IF;
2038: x_plan_deliveries(l_new_index).leg_base_index := NULL;
2039: IF l_debug_on THEN
2040: WSH_DEBUG_SV.log(l_module_name, 'delivery_wv_frozen_flag', idel.wv_frozen_flag);
2041: WSH_DEBUG_SV.log(l_module_name, 'delivery_id', idel.delivery_id);
2042: END IF;
2043:
2044: WSH_LOCATIONS_PKG.convert_internal_cust_location(
2037: END IF;
2038: x_plan_deliveries(l_new_index).leg_base_index := NULL;
2039: IF l_debug_on THEN
2040: WSH_DEBUG_SV.log(l_module_name, 'delivery_wv_frozen_flag', idel.wv_frozen_flag);
2041: WSH_DEBUG_SV.log(l_module_name, 'delivery_id', idel.delivery_id);
2042: END IF;
2043:
2044: WSH_LOCATIONS_PKG.convert_internal_cust_location(
2045: p_internal_cust_location_id => x_plan_deliveries(l_new_index).ultimate_dropoff_location_id,
2056: x_errors_tab => x_errors_tab,
2057: x_return_status => l_return_status);
2058: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2059: IF l_debug_on THEN
2060: WSH_DEBUG_SV.pop(l_module_name);
2061: END IF;
2062: RETURN;
2063: END IF;
2064:
2078: x_errors_tab => x_errors_tab,
2079: x_return_status => l_return_status);
2080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2081: IF l_debug_on THEN
2082: WSH_DEBUG_SV.log(l_module_name, 'delivery key attributes do not match', x_return_status);
2083: WSH_DEBUG_SV.log(l_module_name, 'delivery_interface_id', idel.delivery_interface_id);
2084: WSH_DEBUG_SV.log(l_module_name, 'delivery_id', idel.delivery_id);
2085: WSH_DEBUG_SV.log(l_module_name, 'wsh_planned_flag', idel.wsh_planned_flag);
2086: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_pu_loc_id', idel.wsh_initial_pu_loc_id);
2079: x_return_status => l_return_status);
2080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2081: IF l_debug_on THEN
2082: WSH_DEBUG_SV.log(l_module_name, 'delivery key attributes do not match', x_return_status);
2083: WSH_DEBUG_SV.log(l_module_name, 'delivery_interface_id', idel.delivery_interface_id);
2084: WSH_DEBUG_SV.log(l_module_name, 'delivery_id', idel.delivery_id);
2085: WSH_DEBUG_SV.log(l_module_name, 'wsh_planned_flag', idel.wsh_planned_flag);
2086: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_pu_loc_id', idel.wsh_initial_pu_loc_id);
2087: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_do_loc_id', idel.wsh_ultimate_do_loc_id);
2080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2081: IF l_debug_on THEN
2082: WSH_DEBUG_SV.log(l_module_name, 'delivery key attributes do not match', x_return_status);
2083: WSH_DEBUG_SV.log(l_module_name, 'delivery_interface_id', idel.delivery_interface_id);
2084: WSH_DEBUG_SV.log(l_module_name, 'delivery_id', idel.delivery_id);
2085: WSH_DEBUG_SV.log(l_module_name, 'wsh_planned_flag', idel.wsh_planned_flag);
2086: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_pu_loc_id', idel.wsh_initial_pu_loc_id);
2087: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_do_loc_id', idel.wsh_ultimate_do_loc_id);
2088: WSH_DEBUG_SV.log(l_module_name, 'initial_pickup_location_id', idel.initial_pickup_location_id);
2081: IF l_debug_on THEN
2082: WSH_DEBUG_SV.log(l_module_name, 'delivery key attributes do not match', x_return_status);
2083: WSH_DEBUG_SV.log(l_module_name, 'delivery_interface_id', idel.delivery_interface_id);
2084: WSH_DEBUG_SV.log(l_module_name, 'delivery_id', idel.delivery_id);
2085: WSH_DEBUG_SV.log(l_module_name, 'wsh_planned_flag', idel.wsh_planned_flag);
2086: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_pu_loc_id', idel.wsh_initial_pu_loc_id);
2087: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_do_loc_id', idel.wsh_ultimate_do_loc_id);
2088: WSH_DEBUG_SV.log(l_module_name, 'initial_pickup_location_id', idel.initial_pickup_location_id);
2089: WSH_DEBUG_SV.log(l_module_name, 'ultimate_dropoff_location_id', idel.ultimate_dropoff_location_id);
2082: WSH_DEBUG_SV.log(l_module_name, 'delivery key attributes do not match', x_return_status);
2083: WSH_DEBUG_SV.log(l_module_name, 'delivery_interface_id', idel.delivery_interface_id);
2084: WSH_DEBUG_SV.log(l_module_name, 'delivery_id', idel.delivery_id);
2085: WSH_DEBUG_SV.log(l_module_name, 'wsh_planned_flag', idel.wsh_planned_flag);
2086: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_pu_loc_id', idel.wsh_initial_pu_loc_id);
2087: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_do_loc_id', idel.wsh_ultimate_do_loc_id);
2088: WSH_DEBUG_SV.log(l_module_name, 'initial_pickup_location_id', idel.initial_pickup_location_id);
2089: WSH_DEBUG_SV.log(l_module_name, 'ultimate_dropoff_location_id', idel.ultimate_dropoff_location_id);
2090: WSH_DEBUG_SV.pop(l_module_name);
2083: WSH_DEBUG_SV.log(l_module_name, 'delivery_interface_id', idel.delivery_interface_id);
2084: WSH_DEBUG_SV.log(l_module_name, 'delivery_id', idel.delivery_id);
2085: WSH_DEBUG_SV.log(l_module_name, 'wsh_planned_flag', idel.wsh_planned_flag);
2086: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_pu_loc_id', idel.wsh_initial_pu_loc_id);
2087: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_do_loc_id', idel.wsh_ultimate_do_loc_id);
2088: WSH_DEBUG_SV.log(l_module_name, 'initial_pickup_location_id', idel.initial_pickup_location_id);
2089: WSH_DEBUG_SV.log(l_module_name, 'ultimate_dropoff_location_id', idel.ultimate_dropoff_location_id);
2090: WSH_DEBUG_SV.pop(l_module_name);
2091: END IF;
2084: WSH_DEBUG_SV.log(l_module_name, 'delivery_id', idel.delivery_id);
2085: WSH_DEBUG_SV.log(l_module_name, 'wsh_planned_flag', idel.wsh_planned_flag);
2086: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_pu_loc_id', idel.wsh_initial_pu_loc_id);
2087: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_do_loc_id', idel.wsh_ultimate_do_loc_id);
2088: WSH_DEBUG_SV.log(l_module_name, 'initial_pickup_location_id', idel.initial_pickup_location_id);
2089: WSH_DEBUG_SV.log(l_module_name, 'ultimate_dropoff_location_id', idel.ultimate_dropoff_location_id);
2090: WSH_DEBUG_SV.pop(l_module_name);
2091: END IF;
2092: RETURN;
2085: WSH_DEBUG_SV.log(l_module_name, 'wsh_planned_flag', idel.wsh_planned_flag);
2086: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_pu_loc_id', idel.wsh_initial_pu_loc_id);
2087: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_do_loc_id', idel.wsh_ultimate_do_loc_id);
2088: WSH_DEBUG_SV.log(l_module_name, 'initial_pickup_location_id', idel.initial_pickup_location_id);
2089: WSH_DEBUG_SV.log(l_module_name, 'ultimate_dropoff_location_id', idel.ultimate_dropoff_location_id);
2090: WSH_DEBUG_SV.pop(l_module_name);
2091: END IF;
2092: RETURN;
2093: END IF;
2086: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_pu_loc_id', idel.wsh_initial_pu_loc_id);
2087: WSH_DEBUG_SV.log(l_module_name, 'wsh_initial_do_loc_id', idel.wsh_ultimate_do_loc_id);
2088: WSH_DEBUG_SV.log(l_module_name, 'initial_pickup_location_id', idel.initial_pickup_location_id);
2089: WSH_DEBUG_SV.log(l_module_name, 'ultimate_dropoff_location_id', idel.ultimate_dropoff_location_id);
2090: WSH_DEBUG_SV.pop(l_module_name);
2091: END IF;
2092: RETURN;
2093: END IF;
2094:
2104: x_errors_tab => x_errors_tab,
2105: x_return_status => l_return_status);
2106: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2107: IF l_debug_on THEN
2108: WSH_DEBUG_SV.pop(l_module_name);
2109: END IF;
2110: RETURN;
2111: END IF;
2112:
2125: x_errors_tab => x_errors_tab,
2126: x_return_status => l_return_status);
2127: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2128: IF l_debug_on THEN
2129: WSH_DEBUG_SV.pop(l_module_name);
2130: END IF;
2131: RETURN;
2132: END IF;
2133:
2146: x_errors_tab => x_errors_tab,
2147: x_return_status => l_return_status);
2148: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2149: IF l_debug_on THEN
2150: WSH_DEBUG_SV.pop(l_module_name);
2151: END IF;
2152: RETURN;
2153: END;
2154:
2167: x_errors_tab => x_errors_tab,
2168: x_return_status => l_return_status);
2169: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2170: IF l_debug_on THEN
2171: WSH_DEBUG_SV.pop(l_module_name);
2172: END IF;
2173: RETURN;
2174: END;
2175: END IF;
2176:
2177: END LOOP;
2178:
2179: IF l_debug_on THEN
2180: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries.COUNT', x_plan_deliveries.COUNT);
2181: END IF;
2182:
2183: IF x_plan_deliveries.COUNT = 0 THEN
2184: stamp_interface_error(
2191: x_errors_tab => x_errors_tab,
2192: x_return_status => l_return_status);
2193: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2194: IF l_debug_on THEN
2195: WSH_DEBUG_SV.pop(l_module_name);
2196: END IF;
2197: RETURN;
2198: END IF;
2199:
2205:
2206: FOR iline IN c_tp_interface_lines(p_group_id => x_context.group_id) LOOP
2207:
2208: IF l_debug_on THEN
2209: WSH_DEBUG_SV.log(l_module_name,
2210: 'iline looping: dd_interface_id',
2211: iline.dd_interface_id);
2212: END IF;
2213:
2276: OR (NVL(iline.po_shipment_line_id, -1) <> NVL(l_current_po_shipment_line_id, -1))
2277: THEN
2278:
2279: IF l_debug_on THEN
2280: WSH_DEBUG_SV.log(l_module_name, 'flushing iline.source_code', iline.source_code);
2281: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2282: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2283: WSH_DEBUG_SV.log(l_module_name, 'iline.po_shipment_line_id', iline.po_shipment_line_id);
2284: WSH_DEBUG_SV.log(l_module_name, 'l_current_source_code', l_current_source_code);
2277: THEN
2278:
2279: IF l_debug_on THEN
2280: WSH_DEBUG_SV.log(l_module_name, 'flushing iline.source_code', iline.source_code);
2281: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2282: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2283: WSH_DEBUG_SV.log(l_module_name, 'iline.po_shipment_line_id', iline.po_shipment_line_id);
2284: WSH_DEBUG_SV.log(l_module_name, 'l_current_source_code', l_current_source_code);
2285: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_set_id', l_current_line_set_id);
2278:
2279: IF l_debug_on THEN
2280: WSH_DEBUG_SV.log(l_module_name, 'flushing iline.source_code', iline.source_code);
2281: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2282: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2283: WSH_DEBUG_SV.log(l_module_name, 'iline.po_shipment_line_id', iline.po_shipment_line_id);
2284: WSH_DEBUG_SV.log(l_module_name, 'l_current_source_code', l_current_source_code);
2285: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_set_id', l_current_line_set_id);
2286: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_id', l_current_line_id);
2279: IF l_debug_on THEN
2280: WSH_DEBUG_SV.log(l_module_name, 'flushing iline.source_code', iline.source_code);
2281: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2282: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2283: WSH_DEBUG_SV.log(l_module_name, 'iline.po_shipment_line_id', iline.po_shipment_line_id);
2284: WSH_DEBUG_SV.log(l_module_name, 'l_current_source_code', l_current_source_code);
2285: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_set_id', l_current_line_set_id);
2286: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_id', l_current_line_id);
2287: WSH_DEBUG_SV.log(l_module_name, 'l_current_po_shipment_line_id', l_current_po_shipment_line_id);
2280: WSH_DEBUG_SV.log(l_module_name, 'flushing iline.source_code', iline.source_code);
2281: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2282: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2283: WSH_DEBUG_SV.log(l_module_name, 'iline.po_shipment_line_id', iline.po_shipment_line_id);
2284: WSH_DEBUG_SV.log(l_module_name, 'l_current_source_code', l_current_source_code);
2285: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_set_id', l_current_line_set_id);
2286: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_id', l_current_line_id);
2287: WSH_DEBUG_SV.log(l_module_name, 'l_current_po_shipment_line_id', l_current_po_shipment_line_id);
2288: END IF;
2281: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2282: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2283: WSH_DEBUG_SV.log(l_module_name, 'iline.po_shipment_line_id', iline.po_shipment_line_id);
2284: WSH_DEBUG_SV.log(l_module_name, 'l_current_source_code', l_current_source_code);
2285: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_set_id', l_current_line_set_id);
2286: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_id', l_current_line_id);
2287: WSH_DEBUG_SV.log(l_module_name, 'l_current_po_shipment_line_id', l_current_po_shipment_line_id);
2288: END IF;
2289:
2282: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2283: WSH_DEBUG_SV.log(l_module_name, 'iline.po_shipment_line_id', iline.po_shipment_line_id);
2284: WSH_DEBUG_SV.log(l_module_name, 'l_current_source_code', l_current_source_code);
2285: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_set_id', l_current_line_set_id);
2286: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_id', l_current_line_id);
2287: WSH_DEBUG_SV.log(l_module_name, 'l_current_po_shipment_line_id', l_current_po_shipment_line_id);
2288: END IF;
2289:
2290: l_current_source_code := iline.source_code;
2283: WSH_DEBUG_SV.log(l_module_name, 'iline.po_shipment_line_id', iline.po_shipment_line_id);
2284: WSH_DEBUG_SV.log(l_module_name, 'l_current_source_code', l_current_source_code);
2285: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_set_id', l_current_line_set_id);
2286: WSH_DEBUG_SV.log(l_module_name, 'l_current_line_id', l_current_line_id);
2287: WSH_DEBUG_SV.log(l_module_name, 'l_current_po_shipment_line_id', l_current_po_shipment_line_id);
2288: END IF;
2289:
2290: l_current_source_code := iline.source_code;
2291: l_current_po_shipment_line_id := iline.po_shipment_line_id;
2308: x_return_status => l_return_status);
2309: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2310: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2311: IF l_debug_on THEN
2312: WSH_DEBUG_SV.pop(l_module_name);
2313: END IF;
2314: RETURN;
2315: END IF;
2316: END IF;
2317:
2318: END IF;
2319:
2320: IF l_debug_on THEN
2321: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2322: WSH_DEBUG_SV.log(l_module_name, 'iline.delivery_detail_id', iline.delivery_detail_id);
2323: WSH_DEBUG_SV.log(l_module_name, 'iline.split_from_delivery_detail_id', iline.split_from_delivery_detail_id);
2324: WSH_DEBUG_SV.log(l_module_name, 'l_target_delivery_index', l_target_delivery_index);
2325: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries->delivery_id', x_plan_deliveries(l_target_delivery_index).delivery_id);
2318: END IF;
2319:
2320: IF l_debug_on THEN
2321: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2322: WSH_DEBUG_SV.log(l_module_name, 'iline.delivery_detail_id', iline.delivery_detail_id);
2323: WSH_DEBUG_SV.log(l_module_name, 'iline.split_from_delivery_detail_id', iline.split_from_delivery_detail_id);
2324: WSH_DEBUG_SV.log(l_module_name, 'l_target_delivery_index', l_target_delivery_index);
2325: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries->delivery_id', x_plan_deliveries(l_target_delivery_index).delivery_id);
2326: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2319:
2320: IF l_debug_on THEN
2321: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2322: WSH_DEBUG_SV.log(l_module_name, 'iline.delivery_detail_id', iline.delivery_detail_id);
2323: WSH_DEBUG_SV.log(l_module_name, 'iline.split_from_delivery_detail_id', iline.split_from_delivery_detail_id);
2324: WSH_DEBUG_SV.log(l_module_name, 'l_target_delivery_index', l_target_delivery_index);
2325: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries->delivery_id', x_plan_deliveries(l_target_delivery_index).delivery_id);
2326: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2327: WSH_DEBUG_SV.log(l_module_name, 'iline.source_header_id', iline.source_header_id);
2320: IF l_debug_on THEN
2321: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2322: WSH_DEBUG_SV.log(l_module_name, 'iline.delivery_detail_id', iline.delivery_detail_id);
2323: WSH_DEBUG_SV.log(l_module_name, 'iline.split_from_delivery_detail_id', iline.split_from_delivery_detail_id);
2324: WSH_DEBUG_SV.log(l_module_name, 'l_target_delivery_index', l_target_delivery_index);
2325: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries->delivery_id', x_plan_deliveries(l_target_delivery_index).delivery_id);
2326: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2327: WSH_DEBUG_SV.log(l_module_name, 'iline.source_header_id', iline.source_header_id);
2328: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2321: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2322: WSH_DEBUG_SV.log(l_module_name, 'iline.delivery_detail_id', iline.delivery_detail_id);
2323: WSH_DEBUG_SV.log(l_module_name, 'iline.split_from_delivery_detail_id', iline.split_from_delivery_detail_id);
2324: WSH_DEBUG_SV.log(l_module_name, 'l_target_delivery_index', l_target_delivery_index);
2325: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries->delivery_id', x_plan_deliveries(l_target_delivery_index).delivery_id);
2326: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2327: WSH_DEBUG_SV.log(l_module_name, 'iline.source_header_id', iline.source_header_id);
2328: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2329: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2322: WSH_DEBUG_SV.log(l_module_name, 'iline.delivery_detail_id', iline.delivery_detail_id);
2323: WSH_DEBUG_SV.log(l_module_name, 'iline.split_from_delivery_detail_id', iline.split_from_delivery_detail_id);
2324: WSH_DEBUG_SV.log(l_module_name, 'l_target_delivery_index', l_target_delivery_index);
2325: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries->delivery_id', x_plan_deliveries(l_target_delivery_index).delivery_id);
2326: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2327: WSH_DEBUG_SV.log(l_module_name, 'iline.source_header_id', iline.source_header_id);
2328: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2329: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2330: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_from_location_id', iline.ship_from_location_id);
2323: WSH_DEBUG_SV.log(l_module_name, 'iline.split_from_delivery_detail_id', iline.split_from_delivery_detail_id);
2324: WSH_DEBUG_SV.log(l_module_name, 'l_target_delivery_index', l_target_delivery_index);
2325: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries->delivery_id', x_plan_deliveries(l_target_delivery_index).delivery_id);
2326: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2327: WSH_DEBUG_SV.log(l_module_name, 'iline.source_header_id', iline.source_header_id);
2328: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2329: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2330: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_from_location_id', iline.ship_from_location_id);
2331: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_to_location_id', iline.ship_to_location_id);
2324: WSH_DEBUG_SV.log(l_module_name, 'l_target_delivery_index', l_target_delivery_index);
2325: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries->delivery_id', x_plan_deliveries(l_target_delivery_index).delivery_id);
2326: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2327: WSH_DEBUG_SV.log(l_module_name, 'iline.source_header_id', iline.source_header_id);
2328: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2329: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2330: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_from_location_id', iline.ship_from_location_id);
2331: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_to_location_id', iline.ship_to_location_id);
2332: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2325: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries->delivery_id', x_plan_deliveries(l_target_delivery_index).delivery_id);
2326: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2327: WSH_DEBUG_SV.log(l_module_name, 'iline.source_header_id', iline.source_header_id);
2328: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2329: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2330: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_from_location_id', iline.ship_from_location_id);
2331: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_to_location_id', iline.ship_to_location_id);
2332: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2333: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2326: WSH_DEBUG_SV.log(l_module_name, 'iline.source_code', iline.source_code);
2327: WSH_DEBUG_SV.log(l_module_name, 'iline.source_header_id', iline.source_header_id);
2328: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2329: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2330: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_from_location_id', iline.ship_from_location_id);
2331: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_to_location_id', iline.ship_to_location_id);
2332: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2333: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2334: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity', iline.quantity);
2327: WSH_DEBUG_SV.log(l_module_name, 'iline.source_header_id', iline.source_header_id);
2328: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2329: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2330: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_from_location_id', iline.ship_from_location_id);
2331: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_to_location_id', iline.ship_to_location_id);
2332: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2333: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2334: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity', iline.quantity);
2335: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity_uom', iline.quantity_uom);
2328: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_id', iline.source_line_id);
2329: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2330: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_from_location_id', iline.ship_from_location_id);
2331: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_to_location_id', iline.ship_to_location_id);
2332: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2333: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2334: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity', iline.quantity);
2335: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity_uom', iline.quantity_uom);
2336: END IF;
2329: WSH_DEBUG_SV.log(l_module_name, 'iline.source_line_set_id', iline.source_line_set_id);
2330: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_from_location_id', iline.ship_from_location_id);
2331: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_to_location_id', iline.ship_to_location_id);
2332: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2333: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2334: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity', iline.quantity);
2335: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity_uom', iline.quantity_uom);
2336: END IF;
2337:
2330: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_from_location_id', iline.ship_from_location_id);
2331: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_to_location_id', iline.ship_to_location_id);
2332: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2333: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2334: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity', iline.quantity);
2335: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity_uom', iline.quantity_uom);
2336: END IF;
2337:
2338: <
2331: WSH_DEBUG_SV.log(l_module_name, 'iline.ship_to_location_id', iline.ship_to_location_id);
2332: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2333: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2334: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity', iline.quantity);
2335: WSH_DEBUG_SV.log(l_module_name, 'iline.quantity_uom', iline.quantity_uom);
2336: END IF;
2337:
2338: <
2339: FOR candidate IN c_map_lines (
2350:
2351: l_candidates_count := l_candidates_count + 1;
2352:
2353: IF l_debug_on THEN
2354: WSH_DEBUG_SV.log(l_module_name,
2355: 'candidate looping: delivery_detail_id',
2356: candidate.delivery_detail_id);
2357:
2358: WSH_DEBUG_SV.log(l_module_name, 'candidate.choice', candidate.choice);
2354: WSH_DEBUG_SV.log(l_module_name,
2355: 'candidate looping: delivery_detail_id',
2356: candidate.delivery_detail_id);
2357:
2358: WSH_DEBUG_SV.log(l_module_name, 'candidate.choice', candidate.choice);
2359: WSH_DEBUG_SV.log(l_module_name, 'candidate.scope', candidate.scope);
2360: WSH_DEBUG_SV.log(l_module_name, 'candidate.delivery_id', candidate.delivery_id);
2361: WSH_DEBUG_SV.log(l_module_name, 'candidate.source_line_id', candidate.source_line_id);
2362: WSH_DEBUG_SV.log(l_module_name, 'candidate.released_status', candidate.released_status);
2355: 'candidate looping: delivery_detail_id',
2356: candidate.delivery_detail_id);
2357:
2358: WSH_DEBUG_SV.log(l_module_name, 'candidate.choice', candidate.choice);
2359: WSH_DEBUG_SV.log(l_module_name, 'candidate.scope', candidate.scope);
2360: WSH_DEBUG_SV.log(l_module_name, 'candidate.delivery_id', candidate.delivery_id);
2361: WSH_DEBUG_SV.log(l_module_name, 'candidate.source_line_id', candidate.source_line_id);
2362: WSH_DEBUG_SV.log(l_module_name, 'candidate.released_status', candidate.released_status);
2363: WSH_DEBUG_SV.log(l_module_name, 'candidate.line_direction', candidate.line_direction);
2356: candidate.delivery_detail_id);
2357:
2358: WSH_DEBUG_SV.log(l_module_name, 'candidate.choice', candidate.choice);
2359: WSH_DEBUG_SV.log(l_module_name, 'candidate.scope', candidate.scope);
2360: WSH_DEBUG_SV.log(l_module_name, 'candidate.delivery_id', candidate.delivery_id);
2361: WSH_DEBUG_SV.log(l_module_name, 'candidate.source_line_id', candidate.source_line_id);
2362: WSH_DEBUG_SV.log(l_module_name, 'candidate.released_status', candidate.released_status);
2363: WSH_DEBUG_SV.log(l_module_name, 'candidate.line_direction', candidate.line_direction);
2364: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2357:
2358: WSH_DEBUG_SV.log(l_module_name, 'candidate.choice', candidate.choice);
2359: WSH_DEBUG_SV.log(l_module_name, 'candidate.scope', candidate.scope);
2360: WSH_DEBUG_SV.log(l_module_name, 'candidate.delivery_id', candidate.delivery_id);
2361: WSH_DEBUG_SV.log(l_module_name, 'candidate.source_line_id', candidate.source_line_id);
2362: WSH_DEBUG_SV.log(l_module_name, 'candidate.released_status', candidate.released_status);
2363: WSH_DEBUG_SV.log(l_module_name, 'candidate.line_direction', candidate.line_direction);
2364: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2365: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2358: WSH_DEBUG_SV.log(l_module_name, 'candidate.choice', candidate.choice);
2359: WSH_DEBUG_SV.log(l_module_name, 'candidate.scope', candidate.scope);
2360: WSH_DEBUG_SV.log(l_module_name, 'candidate.delivery_id', candidate.delivery_id);
2361: WSH_DEBUG_SV.log(l_module_name, 'candidate.source_line_id', candidate.source_line_id);
2362: WSH_DEBUG_SV.log(l_module_name, 'candidate.released_status', candidate.released_status);
2363: WSH_DEBUG_SV.log(l_module_name, 'candidate.line_direction', candidate.line_direction);
2364: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2365: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2366: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity', candidate.quantity);
2359: WSH_DEBUG_SV.log(l_module_name, 'candidate.scope', candidate.scope);
2360: WSH_DEBUG_SV.log(l_module_name, 'candidate.delivery_id', candidate.delivery_id);
2361: WSH_DEBUG_SV.log(l_module_name, 'candidate.source_line_id', candidate.source_line_id);
2362: WSH_DEBUG_SV.log(l_module_name, 'candidate.released_status', candidate.released_status);
2363: WSH_DEBUG_SV.log(l_module_name, 'candidate.line_direction', candidate.line_direction);
2364: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2365: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2366: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity', candidate.quantity);
2367: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity_uom', candidate.quantity_uom);
2360: WSH_DEBUG_SV.log(l_module_name, 'candidate.delivery_id', candidate.delivery_id);
2361: WSH_DEBUG_SV.log(l_module_name, 'candidate.source_line_id', candidate.source_line_id);
2362: WSH_DEBUG_SV.log(l_module_name, 'candidate.released_status', candidate.released_status);
2363: WSH_DEBUG_SV.log(l_module_name, 'candidate.line_direction', candidate.line_direction);
2364: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2365: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2366: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity', candidate.quantity);
2367: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity_uom', candidate.quantity_uom);
2368: END IF;
2361: WSH_DEBUG_SV.log(l_module_name, 'candidate.source_line_id', candidate.source_line_id);
2362: WSH_DEBUG_SV.log(l_module_name, 'candidate.released_status', candidate.released_status);
2363: WSH_DEBUG_SV.log(l_module_name, 'candidate.line_direction', candidate.line_direction);
2364: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2365: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2366: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity', candidate.quantity);
2367: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity_uom', candidate.quantity_uom);
2368: END IF;
2369:
2362: WSH_DEBUG_SV.log(l_module_name, 'candidate.released_status', candidate.released_status);
2363: WSH_DEBUG_SV.log(l_module_name, 'candidate.line_direction', candidate.line_direction);
2364: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2365: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2366: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity', candidate.quantity);
2367: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity_uom', candidate.quantity_uom);
2368: END IF;
2369:
2370:
2363: WSH_DEBUG_SV.log(l_module_name, 'candidate.line_direction', candidate.line_direction);
2364: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2365: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2366: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity', candidate.quantity);
2367: WSH_DEBUG_SV.log(l_module_name, 'candidate.quantity_uom', candidate.quantity_uom);
2368: END IF;
2369:
2370:
2371: IF (x_plan_deliveries(l_target_delivery_index).delivery_id IS NOT NULL)
2400: WHILE l_new_index IS NOT NULL LOOP
2401: IF (candidate.delivery_detail_id = l_current_used_details(l_new_index).delivery_detail_id) THEN
2402: l_match_found := TRUE;
2403: IF l_debug_on THEN
2404: WSH_DEBUG_SV.log(l_module_name, 'l_current_used_details found: l_new_index', l_new_index);
2405: END IF;
2406: EXIT used_loop;
2407: END IF;
2408: l_new_index := l_current_used_details.NEXT(l_new_index);
2412: IF l_match_found
2413: AND l_current_used_details(l_new_index).available_quantity = 0 THEN
2414: -- this candidate has been used up.
2415: IF l_debug_on THEN
2416: WSH_DEBUG_SV.log(l_module_name, 'candidate is used up: delivery_detail_id', l_current_used_details(l_new_index).delivery_detail_id);
2417: END IF;
2418: GOTO next_candidate;
2419: END IF;
2420:
2450: x_attributes => l_current_attributes,
2451: x_values => candidate) THEN
2452: l_group_not_matched := TRUE;
2453: IF l_debug_on THEN
2454: WSH_DEBUG_SV.logmsg(l_module_name, 'attributes_match returns FALSE');
2455: END IF;
2456: GOTO next_candidate;
2457: END IF;
2458:
2504: AND candidate.released_status IN ('N', 'R', 'X')
2505: AND NVL(candidate.line_direction, 'O') IN ('O', 'IO') THEN
2506:
2507: IF l_debug_on THEN
2508: WSH_DEBUG_SV.logmsg(l_module_name,'Validating ordered quantity increase');
2509: END IF;
2510:
2511: -- if the order line has been split, its quantity will generally be reduced.
2512: IF candidate.src_requested_quantity >
2516: quantity => iline.src_requested_quantity,
2517: item_id => candidate.inventory_item_id) THEN
2518:
2519: IF l_debug_on THEN
2520: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2521: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2522:
2523: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2524: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2517: item_id => candidate.inventory_item_id) THEN
2518:
2519: IF l_debug_on THEN
2520: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2521: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2522:
2523: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2524: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2525: END IF;
2519: IF l_debug_on THEN
2520: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2521: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2522:
2523: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2524: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2525: END IF;
2526:
2527: -- order line quantity has been increased;
2520: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity', candidate.src_requested_quantity);
2521: WSH_DEBUG_SV.log(l_module_name, 'candidate.src_requested_quantity_uom', candidate.src_requested_quantity_uom);
2522:
2523: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity', iline.src_requested_quantity);
2524: WSH_DEBUG_SV.log(l_module_name, 'iline.src_requested_quantity_uom', iline.src_requested_quantity_uom);
2525: END IF;
2526:
2527: -- order line quantity has been increased;
2528: -- check if order line is in process of being staged
2547: x_errors_tab => x_errors_tab,
2548: x_return_status => l_return_status);
2549: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2550: IF l_debug_on THEN
2551: WSH_DEBUG_SV.pop(l_module_name);
2552: END IF;
2553: RETURN;
2554: END IF;
2555: END IF;
2562: l_new_index := l_current_used_details.LAST + 1;
2563: END IF;
2564:
2565: IF l_debug_on THEN
2566: WSH_DEBUG_SV.log(l_module_name, 'adding to l_current_used_details: l_new_index', l_new_index);
2567: END IF;
2568:
2569:
2570:
2595: -- * track delivery associated with delivery lines
2596: -- if delivery is new, lock delivery and add to x_plan_deliveries
2597:
2598: IF l_debug_on THEN
2599: WSH_DEBUG_SV.log(l_module_name, 'quantity left to map', l_current_attributes.mapped_quantity);
2600: WSH_DEBUG_SV.log(l_module_name, 'current used detail available quantity', l_current_used_details(l_new_index).available_quantity);
2601: END IF;
2602:
2603: -- make sure that if line has been split and lines packed in the same container,
2596: -- if delivery is new, lock delivery and add to x_plan_deliveries
2597:
2598: IF l_debug_on THEN
2599: WSH_DEBUG_SV.log(l_module_name, 'quantity left to map', l_current_attributes.mapped_quantity);
2600: WSH_DEBUG_SV.log(l_module_name, 'current used detail available quantity', l_current_used_details(l_new_index).available_quantity);
2601: END IF;
2602:
2603: -- make sure that if line has been split and lines packed in the same container,
2604: -- the remaining quantity will not go into a different delivery.
2729: END;
2730: END IF;
2731:
2732: IF l_debug_on THEN
2733: WSH_DEBUG_SV.log(l_module_name,'mapping delivery_detail_id: ', l_current_used_details(l_new_index).delivery_detail_id);
2734: WSH_DEBUG_SV.log(l_module_name,'l_mapped_quantity: ', l_mapped_quantity);
2735: WSH_DEBUG_SV.log(l_module_name,'l_map_split_flag: ', l_map_split_flag);
2736: END IF;
2737:
2730: END IF;
2731:
2732: IF l_debug_on THEN
2733: WSH_DEBUG_SV.log(l_module_name,'mapping delivery_detail_id: ', l_current_used_details(l_new_index).delivery_detail_id);
2734: WSH_DEBUG_SV.log(l_module_name,'l_mapped_quantity: ', l_mapped_quantity);
2735: WSH_DEBUG_SV.log(l_module_name,'l_map_split_flag: ', l_map_split_flag);
2736: END IF;
2737:
2738: l_plan_dd_index := l_plan_dd_index + 1;
2731:
2732: IF l_debug_on THEN
2733: WSH_DEBUG_SV.log(l_module_name,'mapping delivery_detail_id: ', l_current_used_details(l_new_index).delivery_detail_id);
2734: WSH_DEBUG_SV.log(l_module_name,'l_mapped_quantity: ', l_mapped_quantity);
2735: WSH_DEBUG_SV.log(l_module_name,'l_map_split_flag: ', l_map_split_flag);
2736: END IF;
2737:
2738: l_plan_dd_index := l_plan_dd_index + 1;
2739:
2810:
2811: IF (x_plan_deliveries(l_target_delivery_index).lines_count = 0) THEN
2812: -- count the deliveries that have at least one line mapped.
2813: IF l_debug_on THEN
2814: WSH_DEBUG_SV.log(l_module_name, 'l_target_delivery_index for delivery is populated: ', l_target_delivery_index);
2815: END IF;
2816: l_deliveries_populated := l_deliveries_populated + 1;
2817: END IF;
2818:
2825:
2826: l_current_used_details(l_new_index).available_quantity :=
2827: l_current_used_details(l_new_index).available_quantity - l_mapped_quantity;
2828: IF l_debug_on THEN
2829: WSH_DEBUG_SV.log(l_module_name, 'l_current_used_details(' || l_new_index || ').available_quantity is now',
2830: l_current_used_details(l_new_index).available_quantity);
2831: END IF;
2832:
2833: l_current_attributes.mapped_quantity := l_current_attributes.mapped_quantity - l_mapped_quantity;
2838: -- LPN configuration will be broken only if the sublists remain after we complete the interface lines.
2839: IF (x_plan_details(l_plan_dd_index).topmost_cont_id IS NOT NULL)
2840: AND (NOT l_current_used_details(l_new_index).track_cont_content_found) THEN
2841: IF l_debug_on THEN
2842: WSH_DEBUG_SV.log(l_module_name,'tracking topmost_cont_id', x_plan_details(l_plan_dd_index).topmost_cont_id);
2843: END IF;
2844:
2845: DECLARE
2846: l_content_index NUMBER := NULL;
2871: -- add this new topmost container to x_track_conts list.
2872: -- and build a sublist of container contents that are not yet mapped in l_cont_contents.
2873: -- do not add this mapped line to that sublist because it is accounted for.
2874: IF l_debug_on THEN
2875: WSH_DEBUG_SV.log(l_module_name,'new container: l_cont_index', l_cont_index);
2876: END IF;
2877:
2878: x_track_conts(l_cont_index).topmost_cont_id := x_plan_details(l_plan_dd_index).topmost_cont_id;
2879: x_track_conts(l_cont_index).plan_dd_index := l_plan_dd_index;
2886: FOR content IN c_contents(x_track_conts(l_cont_index).topmost_cont_id) LOOP --[
2887: FOR c IN c_detail(content.delivery_detail_id) LOOP --{
2888:
2889: IF l_debug_on THEN
2890: WSH_DEBUG_SV.log(l_module_name,'looping c_contents: delivery_detail_id', c.delivery_detail_id);
2891: END IF;
2892:
2893: IF (c.delivery_detail_id = x_track_conts(l_cont_index).topmost_cont_id) THEN
2894: -- cache this topmost container details for future reference
2912: x_errors_tab => x_errors_tab,
2913: x_return_status => l_return_status);
2914: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2915: IF l_debug_on THEN
2916: WSH_DEBUG_SV.pop(l_module_name);
2917: END IF;
2918: RETURN;
2919: END;
2920:
2919: END;
2920:
2921: IF c.container_flag = 'N' THEN --{
2922: IF l_debug_on THEN
2923: WSH_DEBUG_SV.log(l_module_name,'topmost_cont_id: content line status', c.released_status);
2924: END IF;
2925:
2926: x_track_conts(l_cont_index).lines_staged :=
2927: x_track_conts(l_cont_index).lines_staged OR (c.released_status IN ('Y', 'C'));
2939: l_content_index := l_content_index + 1;
2940: END IF; --)
2941:
2942: IF l_debug_on THEN
2943: WSH_DEBUG_SV.log(l_module_name,'topmost_cont_id: l_content_index', l_content_index);
2944: END IF;
2945:
2946: l_cont_contents(l_content_index).track_cont_index := l_cont_index;
2947: l_cont_contents(l_content_index).delivery_detail_id := c.delivery_detail_id;
2974: IF (l_cont_contents(l_content_index).delivery_detail_id = x_plan_details(l_plan_dd_index).delivery_detail_id) THEN
2975:
2976: -- now that the content is found, remove it from the topmost container's sublist.
2977: IF l_debug_on THEN
2978: WSH_DEBUG_SV.log(l_module_name,
2979: 'cont content is found for dd_id: ',
2980: l_cont_contents(l_content_index).delivery_detail_id);
2981: END IF;
2982: l_current_used_details(l_new_index).track_cont_content_found := TRUE;
2993: IF (l_cont_contents(l_content_index).track_cont_index <> l_cont_index) THEN
2994: l_content_index := NULL;
2995: x_track_conts(l_cont_index).cont_content_base_index := NULL;
2996: IF l_debug_on THEN
2997: WSH_DEBUG_SV.log(l_module_name, 'sublist is empty for l_cont_index: ', l_cont_index);
2998: END IF;
2999: END IF;
3000: END IF;
3001: END IF;
3027: 'WSH_TP_RELEASE.GENERATE_LOCK_CANDIDATES(nested)',
3028: l_module_name);
3029:
3030: IF l_debug_on THEN
3031: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured in nested block. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3032: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3033: END IF;
3034: RETURN;
3035: END;
3028: l_module_name);
3029:
3030: IF l_debug_on THEN
3031: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured in nested block. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3032: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3033: END IF;
3034: RETURN;
3035: END;
3036:
3034: RETURN;
3035: END;
3036:
3037: IF l_debug_on THEN
3038: WSH_DEBUG_SV.log(l_module_name,'finished tracking topmost_cont_id: ', x_plan_details(l_plan_dd_index).topmost_cont_id);
3039: END IF;
3040:
3041: END IF;
3042:
3099: x_errors_tab => x_errors_tab,
3100: x_return_status => l_return_status);
3101: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3102: IF l_debug_on THEN
3103: WSH_DEBUG_SV.pop(l_module_name);
3104: END IF;
3105: RETURN;
3106: END IF;
3107:
3123: x_errors_tab => x_errors_tab,
3124: x_return_status => l_return_status);
3125: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3126: IF l_debug_on THEN
3127: WSH_DEBUG_SV.pop(l_module_name);
3128: END IF;
3129: RETURN;
3130: END IF;
3131:
3147: x_errors_tab => x_errors_tab,
3148: x_return_status => l_return_status);
3149: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3150: IF l_debug_on THEN
3151: WSH_DEBUG_SV.pop(l_module_name);
3152: END IF;
3153: RETURN;
3154: END IF;
3155:
3159:
3160: END LOOP; -- iline
3161:
3162: IF l_debug_on THEN
3163: WSH_DEBUG_SV.log(l_module_name,'end of iline loop: l_current_used_details.COUNT: ', l_current_used_details.COUNT);
3164: END IF;
3165:
3166: IF (l_current_used_details.COUNT > 0) THEN
3167: flush_used_details(
3172: x_return_status => l_return_status);
3173: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3174: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3175: IF l_debug_on THEN
3176: WSH_DEBUG_SV.pop(l_module_name);
3177: END IF;
3178: RETURN;
3179: END IF;
3180: END IF;
3184: -- Bug 3555487 initialize message stack for each major action points.
3185: FND_MSG_PUB.initialize;
3186:
3187: IF l_debug_on THEN
3188: WSH_DEBUG_SV.log(l_module_name, 'x_plan_details.COUNT', x_plan_details.COUNT);
3189: END IF;
3190:
3191: IF (l_interface_lines_count > 0)
3192: AND (x_plan_details.COUNT = 0) THEN
3206: x_errors_tab => x_errors_tab,
3207: x_return_status => l_return_status);
3208: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3209: IF l_debug_on THEN
3210: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3211: WSH_DEBUG_SV.pop(l_module_name);
3212: END IF;
3213: RETURN;
3214: END IF;
3207: x_return_status => l_return_status);
3208: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3209: IF l_debug_on THEN
3210: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3211: WSH_DEBUG_SV.pop(l_module_name);
3212: END IF;
3213: RETURN;
3214: END IF;
3215:
3214: END IF;
3215:
3216:
3217: IF l_debug_on THEN
3218: WSH_DEBUG_SV.log(l_module_name, 'l_deliveries_populated', l_deliveries_populated);
3219: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries.COUNT', x_plan_deliveries.COUNT);
3220: END IF;
3221:
3222: IF l_deliveries_populated < x_plan_deliveries.COUNT THEN
3215:
3216:
3217: IF l_debug_on THEN
3218: WSH_DEBUG_SV.log(l_module_name, 'l_deliveries_populated', l_deliveries_populated);
3219: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries.COUNT', x_plan_deliveries.COUNT);
3220: END IF;
3221:
3222: IF l_deliveries_populated < x_plan_deliveries.COUNT THEN
3223: -- we need to check for these deliveries:
3294:
3295: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
3296: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3297: IF l_debug_on THEN
3298: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3299: WSH_DEBUG_SV.pop(l_module_name);
3300: END IF;
3301: RETURN;
3302: END IF;
3295: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
3296: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3297: IF l_debug_on THEN
3298: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3299: WSH_DEBUG_SV.pop(l_module_name);
3300: END IF;
3301: RETURN;
3302: END IF;
3303:
3304: END IF;
3305:
3306:
3307: IF l_debug_on THEN
3308: WSH_DEBUG_SV.log(l_module_name, 'l_cont_contents.COUNT', l_cont_contents.COUNT);
3309: END IF;
3310:
3311: IF l_cont_contents.COUNT > 0 THEN
3312: -- LPN configuration is broken if sublists have not been completely mapped/deleted.
3333: END LOOP;
3334:
3335: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3336: IF l_debug_on THEN
3337: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3338: WSH_DEBUG_SV.pop(l_module_name);
3339: END IF;
3340: RETURN;
3341:
3334:
3335: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3336: IF l_debug_on THEN
3337: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3338: WSH_DEBUG_SV.pop(l_module_name);
3339: END IF;
3340: RETURN;
3341:
3342: END IF;
3341:
3342: END IF;
3343:
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.log(l_module_name, 'x_used_details.COUNT', x_used_details.COUNT);
3346: END IF;
3347:
3348: IF x_used_details.COUNT > 0 THEN
3349: -- validate we can unassign partially unused details from their current deliveries.
3371: x_errors_tab => x_errors_tab,
3372: x_return_status => l_return_status);
3373: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3374: IF l_debug_on THEN
3375: WSH_DEBUG_SV.log(l_module_name, 'unused line in firmed del: x_return_status', x_return_status);
3376: WSH_DEBUG_SV.pop(l_module_name);
3377: END IF;
3378: RETURN;
3379: END IF;
3372: x_return_status => l_return_status);
3373: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3374: IF l_debug_on THEN
3375: WSH_DEBUG_SV.log(l_module_name, 'unused line in firmed del: x_return_status', x_return_status);
3376: WSH_DEBUG_SV.pop(l_module_name);
3377: END IF;
3378: RETURN;
3379: END IF;
3380: l_new_index := x_used_details.NEXT(l_new_index);
3392: l_new_index := 0;
3393: FOR itrip IN c_tp_interface_trips(p_group_id => x_context.group_id) LOOP --{
3394:
3395: IF l_debug_on THEN
3396: WSH_DEBUG_SV.log(l_module_name,
3397: 'itrip looping: trip_interface_id',
3398: itrip.trip_interface_id);
3399: WSH_DEBUG_SV.log(l_module_name, 'itrip.trip_id', itrip.trip_id);
3400: END IF;
3395: IF l_debug_on THEN
3396: WSH_DEBUG_SV.log(l_module_name,
3397: 'itrip looping: trip_interface_id',
3398: itrip.trip_interface_id);
3399: WSH_DEBUG_SV.log(l_module_name, 'itrip.trip_id', itrip.trip_id);
3400: END IF;
3401:
3402: l_new_index := l_new_index + 1;
3403: x_plan_trips(l_new_index).trip_interface_id := itrip.trip_interface_id;
3437: x_plan_trips(l_new_index).stop_base_index := x_plan_stops.COUNT + 1;
3438: x_plan_trips(l_new_index).linked_stop_count := 0;
3439:
3440: IF l_debug_on THEN
3441: WSH_DEBUG_SV.log(l_module_name,
3442: 'itrip.lane_id: ',
3443: itrip.lane_id);
3444: WSH_DEBUG_SV.log(l_module_name,
3445: 'x_plan_trips(l_new_index).lane_id: ',
3440: IF l_debug_on THEN
3441: WSH_DEBUG_SV.log(l_module_name,
3442: 'itrip.lane_id: ',
3443: itrip.lane_id);
3444: WSH_DEBUG_SV.log(l_module_name,
3445: 'x_plan_trips(l_new_index).lane_id: ',
3446: x_plan_trips(l_new_index).lane_id);
3447: END IF;
3448:
3449: IF itrip.wsh_ignore_for_planning = 'Y'
3450: OR itrip.wsh_status_code IN ('IT', 'CL') THEN
3451:
3452: IF l_debug_on THEN
3453: WSH_DEBUG_SV.log(l_module_name,
3454: 'itrip.wsh_ignore_for_planning: ',
3455: itrip.wsh_ignore_for_planning);
3456: WSH_DEBUG_SV.log(l_module_name,
3457: 'itrip.wsh_status_code: ',
3452: IF l_debug_on THEN
3453: WSH_DEBUG_SV.log(l_module_name,
3454: 'itrip.wsh_ignore_for_planning: ',
3455: itrip.wsh_ignore_for_planning);
3456: WSH_DEBUG_SV.log(l_module_name,
3457: 'itrip.wsh_status_code: ',
3458: itrip.wsh_status_code);
3459: END IF;
3460:
3478: -- bug 3295628: FTE does not allow existing trip's ship method components
3479: -- to be changed if the trip has a lane.
3480: -- In this case, we should create a new trip
3481: IF l_debug_on THEN
3482: WSH_DEBUG_SV.log(l_module_name,
3483: 'not mapping trip because of lane/ship method changes: ',
3484: itrip.trip_id);
3485: END IF;
3486:
3517: x_errors_tab => x_errors_tab,
3518: x_return_status => l_return_status);
3519: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3520: IF l_debug_on THEN
3521: WSH_DEBUG_SV.log(l_module_name, 'firmed trip not matched: x_return_status', x_return_status);
3522: WSH_DEBUG_SV.log(l_module_name, 'trip_interface_id', itrip.trip_interface_id);
3523: WSH_DEBUG_SV.log(l_module_name, 'trip_id', itrip.trip_id);
3524: WSH_DEBUG_SV.log(l_module_name, 'wsh_carrier_id', itrip.wsh_carrier_id);
3525: WSH_DEBUG_SV.log(l_module_name, 'wsh_mode_of_transport', itrip.wsh_mode_of_transport);
3518: x_return_status => l_return_status);
3519: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3520: IF l_debug_on THEN
3521: WSH_DEBUG_SV.log(l_module_name, 'firmed trip not matched: x_return_status', x_return_status);
3522: WSH_DEBUG_SV.log(l_module_name, 'trip_interface_id', itrip.trip_interface_id);
3523: WSH_DEBUG_SV.log(l_module_name, 'trip_id', itrip.trip_id);
3524: WSH_DEBUG_SV.log(l_module_name, 'wsh_carrier_id', itrip.wsh_carrier_id);
3525: WSH_DEBUG_SV.log(l_module_name, 'wsh_mode_of_transport', itrip.wsh_mode_of_transport);
3526: WSH_DEBUG_SV.log(l_module_name, 'wsh_service_level', itrip.wsh_service_level);
3519: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3520: IF l_debug_on THEN
3521: WSH_DEBUG_SV.log(l_module_name, 'firmed trip not matched: x_return_status', x_return_status);
3522: WSH_DEBUG_SV.log(l_module_name, 'trip_interface_id', itrip.trip_interface_id);
3523: WSH_DEBUG_SV.log(l_module_name, 'trip_id', itrip.trip_id);
3524: WSH_DEBUG_SV.log(l_module_name, 'wsh_carrier_id', itrip.wsh_carrier_id);
3525: WSH_DEBUG_SV.log(l_module_name, 'wsh_mode_of_transport', itrip.wsh_mode_of_transport);
3526: WSH_DEBUG_SV.log(l_module_name, 'wsh_service_level', itrip.wsh_service_level);
3527: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_org_id', itrip.wsh_vehicle_org_id);
3520: IF l_debug_on THEN
3521: WSH_DEBUG_SV.log(l_module_name, 'firmed trip not matched: x_return_status', x_return_status);
3522: WSH_DEBUG_SV.log(l_module_name, 'trip_interface_id', itrip.trip_interface_id);
3523: WSH_DEBUG_SV.log(l_module_name, 'trip_id', itrip.trip_id);
3524: WSH_DEBUG_SV.log(l_module_name, 'wsh_carrier_id', itrip.wsh_carrier_id);
3525: WSH_DEBUG_SV.log(l_module_name, 'wsh_mode_of_transport', itrip.wsh_mode_of_transport);
3526: WSH_DEBUG_SV.log(l_module_name, 'wsh_service_level', itrip.wsh_service_level);
3527: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_org_id', itrip.wsh_vehicle_org_id);
3528: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_item_id', itrip.wsh_vehicle_item_id);
3521: WSH_DEBUG_SV.log(l_module_name, 'firmed trip not matched: x_return_status', x_return_status);
3522: WSH_DEBUG_SV.log(l_module_name, 'trip_interface_id', itrip.trip_interface_id);
3523: WSH_DEBUG_SV.log(l_module_name, 'trip_id', itrip.trip_id);
3524: WSH_DEBUG_SV.log(l_module_name, 'wsh_carrier_id', itrip.wsh_carrier_id);
3525: WSH_DEBUG_SV.log(l_module_name, 'wsh_mode_of_transport', itrip.wsh_mode_of_transport);
3526: WSH_DEBUG_SV.log(l_module_name, 'wsh_service_level', itrip.wsh_service_level);
3527: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_org_id', itrip.wsh_vehicle_org_id);
3528: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_item_id', itrip.wsh_vehicle_item_id);
3529: WSH_DEBUG_SV.log(l_module_name, 'wsh_lane_id', itrip.wsh_lane_id);
3522: WSH_DEBUG_SV.log(l_module_name, 'trip_interface_id', itrip.trip_interface_id);
3523: WSH_DEBUG_SV.log(l_module_name, 'trip_id', itrip.trip_id);
3524: WSH_DEBUG_SV.log(l_module_name, 'wsh_carrier_id', itrip.wsh_carrier_id);
3525: WSH_DEBUG_SV.log(l_module_name, 'wsh_mode_of_transport', itrip.wsh_mode_of_transport);
3526: WSH_DEBUG_SV.log(l_module_name, 'wsh_service_level', itrip.wsh_service_level);
3527: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_org_id', itrip.wsh_vehicle_org_id);
3528: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_item_id', itrip.wsh_vehicle_item_id);
3529: WSH_DEBUG_SV.log(l_module_name, 'wsh_lane_id', itrip.wsh_lane_id);
3530: WSH_DEBUG_SV.log(l_module_name, 'carrier_id', itrip.carrier_id);
3523: WSH_DEBUG_SV.log(l_module_name, 'trip_id', itrip.trip_id);
3524: WSH_DEBUG_SV.log(l_module_name, 'wsh_carrier_id', itrip.wsh_carrier_id);
3525: WSH_DEBUG_SV.log(l_module_name, 'wsh_mode_of_transport', itrip.wsh_mode_of_transport);
3526: WSH_DEBUG_SV.log(l_module_name, 'wsh_service_level', itrip.wsh_service_level);
3527: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_org_id', itrip.wsh_vehicle_org_id);
3528: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_item_id', itrip.wsh_vehicle_item_id);
3529: WSH_DEBUG_SV.log(l_module_name, 'wsh_lane_id', itrip.wsh_lane_id);
3530: WSH_DEBUG_SV.log(l_module_name, 'carrier_id', itrip.carrier_id);
3531: WSH_DEBUG_SV.log(l_module_name, 'mode_of_transport', itrip.mode_of_transport);
3524: WSH_DEBUG_SV.log(l_module_name, 'wsh_carrier_id', itrip.wsh_carrier_id);
3525: WSH_DEBUG_SV.log(l_module_name, 'wsh_mode_of_transport', itrip.wsh_mode_of_transport);
3526: WSH_DEBUG_SV.log(l_module_name, 'wsh_service_level', itrip.wsh_service_level);
3527: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_org_id', itrip.wsh_vehicle_org_id);
3528: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_item_id', itrip.wsh_vehicle_item_id);
3529: WSH_DEBUG_SV.log(l_module_name, 'wsh_lane_id', itrip.wsh_lane_id);
3530: WSH_DEBUG_SV.log(l_module_name, 'carrier_id', itrip.carrier_id);
3531: WSH_DEBUG_SV.log(l_module_name, 'mode_of_transport', itrip.mode_of_transport);
3532: WSH_DEBUG_SV.log(l_module_name, 'service_level', itrip.service_level);
3525: WSH_DEBUG_SV.log(l_module_name, 'wsh_mode_of_transport', itrip.wsh_mode_of_transport);
3526: WSH_DEBUG_SV.log(l_module_name, 'wsh_service_level', itrip.wsh_service_level);
3527: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_org_id', itrip.wsh_vehicle_org_id);
3528: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_item_id', itrip.wsh_vehicle_item_id);
3529: WSH_DEBUG_SV.log(l_module_name, 'wsh_lane_id', itrip.wsh_lane_id);
3530: WSH_DEBUG_SV.log(l_module_name, 'carrier_id', itrip.carrier_id);
3531: WSH_DEBUG_SV.log(l_module_name, 'mode_of_transport', itrip.mode_of_transport);
3532: WSH_DEBUG_SV.log(l_module_name, 'service_level', itrip.service_level);
3533: WSH_DEBUG_SV.log(l_module_name, 'vehicle_organization_id', itrip.vehicle_organization_id);
3526: WSH_DEBUG_SV.log(l_module_name, 'wsh_service_level', itrip.wsh_service_level);
3527: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_org_id', itrip.wsh_vehicle_org_id);
3528: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_item_id', itrip.wsh_vehicle_item_id);
3529: WSH_DEBUG_SV.log(l_module_name, 'wsh_lane_id', itrip.wsh_lane_id);
3530: WSH_DEBUG_SV.log(l_module_name, 'carrier_id', itrip.carrier_id);
3531: WSH_DEBUG_SV.log(l_module_name, 'mode_of_transport', itrip.mode_of_transport);
3532: WSH_DEBUG_SV.log(l_module_name, 'service_level', itrip.service_level);
3533: WSH_DEBUG_SV.log(l_module_name, 'vehicle_organization_id', itrip.vehicle_organization_id);
3534: WSH_DEBUG_SV.log(l_module_name, 'vehicle_item_id', itrip.vehicle_item_id);
3527: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_org_id', itrip.wsh_vehicle_org_id);
3528: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_item_id', itrip.wsh_vehicle_item_id);
3529: WSH_DEBUG_SV.log(l_module_name, 'wsh_lane_id', itrip.wsh_lane_id);
3530: WSH_DEBUG_SV.log(l_module_name, 'carrier_id', itrip.carrier_id);
3531: WSH_DEBUG_SV.log(l_module_name, 'mode_of_transport', itrip.mode_of_transport);
3532: WSH_DEBUG_SV.log(l_module_name, 'service_level', itrip.service_level);
3533: WSH_DEBUG_SV.log(l_module_name, 'vehicle_organization_id', itrip.vehicle_organization_id);
3534: WSH_DEBUG_SV.log(l_module_name, 'vehicle_item_id', itrip.vehicle_item_id);
3535: WSH_DEBUG_SV.log(l_module_name, 'lane_id', itrip.lane_id);
3528: WSH_DEBUG_SV.log(l_module_name, 'wsh_vehicle_item_id', itrip.wsh_vehicle_item_id);
3529: WSH_DEBUG_SV.log(l_module_name, 'wsh_lane_id', itrip.wsh_lane_id);
3530: WSH_DEBUG_SV.log(l_module_name, 'carrier_id', itrip.carrier_id);
3531: WSH_DEBUG_SV.log(l_module_name, 'mode_of_transport', itrip.mode_of_transport);
3532: WSH_DEBUG_SV.log(l_module_name, 'service_level', itrip.service_level);
3533: WSH_DEBUG_SV.log(l_module_name, 'vehicle_organization_id', itrip.vehicle_organization_id);
3534: WSH_DEBUG_SV.log(l_module_name, 'vehicle_item_id', itrip.vehicle_item_id);
3535: WSH_DEBUG_SV.log(l_module_name, 'lane_id', itrip.lane_id);
3536: WSH_DEBUG_SV.pop(l_module_name);
3529: WSH_DEBUG_SV.log(l_module_name, 'wsh_lane_id', itrip.wsh_lane_id);
3530: WSH_DEBUG_SV.log(l_module_name, 'carrier_id', itrip.carrier_id);
3531: WSH_DEBUG_SV.log(l_module_name, 'mode_of_transport', itrip.mode_of_transport);
3532: WSH_DEBUG_SV.log(l_module_name, 'service_level', itrip.service_level);
3533: WSH_DEBUG_SV.log(l_module_name, 'vehicle_organization_id', itrip.vehicle_organization_id);
3534: WSH_DEBUG_SV.log(l_module_name, 'vehicle_item_id', itrip.vehicle_item_id);
3535: WSH_DEBUG_SV.log(l_module_name, 'lane_id', itrip.lane_id);
3536: WSH_DEBUG_SV.pop(l_module_name);
3537: END IF;
3530: WSH_DEBUG_SV.log(l_module_name, 'carrier_id', itrip.carrier_id);
3531: WSH_DEBUG_SV.log(l_module_name, 'mode_of_transport', itrip.mode_of_transport);
3532: WSH_DEBUG_SV.log(l_module_name, 'service_level', itrip.service_level);
3533: WSH_DEBUG_SV.log(l_module_name, 'vehicle_organization_id', itrip.vehicle_organization_id);
3534: WSH_DEBUG_SV.log(l_module_name, 'vehicle_item_id', itrip.vehicle_item_id);
3535: WSH_DEBUG_SV.log(l_module_name, 'lane_id', itrip.lane_id);
3536: WSH_DEBUG_SV.pop(l_module_name);
3537: END IF;
3538: RETURN;
3531: WSH_DEBUG_SV.log(l_module_name, 'mode_of_transport', itrip.mode_of_transport);
3532: WSH_DEBUG_SV.log(l_module_name, 'service_level', itrip.service_level);
3533: WSH_DEBUG_SV.log(l_module_name, 'vehicle_organization_id', itrip.vehicle_organization_id);
3534: WSH_DEBUG_SV.log(l_module_name, 'vehicle_item_id', itrip.vehicle_item_id);
3535: WSH_DEBUG_SV.log(l_module_name, 'lane_id', itrip.lane_id);
3536: WSH_DEBUG_SV.pop(l_module_name);
3537: END IF;
3538: RETURN;
3539: END IF;
3532: WSH_DEBUG_SV.log(l_module_name, 'service_level', itrip.service_level);
3533: WSH_DEBUG_SV.log(l_module_name, 'vehicle_organization_id', itrip.vehicle_organization_id);
3534: WSH_DEBUG_SV.log(l_module_name, 'vehicle_item_id', itrip.vehicle_item_id);
3535: WSH_DEBUG_SV.log(l_module_name, 'lane_id', itrip.lane_id);
3536: WSH_DEBUG_SV.pop(l_module_name);
3537: END IF;
3538: RETURN;
3539: END IF;
3540: END IF;
3556: x_errors_tab => x_errors_tab,
3557: x_return_status => l_return_status);
3558: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3559: IF l_debug_on THEN
3560: WSH_DEBUG_SV.log(l_module_name, 'trip not locked: x_return_status', x_return_status);
3561: WSH_DEBUG_SV.pop(l_module_name);
3562: END IF;
3563: RETURN;
3564: END;
3557: x_return_status => l_return_status);
3558: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3559: IF l_debug_on THEN
3560: WSH_DEBUG_SV.log(l_module_name, 'trip not locked: x_return_status', x_return_status);
3561: WSH_DEBUG_SV.pop(l_module_name);
3562: END IF;
3563: RETURN;
3564: END;
3565:
3607: x_errors_tab => x_errors_tab,
3608: x_return_status => l_return_status);
3609: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3610: IF l_debug_on THEN
3611: WSH_DEBUG_SV.log(l_module_name, 'invalid freight carrier: x_return_status', x_return_status);
3612: WSH_DEBUG_SV.pop(l_module_name);
3613: END IF;
3614: RETURN;
3615: END IF;
3608: x_return_status => l_return_status);
3609: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3610: IF l_debug_on THEN
3611: WSH_DEBUG_SV.log(l_module_name, 'invalid freight carrier: x_return_status', x_return_status);
3612: WSH_DEBUG_SV.pop(l_module_name);
3613: END IF;
3614: RETURN;
3615: END IF;
3616: END; -- validate freight carrier
3619:
3620: FOR istop IN c_tp_interface_stops(p_trip_interface_id => itrip.trip_interface_id) LOOP --[
3621:
3622: IF l_debug_on THEN
3623: WSH_DEBUG_SV.log(l_module_name,
3624: 'istop looping: stop_interface_id',
3625: istop.stop_interface_id);
3626: WSH_DEBUG_SV.log(l_module_name, 'istop.stop_id', istop.stop_id);
3627: END IF;
3622: IF l_debug_on THEN
3623: WSH_DEBUG_SV.log(l_module_name,
3624: 'istop looping: stop_interface_id',
3625: istop.stop_interface_id);
3626: WSH_DEBUG_SV.log(l_module_name, 'istop.stop_id', istop.stop_id);
3627: END IF;
3628:
3629: x_plan_stops(l_stop_index).stop_interface_id := istop.stop_interface_id;
3630: x_plan_stops(l_stop_index).stop_id := NULL; -- to be updated
3661:
3662: IF l_match_found THEN --{
3663:
3664: IF l_debug_on THEN
3665: WSH_DEBUG_SV.log(l_module_name, 'matched stop_id', l_map_stop_rec.stop_id);
3666: END IF;
3667:
3668: -- wsh trip has a stop mapped.
3669: x_plan_stops(l_stop_index).stop_id := l_map_stop_rec.stop_id;
3685: x_errors_tab => x_errors_tab,
3686: x_return_status => l_return_status);
3687: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3688: IF l_debug_on THEN
3689: WSH_DEBUG_SV.log(l_module_name, 'stop not locked: x_return_status', x_return_status);
3690: WSH_DEBUG_SV.pop(l_module_name);
3691: END IF;
3692: RETURN;
3693: END;
3686: x_return_status => l_return_status);
3687: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3688: IF l_debug_on THEN
3689: WSH_DEBUG_SV.log(l_module_name, 'stop not locked: x_return_status', x_return_status);
3690: WSH_DEBUG_SV.pop(l_module_name);
3691: END IF;
3692: RETURN;
3693: END;
3694:
3709: x_errors_tab => x_errors_tab,
3710: x_return_status => l_return_status);
3711: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3712: IF l_debug_on THEN
3713: WSH_DEBUG_SV.log(l_module_name, 'stop not mapped: x_return_status', x_return_status);
3714: WSH_DEBUG_SV.pop(l_module_name);
3715: END IF;
3716: RETURN;
3717: END IF; --]
3710: x_return_status => l_return_status);
3711: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3712: IF l_debug_on THEN
3713: WSH_DEBUG_SV.log(l_module_name, 'stop not mapped: x_return_status', x_return_status);
3714: WSH_DEBUG_SV.pop(l_module_name);
3715: END IF;
3716: RETURN;
3717: END IF; --]
3718:
3734:
3735: FOR l_plan_del_index IN x_plan_deliveries.FIRST .. x_plan_deliveries.LAST LOOP
3736:
3737: IF l_debug_on THEN
3738: WSH_DEBUG_SV.log(l_module_name, 'looping l_plan_del_index: ', l_plan_del_index);
3739: END IF;
3740:
3741: -- take snapshot of legs in shipping datamodel
3742: l_snapshot_leg_ids.DELETE;
3783: x_errors_tab => x_errors_tab,
3784: x_return_status => l_return_status);
3785: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3786: IF l_debug_on THEN
3787: WSH_DEBUG_SV.log(l_module_name, 'stop not locked: x_return_status', x_return_status);
3788: WSH_DEBUG_SV.pop(l_module_name);
3789: END IF;
3790: RETURN;
3791: END;
3784: x_return_status => l_return_status);
3785: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3786: IF l_debug_on THEN
3787: WSH_DEBUG_SV.log(l_module_name, 'stop not locked: x_return_status', x_return_status);
3788: WSH_DEBUG_SV.pop(l_module_name);
3789: END IF;
3790: RETURN;
3791: END;
3792:
3790: RETURN;
3791: END;
3792:
3793: IF l_debug_on THEN
3794: WSH_DEBUG_SV.log(l_module_name, 'snapshot legs for delivery_id: ',
3795: x_plan_deliveries(l_plan_del_index).delivery_id);
3796: END IF;
3797:
3798: OPEN c_snapshot_legs(p_delivery_id => x_plan_deliveries(l_plan_del_index).delivery_id);
3826: BEGIN
3827: FOR i IN 1..l_snapshot_do_phys_stop_ids.COUNT LOOP
3828: IF l_snapshot_do_phys_stop_ids(i) IS NOT NULL THEN
3829: IF l_debug_on THEN
3830: WSH_DEBUG_SV.log(l_module_name, 'mapping physical stop id',
3831: l_snapshot_do_phys_stop_ids(i));
3832: END IF;
3833:
3834: OPEN c_physical_stop(l_snapshot_do_phys_stop_ids(i));
3841: END LOOP;
3842: END;
3843:
3844: IF l_debug_on THEN
3845: WSH_DEBUG_SV.log(l_module_name, 'count of existing legs: ',
3846: l_snapshot_leg_ids.COUNT);
3847: END IF;
3848:
3849: END IF;
3859: p_delivery_interface_id => x_plan_deliveries(l_plan_del_index).del_interface_id)
3860: LOOP --[ ileg
3861:
3862: IF l_debug_on THEN
3863: WSH_DEBUG_SV.log(l_module_name, 'ileg looping: delivery_leg_interface_id',
3864: ileg.delivery_leg_interface_id);
3865: END IF;
3866:
3867: l_new_index := l_new_index + 1;
3888: l_trip_index := x_plan_trips.NEXT(l_trip_index);
3889: END LOOP;
3890:
3891: IF l_debug_on THEN
3892: WSH_DEBUG_SV.log(l_module_name, 'l_trip_index', l_trip_index);
3893: END IF;
3894:
3895: -- find plan pick up stop
3896: l_pu_stop_index := x_plan_trips(l_trip_index).stop_base_index;
3898: l_pu_stop_index := x_plan_stops.NEXT(l_pu_stop_index);
3899: END LOOP;
3900:
3901: IF l_debug_on THEN
3902: WSH_DEBUG_SV.log(l_module_name, 'l_pu_stop_index: ', l_pu_stop_index);
3903: END IF;
3904:
3905: -- track external pick ups
3906: IF x_plan_stops(l_pu_stop_index).stop_location_id
3955: END IF;
3956:
3957:
3958: IF l_debug_on THEN
3959: WSH_DEBUG_SV.log(l_module_name, 'l_do_stop_index: ', l_do_stop_index);
3960: END IF;
3961:
3962: IF l_debug_on THEN
3963: WSH_DEBUG_SV.log(l_module_name, 'l_pu_stop_index', l_pu_stop_index);
3959: WSH_DEBUG_SV.log(l_module_name, 'l_do_stop_index: ', l_do_stop_index);
3960: END IF;
3961:
3962: IF l_debug_on THEN
3963: WSH_DEBUG_SV.log(l_module_name, 'l_pu_stop_index', l_pu_stop_index);
3964: WSH_DEBUG_SV.log(l_module_name, 'l_do_stop_index', l_do_stop_index);
3965: END IF;
3966:
3967: x_plan_legs(l_new_index).trip_index := l_trip_index;
3960: END IF;
3961:
3962: IF l_debug_on THEN
3963: WSH_DEBUG_SV.log(l_module_name, 'l_pu_stop_index', l_pu_stop_index);
3964: WSH_DEBUG_SV.log(l_module_name, 'l_do_stop_index', l_do_stop_index);
3965: END IF;
3966:
3967: x_plan_legs(l_new_index).trip_index := l_trip_index;
3968: x_plan_legs(l_new_index).pickup_stop_index := l_pu_stop_index;
3974: l_used_index := l_snapshot_leg_ids.FIRST;
3975: WHILE l_used_index IS NOT NULL LOOP --{ looking for a snapshot leg to match this interface leg.
3976:
3977: IF l_debug_on THEN
3978: WSH_DEBUG_SV.log(l_module_name, 'snapshot leg: looping l_used_index', l_used_index);
3979: END IF;
3980:
3981: IF x_plan_trips(l_trip_index).trip_id = l_snapshot_trip_ids(l_used_index)
3982: AND x_plan_stops(l_pu_stop_index).stop_id = l_snapshot_pu_stop_ids(l_used_index)
3982: AND x_plan_stops(l_pu_stop_index).stop_id = l_snapshot_pu_stop_ids(l_used_index)
3983: AND x_plan_stops(l_do_stop_index).stop_id = l_snapshot_do_stop_ids(l_used_index) THEN
3984: -- when the existing IDs match, keep leg_id
3985: IF l_debug_on THEN
3986: WSH_DEBUG_SV.log(l_module_name, 'existing leg is mapped: l_used_index: ', l_used_index);
3987: END IF;
3988: x_plan_legs(l_new_index).delivery_leg_id := l_snapshot_leg_ids(l_used_index);
3989:
3990: EXIT;
4060: )
4061: THEN
4062: -- stop information match and we can map these plan records to existing trip/stops
4063: IF l_debug_on THEN
4064: WSH_DEBUG_SV.log(l_module_name, 'mapping existing leg and trip: l_used_index: ', l_used_index);
4065: END IF;
4066: x_plan_trips(l_trip_index).trip_id := l_snapshot_trip_ids(l_used_index);
4067: x_plan_trips(l_trip_index).wsh_planned_flag := l_snapshot_trip_plan_flags(l_used_index);
4068: x_plan_stops(l_pu_stop_index).stop_id := l_snapshot_pu_stop_ids(l_used_index);
4087: x_errors_tab => x_errors_tab,
4088: x_return_status => l_return_status);
4089: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4090: IF l_debug_on THEN
4091: WSH_DEBUG_SV.log(l_module_name, 'leg: trip not locked: x_return_status', x_return_status);
4092: WSH_DEBUG_SV.pop(l_module_name);
4093: END IF;
4094: RETURN;
4095: END;
4088: x_return_status => l_return_status);
4089: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4090: IF l_debug_on THEN
4091: WSH_DEBUG_SV.log(l_module_name, 'leg: trip not locked: x_return_status', x_return_status);
4092: WSH_DEBUG_SV.pop(l_module_name);
4093: END IF;
4094: RETURN;
4095: END;
4096:
4098:
4099: WHILE l_stop_index IS NOT NULL LOOP --(
4100:
4101: IF l_debug_on THEN
4102: WSH_DEBUG_SV.log(l_module_name, 'looping to map stops', l_stop_index);
4103: END IF;
4104:
4105: OPEN c_map_stop(p_trip_id => x_plan_trips(l_trip_index).trip_id,
4106: p_stop_location_id => x_plan_stops(l_stop_index).stop_location_id,
4112:
4113: IF l_match_found THEN --{
4114:
4115: IF l_debug_on THEN
4116: WSH_DEBUG_SV.log(l_module_name, 'plan stop matches shipping stop', l_map_stop_rec.stop_id);
4117: END IF;
4118:
4119: -- wsh trip has a stop mapped.
4120: x_plan_stops(l_stop_index).stop_id := l_map_stop_rec.stop_id;
4137: x_errors_tab => x_errors_tab,
4138: x_return_status => l_return_status);
4139: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4140: IF l_debug_on THEN
4141: WSH_DEBUG_SV.log(l_module_name, 'leg: stop not locked: x_return_status', x_return_status);
4142: WSH_DEBUG_SV.pop(l_module_name);
4143: END IF;
4144: RETURN;
4145: END;
4138: x_return_status => l_return_status);
4139: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4140: IF l_debug_on THEN
4141: WSH_DEBUG_SV.log(l_module_name, 'leg: stop not locked: x_return_status', x_return_status);
4142: WSH_DEBUG_SV.pop(l_module_name);
4143: END IF;
4144: RETURN;
4145: END;
4146:
4152: IF x_plan_trips(l_trip_index).wsh_planned_flag = 'Y' THEN --[
4153: -- if flag = 'Y', clear the plan trip and stops' shipping IDs
4154: -- clear l_used_index and exit.
4155: IF l_debug_on THEN
4156: WSH_DEBUG_SV.logmsg(l_module_name, 'stop not matched on routing-firmed trip; undo the mapping');
4157: END IF;
4158: x_plan_trips(l_trip_index).trip_id := NULL;
4159: x_plan_trips(l_trip_index).wsh_planned_flag := NULL;
4160:
4181: x_errors_tab => x_errors_tab,
4182: x_return_status => l_return_status);
4183: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4184: IF l_debug_on THEN
4185: WSH_DEBUG_SV.log(l_module_name, 'leg: stop not mapped: x_return_status', x_return_status);
4186: WSH_DEBUG_SV.pop(l_module_name);
4187: END IF;
4188: RETURN;
4189: END IF; --]
4182: x_return_status => l_return_status);
4183: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4184: IF l_debug_on THEN
4185: WSH_DEBUG_SV.log(l_module_name, 'leg: stop not mapped: x_return_status', x_return_status);
4186: WSH_DEBUG_SV.pop(l_module_name);
4187: END IF;
4188: RETURN;
4189: END IF; --]
4190:
4252: x_errors_tab => x_errors_tab,
4253: x_return_status => l_return_status);
4254: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4255: IF l_debug_on THEN
4256: WSH_DEBUG_SV.log(l_module_name, 'firmed delivery with extra leg: x_return_status', x_return_status);
4257: WSH_DEBUG_SV.pop(l_module_name);
4258: END IF;
4259: RETURN;
4260: END IF;
4253: x_return_status => l_return_status);
4254: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4255: IF l_debug_on THEN
4256: WSH_DEBUG_SV.log(l_module_name, 'firmed delivery with extra leg: x_return_status', x_return_status);
4257: WSH_DEBUG_SV.pop(l_module_name);
4258: END IF;
4259: RETURN;
4260: END IF;
4261:
4275: x_errors_tab => x_errors_tab,
4276: x_return_status => l_return_status);
4277: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4278: IF l_debug_on THEN
4279: WSH_DEBUG_SV.log(l_module_name, 'firmed delivery with extra leg: x_return_status', x_return_status);
4280: WSH_DEBUG_SV.pop(l_module_name);
4281: END IF;
4282: RETURN;
4283: END IF;
4276: x_return_status => l_return_status);
4277: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4278: IF l_debug_on THEN
4279: WSH_DEBUG_SV.log(l_module_name, 'firmed delivery with extra leg: x_return_status', x_return_status);
4280: WSH_DEBUG_SV.pop(l_module_name);
4281: END IF;
4282: RETURN;
4283: END IF;
4284:
4283: END IF;
4284:
4285: -- otherwise, add these unmapped legs to x_trip_unassigns if not routing/contents firmed
4286: IF l_debug_on THEN
4287: WSH_DEBUG_SV.log(l_module_name, 'count of legs to unassign: ',
4288: l_snapshot_leg_ids.COUNT);
4289: END IF;
4290:
4291:
4306: x_errors_tab => x_errors_tab,
4307: x_return_status => l_return_status);
4308: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4309: IF l_debug_on THEN
4310: WSH_DEBUG_SV.log(l_module_name, 'delivery with extra firmed leg: x_return_status', x_return_status);
4311: WSH_DEBUG_SV.pop(l_module_name);
4312: END IF;
4313: RETURN;
4314: END IF;
4307: x_return_status => l_return_status);
4308: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4309: IF l_debug_on THEN
4310: WSH_DEBUG_SV.log(l_module_name, 'delivery with extra firmed leg: x_return_status', x_return_status);
4311: WSH_DEBUG_SV.pop(l_module_name);
4312: END IF;
4313: RETURN;
4314: END IF;
4315:
4348: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
4349: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4350: x_return_status := l_return_status;
4351: IF l_debug_on THEN
4352: WSH_DEBUG_SV.log(l_module_name, 'map_moves failed: x_return_status', x_return_status);
4353: WSH_DEBUG_SV.pop(l_module_name);
4354: END IF;
4355: RETURN;
4356: END IF;
4349: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4350: x_return_status := l_return_status;
4351: IF l_debug_on THEN
4352: WSH_DEBUG_SV.log(l_module_name, 'map_moves failed: x_return_status', x_return_status);
4353: WSH_DEBUG_SV.pop(l_module_name);
4354: END IF;
4355: RETURN;
4356: END IF;
4357:
4358:
4359: --
4360: --
4361: IF l_debug_on THEN
4362: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4363: WSH_DEBUG_SV.pop(l_module_name);
4364: END IF;
4365:
4366: EXCEPTION
4359: --
4360: --
4361: IF l_debug_on THEN
4362: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4363: WSH_DEBUG_SV.pop(l_module_name);
4364: END IF;
4365:
4366: EXCEPTION
4367: WHEN OTHERS THEN
4370: 'WSH_TP_RELEASE.GENERATE_LOCK_CANDIDATES',
4371: l_module_name);
4372:
4373: IF l_debug_on THEN
4374: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4375: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4376: END IF;
4377:
4378: IF c_being_staged%ISOPEN THEN
4371: l_module_name);
4372:
4373: IF l_debug_on THEN
4374: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4375: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4376: END IF;
4377:
4378: IF c_being_staged%ISOPEN THEN
4379: CLOSE c_being_staged;
4465: BEGIN
4466: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4467: --
4468: IF l_debug_on IS NULL THEN
4469: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4470: END IF;
4471:
4472: IF l_debug_on THEN
4473: WSH_DEBUG_SV.push(l_module_name);
4469: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4470: END IF;
4471:
4472: IF l_debug_on THEN
4473: WSH_DEBUG_SV.push(l_module_name);
4474: END IF;
4475: --
4476: --
4477:
4497: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
4498: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4499: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4500: IF l_debug_on THEN
4501: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4502: WSH_DEBUG_SV.pop(l_module_name);
4503: END IF;
4504: RETURN;
4505: END IF;
4498: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4499: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4500: IF l_debug_on THEN
4501: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4502: WSH_DEBUG_SV.pop(l_module_name);
4503: END IF;
4504: RETURN;
4505: END IF;
4506:
4527: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
4528: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4529: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4530: IF l_debug_on THEN
4531: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4532: WSH_DEBUG_SV.pop(l_module_name);
4533: END IF;
4534: RETURN;
4535: END IF;
4528: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4529: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4530: IF l_debug_on THEN
4531: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4532: WSH_DEBUG_SV.pop(l_module_name);
4533: END IF;
4534: RETURN;
4535: END IF;
4536: END IF;
4559: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
4560: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4561: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4562: IF l_debug_on THEN
4563: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4564: WSH_DEBUG_SV.pop(l_module_name);
4565: END IF;
4566: RETURN;
4567: END IF;
4560: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4561: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4562: IF l_debug_on THEN
4563: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4564: WSH_DEBUG_SV.pop(l_module_name);
4565: END IF;
4566: RETURN;
4567: END IF;
4568:
4570:
4571: --
4572: --
4573: IF l_debug_on THEN
4574: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4575: WSH_DEBUG_SV.pop(l_module_name);
4576: END IF;
4577:
4578: EXCEPTION
4571: --
4572: --
4573: IF l_debug_on THEN
4574: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4575: WSH_DEBUG_SV.pop(l_module_name);
4576: END IF;
4577:
4578: EXCEPTION
4579: WHEN OTHERS THEN
4582: 'WSH_TP_RELEASE.VALIDATE_PLAN',
4583: l_module_name);
4584:
4585: IF l_debug_on THEN
4586: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4587: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4588: END IF;
4589:
4590: END validate_plan;
4583: l_module_name);
4584:
4585: IF l_debug_on THEN
4586: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4587: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4588: END IF;
4589:
4590: END validate_plan;
4591:
4797: BEGIN
4798: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4799: --
4800: IF l_debug_on IS NULL THEN
4801: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4802: END IF;
4803:
4804: IF l_debug_on THEN
4805: WSH_DEBUG_SV.push(l_module_name);
4801: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4802: END IF;
4803:
4804: IF l_debug_on THEN
4805: WSH_DEBUG_SV.push(l_module_name);
4806: END IF;
4807: --
4808: --
4809:
4811: -- inbound/drop: add non-plan lines and non-plan LPNs to split-delivery list.
4812:
4813:
4814: IF l_debug_on THEN
4815: WSH_DEBUG_SV.log(l_module_name,'1. Unassign lines/LPNs: x_delivery_unassigns.COUNT', x_delivery_unassigns.COUNT);
4816: END IF;
4817:
4818: IF (x_delivery_unassigns.COUNT > 0) THEN
4819:
4859: IF NOT x_context.wv_exception_dels.exists(x_delivery_unassigns(l_index).delivery_id) THEN
4860: x_context.wv_exception_dels(x_delivery_unassigns(l_index).delivery_id) := x_delivery_unassigns(l_index).initial_pickup_location_id;
4861:
4862: IF l_debug_on THEN
4863: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against del', x_delivery_unassigns(l_index).delivery_id);
4864: END IF;
4865: END IF;
4866:
4867: END IF;
4872: FOR stop in c_check_del_stop_wv_frozen(x_delivery_unassigns(l_index).delivery_id) LOOP
4873: IF NOT x_context.wv_exception_stops.exists(stop.stop_id) THEN
4874: x_context.wv_exception_stops(stop.stop_id) := stop.stop_location_id;
4875: IF l_debug_on THEN
4876: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against stop', stop.stop_id);
4877: END IF;
4878: END IF;
4879: END LOOP;
4880:
4901: x_defaults => l_dd_defaults,
4902: x_action_out_rec => l_dd_action_rec);
4903:
4904: IF l_debug_on THEN
4905: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
4906: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
4907: WSH_DEBUG_SV.log(l_module_name, 'l_dd_attrs.COUNT', l_dd_attrs.COUNT);
4908: END IF;
4909:
4902: x_action_out_rec => l_dd_action_rec);
4903:
4904: IF l_debug_on THEN
4905: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
4906: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
4907: WSH_DEBUG_SV.log(l_module_name, 'l_dd_attrs.COUNT', l_dd_attrs.COUNT);
4908: END IF;
4909:
4910: -- convert warning to error if the count of valid ids does not match.
4903:
4904: IF l_debug_on THEN
4905: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
4906: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
4907: WSH_DEBUG_SV.log(l_module_name, 'l_dd_attrs.COUNT', l_dd_attrs.COUNT);
4908: END IF;
4909:
4910: -- convert warning to error if the count of valid ids does not match.
4911: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
4910: -- convert warning to error if the count of valid ids does not match.
4911: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
4912: AND l_dd_action_rec.valid_id_tab.COUNT < l_dd_attrs.COUNT) THEN
4913: IF l_debug_on THEN
4914: WSH_DEBUG_SV.LOG(l_module_name, 'converting return status', WSH_UTIL_CORE.G_RET_STS_ERROR);
4915: END IF;
4916: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4917: END IF;
4918:
4925: x_num_errors => l_number_of_errors);
4926: END IF;
4927:
4928: IF l_debug_on THEN
4929: WSH_DEBUG_SV.log(l_module_name,'after x_delivery_unassigns, l_sd_dd_count', l_sd_dd_count);
4930: END IF;
4931:
4932: END IF;
4933:
4935:
4936: -- 2. unassign delivieres in x_trip_unassigns
4937:
4938: IF l_debug_on THEN
4939: WSH_DEBUG_SV.log(l_module_name,'2. Unassign deliveries: x_trip_unassigns.COUNT: ', x_trip_unassigns.COUNT);
4940: END IF;
4941:
4942: IF (x_trip_unassigns.COUNT > 0) THEN
4943:
4967: IF NOT x_context.wv_exception_stops.exists(stop.stop_id) THEN
4968: x_context.wv_exception_stops(stop.stop_id) := stop.stop_location_id;
4969:
4970: IF l_debug_on THEN
4971: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against stop', stop.stop_id);
4972: END IF;
4973: END IF;
4974: END LOOP;
4975:
5005:
5006: -- 3. create new deliveries and update existing deliveries
5007:
5008: IF l_debug_on THEN
5009: WSH_DEBUG_SV.log(l_module_name,'3. Create/update deliveries: x_plan_deliveries.COUNT: ', x_plan_deliveries.COUNT);
5010: END IF;
5011:
5012: l_del_attrs.DELETE;
5013: l_del_in_rec.caller := 'WSH_TP_RELEASE';
5019: -- Bug 3555487 initialize message stack for each major action point.
5020: FND_MSG_PUB.initialize;
5021:
5022: IF l_debug_on THEN
5023: WSH_DEBUG_SV.log(l_module_name, 'create/update deliveries: l_index', l_index);
5024: END IF;
5025:
5026: IF x_plan_deliveries(l_index).delivery_id IS NULL THEN
5027: l_del_in_rec.action_code := 'CREATE';
5077:
5078: -- 4.0 create new trips and update existing trips with NULL lane_id
5079:
5080: IF l_debug_on THEN
5081: WSH_DEBUG_SV.log(l_module_name,'4.0. Create/update trips: x_plan_trips.COUNT: ', x_plan_trips.COUNT);
5082: END IF;
5083:
5084: create_update_plan_trips(
5085: p_phase => 1,
5097:
5098: -- 4.1. delete stops in x_obsoleted_stops
5099:
5100: IF l_debug_on THEN
5101: WSH_DEBUG_SV.log(l_module_name,'4.1. Delete stops: x_obsoleted_stops.COUNT: ', x_obsoleted_stops.COUNT);
5102: END IF;
5103:
5104: IF (x_obsoleted_stops.COUNT > 0) THEN
5105:
5141:
5142:
5143: -- 4.2 create new stops and update existing stops
5144: IF l_debug_on THEN
5145: WSH_DEBUG_SV.log(l_module_name,'4.2 Create/update stops: x_plan_stops.COUNT: ', x_plan_stops.COUNT);
5146: END IF;
5147:
5148: l_stop_attrs.DELETE;
5149: l_stop_in_rec.caller := 'WSH_TP_RELEASE';
5154: -- Bug 3555487 initialize message stack for each major action point.
5155: FND_MSG_PUB.initialize;
5156:
5157: IF l_debug_on THEN
5158: WSH_DEBUG_SV.log(l_module_name, 'create/update stops: l_index', l_index);
5159: END IF;
5160:
5161: copy_stop_record(
5162: p_plan_stop_rec => x_plan_stops(l_index),
5203:
5204: -- 4.3 update trips to have lane_id from the plan
5205:
5206: IF l_debug_on THEN
5207: WSH_DEBUG_SV.log(l_module_name,'4.3 update lane_id on trips: x_plan_trips.COUNT: ', x_plan_trips.COUNT);
5208: END IF;
5209:
5210: create_update_plan_trips(
5211: p_phase => 2,
5223:
5224:
5225: -- 5. split lines in x_plan_details
5226: IF l_debug_on THEN
5227: WSH_DEBUG_SV.logmsg(l_module_name,'5. Split lines in x_plan_details');
5228: END IF;
5229:
5230: l_index := x_plan_details.FIRST;
5231: WHILE l_index IS NOT NULL LOOP
5249: IF NOT x_context.wv_exception_details.exists(x_plan_details(l_index).delivery_detail_id) THEN
5250: x_context.wv_exception_details(x_plan_details(l_index).delivery_detail_id)
5251: := x_plan_details(l_index).ship_from_location_id;
5252: IF l_debug_on THEN
5253: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against detail', x_plan_details(l_index).delivery_detail_id);
5254: END IF;
5255: END IF;
5256: END IF;
5257:
5289: -- inbound/drop: add x_used_details to the split-delivery list if needed and invoke SPLIT-DELIVERY
5290: -- and skip unassignment of x_plan_details
5291:
5292: IF l_debug_on THEN
5293: WSH_DEBUG_SV.log(l_module_name,'6. Unassign used details: x_used_details.COUNT: ', x_used_details.COUNT);
5294: END IF;
5295:
5296: l_dd_attrs.DELETE;
5297: l_work_index := 0;
5316: l_index := x_used_details.NEXT(l_index);
5317: END LOOP;
5318:
5319: IF l_debug_on THEN
5320: WSH_DEBUG_SV.log(l_module_name,'after used details, l_dd_attrs.COUNT', l_dd_attrs.COUNT);
5321: WSH_DEBUG_SV.log(l_module_name,'after used details, l_sd_dd_count', l_sd_dd_count);
5322: END IF;
5323: END IF;
5324:
5317: END LOOP;
5318:
5319: IF l_debug_on THEN
5320: WSH_DEBUG_SV.log(l_module_name,'after used details, l_dd_attrs.COUNT', l_dd_attrs.COUNT);
5321: WSH_DEBUG_SV.log(l_module_name,'after used details, l_sd_dd_count', l_sd_dd_count);
5322: END IF;
5323: END IF;
5324:
5325: l_index := x_plan_details.FIRST;
5349:
5350: IF l_location_id IS NOT NULL THEN
5351: x_context.wv_exception_dels(x_plan_details(l_index).current_delivery_id) := l_location_id;
5352: IF l_debug_on THEN
5353: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against delivery', x_plan_details(l_index).current_delivery_id);
5354: END IF;
5355: END IF;
5356:
5357: END IF;
5362: FOR stop in c_check_del_stop_wv_frozen(x_plan_details(l_index).current_delivery_id) LOOP
5363: IF NOT x_context.wv_exception_stops.exists(stop.stop_id) THEN
5364: x_context.wv_exception_stops(stop.stop_id) := stop.stop_location_id;
5365: IF l_debug_on THEN
5366: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against stop', stop.stop_id);
5367: END IF;
5368: END IF;
5369: END LOOP;
5370:
5372: l_index := x_plan_details.NEXT(l_index);
5373: END LOOP;
5374:
5375: IF l_debug_on THEN
5376: WSH_DEBUG_SV.log(l_module_name,'after plan details, l_dd_attrs.COUNT', l_dd_attrs.COUNT);
5377: END IF;
5378:
5379: IF l_dd_attrs.COUNT > 0 THEN
5380: l_dd_action_prms.caller := 'WSH_TP_RELEASE';
5394: x_action_out_rec => l_dd_action_rec);
5395:
5396:
5397: IF l_debug_on THEN
5398: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5399: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5400: WSH_DEBUG_SV.log(l_module_name, 'l_dd_attrs.COUNT', l_dd_attrs.COUNT);
5401: END IF;
5402:
5395:
5396:
5397: IF l_debug_on THEN
5398: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5399: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5400: WSH_DEBUG_SV.log(l_module_name, 'l_dd_attrs.COUNT', l_dd_attrs.COUNT);
5401: END IF;
5402:
5403: -- convert warning to error if the count of valid ids does not match.
5396:
5397: IF l_debug_on THEN
5398: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5399: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5400: WSH_DEBUG_SV.log(l_module_name, 'l_dd_attrs.COUNT', l_dd_attrs.COUNT);
5401: END IF;
5402:
5403: -- convert warning to error if the count of valid ids does not match.
5404: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
5403: -- convert warning to error if the count of valid ids does not match.
5404: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
5405: AND l_dd_action_rec.valid_id_tab.COUNT < l_dd_attrs.COUNT) THEN
5406: IF l_debug_on THEN
5407: WSH_DEBUG_SV.LOG(l_module_name, 'converting return status', WSH_UTIL_CORE.G_RET_STS_ERROR);
5408: END IF;
5409: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5410: END IF;
5411:
5438: x_action_out_rec => l_dd_action_rec);
5439:
5440:
5441: IF l_debug_on THEN
5442: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5443: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5444: WSH_DEBUG_SV.log(l_module_name, 'l_sd_dd_attrs.COUNT', l_sd_dd_attrs.COUNT);
5445: END IF;
5446:
5439:
5440:
5441: IF l_debug_on THEN
5442: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5443: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5444: WSH_DEBUG_SV.log(l_module_name, 'l_sd_dd_attrs.COUNT', l_sd_dd_attrs.COUNT);
5445: END IF;
5446:
5447: -- convert warning to error if the count of valid ids does not match.
5440:
5441: IF l_debug_on THEN
5442: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5443: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5444: WSH_DEBUG_SV.log(l_module_name, 'l_sd_dd_attrs.COUNT', l_sd_dd_attrs.COUNT);
5445: END IF;
5446:
5447: -- convert warning to error if the count of valid ids does not match.
5448: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
5447: -- convert warning to error if the count of valid ids does not match.
5448: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
5449: AND l_dd_action_rec.valid_id_tab.COUNT < l_sd_dd_attrs.COUNT) THEN
5450: IF l_debug_on THEN
5451: WSH_DEBUG_SV.LOG(l_module_name, 'converting return status', WSH_UTIL_CORE.G_RET_STS_ERROR);
5452: END IF;
5453: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5454: END IF;
5455:
5471: -- * validate that ship sets and SMC are completed in each delivery
5472: -- (if enforced in shipping parameters)
5473:
5474: IF l_debug_on THEN
5475: WSH_DEBUG_SV.logmsg(l_module_name,'7. Assign details to deliveries (unassigning as needed)');
5476: END IF;
5477:
5478: DECLARE
5479: l_work_details plan_detail_tab_type;
5487:
5488: BEGIN
5489: -- make a working copy of details that need assignments
5490: IF l_debug_on THEN
5491: WSH_DEBUG_SV.logmsg(l_module_name, 'build working list of details to assign and unassign');
5492: END IF;
5493:
5494: l_index := x_plan_details.FIRST;
5495: l_work_index := 0;
5509: IF x_plan_details(l_index).current_delivery_id IS NOT NULL THEN
5510: -- if assigned, add to the list to be unassigned
5511: -- this will loop at most once.
5512: IF l_debug_on THEN
5513: WSH_DEBUG_SV.log(l_module_name, 'check whether to unassign delivery_detail_id', x_plan_details(l_index).delivery_detail_id);
5514: END IF;
5515:
5516: IF x_plan_details(l_index).line_direction IN ('O', 'IO') THEN
5517: -- only outbound lines need to be unassigned
5535:
5536: IF l_location_id IS NOT NULL THEN
5537: x_context.wv_exception_dels(x_plan_details(l_index).current_delivery_id) := l_location_id;
5538: IF l_debug_on THEN
5539: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against delivery', x_plan_details(l_index).current_delivery_id);
5540: END IF;
5541:
5542: END IF;
5543: END IF;
5548: FOR stop in c_check_del_stop_wv_frozen(x_plan_details(l_index).current_delivery_id) LOOP
5549: IF NOT x_context.wv_exception_stops.exists(stop.stop_id) THEN
5550: x_context.wv_exception_stops(stop.stop_id) := stop.stop_location_id;
5551: IF l_debug_on THEN
5552: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against stop', stop.stop_location_id);
5553: END IF;
5554: END IF;
5555: END LOOP;
5556:
5560: l_index := x_plan_details.NEXT(l_index);
5561: END LOOP;
5562:
5563: IF l_debug_on THEN
5564: WSH_DEBUG_SV.log(l_module_name, 'unassign: l_unassign_details.COUNT', l_unassign_details.COUNT);
5565: END IF;
5566:
5567: -- unassign lines that need to be unassigned
5568: IF l_unassign_details.COUNT > 0 THEN
5584: x_defaults => l_dd_defaults,
5585: x_action_out_rec => l_dd_action_rec);
5586:
5587: IF l_debug_on THEN
5588: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5589: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5590: WSH_DEBUG_SV.log(l_module_name, 'l_unassign_details.COUNT', l_unassign_details.COUNT);
5591: END IF;
5592:
5585: x_action_out_rec => l_dd_action_rec);
5586:
5587: IF l_debug_on THEN
5588: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5589: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5590: WSH_DEBUG_SV.log(l_module_name, 'l_unassign_details.COUNT', l_unassign_details.COUNT);
5591: END IF;
5592:
5593: -- convert warning to error if the count of valid ids does not match.
5586:
5587: IF l_debug_on THEN
5588: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5589: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5590: WSH_DEBUG_SV.log(l_module_name, 'l_unassign_details.COUNT', l_unassign_details.COUNT);
5591: END IF;
5592:
5593: -- convert warning to error if the count of valid ids does not match.
5594: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
5593: -- convert warning to error if the count of valid ids does not match.
5594: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
5595: AND l_dd_action_rec.valid_id_tab.COUNT < l_unassign_details.COUNT) THEN
5596: IF l_debug_on THEN
5597: WSH_DEBUG_SV.LOG(l_module_name, 'converting return status', WSH_UTIL_CORE.G_RET_STS_ERROR);
5598: END IF;
5599: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5600: END IF;
5601:
5637: -- start assigning
5638: l_index := x_plan_deliveries.FIRST;
5639: WHILE l_index IS NOT NULL LOOP
5640: IF l_debug_on THEN
5641: WSH_DEBUG_SV.log(l_module_name, 'check for assignments in delivery', x_plan_deliveries(l_index).delivery_id);
5642: WSH_DEBUG_SV.log(l_module_name, 'count of details to assign', x_plan_deliveries(l_index).assign_details_count);
5643: END IF;
5644:
5645: IF x_plan_deliveries(l_index).assign_details_count > 0 THEN
5638: l_index := x_plan_deliveries.FIRST;
5639: WHILE l_index IS NOT NULL LOOP
5640: IF l_debug_on THEN
5641: WSH_DEBUG_SV.log(l_module_name, 'check for assignments in delivery', x_plan_deliveries(l_index).delivery_id);
5642: WSH_DEBUG_SV.log(l_module_name, 'count of details to assign', x_plan_deliveries(l_index).assign_details_count);
5643: END IF;
5644:
5645: IF x_plan_deliveries(l_index).assign_details_count > 0 THEN
5646: -- there are details to assign to this delivery
5665: IF x_plan_deliveries(l_index).wv_frozen_flag = 'Y' THEN
5666: IF NOT x_context.wv_exception_dels.exists(x_plan_deliveries(l_index).delivery_id) THEN
5667: x_context.wv_exception_dels(x_plan_deliveries(l_index).delivery_id) := x_plan_deliveries(l_index).initial_pickup_location_id;
5668: IF l_debug_on THEN
5669: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against delivery', x_plan_deliveries(l_index).delivery_id);
5670: END IF;
5671: END IF;
5672: END IF;
5673: -- Handles the case where the delivery wv may not be frozen, but it may
5676: FOR stop in c_check_del_stop_wv_frozen(x_plan_deliveries(l_index).delivery_id) LOOP
5677: IF NOT x_context.wv_exception_stops.exists(stop.stop_id) THEN
5678: x_context.wv_exception_stops(stop.stop_id) := stop.stop_location_id;
5679: IF l_debug_on THEN
5680: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against stop', stop.stop_id);
5681: END IF;
5682: END IF;
5683: END LOOP;
5684:
5711: x_defaults => l_dd_defaults,
5712: x_action_out_rec => l_dd_action_rec);
5713:
5714: IF l_debug_on THEN
5715: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5716: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5717: WSH_DEBUG_SV.log(l_module_name, 'l_dd_attrs.COUNT', l_dd_attrs.COUNT);
5718: END IF;
5719:
5712: x_action_out_rec => l_dd_action_rec);
5713:
5714: IF l_debug_on THEN
5715: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5716: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5717: WSH_DEBUG_SV.log(l_module_name, 'l_dd_attrs.COUNT', l_dd_attrs.COUNT);
5718: END IF;
5719:
5720: -- convert warning to error if the count of valid ids does not match.
5713:
5714: IF l_debug_on THEN
5715: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
5716: WSH_DEBUG_SV.log(l_module_name, 'l_dd_action_rec.valid_id_tab.COUNT', l_dd_action_rec.valid_id_tab.COUNT);
5717: WSH_DEBUG_SV.log(l_module_name, 'l_dd_attrs.COUNT', l_dd_attrs.COUNT);
5718: END IF;
5719:
5720: -- convert warning to error if the count of valid ids does not match.
5721: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
5720: -- convert warning to error if the count of valid ids does not match.
5721: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
5722: AND l_dd_action_rec.valid_id_tab.COUNT < l_dd_attrs.COUNT) THEN
5723: IF l_debug_on THEN
5724: WSH_DEBUG_SV.LOG(l_module_name, 'converting return status', WSH_UTIL_CORE.G_RET_STS_ERROR);
5725: END IF;
5726: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5727: END IF;
5728:
5736: END IF;
5737:
5738: -- validate ship sets and smc are completed if enforced
5739: IF l_debug_on THEN
5740: WSH_DEBUG_SV.log(l_module_name, 'check if we enforce ship sets and SMC in organization', x_plan_deliveries(l_index).organization_id);
5741: END IF;
5742:
5743: wsh_shipping_params_pvt.get(
5744: p_organization_id => x_plan_deliveries(l_index).organization_id,
5754: x_num_errors => l_number_of_errors);
5755:
5756:
5757: IF l_debug_on THEN
5758: WSH_DEBUG_SV.log(l_module_name, 'l_ship_params.enforce_ship_set_and_smc', l_ship_params.enforce_ship_set_and_smc);
5759: END IF;
5760:
5761: IF l_ship_params.enforce_ship_set_and_smc = 'Y' THEN
5762:
5803:
5804: -- 8. update delivery details with TP attributes
5805:
5806: IF l_debug_on THEN
5807: WSH_DEBUG_SV.log(l_module_name,'8. update delivery details with TP attributes: x_plan_details.COUNT: ', x_plan_details.COUNT);
5808: END IF;
5809:
5810: -- avoid overhead of calling group API to update one column
5811: l_index := x_plan_details.FIRST;
5821:
5822: -- 9. assign deliveries to trips
5823:
5824: IF l_debug_on THEN
5825: WSH_DEBUG_SV.log(l_module_name,'9. Assign deliveries to trips: x_plan_legs.COUNT: ', x_plan_legs.COUNT);
5826: END IF;
5827:
5828: l_index := x_plan_legs.FIRST;
5829: WHILE l_index IS NOT NULL LOOP
5860: IF NOT x_context.wv_exception_stops.exists(x_plan_stops(x_plan_legs(l_index).pickup_stop_index).stop_id) THEN
5861: x_context.wv_exception_stops(x_plan_stops(x_plan_legs(l_index).pickup_stop_index).stop_id) :=
5862: x_plan_stops(x_plan_legs(l_index).pickup_stop_index).stop_location_id;
5863: IF l_debug_on THEN
5864: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against stop', x_plan_stops(x_plan_legs(l_index).pickup_stop_index).stop_id);
5865: END IF;
5866: END IF;
5867: END IF;
5868: IF x_plan_stops(x_plan_legs(l_index).dropoff_stop_index).wv_frozen_flag = 'Y' THEN
5869: IF NOT x_context.wv_exception_stops.exists(x_plan_stops(x_plan_legs(l_index).dropoff_stop_index).stop_id) THEN
5870: x_context.wv_exception_stops(x_plan_stops(x_plan_legs(l_index).dropoff_stop_index).stop_id) :=
5871: x_plan_stops(x_plan_legs(l_index).dropoff_stop_index).stop_location_id;
5872: IF l_debug_on THEN
5873: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against stop', x_plan_stops(x_plan_legs(l_index).dropoff_stop_index).stop_id);
5874: END IF;
5875: END IF;
5876: END IF;
5877:
5885: IF NOT x_context.wv_exception_stops.exists(stop.stop_id) THEN
5886: x_context.wv_exception_stops(stop.stop_id) := stop.stop_location_id;
5887:
5888: IF l_debug_on THEN
5889: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against stop', stop.stop_id);
5890: END IF;
5891: END IF;
5892: END LOOP;
5893:
5920:
5921: -- 10. reconciliate continuous moves (FTE)
5922:
5923: IF l_debug_on THEN
5924: WSH_DEBUG_SV.log(l_module_name,'10. reconciliate continuous moves: x_plan_moves.COUNT', x_plan_moves.COUNT);
5925: WSH_DEBUG_SV.log(l_module_name,'x_plan_trip_moves.COUNT', x_plan_trip_moves.COUNT);
5926: WSH_DEBUG_SV.log(l_module_name,'x_obsoleted_trip_moves.COUNT', x_obsoleted_trip_moves.COUNT);
5927: END IF;
5928:
5921: -- 10. reconciliate continuous moves (FTE)
5922:
5923: IF l_debug_on THEN
5924: WSH_DEBUG_SV.log(l_module_name,'10. reconciliate continuous moves: x_plan_moves.COUNT', x_plan_moves.COUNT);
5925: WSH_DEBUG_SV.log(l_module_name,'x_plan_trip_moves.COUNT', x_plan_trip_moves.COUNT);
5926: WSH_DEBUG_SV.log(l_module_name,'x_obsoleted_trip_moves.COUNT', x_obsoleted_trip_moves.COUNT);
5927: END IF;
5928:
5929: -- Bug 3555487 initialize message stack for each major action point.
5922:
5923: IF l_debug_on THEN
5924: WSH_DEBUG_SV.log(l_module_name,'10. reconciliate continuous moves: x_plan_moves.COUNT', x_plan_moves.COUNT);
5925: WSH_DEBUG_SV.log(l_module_name,'x_plan_trip_moves.COUNT', x_plan_trip_moves.COUNT);
5926: WSH_DEBUG_SV.log(l_module_name,'x_obsoleted_trip_moves.COUNT', x_obsoleted_trip_moves.COUNT);
5927: END IF;
5928:
5929: -- Bug 3555487 initialize message stack for each major action point.
5930: FND_MSG_PUB.initialize;
5942: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5943: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5944: x_return_status := l_return_status;
5945: IF l_debug_on THEN
5946: WSH_DEBUG_SV.log(l_module_name, 'reconcilate_moves failed: x_return_status', x_return_status);
5947: WSH_DEBUG_SV.pop(l_module_name);
5948: END IF;
5949: RETURN;
5950: END IF;
5943: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5944: x_return_status := l_return_status;
5945: IF l_debug_on THEN
5946: WSH_DEBUG_SV.log(l_module_name, 'reconcilate_moves failed: x_return_status', x_return_status);
5947: WSH_DEBUG_SV.pop(l_module_name);
5948: END IF;
5949: RETURN;
5950: END IF;
5951:
5952:
5953: -- 11. upgrade deliveries' planned_flag per the plan
5954:
5955: IF l_debug_on THEN
5956: WSH_DEBUG_SV.log(l_module_name,'11. Firm deliveries: x_plan_deliveries.COUNT', x_plan_deliveries.COUNT);
5957: END IF;
5958:
5959: DECLARE
5960: -- list of deliveries to become contents firmed.
5987: l_index := x_plan_deliveries.NEXT(l_index);
5988: END LOOP;
5989:
5990: IF l_debug_on THEN
5991: WSH_DEBUG_SV.log(l_module_name,'Contents Firm deliveries: l_cf_dels.COUNT', l_cf_dels.COUNT);
5992: END IF;
5993:
5994: IF l_cf_dels.COUNT > 0 THEN
5995:
6012: x_msg_count => l_msg_count,
6013: x_msg_data => l_msg_data);
6014:
6015: IF l_debug_on THEN
6016: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6017: WSH_DEBUG_SV.log(l_module_name, 'l_del_action_rec.valid_ids_tab.COUNT', l_del_action_rec.valid_ids_tab.COUNT);
6018: WSH_DEBUG_SV.log(l_module_name, 'l_cf_dels.COUNT', l_cf_dels.COUNT);
6019: END IF;
6020:
6013: x_msg_data => l_msg_data);
6014:
6015: IF l_debug_on THEN
6016: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6017: WSH_DEBUG_SV.log(l_module_name, 'l_del_action_rec.valid_ids_tab.COUNT', l_del_action_rec.valid_ids_tab.COUNT);
6018: WSH_DEBUG_SV.log(l_module_name, 'l_cf_dels.COUNT', l_cf_dels.COUNT);
6019: END IF;
6020:
6021: -- convert warning to error if the count of valid ids does not match.
6014:
6015: IF l_debug_on THEN
6016: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6017: WSH_DEBUG_SV.log(l_module_name, 'l_del_action_rec.valid_ids_tab.COUNT', l_del_action_rec.valid_ids_tab.COUNT);
6018: WSH_DEBUG_SV.log(l_module_name, 'l_cf_dels.COUNT', l_cf_dels.COUNT);
6019: END IF;
6020:
6021: -- convert warning to error if the count of valid ids does not match.
6022: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
6021: -- convert warning to error if the count of valid ids does not match.
6022: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
6023: AND l_del_action_rec.valid_ids_tab.COUNT < l_cf_dels.COUNT) THEN
6024: IF l_debug_on THEN
6025: WSH_DEBUG_SV.LOG(l_module_name, 'converting return status', WSH_UTIL_CORE.G_RET_STS_ERROR);
6026: END IF;
6027: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6028: END IF;
6029:
6037: END IF;
6038:
6039:
6040: IF l_debug_on THEN
6041: WSH_DEBUG_SV.log(l_module_name,'Routing and Contents Firm deliveries: l_rcf_dels.COUNT', l_rcf_dels.COUNT);
6042: END IF;
6043:
6044: IF l_rcf_dels.COUNT > 0 THEN
6045:
6062: x_msg_count => l_msg_count,
6063: x_msg_data => l_msg_data);
6064:
6065: IF l_debug_on THEN
6066: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6067: WSH_DEBUG_SV.log(l_module_name, 'l_del_action_rec.valid_ids_tab.COUNT', l_del_action_rec.valid_ids_tab.COUNT);
6068: WSH_DEBUG_SV.log(l_module_name, 'l_rcf_dels.COUNT', l_rcf_dels.COUNT);
6069: END IF;
6070:
6063: x_msg_data => l_msg_data);
6064:
6065: IF l_debug_on THEN
6066: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6067: WSH_DEBUG_SV.log(l_module_name, 'l_del_action_rec.valid_ids_tab.COUNT', l_del_action_rec.valid_ids_tab.COUNT);
6068: WSH_DEBUG_SV.log(l_module_name, 'l_rcf_dels.COUNT', l_rcf_dels.COUNT);
6069: END IF;
6070:
6071: -- convert warning to error if the count of valid ids does not match.
6064:
6065: IF l_debug_on THEN
6066: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6067: WSH_DEBUG_SV.log(l_module_name, 'l_del_action_rec.valid_ids_tab.COUNT', l_del_action_rec.valid_ids_tab.COUNT);
6068: WSH_DEBUG_SV.log(l_module_name, 'l_rcf_dels.COUNT', l_rcf_dels.COUNT);
6069: END IF;
6070:
6071: -- convert warning to error if the count of valid ids does not match.
6072: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
6071: -- convert warning to error if the count of valid ids does not match.
6072: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
6073: AND l_del_action_rec.valid_ids_tab.COUNT < l_rcf_dels.COUNT) THEN
6074: IF l_debug_on THEN
6075: WSH_DEBUG_SV.LOG(l_module_name, 'converting return status', WSH_UTIL_CORE.G_RET_STS_ERROR);
6076: END IF;
6077: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6078: END IF;
6079:
6092:
6093: -- 12. upgrade trips' planned_flag per the plan
6094:
6095: IF l_debug_on THEN
6096: WSH_DEBUG_SV.log(l_module_name,'12. Firm trips: x_plan_trips.COUNT', x_plan_trips.COUNT);
6097: END IF;
6098:
6099: DECLARE
6100: -- list of trips to become routing firmed.
6124: l_index := x_plan_trips.NEXT(l_index);
6125: END LOOP;
6126:
6127: IF l_debug_on THEN
6128: WSH_DEBUG_SV.log(l_module_name,'Contents Firm trips: l_rf_trips.COUNT', l_rf_trips.COUNT);
6129: END IF;
6130:
6131: IF l_rf_trips.COUNT > 0 THEN
6132:
6145: x_msg_count => l_msg_count,
6146: x_msg_data => l_msg_data);
6147:
6148: IF l_debug_on THEN
6149: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6150: WSH_DEBUG_SV.log(l_module_name, 'l_trip_out_rec.valid_ids_tab.COUNT', l_trip_out_rec.valid_ids_tab.COUNT);
6151: WSH_DEBUG_SV.log(l_module_name, 'l_rf_trips.COUNT', l_rf_trips.COUNT);
6152: END IF;
6153:
6146: x_msg_data => l_msg_data);
6147:
6148: IF l_debug_on THEN
6149: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6150: WSH_DEBUG_SV.log(l_module_name, 'l_trip_out_rec.valid_ids_tab.COUNT', l_trip_out_rec.valid_ids_tab.COUNT);
6151: WSH_DEBUG_SV.log(l_module_name, 'l_rf_trips.COUNT', l_rf_trips.COUNT);
6152: END IF;
6153:
6154: -- convert warning to error if the count of valid ids does not match.
6147:
6148: IF l_debug_on THEN
6149: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6150: WSH_DEBUG_SV.log(l_module_name, 'l_trip_out_rec.valid_ids_tab.COUNT', l_trip_out_rec.valid_ids_tab.COUNT);
6151: WSH_DEBUG_SV.log(l_module_name, 'l_rf_trips.COUNT', l_rf_trips.COUNT);
6152: END IF;
6153:
6154: -- convert warning to error if the count of valid ids does not match.
6155: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
6154: -- convert warning to error if the count of valid ids does not match.
6155: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
6156: AND l_trip_out_rec.valid_ids_tab.COUNT < l_rf_trips.COUNT) THEN
6157: IF l_debug_on THEN
6158: WSH_DEBUG_SV.LOG(l_module_name, 'converting return status', WSH_UTIL_CORE.G_RET_STS_ERROR);
6159: END IF;
6160: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6161: END IF;
6162:
6170: END IF;
6171:
6172:
6173: IF l_debug_on THEN
6174: WSH_DEBUG_SV.log(l_module_name,'Routing and Contents Firm deliveries: l_rcf_trips.COUNT', l_rcf_trips.COUNT);
6175: END IF;
6176:
6177: IF l_rcf_trips.COUNT > 0 THEN
6178:
6191: x_msg_count => l_msg_count,
6192: x_msg_data => l_msg_data);
6193:
6194: IF l_debug_on THEN
6195: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6196: WSH_DEBUG_SV.log(l_module_name, 'l_trip_out_rec.valid_ids_tab.COUNT', l_trip_out_rec.valid_ids_tab.COUNT);
6197: WSH_DEBUG_SV.log(l_module_name, 'l_rcf_trips.COUNT', l_rcf_trips.COUNT);
6198: END IF;
6199:
6192: x_msg_data => l_msg_data);
6193:
6194: IF l_debug_on THEN
6195: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6196: WSH_DEBUG_SV.log(l_module_name, 'l_trip_out_rec.valid_ids_tab.COUNT', l_trip_out_rec.valid_ids_tab.COUNT);
6197: WSH_DEBUG_SV.log(l_module_name, 'l_rcf_trips.COUNT', l_rcf_trips.COUNT);
6198: END IF;
6199:
6200: -- convert warning to error if the count of valid ids does not match.
6193:
6194: IF l_debug_on THEN
6195: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
6196: WSH_DEBUG_SV.log(l_module_name, 'l_trip_out_rec.valid_ids_tab.COUNT', l_trip_out_rec.valid_ids_tab.COUNT);
6197: WSH_DEBUG_SV.log(l_module_name, 'l_rcf_trips.COUNT', l_rcf_trips.COUNT);
6198: END IF;
6199:
6200: -- convert warning to error if the count of valid ids does not match.
6201: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
6200: -- convert warning to error if the count of valid ids does not match.
6201: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
6202: AND l_trip_out_rec.valid_ids_tab.COUNT < l_rcf_trips.COUNT) THEN
6203: IF l_debug_on THEN
6204: WSH_DEBUG_SV.LOG(l_module_name, 'converting return status', WSH_UTIL_CORE.G_RET_STS_ERROR);
6205: END IF;
6206: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6207: END IF;
6208:
6221:
6222: -- 13. upgrade moves' planned_flag per the plan (FTE)
6223:
6224: IF l_debug_on THEN
6225: WSH_DEBUG_SV.log(l_module_name,'13. firm moves: x_plan_moves.COUNT', x_plan_moves.COUNT);
6226: END IF;
6227:
6228: WSH_FTE_TP_INTEGRATION.tp_firm_moves(
6229: x_context => x_context,
6235: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
6236: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6237: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6238: IF l_debug_on THEN
6239: WSH_DEBUG_SV.log(l_module_name, 'tp_firm_moves failed: l_return_status', l_return_status);
6240: WSH_DEBUG_SV.pop(l_module_name);
6241: END IF;
6242: RETURN;
6243: END IF;
6236: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6237: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6238: IF l_debug_on THEN
6239: WSH_DEBUG_SV.log(l_module_name, 'tp_firm_moves failed: l_return_status', l_return_status);
6240: WSH_DEBUG_SV.pop(l_module_name);
6241: END IF;
6242: RETURN;
6243: END IF;
6244:
6245:
6246: -- 14. call the rating API
6247:
6248: IF l_debug_on THEN
6249: WSH_DEBUG_SV.log(l_module_name,'14. call rating API: x_plan_trips.COUNT', x_plan_trips.COUNT);
6250: END IF;
6251:
6252: DECLARE
6253: l_rating_action_params WSH_FTE_INTEGRATION.rating_action_param_rec;
6287: -- If something goes wrong later, We may need to know about this one.
6288: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
6289: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6290: IF l_debug_on THEN
6291: WSH_DEBUG_SV.log(l_module_name, 'rate_trip failed: l_return_status', l_return_status);
6292: END IF;
6293:
6294: stamp_interface_error(
6295: p_group_id => x_context.group_id,
6305: -- below code is commented.
6306: -- 14.5 call the rank list API
6307: --
6308: --IF l_debug_on THEN
6309: -- WSH_DEBUG_SV.log(l_module_name,'14.5 call rank list API: l_trip_id_tab.COUNT', l_trip_id_tab.COUNT);
6310: --END IF;
6311: --
6312: --WSH_FTE_INTEGRATION.CREATE_RANK_LIST_BULK(
6313: -- p_api_version_number => 1,
6323: ---- If something goes wrong later, We may need to know about this one.
6324: --IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
6325: -- WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6326: -- IF l_debug_on THEN
6327: -- WSH_DEBUG_SV.log(l_module_name, 'create_rank_list_bulk failed: l_return_status', l_return_status);
6328: -- END IF;
6329: --
6330: --
6331: -- stamp_interface_error(
6351: -- J+ , call for Tendering Trips
6352: -- 15. call the Trip_Action API for tendering selected trips
6353:
6354: IF l_debug_on THEN
6355: WSH_DEBUG_SV.log(l_module_name,'15. call Auto Tender API: x_plan_trips.COUNT', x_plan_trips.COUNT);
6356: WSH_DEBUG_SV.log(l_module_name,'15. Auto Tender Flag: ', x_context.auto_tender_flag||'-'||x_return_status);
6357: END IF;
6358:
6359: -- Check if Profile Option is set
6352: -- 15. call the Trip_Action API for tendering selected trips
6353:
6354: IF l_debug_on THEN
6355: WSH_DEBUG_SV.log(l_module_name,'15. call Auto Tender API: x_plan_trips.COUNT', x_plan_trips.COUNT);
6356: WSH_DEBUG_SV.log(l_module_name,'15. Auto Tender Flag: ', x_context.auto_tender_flag||'-'||x_return_status);
6357: END IF;
6358:
6359: -- Check if Profile Option is set
6360: -- TP owns this profile - "MST : Auto-tender on"
6375: l_index := x_plan_trips.FIRST;
6376: WHILE l_index IS NOT NULL LOOP
6377: l_trip_id_tab(l_trip_id_tab.count + 1) := x_plan_trips(l_index).trip_id;
6378: IF l_debug_on THEN
6379: WSH_DEBUG_SV.log(l_module_name,'Trip id-',x_plan_trips(l_index).trip_id);
6380: END IF;
6381: l_index := x_plan_trips.NEXT(l_index);
6382: END LOOP;
6383:
6381: l_index := x_plan_trips.NEXT(l_index);
6382: END LOOP;
6383:
6384: IF l_debug_on THEN
6385: WSH_DEBUG_SV.log(l_module_name, 'Trip Count', l_trip_id_tab.count);
6386: END IF;
6387:
6388: WSH_FTE_INTEGRATION.Trip_Action (
6389: p_api_version => 1.0,
6396: x_msg_count => l_msg_count,
6397: x_msg_data => l_msg_data);
6398:
6399: IF l_debug_on THEN
6400: WSH_DEBUG_SV.log(l_module_name,'After Trip Action Tender: l_return_status', l_return_status);
6401: END IF;
6402:
6403: -- If tendering process completed successfully or had a warning
6404: -- Always Log summarized information
6413: -- Message type is set as error to make sure that this gets populated
6414: -- TP wants to see this log message for all return statuses
6415: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
6416: IF l_debug_on THEN
6417: WSH_DEBUG_SV.log(l_module_name, 'Total Input Trips', l_trip_id_tab.count);
6418: WSH_DEBUG_SV.log(l_module_name, 'Successfully Tendered',l_trip_action_out_rec.valid_ids_tab.count);
6419: END IF;
6420: ELSE -- Number of Input <> Number of Output --> Error, partial success
6421: FND_MESSAGE.SET_NAME('WSH','WSH_PARTIAL_TRIPS_TENDERED');
6414: -- TP wants to see this log message for all return statuses
6415: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
6416: IF l_debug_on THEN
6417: WSH_DEBUG_SV.log(l_module_name, 'Total Input Trips', l_trip_id_tab.count);
6418: WSH_DEBUG_SV.log(l_module_name, 'Successfully Tendered',l_trip_action_out_rec.valid_ids_tab.count);
6419: END IF;
6420: ELSE -- Number of Input <> Number of Output --> Error, partial success
6421: FND_MESSAGE.SET_NAME('WSH','WSH_PARTIAL_TRIPS_TENDERED');
6422: FND_MESSAGE.SET_TOKEN('TOTAL_TRIPS',l_trip_id_tab.count);
6424: WSH_UTIL_CORE.PrintMsg(fnd_message.get);
6425: wsh_util_core.add_message(l_return_status);
6426:
6427: IF l_debug_on THEN
6428: WSH_DEBUG_SV.log(l_module_name, 'Total Input Trips', l_trip_id_tab.count);
6429: WSH_DEBUG_SV.log(l_module_name, 'Trips could not be Tendered');
6430: END IF;
6431: END IF;
6432:
6425: wsh_util_core.add_message(l_return_status);
6426:
6427: IF l_debug_on THEN
6428: WSH_DEBUG_SV.log(l_module_name, 'Total Input Trips', l_trip_id_tab.count);
6429: WSH_DEBUG_SV.log(l_module_name, 'Trips could not be Tendered');
6430: END IF;
6431: END IF;
6432:
6433: -- Do not return or fail the plan if we cannot Tender.
6454:
6455: --
6456: --
6457: IF l_debug_on THEN
6458: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
6459: WSH_DEBUG_SV.pop(l_module_name);
6460: END IF;
6461:
6462: EXCEPTION
6455: --
6456: --
6457: IF l_debug_on THEN
6458: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
6459: WSH_DEBUG_SV.pop(l_module_name);
6460: END IF;
6461:
6462: EXCEPTION
6463: WHEN fnd_api.g_exc_error THEN
6475: x_errors_tab => x_errors_tab,
6476: x_return_status => l_return_status);
6477: --
6478: IF l_debug_on THEN
6479: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
6480: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
6481: END IF;
6482: --
6483:
6476: x_return_status => l_return_status);
6477: --
6478: IF l_debug_on THEN
6479: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
6480: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
6481: END IF;
6482: --
6483:
6484:
6498: x_errors_tab => x_errors_tab,
6499: x_return_status => l_return_status);
6500: --
6501: IF l_debug_on THEN
6502: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
6503: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6504: END IF;
6505:
6506:
6499: x_return_status => l_return_status);
6500: --
6501: IF l_debug_on THEN
6502: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
6503: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6504: END IF;
6505:
6506:
6507: WHEN OTHERS THEN
6510: 'WSH_TP_RELEASE.RECONCILIATE_PLAN',
6511: l_module_name);
6512:
6513: IF l_debug_on THEN
6514: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6515: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6516: END IF;
6517:
6518: END reconciliate_plan;
6511: l_module_name);
6512:
6513: IF l_debug_on THEN
6514: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6515: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6516: END IF;
6517:
6518: END reconciliate_plan;
6519:
6771: j NUMBER;
6772: l_found BOOLEAN;
6773: BEGIN
6774: IF l_debug_on THEN
6775: WSH_DEBUG_SV.log(l_module_name, 'entering examine_stop: p_stop_id', p_stop_id);
6776: WSH_DEBUG_SV.log(l_module_name, 'p_trip_id', p_trip_id);
6777: END IF;
6778:
6779: -- check that this stop is not already in list of empty stops
6772: l_found BOOLEAN;
6773: BEGIN
6774: IF l_debug_on THEN
6775: WSH_DEBUG_SV.log(l_module_name, 'entering examine_stop: p_stop_id', p_stop_id);
6776: WSH_DEBUG_SV.log(l_module_name, 'p_trip_id', p_trip_id);
6777: END IF;
6778:
6779: -- check that this stop is not already in list of empty stops
6780: IF l_empty_stops.COUNT = 0 THEN
6821: END IF;
6822: END IF;
6823:
6824: IF l_debug_on THEN
6825: WSH_DEBUG_SV.logmsg(l_module_name, 'exiting examine_stop');
6826: END IF;
6827:
6828: EXCEPTION
6829: WHEN OTHERS THEN
6830: IF c_stop_dels%ISOPEN THEN
6831: CLOSE c_stop_dels;
6832: END IF;
6833: IF l_debug_on THEN
6834: WSH_DEBUG_SV.logmsg(l_module_name, 'exiting examine_stop exception handler');
6835: END IF;
6836: RAISE;
6837: END examine_stop;
6838:
6840: BEGIN
6841: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6842: --
6843: IF l_debug_on IS NULL THEN
6844: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6845: END IF;
6846:
6847: IF l_debug_on THEN
6848: WSH_DEBUG_SV.push(l_module_name);
6844: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6845: END IF;
6846:
6847: IF l_debug_on THEN
6848: WSH_DEBUG_SV.push(l_module_name);
6849: END IF;
6850: --
6851: --
6852:
6859: -- If empty deliveries are assigned to trips, add them to x_trip_unassigns.
6860: --
6861:
6862: IF l_debug_on THEN
6863: WSH_DEBUG_SV.logmsg(l_module_name, '1. purge empty deliveries');
6864: END IF;
6865:
6866: IF x_plan_details.COUNT > 0 THEN
6867: -- Find distinct empty deliveries and add them to l_empty_dels.
6907: END LOOP;
6908: END IF;
6909:
6910: IF l_debug_on THEN
6911: WSH_DEBUG_SV.log(l_module_name, 'Compiled lists: l_empty_dels.COUNT', l_empty_dels.COUNT);
6912: WSH_DEBUG_SV.log(l_module_name, 'l_assigned_dels.COUNT', l_assigned_dels.COUNT);
6913: END IF;
6914:
6915: --
6908: END IF;
6909:
6910: IF l_debug_on THEN
6911: WSH_DEBUG_SV.log(l_module_name, 'Compiled lists: l_empty_dels.COUNT', l_empty_dels.COUNT);
6912: WSH_DEBUG_SV.log(l_module_name, 'l_assigned_dels.COUNT', l_assigned_dels.COUNT);
6913: END IF;
6914:
6915: --
6916: -- Go through the list of empty deliveries to unassign from trips and populate x_trip_unassigns.
6921:
6922: FOR i in 1 .. l_empty_dels.count LOOP -- {
6923:
6924: IF l_debug_on THEN
6925: WSH_DEBUG_SV.log(l_module_name, 'looping empty delivery', l_empty_dels(i));
6926: END IF;
6927:
6928: FOR leg IN c_legs( l_empty_dels(i) ) LOOP
6929:
6969:
6970: IF l_location_id IS NOT NULL THEN
6971: x_context.wv_exception_stops(x_trip_unassigns(j).pickup_stop_id) := l_location_id;
6972: IF l_debug_on THEN
6973: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against stop', x_trip_unassigns(j).pickup_stop_id);
6974: END IF;
6975: END IF;
6976: END IF;
6977:
6984:
6985: IF l_location_id IS NOT NULL THEN
6986: x_context.wv_exception_stops(x_trip_unassigns(j).dropoff_stop_id) := l_location_id;
6987: IF l_debug_on THEN
6988: WSH_DEBUG_SV.log(l_module_name,'Log WV exception against stop', x_trip_unassigns(j).dropoff_stop_id);
6989: END IF;
6990: END IF;
6991: END IF;
6992:
7007:
7008: -- Delete the list of empty deliveries.
7009:
7010: IF l_debug_on THEN
7011: WSH_DEBUG_SV.log(l_module_name,'before DELETE: l_empty_dels.COUNT', l_empty_dels.COUNT);
7012: END IF;
7013: WSH_UTIL_CORE.Delete(p_type => 'DLVY',
7014: p_rows => l_empty_dels,
7015: x_return_status => l_return_status);
7019: -- 2. LOG EXCEPTIONS IF DATES ARE OUT OF SYNC.
7020: --
7021:
7022: IF l_debug_on THEN
7023: WSH_DEBUG_SV.logmsg(l_module_name, '2. log exceptions if dates are out of sync');
7024: END IF;
7025:
7026: --
7027: -- Go through list of deliveries in plan comparing the dates and log
7121: -- 3. clean up trip unassignments that result in empty stops/trips not used by plan.
7122: --
7123:
7124: IF l_debug_on THEN
7125: WSH_DEBUG_SV.logmsg(l_module_name, '3. purge empty stops/trips');
7126: END IF;
7127:
7128: -- Add the obsoleted move trips to trip unassignment.
7129: -- Leave the pickup and dropoff stops null
7141:
7142: IF x_trip_unassigns.COUNT > 0 THEN
7143:
7144: IF l_debug_on THEN
7145: WSH_DEBUG_SV.log(l_module_name, 'Clean up trip unassignments: x_trip_unassigns.COUNT', x_trip_unassigns.COUNT);
7146: END IF;
7147:
7148: l_empty_stops.DELETE;
7149: l_empty_trips.DELETE;
7198: -- Do nothing. If the stop has been locked by another
7199: -- process, unlikely that it will need to be deleted.
7200:
7201: IF l_debug_on THEN
7202: WSH_DEBUG_SV.log(l_module_name, 'Could not lock Stop: ', trip.stop_id);
7203: END IF;
7204: END;
7205:
7206: END LOOP;
7214: i := x_trip_unassigns.NEXT(i);
7215: END LOOP;
7216:
7217: IF l_debug_on THEN
7218: WSH_DEBUG_SV.log(l_module_name, 'l_empty_stops.COUNT', l_empty_stops.COUNT);
7219: WSH_DEBUG_SV.log(l_module_name, 'l_empty_trips.COUNT', l_empty_trips.COUNT);
7220: END IF;
7221:
7222: IF l_empty_stops.COUNT > 0 THEN
7215: END LOOP;
7216:
7217: IF l_debug_on THEN
7218: WSH_DEBUG_SV.log(l_module_name, 'l_empty_stops.COUNT', l_empty_stops.COUNT);
7219: WSH_DEBUG_SV.log(l_module_name, 'l_empty_trips.COUNT', l_empty_trips.COUNT);
7220: END IF;
7221:
7222: IF l_empty_stops.COUNT > 0 THEN
7223:
7235:
7236: IF x_context.wv_exception_stops.exists(l_empty_stops(i)) THEN
7237: x_context.wv_exception_stops.delete(l_empty_stops(i));
7238: IF l_debug_on THEN
7239: WSH_DEBUG_SV.log(l_module_name,'Do not Log WV exception against stop', l_empty_stops(i));
7240: END IF;
7241: END IF;
7242:
7243:
7271: OPEN c_exist_stop(l_empty_trips(i));
7272: FETCH c_exist_stop INTO l_temp_id;
7273: IF c_exist_stop%NOTFOUND THEN
7274: IF l_debug_on THEN
7275: WSH_DEBUG_SV.log(l_module_name, 'no stops for trip', l_empty_trips(i));
7276: END IF;
7277: j := j + 1;
7278: l_trip_attrs(j).trip_id := l_empty_trips(i);
7279: ELSE
7280: OPEN c_exist_dels(l_empty_trips(i));
7281: FETCH c_exist_dels INTO l_temp_id;
7282: IF c_exist_dels%NOTFOUND THEN
7283: IF l_debug_on THEN
7284: WSH_DEBUG_SV.log(l_module_name, 'no deliveries for trip', l_empty_trips(i));
7285: END IF;
7286: j := j + 1;
7287: l_trip_attrs(j).trip_id := l_empty_trips(i);
7288: END IF;
7293: i := l_empty_trips.NEXT(i);
7294: END LOOP;
7295:
7296: IF l_debug_on THEN
7297: WSH_DEBUG_SV.log(l_module_name, 'l_trip_attrs.COUNT', l_trip_attrs.COUNT);
7298: END IF;
7299:
7300: IF l_trip_attrs.COUNT > 0 THEN
7301:
7328: -- that the interface stop records will point to the physical stops.
7329: --
7330:
7331: IF l_debug_on THEN
7332: WSH_DEBUG_SV.logmsg(l_module_name, '4. refresh physical stop ids');
7333: WSH_DEBUG_SV.log(l_module_name, 'x_context.linked_trip_count', x_context.linked_trip_count);
7334: END IF;
7335:
7336: IF x_context.linked_trip_count > 0 THEN
7329: --
7330:
7331: IF l_debug_on THEN
7332: WSH_DEBUG_SV.logmsg(l_module_name, '4. refresh physical stop ids');
7333: WSH_DEBUG_SV.log(l_module_name, 'x_context.linked_trip_count', x_context.linked_trip_count);
7334: END IF;
7335:
7336: IF x_context.linked_trip_count > 0 THEN
7337: DECLARE
7360: FETCH c_lookup_physical_stop INTO l_stop_id;
7361: IF c_lookup_physical_stop%FOUND
7362: AND l_stop_id <> x_plan_stops(l_stop_index).stop_id THEN
7363: IF l_debug_on THEN
7364: WSH_DEBUG_SV.log(l_module_name, 'physical stop('||l_stop_index||') looked up',
7365: x_plan_stops(l_stop_index).stop_id || ' -> ' || l_stop_id);
7366: END IF;
7367: x_plan_stops(l_stop_index).stop_id := l_stop_id;
7368: END IF;
7388: -- so that TP can identify the TE records mapped.
7389: --
7390:
7391: IF l_debug_on THEN
7392: WSH_DEBUG_SV.logmsg(l_module_name, '5. update interface tables');
7393: END IF;
7394:
7395:
7396: DECLARE
7411: l_p_index := x_plan_trips.NEXT(l_p_index);
7412: END LOOP;
7413:
7414: IF l_debug_on THEN
7415: WSH_DEBUG_SV.log(l_module_name, 'Bulk update trips: count', l_interface_ids.COUNT);
7416: END IF;
7417:
7418: FORALL i in 1..l_interface_ids.count
7419: UPDATE wsh_trips_interface
7432: l_p_index := x_plan_stops.NEXT(l_p_index);
7433: END LOOP;
7434:
7435: IF l_debug_on THEN
7436: WSH_DEBUG_SV.log(l_module_name, 'Bulk update stops: count', l_interface_ids.COUNT);
7437: END IF;
7438:
7439: FORALL i in 1..l_interface_ids.count
7440: UPDATE wsh_trip_stops_interface
7455: l_p_index := x_plan_deliveries.NEXT(l_p_index);
7456: END LOOP;
7457:
7458: IF l_debug_on THEN
7459: WSH_DEBUG_SV.log(l_module_name, 'Bulk update deliveries: count', l_interface_ids.COUNT);
7460: END IF;
7461:
7462: FORALL i in 1..l_interface_ids.count
7463: UPDATE wsh_new_del_interface
7484: l_p_index := x_plan_details.NEXT(l_p_index);
7485: END LOOP;
7486:
7487: IF l_debug_on THEN
7488: WSH_DEBUG_SV.log(l_module_name, 'Bulk update details: count', l_interface_ids.COUNT);
7489: END IF;
7490:
7491: FORALL i in 1..l_interface_ids.count
7492: UPDATE wsh_del_details_interface
7504: -- weights and volumes updated.
7505: -- WV changes
7506: --
7507: IF l_debug_on THEN
7508: WSH_DEBUG_SV.logmsg(l_module_name, '6. Log exceptions against lines, deliveries, and stops');
7509: END IF;
7510:
7511: Log_WV_Exceptions(
7512: p_details_loc_tab => x_context.wv_exception_details,
7522: --
7523: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7524:
7525: IF l_debug_on THEN
7526: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7527: WSH_DEBUG_SV.pop(l_module_name);
7528: END IF;
7529:
7530: EXCEPTION
7523: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7524:
7525: IF l_debug_on THEN
7526: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7527: WSH_DEBUG_SV.pop(l_module_name);
7528: END IF;
7529:
7530: EXCEPTION
7531:
7563: 'WSH_TP_RELEASE.PLAN_CLEANUP',
7564: l_module_name);
7565:
7566: IF l_debug_on THEN
7567: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7568: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7569: END IF;
7570:
7571: END plan_cleanup;
7564: l_module_name);
7565:
7566: IF l_debug_on THEN
7567: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7568: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7569: END IF;
7570:
7571: END plan_cleanup;
7572:
7605: BEGIN
7606: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7607: --
7608: IF l_debug_on IS NULL THEN
7609: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7610: END IF;
7611: --
7612: IF l_debug_on THEN
7613: WSH_DEBUG_SV.push(l_module_name);
7609: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7610: END IF;
7611: --
7612: IF l_debug_on THEN
7613: WSH_DEBUG_SV.push(l_module_name);
7614: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.line_direction', x_attributes.line_direction);
7615: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_from_location_id', x_attributes.ship_from_location_id);
7616: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_to_location_id', x_attributes.ship_to_location_id);
7617: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.organization_id', x_attributes.organization_id);
7610: END IF;
7611: --
7612: IF l_debug_on THEN
7613: WSH_DEBUG_SV.push(l_module_name);
7614: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.line_direction', x_attributes.line_direction);
7615: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_from_location_id', x_attributes.ship_from_location_id);
7616: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_to_location_id', x_attributes.ship_to_location_id);
7617: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.organization_id', x_attributes.organization_id);
7618: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.customer_id', x_attributes.customer_id);
7611: --
7612: IF l_debug_on THEN
7613: WSH_DEBUG_SV.push(l_module_name);
7614: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.line_direction', x_attributes.line_direction);
7615: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_from_location_id', x_attributes.ship_from_location_id);
7616: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_to_location_id', x_attributes.ship_to_location_id);
7617: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.organization_id', x_attributes.organization_id);
7618: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.customer_id', x_attributes.customer_id);
7619: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.freight_terms_code', x_attributes.freight_terms_code);
7612: IF l_debug_on THEN
7613: WSH_DEBUG_SV.push(l_module_name);
7614: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.line_direction', x_attributes.line_direction);
7615: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_from_location_id', x_attributes.ship_from_location_id);
7616: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_to_location_id', x_attributes.ship_to_location_id);
7617: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.organization_id', x_attributes.organization_id);
7618: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.customer_id', x_attributes.customer_id);
7619: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.freight_terms_code', x_attributes.freight_terms_code);
7620: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.intmed_ship_to_location_id', x_attributes.intmed_ship_to_location_id);
7613: WSH_DEBUG_SV.push(l_module_name);
7614: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.line_direction', x_attributes.line_direction);
7615: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_from_location_id', x_attributes.ship_from_location_id);
7616: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_to_location_id', x_attributes.ship_to_location_id);
7617: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.organization_id', x_attributes.organization_id);
7618: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.customer_id', x_attributes.customer_id);
7619: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.freight_terms_code', x_attributes.freight_terms_code);
7620: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.intmed_ship_to_location_id', x_attributes.intmed_ship_to_location_id);
7621: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_method_code', x_attributes.ship_method_code);
7614: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.line_direction', x_attributes.line_direction);
7615: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_from_location_id', x_attributes.ship_from_location_id);
7616: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_to_location_id', x_attributes.ship_to_location_id);
7617: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.organization_id', x_attributes.organization_id);
7618: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.customer_id', x_attributes.customer_id);
7619: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.freight_terms_code', x_attributes.freight_terms_code);
7620: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.intmed_ship_to_location_id', x_attributes.intmed_ship_to_location_id);
7621: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_method_code', x_attributes.ship_method_code);
7622: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.mode_of_transport', x_attributes.mode_of_transport);
7615: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_from_location_id', x_attributes.ship_from_location_id);
7616: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_to_location_id', x_attributes.ship_to_location_id);
7617: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.organization_id', x_attributes.organization_id);
7618: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.customer_id', x_attributes.customer_id);
7619: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.freight_terms_code', x_attributes.freight_terms_code);
7620: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.intmed_ship_to_location_id', x_attributes.intmed_ship_to_location_id);
7621: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_method_code', x_attributes.ship_method_code);
7622: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.mode_of_transport', x_attributes.mode_of_transport);
7623: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.service_level', x_attributes.service_level);
7616: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_to_location_id', x_attributes.ship_to_location_id);
7617: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.organization_id', x_attributes.organization_id);
7618: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.customer_id', x_attributes.customer_id);
7619: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.freight_terms_code', x_attributes.freight_terms_code);
7620: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.intmed_ship_to_location_id', x_attributes.intmed_ship_to_location_id);
7621: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_method_code', x_attributes.ship_method_code);
7622: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.mode_of_transport', x_attributes.mode_of_transport);
7623: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.service_level', x_attributes.service_level);
7624: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.carrier_id', x_attributes.carrier_id);
7617: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.organization_id', x_attributes.organization_id);
7618: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.customer_id', x_attributes.customer_id);
7619: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.freight_terms_code', x_attributes.freight_terms_code);
7620: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.intmed_ship_to_location_id', x_attributes.intmed_ship_to_location_id);
7621: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_method_code', x_attributes.ship_method_code);
7622: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.mode_of_transport', x_attributes.mode_of_transport);
7623: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.service_level', x_attributes.service_level);
7624: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.carrier_id', x_attributes.carrier_id);
7625: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.shipping_control', x_attributes.shipping_control);
7618: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.customer_id', x_attributes.customer_id);
7619: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.freight_terms_code', x_attributes.freight_terms_code);
7620: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.intmed_ship_to_location_id', x_attributes.intmed_ship_to_location_id);
7621: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_method_code', x_attributes.ship_method_code);
7622: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.mode_of_transport', x_attributes.mode_of_transport);
7623: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.service_level', x_attributes.service_level);
7624: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.carrier_id', x_attributes.carrier_id);
7625: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.shipping_control', x_attributes.shipping_control);
7626: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.vendor_id', x_attributes.vendor_id);
7619: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.freight_terms_code', x_attributes.freight_terms_code);
7620: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.intmed_ship_to_location_id', x_attributes.intmed_ship_to_location_id);
7621: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_method_code', x_attributes.ship_method_code);
7622: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.mode_of_transport', x_attributes.mode_of_transport);
7623: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.service_level', x_attributes.service_level);
7624: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.carrier_id', x_attributes.carrier_id);
7625: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.shipping_control', x_attributes.shipping_control);
7626: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.vendor_id', x_attributes.vendor_id);
7627: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.party_id', x_attributes.party_id);
7620: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.intmed_ship_to_location_id', x_attributes.intmed_ship_to_location_id);
7621: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_method_code', x_attributes.ship_method_code);
7622: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.mode_of_transport', x_attributes.mode_of_transport);
7623: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.service_level', x_attributes.service_level);
7624: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.carrier_id', x_attributes.carrier_id);
7625: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.shipping_control', x_attributes.shipping_control);
7626: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.vendor_id', x_attributes.vendor_id);
7627: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.party_id', x_attributes.party_id);
7628: WSH_DEBUG_SV.log(l_module_name, 'x_values.line_direction', x_values.line_direction);
7621: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.ship_method_code', x_attributes.ship_method_code);
7622: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.mode_of_transport', x_attributes.mode_of_transport);
7623: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.service_level', x_attributes.service_level);
7624: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.carrier_id', x_attributes.carrier_id);
7625: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.shipping_control', x_attributes.shipping_control);
7626: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.vendor_id', x_attributes.vendor_id);
7627: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.party_id', x_attributes.party_id);
7628: WSH_DEBUG_SV.log(l_module_name, 'x_values.line_direction', x_values.line_direction);
7629: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_from_location_id', x_values.ship_from_location_id);
7622: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.mode_of_transport', x_attributes.mode_of_transport);
7623: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.service_level', x_attributes.service_level);
7624: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.carrier_id', x_attributes.carrier_id);
7625: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.shipping_control', x_attributes.shipping_control);
7626: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.vendor_id', x_attributes.vendor_id);
7627: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.party_id', x_attributes.party_id);
7628: WSH_DEBUG_SV.log(l_module_name, 'x_values.line_direction', x_values.line_direction);
7629: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_from_location_id', x_values.ship_from_location_id);
7630: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_to_location_id', x_values.ship_to_location_id);
7623: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.service_level', x_attributes.service_level);
7624: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.carrier_id', x_attributes.carrier_id);
7625: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.shipping_control', x_attributes.shipping_control);
7626: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.vendor_id', x_attributes.vendor_id);
7627: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.party_id', x_attributes.party_id);
7628: WSH_DEBUG_SV.log(l_module_name, 'x_values.line_direction', x_values.line_direction);
7629: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_from_location_id', x_values.ship_from_location_id);
7630: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_to_location_id', x_values.ship_to_location_id);
7631: WSH_DEBUG_SV.log(l_module_name, 'x_values.organization_id', x_values.organization_id);
7624: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.carrier_id', x_attributes.carrier_id);
7625: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.shipping_control', x_attributes.shipping_control);
7626: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.vendor_id', x_attributes.vendor_id);
7627: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.party_id', x_attributes.party_id);
7628: WSH_DEBUG_SV.log(l_module_name, 'x_values.line_direction', x_values.line_direction);
7629: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_from_location_id', x_values.ship_from_location_id);
7630: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_to_location_id', x_values.ship_to_location_id);
7631: WSH_DEBUG_SV.log(l_module_name, 'x_values.organization_id', x_values.organization_id);
7632: WSH_DEBUG_SV.log(l_module_name, 'x_values.customer_id', x_values.customer_id);
7625: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.shipping_control', x_attributes.shipping_control);
7626: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.vendor_id', x_attributes.vendor_id);
7627: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.party_id', x_attributes.party_id);
7628: WSH_DEBUG_SV.log(l_module_name, 'x_values.line_direction', x_values.line_direction);
7629: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_from_location_id', x_values.ship_from_location_id);
7630: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_to_location_id', x_values.ship_to_location_id);
7631: WSH_DEBUG_SV.log(l_module_name, 'x_values.organization_id', x_values.organization_id);
7632: WSH_DEBUG_SV.log(l_module_name, 'x_values.customer_id', x_values.customer_id);
7633: WSH_DEBUG_SV.log(l_module_name, 'x_values.freight_terms_code', x_values.freight_terms_code);
7626: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.vendor_id', x_attributes.vendor_id);
7627: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.party_id', x_attributes.party_id);
7628: WSH_DEBUG_SV.log(l_module_name, 'x_values.line_direction', x_values.line_direction);
7629: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_from_location_id', x_values.ship_from_location_id);
7630: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_to_location_id', x_values.ship_to_location_id);
7631: WSH_DEBUG_SV.log(l_module_name, 'x_values.organization_id', x_values.organization_id);
7632: WSH_DEBUG_SV.log(l_module_name, 'x_values.customer_id', x_values.customer_id);
7633: WSH_DEBUG_SV.log(l_module_name, 'x_values.freight_terms_code', x_values.freight_terms_code);
7634: WSH_DEBUG_SV.log(l_module_name, 'x_values.intmed_ship_to_location_id', x_values.intmed_ship_to_location_id);
7627: WSH_DEBUG_SV.log(l_module_name, 'x_attributes.party_id', x_attributes.party_id);
7628: WSH_DEBUG_SV.log(l_module_name, 'x_values.line_direction', x_values.line_direction);
7629: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_from_location_id', x_values.ship_from_location_id);
7630: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_to_location_id', x_values.ship_to_location_id);
7631: WSH_DEBUG_SV.log(l_module_name, 'x_values.organization_id', x_values.organization_id);
7632: WSH_DEBUG_SV.log(l_module_name, 'x_values.customer_id', x_values.customer_id);
7633: WSH_DEBUG_SV.log(l_module_name, 'x_values.freight_terms_code', x_values.freight_terms_code);
7634: WSH_DEBUG_SV.log(l_module_name, 'x_values.intmed_ship_to_location_id', x_values.intmed_ship_to_location_id);
7635: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_method_code', x_values.ship_method_code);
7628: WSH_DEBUG_SV.log(l_module_name, 'x_values.line_direction', x_values.line_direction);
7629: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_from_location_id', x_values.ship_from_location_id);
7630: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_to_location_id', x_values.ship_to_location_id);
7631: WSH_DEBUG_SV.log(l_module_name, 'x_values.organization_id', x_values.organization_id);
7632: WSH_DEBUG_SV.log(l_module_name, 'x_values.customer_id', x_values.customer_id);
7633: WSH_DEBUG_SV.log(l_module_name, 'x_values.freight_terms_code', x_values.freight_terms_code);
7634: WSH_DEBUG_SV.log(l_module_name, 'x_values.intmed_ship_to_location_id', x_values.intmed_ship_to_location_id);
7635: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_method_code', x_values.ship_method_code);
7636: WSH_DEBUG_SV.log(l_module_name, 'x_values.mode_of_transport', x_values.mode_of_transport);
7629: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_from_location_id', x_values.ship_from_location_id);
7630: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_to_location_id', x_values.ship_to_location_id);
7631: WSH_DEBUG_SV.log(l_module_name, 'x_values.organization_id', x_values.organization_id);
7632: WSH_DEBUG_SV.log(l_module_name, 'x_values.customer_id', x_values.customer_id);
7633: WSH_DEBUG_SV.log(l_module_name, 'x_values.freight_terms_code', x_values.freight_terms_code);
7634: WSH_DEBUG_SV.log(l_module_name, 'x_values.intmed_ship_to_location_id', x_values.intmed_ship_to_location_id);
7635: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_method_code', x_values.ship_method_code);
7636: WSH_DEBUG_SV.log(l_module_name, 'x_values.mode_of_transport', x_values.mode_of_transport);
7637: WSH_DEBUG_SV.log(l_module_name, 'x_values.service_level', x_values.service_level);
7630: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_to_location_id', x_values.ship_to_location_id);
7631: WSH_DEBUG_SV.log(l_module_name, 'x_values.organization_id', x_values.organization_id);
7632: WSH_DEBUG_SV.log(l_module_name, 'x_values.customer_id', x_values.customer_id);
7633: WSH_DEBUG_SV.log(l_module_name, 'x_values.freight_terms_code', x_values.freight_terms_code);
7634: WSH_DEBUG_SV.log(l_module_name, 'x_values.intmed_ship_to_location_id', x_values.intmed_ship_to_location_id);
7635: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_method_code', x_values.ship_method_code);
7636: WSH_DEBUG_SV.log(l_module_name, 'x_values.mode_of_transport', x_values.mode_of_transport);
7637: WSH_DEBUG_SV.log(l_module_name, 'x_values.service_level', x_values.service_level);
7638: WSH_DEBUG_SV.log(l_module_name, 'x_values.carrier_id', x_values.carrier_id);
7631: WSH_DEBUG_SV.log(l_module_name, 'x_values.organization_id', x_values.organization_id);
7632: WSH_DEBUG_SV.log(l_module_name, 'x_values.customer_id', x_values.customer_id);
7633: WSH_DEBUG_SV.log(l_module_name, 'x_values.freight_terms_code', x_values.freight_terms_code);
7634: WSH_DEBUG_SV.log(l_module_name, 'x_values.intmed_ship_to_location_id', x_values.intmed_ship_to_location_id);
7635: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_method_code', x_values.ship_method_code);
7636: WSH_DEBUG_SV.log(l_module_name, 'x_values.mode_of_transport', x_values.mode_of_transport);
7637: WSH_DEBUG_SV.log(l_module_name, 'x_values.service_level', x_values.service_level);
7638: WSH_DEBUG_SV.log(l_module_name, 'x_values.carrier_id', x_values.carrier_id);
7639: WSH_DEBUG_SV.log(l_module_name, 'x_values.shipping_control', x_values.shipping_control);
7632: WSH_DEBUG_SV.log(l_module_name, 'x_values.customer_id', x_values.customer_id);
7633: WSH_DEBUG_SV.log(l_module_name, 'x_values.freight_terms_code', x_values.freight_terms_code);
7634: WSH_DEBUG_SV.log(l_module_name, 'x_values.intmed_ship_to_location_id', x_values.intmed_ship_to_location_id);
7635: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_method_code', x_values.ship_method_code);
7636: WSH_DEBUG_SV.log(l_module_name, 'x_values.mode_of_transport', x_values.mode_of_transport);
7637: WSH_DEBUG_SV.log(l_module_name, 'x_values.service_level', x_values.service_level);
7638: WSH_DEBUG_SV.log(l_module_name, 'x_values.carrier_id', x_values.carrier_id);
7639: WSH_DEBUG_SV.log(l_module_name, 'x_values.shipping_control', x_values.shipping_control);
7640: WSH_DEBUG_SV.log(l_module_name, 'x_values.vendor_id', x_values.vendor_id);
7633: WSH_DEBUG_SV.log(l_module_name, 'x_values.freight_terms_code', x_values.freight_terms_code);
7634: WSH_DEBUG_SV.log(l_module_name, 'x_values.intmed_ship_to_location_id', x_values.intmed_ship_to_location_id);
7635: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_method_code', x_values.ship_method_code);
7636: WSH_DEBUG_SV.log(l_module_name, 'x_values.mode_of_transport', x_values.mode_of_transport);
7637: WSH_DEBUG_SV.log(l_module_name, 'x_values.service_level', x_values.service_level);
7638: WSH_DEBUG_SV.log(l_module_name, 'x_values.carrier_id', x_values.carrier_id);
7639: WSH_DEBUG_SV.log(l_module_name, 'x_values.shipping_control', x_values.shipping_control);
7640: WSH_DEBUG_SV.log(l_module_name, 'x_values.vendor_id', x_values.vendor_id);
7641: WSH_DEBUG_SV.log(l_module_name, 'x_values.party_id', x_values.party_id);
7634: WSH_DEBUG_SV.log(l_module_name, 'x_values.intmed_ship_to_location_id', x_values.intmed_ship_to_location_id);
7635: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_method_code', x_values.ship_method_code);
7636: WSH_DEBUG_SV.log(l_module_name, 'x_values.mode_of_transport', x_values.mode_of_transport);
7637: WSH_DEBUG_SV.log(l_module_name, 'x_values.service_level', x_values.service_level);
7638: WSH_DEBUG_SV.log(l_module_name, 'x_values.carrier_id', x_values.carrier_id);
7639: WSH_DEBUG_SV.log(l_module_name, 'x_values.shipping_control', x_values.shipping_control);
7640: WSH_DEBUG_SV.log(l_module_name, 'x_values.vendor_id', x_values.vendor_id);
7641: WSH_DEBUG_SV.log(l_module_name, 'x_values.party_id', x_values.party_id);
7642: END IF;
7635: WSH_DEBUG_SV.log(l_module_name, 'x_values.ship_method_code', x_values.ship_method_code);
7636: WSH_DEBUG_SV.log(l_module_name, 'x_values.mode_of_transport', x_values.mode_of_transport);
7637: WSH_DEBUG_SV.log(l_module_name, 'x_values.service_level', x_values.service_level);
7638: WSH_DEBUG_SV.log(l_module_name, 'x_values.carrier_id', x_values.carrier_id);
7639: WSH_DEBUG_SV.log(l_module_name, 'x_values.shipping_control', x_values.shipping_control);
7640: WSH_DEBUG_SV.log(l_module_name, 'x_values.vendor_id', x_values.vendor_id);
7641: WSH_DEBUG_SV.log(l_module_name, 'x_values.party_id', x_values.party_id);
7642: END IF;
7643:
7636: WSH_DEBUG_SV.log(l_module_name, 'x_values.mode_of_transport', x_values.mode_of_transport);
7637: WSH_DEBUG_SV.log(l_module_name, 'x_values.service_level', x_values.service_level);
7638: WSH_DEBUG_SV.log(l_module_name, 'x_values.carrier_id', x_values.carrier_id);
7639: WSH_DEBUG_SV.log(l_module_name, 'x_values.shipping_control', x_values.shipping_control);
7640: WSH_DEBUG_SV.log(l_module_name, 'x_values.vendor_id', x_values.vendor_id);
7641: WSH_DEBUG_SV.log(l_module_name, 'x_values.party_id', x_values.party_id);
7642: END IF;
7643:
7644:
7637: WSH_DEBUG_SV.log(l_module_name, 'x_values.service_level', x_values.service_level);
7638: WSH_DEBUG_SV.log(l_module_name, 'x_values.carrier_id', x_values.carrier_id);
7639: WSH_DEBUG_SV.log(l_module_name, 'x_values.shipping_control', x_values.shipping_control);
7640: WSH_DEBUG_SV.log(l_module_name, 'x_values.vendor_id', x_values.vendor_id);
7641: WSH_DEBUG_SV.log(l_module_name, 'x_values.party_id', x_values.party_id);
7642: END IF;
7643:
7644:
7645: l_action_rec.caller := 'WSH_TP_RELEASE';
7702: x_out_rec => l_out_rec,
7703: x_return_status => l_return_status);
7704:
7705: IF l_debug_on THEN
7706: WSH_DEBUG_SV.log(l_module_name, 'find_matching_groups: l_return_status', l_return_status);
7707: WSH_DEBUG_SV.log(l_module_name, 'l_out_rec.single_group', l_out_rec.single_group);
7708: END IF;
7709:
7710: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,
7703: x_return_status => l_return_status);
7704:
7705: IF l_debug_on THEN
7706: WSH_DEBUG_SV.log(l_module_name, 'find_matching_groups: l_return_status', l_return_status);
7707: WSH_DEBUG_SV.log(l_module_name, 'l_out_rec.single_group', l_out_rec.single_group);
7708: END IF;
7709:
7710: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,
7711: WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
7714: l_match_flag := FALSE;
7715: END IF;
7716:
7717: IF l_debug_on THEN
7718: WSH_DEBUG_SV.pop(l_module_name);
7719: END IF;
7720: RETURN l_match_flag;
7721: END attributes_match;
7722:
7753: BEGIN
7754: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7755: --
7756: IF l_debug_on IS NULL THEN
7757: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7758: END IF;
7759:
7760: IF l_debug_on THEN
7761: WSH_DEBUG_SV.push(l_module_name);
7757: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7758: END IF;
7759:
7760: IF l_debug_on THEN
7761: WSH_DEBUG_SV.push(l_module_name);
7762: END IF;
7763:
7764: IF x_current_used_details.COUNT > 0 THEN
7765: -- there are records to flush.
7790: x_errors_tab => x_errors_tab,
7791: x_return_status => l_return_status);
7792: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7793: IF l_debug_on THEN
7794: WSH_DEBUG_SV.log(l_module_name, 'broken lpn: x_return_status', x_return_status);
7795: WSH_DEBUG_SV.pop(l_module_name);
7796: END IF;
7797: RETURN;
7798: END IF;
7791: x_return_status => l_return_status);
7792: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7793: IF l_debug_on THEN
7794: WSH_DEBUG_SV.log(l_module_name, 'broken lpn: x_return_status', x_return_status);
7795: WSH_DEBUG_SV.pop(l_module_name);
7796: END IF;
7797: RETURN;
7798: END IF;
7799:
7814: FND_MSG_PUB.initialize;
7815:
7816: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7817: IF l_debug_on THEN
7818: WSH_DEBUG_SV.pop(l_module_name);
7819: END IF;
7820:
7821: END flush_used_details;
7822:
7916:
7917: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7918: --
7919: IF l_debug_on IS NULL THEN
7920: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7921: END IF;
7922:
7923: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7924:
7925: -- Bug 3555487 initialize message stack for each major action point.
7926: FND_MSG_PUB.initialize;
7927:
7928: IF l_debug_on THEN
7929: WSH_DEBUG_SV.push(l_module_name);
7930: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_index', p_delivery_index);
7931: END IF;
7932:
7933: OPEN c_has_line(x_plan_deliveries(p_delivery_index).delivery_id);
7926: FND_MSG_PUB.initialize;
7927:
7928: IF l_debug_on THEN
7929: WSH_DEBUG_SV.push(l_module_name);
7930: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_index', p_delivery_index);
7931: END IF;
7932:
7933: OPEN c_has_line(x_plan_deliveries(p_delivery_index).delivery_id);
7934: FETCH c_has_line INTO l_detail_id;
7957: END IF;
7958: CLOSE c_plan_lpn_count;
7959:
7960: IF l_debug_on THEN
7961: WSH_DEBUG_SV.log(l_module_name, 'l_plan_lpn_count', l_plan_lpn_count);
7962: END IF;
7963:
7964: IF l_plan_lpn_count = 0 THEN
7965: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8014: END LOOP;
8015: l_scanning_lpns := FALSE;
8016:
8017: IF l_debug_on THEN
8018: WSH_DEBUG_SV.log(l_module_name, 'l_te_lpn_count', l_te_lpn_count);
8019: END IF;
8020:
8021: IF l_found AND l_plan_lpn_count <> l_te_lpn_count THEN
8022: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8037:
8038: --
8039: --
8040: IF l_debug_on THEN
8041: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8042: WSH_DEBUG_SV.pop(l_module_name);
8043: END IF;
8044:
8045: EXCEPTION
8038: --
8039: --
8040: IF l_debug_on THEN
8041: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8042: WSH_DEBUG_SV.pop(l_module_name);
8043: END IF;
8044:
8045: EXCEPTION
8046: WHEN OTHERS THEN
8078: l_module_name);
8079: END IF;
8080:
8081: IF l_debug_on THEN
8082: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8083: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8084: END IF;
8085:
8086: END map_dangling_containers;
8079: END IF;
8080:
8081: IF l_debug_on THEN
8082: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8083: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8084: END IF;
8085:
8086: END map_dangling_containers;
8087:
8203:
8204: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8205: --
8206: IF l_debug_on IS NULL THEN
8207: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8208: END IF;
8209:
8210: IF l_debug_on THEN
8211: WSH_DEBUG_SV.push(l_module_name);
8207: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8208: END IF;
8209:
8210: IF l_debug_on THEN
8211: WSH_DEBUG_SV.push(l_module_name);
8212: END IF;
8213: --
8214: --
8215: -- Go through list of deliveries in plan.
8223: OR (x_plan_deliveries(i).dangling_conts_count = 0) THEN --{
8224:
8225: -- Go through list of loose details and containers in this delivery to check for unassignments.
8226: IF l_debug_on THEN
8227: WSH_DEBUG_SV.log(l_module_name, 'looping x_plan_deliveries(i).delivery_id', x_plan_deliveries(i).delivery_id);
8228: END IF;
8229:
8230: OPEN c_assigned_details(x_plan_deliveries(i).delivery_id);
8231: LOOP
8232: FETCH c_assigned_details INTO l_assigned_rec;
8233: EXIT WHEN c_assigned_details%NOTFOUND;
8234:
8235: IF l_debug_on THEN
8236: WSH_DEBUG_SV.log(l_module_name, 'looping assigned_details: delivery_detail_id', l_assigned_rec.delivery_detail_id);
8237: END IF;
8238:
8239: l_detail_matches := 'N';
8240: l_plan_dd_index := NULL;
8302: IF l_detail_matches = 'N' THEN
8303:
8304: -- Fail Plan if the delivery is planned or firmed.
8305: IF l_debug_on THEN
8306: WSH_DEBUG_SV.logmsg(l_module_name, 'not matched in plan');
8307: END IF;
8308:
8309: IF NVL(x_plan_deliveries(i).wsh_planned_flag, 'N') <> 'N' THEN
8310: Stamp_Interface_Error(p_group_id => x_context.group_id,
8346: IF x_delivery_unassigns(l_count).wms_org_flag = 'Y'
8347: AND x_delivery_unassigns(l_count).container_flag = 'Y' THEN
8348:
8349: IF l_debug_on THEN
8350: WSH_DEBUG_SV.log(l_module_name, 'WMS container to be unassigned', x_delivery_unassigns(l_count).delivery_detail_id);
8351: END IF;
8352:
8353: OPEN c_staged_content(x_delivery_unassigns(l_count).delivery_detail_id);
8354: FETCH c_staged_content INTO l_dummy_id;
8359: END IF;
8360: CLOSE c_staged_content;
8361:
8362: IF l_debug_on THEN
8363: WSH_DEBUG_SV.log(l_module_name, 'lines_staged', l_flag);
8364: END IF;
8365:
8366: x_delivery_unassigns(l_count).lines_staged := (l_flag = 'Y');
8367: END IF;
8374: CLOSE c_assigned_details;
8375:
8376: -- look for partially used details that need to be unassigned
8377: IF l_debug_on THEN
8378: WSH_DEBUG_SV.log(l_module_name, 'l_working_used_details.COUNT', l_working_used_details.COUNT);
8379: END IF;
8380:
8381: IF l_working_used_details.COUNT > 0 THEN --[
8382: l_index := l_working_used_details.FIRST;
8430:
8431: --
8432: --
8433: IF l_debug_on THEN
8434: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8435: WSH_DEBUG_SV.pop(l_module_name);
8436: END IF;
8437:
8438: EXCEPTION
8431: --
8432: --
8433: IF l_debug_on THEN
8434: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8435: WSH_DEBUG_SV.pop(l_module_name);
8436: END IF;
8437:
8438: EXCEPTION
8439: WHEN WSH_PLANNED_DEL_NOT_MATCH THEN
8447: CLOSE c_staged_content;
8448: END IF;
8449: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8450: IF l_debug_on THEN
8451: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_PLANNED_DEL_NOT_MATCH');
8452: END IF;
8453:
8454: WHEN OTHERS THEN
8455: IF c_assigned_details%isopen THEN
8466: 'WSH_TP_RELEASE.MATCH_DELIVERIES',
8467: l_module_name);
8468:
8469: IF l_debug_on THEN
8470: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8471: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8472: END IF;
8473:
8474: END match_deliveries;
8467: l_module_name);
8468:
8469: IF l_debug_on THEN
8470: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8471: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8472: END IF;
8473:
8474: END match_deliveries;
8475:
8519: BEGIN
8520: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8521: --
8522: IF l_debug_on IS NULL THEN
8523: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8524: END IF;
8525:
8526: IF l_debug_on THEN
8527: WSH_DEBUG_SV.push(l_module_name);
8523: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8524: END IF;
8525:
8526: IF l_debug_on THEN
8527: WSH_DEBUG_SV.push(l_module_name);
8528: END IF;
8529: --
8530: --
8531:
8532: -- 1. call WMS to validate the lines released to warehouse that will go into each
8533: -- delivery can be assigned to that delivery and will not break LPN configuration.
8534:
8535: IF l_debug_on THEN
8536: WSH_DEBUG_SV.log(l_module_name,'1. call WMS to validate lines released to warehouse: x_plan_deliveries.COUNT: ', x_plan_deliveries.COUNT);
8537: END IF;
8538:
8539: l_del_index := x_plan_deliveries.FIRST;
8540: WHILE l_del_index IS NOT NULL LOOP
8543:
8544: IF x_plan_deliveries(l_del_index).s_lines_count > 0 THEN
8545:
8546: IF l_debug_on THEN
8547: WSH_DEBUG_SV.log(l_module_name,'Validating S lines in WMS: l_del_index: ', l_del_index);
8548: END IF;
8549:
8550: l_wms_table.DELETE;
8551: l_indexes.DELETE;
8576: END LOOP;
8577:
8578:
8579: IF l_debug_on THEN
8580: WSH_DEBUG_SV.log(l_module_name,'l_wms_table.COUNT: ', l_wms_table.COUNT);
8581: END IF;
8582:
8583:
8584: IF l_wms_table.COUNT > 0 THEN
8583:
8584: IF l_wms_table.COUNT > 0 THEN
8585:
8586: IF l_debug_on THEN
8587: WSH_DEBUG_SV.logmsg(l_module_name,'Calling WMS_SHIPPING_INTERFACE_GRP.process_delivery_details',WSH_DEBUG_SV.C_PROC_LEVEL);
8588: END IF;
8589:
8590: WMS_SHIPPING_INTERFACE_GRP.process_delivery_details (
8591: p_api_version => 1.0,
8595: x_msg_count => l_msg_count,
8596: x_msg_data => l_msg_data);
8597:
8598: IF l_debug_on THEN
8599: WSH_DEBUG_SV.log(l_module_name,'WMS_SHIPPING_INTERFACE_GRP.process_delivery_details return_status',
8600: l_return_status);
8601: END IF;
8602:
8603: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
8639: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
8640: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
8641: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8642: IF l_debug_on THEN
8643: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8644: WSH_DEBUG_SV.pop(l_module_name);
8645: END IF;
8646: RETURN;
8647: END IF;
8640: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
8641: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8642: IF l_debug_on THEN
8643: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8644: WSH_DEBUG_SV.pop(l_module_name);
8645: END IF;
8646: RETURN;
8647: END IF;
8648:
8658: -- 2. go through x_delivery_unassigns, look for staged LPNs to call WMS to validate they
8659: -- can be unassigned from deliveries.
8660:
8661: IF l_debug_on THEN
8662: WSH_DEBUG_SV.log(l_module_name,'2. go through x_delivery_unassigns: x_delivery_unassigns.COUNT', x_delivery_unassigns.COUNT);
8663: END IF;
8664:
8665: -- Bug 3555487 initialize message stack for each major action point.
8666: FND_MSG_PUB.initialize;
8693: l_unassign_index := x_delivery_unassigns.NEXT(l_unassign_index);
8694: END LOOP;
8695:
8696: IF l_debug_on THEN
8697: WSH_DEBUG_SV.log(l_module_name,'l_wms_table.COUNT: ', l_wms_table.COUNT);
8698: END IF;
8699:
8700: IF l_wms_table.COUNT > 0 THEN --{
8701: IF l_debug_on THEN
8698: END IF;
8699:
8700: IF l_wms_table.COUNT > 0 THEN --{
8701: IF l_debug_on THEN
8702: WSH_DEBUG_SV.logmsg(l_module_name,'Calling WMS_SHIPPING_INTERFACE_GRP.process_delivery_details',WSH_DEBUG_SV.C_PROC_LEVEL);
8703: END IF;
8704:
8705: WMS_SHIPPING_INTERFACE_GRP.process_delivery_details (
8706: p_api_version => 1.0,
8710: x_msg_count => l_msg_count,
8711: x_msg_data => l_msg_data);
8712:
8713: IF l_debug_on THEN
8714: WSH_DEBUG_SV.log(l_module_name,'WMS_SHIPPING_INTERFACE_GRP.process_delivery_details return_status',
8715: l_return_status);
8716: END IF;
8717:
8718: -- bug 4552612: issue #4
8781: l_dd_index := l_wms_table.NEXT(l_dd_index);
8782: END LOOP;
8783:
8784: IF l_debug_on THEN
8785: WSH_DEBUG_SV.log(l_module_name,'l_return status after scanning wms list',
8786: l_return_status);
8787: END IF;
8788:
8789: END IF;
8807: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
8808: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
8809: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8810: IF l_debug_on THEN
8811: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8812: WSH_DEBUG_SV.pop(l_module_name);
8813: END IF;
8814: RETURN;
8815: END IF;
8808: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
8809: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8810: IF l_debug_on THEN
8811: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8812: WSH_DEBUG_SV.pop(l_module_name);
8813: END IF;
8814: RETURN;
8815: END IF;
8816:
8822:
8823: --
8824: --
8825: IF l_debug_on THEN
8826: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8827: WSH_DEBUG_SV.pop(l_module_name);
8828: END IF;
8829:
8830: EXCEPTION
8823: --
8824: --
8825: IF l_debug_on THEN
8826: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8827: WSH_DEBUG_SV.pop(l_module_name);
8828: END IF;
8829:
8830: EXCEPTION
8831: WHEN OTHERS THEN
8834: 'WSH_TP_RELEASE.VALIDATE_WMS',
8835: l_module_name);
8836:
8837: IF l_debug_on THEN
8838: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8839: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8840: END IF;
8841:
8842: END validate_wms;
8835: l_module_name);
8836:
8837: IF l_debug_on THEN
8838: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8839: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8840: END IF;
8841:
8842: END validate_wms;
8843:
8932:
8933: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8934: --
8935: IF l_debug_on IS NULL THEN
8936: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8937: END IF;
8938:
8939: IF l_debug_on THEN
8940: WSH_DEBUG_SV.push(l_module_name);
8936: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8937: END IF;
8938:
8939: IF l_debug_on THEN
8940: WSH_DEBUG_SV.push(l_module_name);
8941: END IF;
8942: --
8943: --
8944:
8961:
8962: IF x_plan_trips(i).trip_id IS NOT NULL THEN -- {
8963:
8964: IF l_debug_on THEN
8965: WSH_DEBUG_SV.log(l_module_name, 'looping x_plan_trips(i).trip_id', x_plan_trips(i).trip_id);
8966: END IF;
8967:
8968: l_stops_start_index := x_plan_trips(i).stop_base_index;
8969:
8970: FOR s IN c_stops_in_trip(x_plan_trips(i).trip_id)
8971: LOOP
8972:
8973: IF l_debug_on THEN
8974: WSH_DEBUG_SV.log(l_module_name, 'looping stop_id to match plan', s.stop_id);
8975: END IF;
8976:
8977: l_stop_matches := 'N';
8978: l_stop_index := l_stops_start_index;
8988:
8989: l_stop_matches := 'Y';
8990: l_stops_start_index := x_plan_stops.NEXT(l_stop_index);
8991: IF l_debug_on THEN
8992: WSH_DEBUG_SV.log(l_module_name, 'stop matches index', l_stop_index);
8993: WSH_DEBUG_SV.log(l_module_name, 'l_stops_start_index', l_stops_start_index);
8994: END IF;
8995: EXIT;
8996:
8989: l_stop_matches := 'Y';
8990: l_stops_start_index := x_plan_stops.NEXT(l_stop_index);
8991: IF l_debug_on THEN
8992: WSH_DEBUG_SV.log(l_module_name, 'stop matches index', l_stop_index);
8993: WSH_DEBUG_SV.log(l_module_name, 'l_stops_start_index', l_stops_start_index);
8994: END IF;
8995: EXIT;
8996:
8997: ELSIF (x_plan_stops(l_stop_index).planned_arrival_date > s.planned_arrival_date) THEN
9012: -- linked stops are considered to match the physical stop
9013: l_stop_matches := 'Y';
9014:
9015: IF l_debug_on THEN
9016: WSH_DEBUG_SV.log(l_module_name,'matching linked stop', s.stop_id);
9017: END IF;
9018:
9019: BEGIN
9020: wsh_trip_stops_pvt.lock_trip_stop_no_compare(
9031: x_errors_tab => x_errors_tab,
9032: x_return_status => x_return_status);
9033: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9034: IF l_debug_on THEN
9035: WSH_DEBUG_SV.pop(l_module_name);
9036: END IF;
9037: RETURN;
9038: END;
9039:
9043:
9044: IF NVL(x_plan_trips(i).wsh_planned_flag,'N') <> 'N' THEN
9045:
9046: IF l_debug_on THEN
9047: WSH_DEBUG_SV.logmsg(l_module_name,'plan does not match firmed trip having stop_id', s.stop_id);
9048: END IF;
9049:
9050: Stamp_Interface_Error(p_group_id => x_context.group_id,
9051: p_entity_table_name => 'WSH_TRIPS_INTERFACE',
9078: x_errors_tab => x_errors_tab,
9079: x_return_status => x_return_status);
9080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9081: IF l_debug_on THEN
9082: WSH_DEBUG_SV.pop(l_module_name);
9083: END IF;
9084: RETURN;
9085: END;
9086:
9100: -- well as the dropoff stop, and we are looping through all the stops for
9101: -- that trip.
9102:
9103: IF l_debug_on THEN
9104: WSH_DEBUG_SV.log(l_module_name, 'looping leg to match trip: delivery_id', leg.delivery_id);
9105: END IF;
9106:
9107: l_delivery_unassigned := 'N';
9108:
9143: IF l_delivery_matches = 'N' THEN
9144:
9145: -- Fail plan if a delivery in a firmed trip does not match.
9146: IF l_debug_on THEN
9147: WSH_DEBUG_SV.log(l_module_name,'plan does not match trip having delivery_id', leg.delivery_id);
9148: END IF;
9149:
9150: IF NVL(x_plan_trips(i).wsh_planned_flag,'N') = 'F' THEN
9151: Stamp_Interface_Error(p_group_id => x_context.group_id,
9197: x_errors_tab => x_errors_tab,
9198: x_return_status => x_return_status);
9199: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9200: IF l_debug_on THEN
9201: WSH_DEBUG_SV.pop(l_module_name);
9202: END IF;
9203: RETURN;
9204: END;
9205:
9236:
9237: --
9238: --
9239: IF l_debug_on THEN
9240: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
9241: WSH_DEBUG_SV.pop(l_module_name);
9242: END IF;
9243:
9244: EXCEPTION
9237: --
9238: --
9239: IF l_debug_on THEN
9240: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
9241: WSH_DEBUG_SV.pop(l_module_name);
9242: END IF;
9243:
9244: EXCEPTION
9245: WHEN WSH_PLANNED_TRIP_NOT_MATCH THEN
9250: CLOSE c_legs_in_trip;
9251: END IF;
9252: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9253: IF l_debug_on THEN
9254: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_PLANNED_DEL_NOT_MATCH');
9255: END IF;
9256: WHEN OTHERS THEN
9257: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9258: WSH_UTIL_CORE.DEFAULT_HANDLER(
9259: 'WSH_TP_RELEASE.MATCH_TRIPS',
9260: l_module_name);
9261:
9262: IF l_debug_on THEN
9263: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9264: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9265: END IF;
9266:
9267: END match_trips;
9260: l_module_name);
9261:
9262: IF l_debug_on THEN
9263: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9264: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9265: END IF;
9266:
9267: END match_trips;
9268:
9315: BEGIN
9316: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9317: --
9318: IF l_debug_on IS NULL THEN
9319: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9320: END IF;
9321:
9322: IF l_debug_on THEN
9323: WSH_DEBUG_SV.push(l_module_name);
9319: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9320: END IF;
9321:
9322: IF l_debug_on THEN
9323: WSH_DEBUG_SV.push(l_module_name);
9324:
9325:
9326: WSH_DEBUG_SV.logmsg(l_module_name, '------- start of dump -----------');
9327:
9322: IF l_debug_on THEN
9323: WSH_DEBUG_SV.push(l_module_name);
9324:
9325:
9326: WSH_DEBUG_SV.logmsg(l_module_name, '------- start of dump -----------');
9327:
9328: -- dump x_context
9329: WSH_DEBUG_SV.log(l_module_name, 'x_context.group_id', x_context.group_id);
9330:
9325:
9326: WSH_DEBUG_SV.logmsg(l_module_name, '------- start of dump -----------');
9327:
9328: -- dump x_context
9329: WSH_DEBUG_SV.log(l_module_name, 'x_context.group_id', x_context.group_id);
9330:
9331: IF x_context.wms_in_group THEN
9332: WSH_DEBUG_SV.log(l_module_name, 'x_context.wms_in_group', 'TRUE');
9333: ELSE
9328: -- dump x_context
9329: WSH_DEBUG_SV.log(l_module_name, 'x_context.group_id', x_context.group_id);
9330:
9331: IF x_context.wms_in_group THEN
9332: WSH_DEBUG_SV.log(l_module_name, 'x_context.wms_in_group', 'TRUE');
9333: ELSE
9334: WSH_DEBUG_SV.log(l_module_name, 'x_context.wms_in_group', 'FALSE');
9335: END IF;
9336: WSH_DEBUG_SV.log(l_module_name, 'x_context.auto_tender_flag', x_context.auto_tender_flag);
9330:
9331: IF x_context.wms_in_group THEN
9332: WSH_DEBUG_SV.log(l_module_name, 'x_context.wms_in_group', 'TRUE');
9333: ELSE
9334: WSH_DEBUG_SV.log(l_module_name, 'x_context.wms_in_group', 'FALSE');
9335: END IF;
9336: WSH_DEBUG_SV.log(l_module_name, 'x_context.auto_tender_flag', x_context.auto_tender_flag);
9337: WSH_DEBUG_SV.log(l_module_name, 'x_context.linked_trip_count', x_context.linked_trip_count);
9338:
9332: WSH_DEBUG_SV.log(l_module_name, 'x_context.wms_in_group', 'TRUE');
9333: ELSE
9334: WSH_DEBUG_SV.log(l_module_name, 'x_context.wms_in_group', 'FALSE');
9335: END IF;
9336: WSH_DEBUG_SV.log(l_module_name, 'x_context.auto_tender_flag', x_context.auto_tender_flag);
9337: WSH_DEBUG_SV.log(l_module_name, 'x_context.linked_trip_count', x_context.linked_trip_count);
9338:
9339:
9340: -- dump x_plan_details
9333: ELSE
9334: WSH_DEBUG_SV.log(l_module_name, 'x_context.wms_in_group', 'FALSE');
9335: END IF;
9336: WSH_DEBUG_SV.log(l_module_name, 'x_context.auto_tender_flag', x_context.auto_tender_flag);
9337: WSH_DEBUG_SV.log(l_module_name, 'x_context.linked_trip_count', x_context.linked_trip_count);
9338:
9339:
9340: -- dump x_plan_details
9341: WSH_DEBUG_SV.log(l_module_name, 'x_plan_details.COUNT', x_plan_details.COUNT);
9337: WSH_DEBUG_SV.log(l_module_name, 'x_context.linked_trip_count', x_context.linked_trip_count);
9338:
9339:
9340: -- dump x_plan_details
9341: WSH_DEBUG_SV.log(l_module_name, 'x_plan_details.COUNT', x_plan_details.COUNT);
9342: IF x_plan_details.COUNT > 0 THEN
9343: l_index := x_plan_details.FIRST;
9344: WHILE l_index IS NOT NULL LOOP
9345: --
9353: l_string := l_string || ', top_cont_id=' || x_plan_details(l_index).topmost_cont_id;
9354: l_string := l_string || ', cur_del_id=' || x_plan_details(l_index).current_delivery_id;
9355: l_string := l_string || ', target_del_index=' || x_plan_details(l_index).target_delivery_index;
9356: --
9357: WSH_DEBUG_SV.log(l_module_name, 'iline(' || l_index || ')', l_string);
9358: l_index := x_plan_details.NEXT(l_index);
9359: END LOOP;
9360: END IF;
9361:
9359: END LOOP;
9360: END IF;
9361:
9362: -- dump x_track_conts
9363: WSH_DEBUG_SV.log(l_module_name, 'x_track_conts.COUNT', x_track_conts.COUNT);
9364: IF x_track_conts.COUNT > 0 THEN
9365: l_index := x_track_conts.FIRST;
9366: WHILE l_index IS NOT NULL LOOP
9367: --
9374: l_string := l_string || ', lines_staged=FALSE';
9375: END IF;
9376: l_string := l_string || ', lpn_id=' || x_track_conts(l_index).lpn_id;
9377: --
9378: WSH_DEBUG_SV.log(l_module_name, 'tcont(' || l_index || ')', l_string);
9379: l_index := x_track_conts.NEXT(l_index);
9380: END LOOP;
9381: END IF;
9382:
9380: END LOOP;
9381: END IF;
9382:
9383: -- dump x_plan_deliveries
9384: WSH_DEBUG_SV.log(l_module_name, 'x_plan_deliveries.COUNT', x_plan_deliveries.COUNT);
9385: IF x_plan_deliveries.COUNT > 0 THEN
9386: l_index := x_plan_deliveries.FIRST;
9387: WHILE l_index IS NOT NULL LOOP
9388: --
9403: l_string := l_string || ', d_conts_count=' || x_plan_deliveries(l_index).dangling_conts_count;
9404: l_string := l_string || ', wms_org_flag=' || x_plan_deliveries(l_index).wms_org_flag;
9405: l_string := l_string || ', leg_base_index=' || x_plan_deliveries(l_index).leg_base_index;
9406: --
9407: WSH_DEBUG_SV.log(l_module_name, 'idel(' || l_index || ')', l_string);
9408: l_index := x_plan_deliveries.NEXT(l_index);
9409: END LOOP;
9410: END IF;
9411:
9409: END LOOP;
9410: END IF;
9411:
9412: -- dump x_plan_legs
9413: WSH_DEBUG_SV.log(l_module_name, 'x_plan_legs.COUNT', x_plan_legs.COUNT);
9414: IF x_plan_legs.COUNT > 0 THEN
9415: l_index := x_plan_legs.FIRST;
9416: WHILE l_index IS NOT NULL LOOP
9417: --
9422: l_string := l_string || ', pickup_stop_index=' || x_plan_legs(l_index).pickup_stop_index;
9423: l_string := l_string || ', dropoff_stop_index=' || x_plan_legs(l_index).dropoff_stop_index;
9424: l_string := l_string || ', trip_index=' || x_plan_legs(l_index).trip_index;
9425: --
9426: WSH_DEBUG_SV.log(l_module_name, 'ileg(' || l_index || ')', l_string);
9427: l_index := x_plan_legs.NEXT(l_index);
9428: END LOOP;
9429: END IF;
9430:
9428: END LOOP;
9429: END IF;
9430:
9431: -- dump x_plan_stops
9432: WSH_DEBUG_SV.log(l_module_name, 'x_plan_stops.COUNT', x_plan_stops.COUNT);
9433: IF x_plan_stops.COUNT > 0 THEN
9434: l_index := x_plan_stops.FIRST;
9435: WHILE l_index IS NOT NULL LOOP
9436: l_string := '';
9447: l_string := l_string || ', int_do_count=' || x_plan_stops(l_index).internal_do_count;
9448: l_string := l_string || ', ext_pd_count=' || x_plan_stops(l_index).external_pd_count;
9449: l_string := l_string || ', wsh_phys_loc=' || x_plan_stops(l_index).wsh_physical_location_id;
9450: --
9451: WSH_DEBUG_SV.log(l_module_name, 'istop(' || l_index || ')', l_string);
9452: l_index := x_plan_stops.NEXT(l_index);
9453: END LOOP;
9454: END IF;
9455:
9453: END LOOP;
9454: END IF;
9455:
9456: -- dump x_plan_trips
9457: WSH_DEBUG_SV.log(l_module_name, 'x_plan_trips.COUNT', x_plan_trips.COUNT);
9458: IF x_plan_trips.COUNT > 0 THEN
9459: l_index := x_plan_trips.FIRST;
9460: WHILE l_index IS NOT NULL LOOP
9461: --
9468: l_string := l_string || ', shipments_type_flag=' || x_plan_trips(l_index).shipments_type_flag;
9469: l_string := l_string || ', lane_id=' || x_plan_trips(l_index).lane_id;
9470: l_string := l_string || ', linked_stop_count=' || x_plan_trips(l_index).linked_stop_count;
9471: --
9472: WSH_DEBUG_SV.log(l_module_name, 'itrip(' || l_index || ')', l_string);
9473: l_index := x_plan_trips.NEXT(l_index);
9474: END LOOP;
9475: END IF;
9476:
9474: END LOOP;
9475: END IF;
9476:
9477: -- dump x_plan_trip_moves
9478: WSH_DEBUG_SV.log(l_module_name, 'x_plan_trip_moves.COUNT', x_plan_trip_moves.COUNT);
9479: IF x_plan_trip_moves.COUNT > 0 THEN
9480: l_index := x_plan_trip_moves.FIRST;
9481: WHILE l_index IS NOT NULL LOOP
9482: --
9487: l_string := l_string || ', trip_interface=' || x_plan_trip_moves(l_index).trip_interface_id;
9488: l_string := l_string || ', trip_index=' || x_plan_trip_moves(l_index).trip_index;
9489: l_string := l_string || ', sequence_number=' || x_plan_trip_moves(l_index).sequence_number;
9490: --
9491: WSH_DEBUG_SV.log(l_module_name, 'itripmove(' || l_index || ')', l_string);
9492: l_index := x_plan_trip_moves.NEXT(l_index);
9493: END LOOP;
9494: END IF;
9495:
9493: END LOOP;
9494: END IF;
9495:
9496: -- dump x_plan_moves
9497: WSH_DEBUG_SV.log(l_module_name, 'x_plan_moves.COUNT', x_plan_moves.COUNT);
9498: IF x_plan_moves.COUNT > 0 THEN
9499: l_index := x_plan_moves.FIRST;
9500: WHILE l_index IS NOT NULL LOOP
9501: --
9508: l_string := l_string || ', fte_planned=' || x_plan_moves(l_index).fte_planned_flag;
9509: l_string := l_string || ', cm_trip_number=' || x_plan_moves(l_index).cm_trip_number;
9510: l_string := l_string || ', trip_move_base_index=' || x_plan_moves(l_index).trip_move_base_index;
9511: --
9512: WSH_DEBUG_SV.log(l_module_name, 'imove(' || l_index || ')', l_string);
9513: l_index := x_plan_moves.NEXT(l_index);
9514: END LOOP;
9515: END IF;
9516:
9514: END LOOP;
9515: END IF;
9516:
9517: -- dump x_used_details
9518: WSH_DEBUG_SV.log(l_module_name, 'x_used_details.COUNT', x_used_details.COUNT);
9519: IF x_used_details.COUNT > 0 THEN
9520: l_index := x_used_details.FIRST;
9521: WHILE l_index IS NOT NULL LOOP
9522: l_string := '';
9526: l_string := l_string || ', available_qty=' || x_used_details(l_index).available_quantity || ' ' || x_used_details(l_index).available_quantity_uom;
9527: l_string := l_string || ', current_del=' || x_used_details(l_index).current_delivery_id;
9528: l_string := l_string || ', split_count=' || x_used_details(l_index).split_count;
9529: --
9530: WSH_DEBUG_SV.log(l_module_name, 'used_details(' || l_index || ')', l_string);
9531: l_index := x_used_details.NEXT(l_index);
9532: END LOOP;
9533: END IF;
9534:
9532: END LOOP;
9533: END IF;
9534:
9535: -- dump x_delivery_unassigns
9536: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_unassigns.COUNT', x_delivery_unassigns.COUNT);
9537: IF x_delivery_unassigns.COUNT > 0 THEN
9538: l_index := x_delivery_unassigns.FIRST;
9539: WHILE l_index IS NOT NULL LOOP
9540: l_string := '';
9547: l_string := l_string || ', lpn_id=' || x_delivery_unassigns(l_index).lpn_id;
9548: l_string := l_string || ', plan_dd_index=' || x_delivery_unassigns(l_index).plan_dd_index;
9549: l_string := l_string || ', plan_del_index=' || x_delivery_unassigns(l_index).plan_del_index;
9550: --
9551: WSH_DEBUG_SV.log(l_module_name, 'del_unassigns(' || l_index || ')', l_string);
9552: l_index := x_delivery_unassigns.NEXT(l_index);
9553: END LOOP;
9554: END IF;
9555:
9553: END LOOP;
9554: END IF;
9555:
9556: -- dump x_trip_unassigns
9557: WSH_DEBUG_SV.log(l_module_name, 'x_trip_unassigns.COUNT', x_trip_unassigns.COUNT);
9558: IF x_trip_unassigns.COUNT > 0 THEN
9559: l_index := x_trip_unassigns.FIRST;
9560: WHILE l_index IS NOT NULL LOOP
9561: --
9565: l_string := l_string || ', delivery_leg_id=' || x_trip_unassigns(l_index).delivery_leg_id;
9566: l_string := l_string || ', pickup_stop_id=' || x_trip_unassigns(l_index).pickup_stop_id;
9567: l_string := l_string || ', dropoff_stop_id=' || x_trip_unassigns(l_index).dropoff_stop_id;
9568: --
9569: WSH_DEBUG_SV.log(l_module_name, 'trip_unassigns(' || l_index || ')', l_string);
9570: l_index := x_trip_unassigns.NEXT(l_index);
9571: END LOOP;
9572: END IF;
9573:
9571: END LOOP;
9572: END IF;
9573:
9574: -- dump x_obsoleted_stops
9575: WSH_DEBUG_SV.log(l_module_name, 'x_obsoleted_stops.COUNT', x_obsoleted_stops.COUNT);
9576: IF x_obsoleted_stops.COUNT > 0 THEN
9577: l_index := x_obsoleted_stops.FIRST;
9578: WHILE l_index IS NOT NULL LOOP
9579: --
9579: --
9580: l_string := 'trip_id=' || x_obsoleted_stops(l_index).trip_id;
9581: l_string := l_string || ', stop_id=' || x_obsoleted_stops(l_index).stop_id;
9582: --
9583: WSH_DEBUG_SV.log(l_module_name, 'obs_stops(' || l_index || ')', l_string);
9584: l_index := x_obsoleted_stops.NEXT(l_index);
9585: END LOOP;
9586: END IF;
9587:
9585: END LOOP;
9586: END IF;
9587:
9588: -- dump x_obsoleted_trip_moves
9589: WSH_DEBUG_SV.log(l_module_name, 'x_obsoleted_trip_moves.COUNT', x_obsoleted_trip_moves.COUNT);
9590: IF x_obsoleted_trip_moves.COUNT > 0 THEN
9591: l_index := x_obsoleted_trip_moves.FIRST;
9592: WHILE l_index IS NOT NULL LOOP
9593: --
9595: l_string := l_string || ', move_id=' || x_obsoleted_trip_moves(l_index).move_id;
9596: l_string := l_string || ', trip_id=' || x_obsoleted_trip_moves(l_index).trip_id;
9597: l_string := l_string || ', sequence_number=' || x_obsoleted_trip_moves(l_index).sequence_number;
9598: --
9599: WSH_DEBUG_SV.log(l_module_name, 'obs_t_moves(' || l_index || ')', l_string);
9600: l_index := x_obsoleted_trip_moves.NEXT(l_index);
9601: END LOOP;
9602: END IF;
9603:
9600: l_index := x_obsoleted_trip_moves.NEXT(l_index);
9601: END LOOP;
9602: END IF;
9603:
9604: WSH_DEBUG_SV.logmsg(l_module_name, '------- end of dump -----------');
9605:
9606: WSH_DEBUG_SV.pop(l_module_name);
9607: END IF;
9608:
9602: END IF;
9603:
9604: WSH_DEBUG_SV.logmsg(l_module_name, '------- end of dump -----------');
9605:
9606: WSH_DEBUG_SV.pop(l_module_name);
9607: END IF;
9608:
9609: EXCEPTION
9610: WHEN OTHERS THEN
9612: 'WSH_TP_RELEASE.debug_dump_context',
9613: l_module_name);
9614:
9615: IF l_debug_on THEN
9616: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9617: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9618: END IF;
9619: RETURN;
9620: END debug_dump_context;
9613: l_module_name);
9614:
9615: IF l_debug_on THEN
9616: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9617: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9618: END IF;
9619: RETURN;
9620: END debug_dump_context;
9621:
9667: BEGIN
9668: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9669: --
9670: IF l_debug_on IS NULL THEN
9671: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9672: END IF;
9673:
9674: IF l_debug_on THEN
9675: WSH_DEBUG_SV.push(l_module_name);
9671: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9672: END IF;
9673:
9674: IF l_debug_on THEN
9675: WSH_DEBUG_SV.push(l_module_name);
9676: END IF;
9677:
9678: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9679:
9684: OPEN c_del_info(p_plan_delivery_rec.delivery_id);
9685: FETCH c_del_info INTO l_del_info;
9686: IF c_del_info%NOTFOUND THEN
9687: IF l_debug_on THEN
9688: WSH_DEBUG_SV.log(l_module_name, 'delivery_id is not found', p_plan_delivery_rec.delivery_id);
9689: END IF;
9690: -- setting this value to NULL will cause an error.
9691: x_delivery_attrs_rec.DELIVERY_ID := NULL;
9692: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9693: END IF;
9694: CLOSE c_del_info;
9695: IF x_delivery_attrs_rec.DELIVERY_ID IS NULL THEN
9696: IF l_debug_on THEN
9697: WSH_DEBUG_SV.pop(l_module_name);
9698: END IF;
9699: RETURN;
9700: END IF;
9701: END IF;
9713: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
9714: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
9715: x_return_status := l_return_status;
9716: IF l_debug_on THEN
9717: WSH_DEBUG_SV.log(l_module_name,
9718: 'create/update del will fail because grouping attrs could not be found for org',
9719: p_plan_delivery_rec.organization_id);
9720: WSH_DEBUG_SV.pop(l_module_name);
9721: END IF;
9716: IF l_debug_on THEN
9717: WSH_DEBUG_SV.log(l_module_name,
9718: 'create/update del will fail because grouping attrs could not be found for org',
9719: p_plan_delivery_rec.organization_id);
9720: WSH_DEBUG_SV.pop(l_module_name);
9721: END IF;
9722: RETURN;
9723: END IF;
9724: ELSE
9789:
9790:
9791:
9792: IF l_debug_on THEN
9793: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.GROSS_WEIGHT', l_del_info.GROSS_WEIGHT);
9794: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.NET_WEIGHT', l_del_info.NET_WEIGHT);
9795: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.VOLUME', l_del_info.VOLUME);
9796: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.GROSS_WEIGHT', x_delivery_attrs_rec.GROSS_WEIGHT);
9797: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.NET_WEIGHT', x_delivery_attrs_rec.NET_WEIGHT);
9790:
9791:
9792: IF l_debug_on THEN
9793: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.GROSS_WEIGHT', l_del_info.GROSS_WEIGHT);
9794: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.NET_WEIGHT', l_del_info.NET_WEIGHT);
9795: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.VOLUME', l_del_info.VOLUME);
9796: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.GROSS_WEIGHT', x_delivery_attrs_rec.GROSS_WEIGHT);
9797: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.NET_WEIGHT', x_delivery_attrs_rec.NET_WEIGHT);
9798: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.VOLUME', x_delivery_attrs_rec.VOLUME);
9791:
9792: IF l_debug_on THEN
9793: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.GROSS_WEIGHT', l_del_info.GROSS_WEIGHT);
9794: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.NET_WEIGHT', l_del_info.NET_WEIGHT);
9795: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.VOLUME', l_del_info.VOLUME);
9796: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.GROSS_WEIGHT', x_delivery_attrs_rec.GROSS_WEIGHT);
9797: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.NET_WEIGHT', x_delivery_attrs_rec.NET_WEIGHT);
9798: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.VOLUME', x_delivery_attrs_rec.VOLUME);
9799: END IF;
9792: IF l_debug_on THEN
9793: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.GROSS_WEIGHT', l_del_info.GROSS_WEIGHT);
9794: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.NET_WEIGHT', l_del_info.NET_WEIGHT);
9795: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.VOLUME', l_del_info.VOLUME);
9796: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.GROSS_WEIGHT', x_delivery_attrs_rec.GROSS_WEIGHT);
9797: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.NET_WEIGHT', x_delivery_attrs_rec.NET_WEIGHT);
9798: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.VOLUME', x_delivery_attrs_rec.VOLUME);
9799: END IF;
9800: ELSE
9793: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.GROSS_WEIGHT', l_del_info.GROSS_WEIGHT);
9794: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.NET_WEIGHT', l_del_info.NET_WEIGHT);
9795: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.VOLUME', l_del_info.VOLUME);
9796: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.GROSS_WEIGHT', x_delivery_attrs_rec.GROSS_WEIGHT);
9797: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.NET_WEIGHT', x_delivery_attrs_rec.NET_WEIGHT);
9798: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.VOLUME', x_delivery_attrs_rec.VOLUME);
9799: END IF;
9800: ELSE
9801: -- W/V: new delivery is empty; therefore W/V = 0.
9794: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.NET_WEIGHT', l_del_info.NET_WEIGHT);
9795: WSH_DEBUG_SV.log(l_module_name, 'l_del_info.VOLUME', l_del_info.VOLUME);
9796: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.GROSS_WEIGHT', x_delivery_attrs_rec.GROSS_WEIGHT);
9797: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.NET_WEIGHT', x_delivery_attrs_rec.NET_WEIGHT);
9798: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_attrs_rec.VOLUME', x_delivery_attrs_rec.VOLUME);
9799: END IF;
9800: ELSE
9801: -- W/V: new delivery is empty; therefore W/V = 0.
9802: x_delivery_attrs_rec.GROSS_WEIGHT := 0;
9860: x_delivery_attrs_rec.vendor_id := l_del_info.vendor_id;
9861: END IF;
9862:
9863: IF l_debug_on THEN
9864: WSH_DEBUG_SV.pop(l_module_name);
9865: END IF;
9866:
9867:
9868: EXCEPTION
9875: 'WSH_TP_RELEASE.copy_delivery_record',
9876: l_module_name);
9877:
9878: IF l_debug_on THEN
9879: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9880: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9881: END IF;
9882:
9883: END copy_delivery_record;
9876: l_module_name);
9877:
9878: IF l_debug_on THEN
9879: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9880: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9881: END IF;
9882:
9883: END copy_delivery_record;
9884:
9912: BEGIN
9913: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9914: --
9915: IF l_debug_on IS NULL THEN
9916: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9917: END IF;
9918:
9919: IF l_debug_on THEN
9920: WSH_DEBUG_SV.push(l_module_name);
9916: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9917: END IF;
9918:
9919: IF l_debug_on THEN
9920: WSH_DEBUG_SV.push(l_module_name);
9921: END IF;
9922:
9923: x_trip_attrs_rec.TRIP_ID := p_plan_trip_rec.trip_id;
9924:
9928: OPEN c_trip_info(p_plan_trip_rec.trip_id);
9929: FETCH c_trip_info INTO l_trip_info;
9930: IF c_trip_info%NOTFOUND THEN
9931: IF l_debug_on THEN
9932: WSH_DEBUG_SV.log(l_module_name, 'trip_id is not found', p_plan_trip_rec.trip_id);
9933: END IF;
9934: -- setting this value to NULL will cause an error.
9935: x_trip_attrs_rec.TRIP_ID := NULL;
9936: END IF;
9936: END IF;
9937: CLOSE c_trip_info;
9938: IF x_trip_attrs_rec.TRIP_ID IS NULL THEN
9939: IF l_debug_on THEN
9940: WSH_DEBUG_SV.pop(l_module_name);
9941: END IF;
9942: RETURN;
9943: END IF;
9944: END IF;
9977: x_trip_attrs_rec.LOAD_TENDER_NUMBER := l_trip_info.load_tender_number; -- J+ auto tender
9978: x_trip_attrs_rec.IGNORE_FOR_PLANNING := 'N';
9979:
9980: IF l_debug_on THEN
9981: WSH_DEBUG_SV.pop(l_module_name);
9982: END IF;
9983:
9984: EXCEPTION
9985: WHEN OTHERS THEN
9990: 'WSH_TP_RELEASE.copy_trip_record',
9991: l_module_name);
9992:
9993: IF l_debug_on THEN
9994: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9995: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9996: END IF;
9997: RAISE;
9998:
9991: l_module_name);
9992:
9993: IF l_debug_on THEN
9994: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9995: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9996: END IF;
9997: RAISE;
9998:
9999: END copy_trip_record;
10034: BEGIN
10035: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10036: --
10037: IF l_debug_on IS NULL THEN
10038: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10039: END IF;
10040:
10041: IF l_debug_on THEN
10042: WSH_DEBUG_SV.push(l_module_name);
10038: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10039: END IF;
10040:
10041: IF l_debug_on THEN
10042: WSH_DEBUG_SV.push(l_module_name);
10043: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.trip_index', p_plan_stop_rec.trip_index);
10044: END IF;
10045:
10046: IF p_plan_stop_rec.stop_id IS NOT NULL THEN
10039: END IF;
10040:
10041: IF l_debug_on THEN
10042: WSH_DEBUG_SV.push(l_module_name);
10043: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.trip_index', p_plan_stop_rec.trip_index);
10044: END IF;
10045:
10046: IF p_plan_stop_rec.stop_id IS NOT NULL THEN
10047: OPEN c_stop_info(p_plan_stop_rec.stop_id);
10047: OPEN c_stop_info(p_plan_stop_rec.stop_id);
10048: FETCH c_stop_info INTO l_stop_info;
10049: IF c_stop_info%NOTFOUND THEN
10050: IF l_debug_on THEN
10051: WSH_DEBUG_SV.log(l_module_name, 'stop_id is not found', p_plan_stop_rec.stop_id);
10052: END IF;
10053: -- setting this value to NULL will cause an error.
10054: x_stop_attrs_rec.STOP_ID := NULL;
10055: END IF;
10093: x_stop_attrs_rec.VOLUME_UOM_CODE := l_stop_info.volume_uom_code;
10094:
10095: END IF;
10096: IF l_debug_on THEN
10097: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.weight_uom_code', p_plan_stop_rec.weight_uom_code);
10098: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.volume_uom_code', p_plan_stop_rec.volume_uom_code);
10099: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_GROSS_WEIGHT', x_stop_attrs_rec.DEPARTURE_GROSS_WEIGHT);
10100: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_NET_WEIGHT', x_stop_attrs_rec.DEPARTURE_NET_WEIGHT);
10101: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_VOLUME', x_stop_attrs_rec.DEPARTURE_VOLUME);
10094:
10095: END IF;
10096: IF l_debug_on THEN
10097: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.weight_uom_code', p_plan_stop_rec.weight_uom_code);
10098: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.volume_uom_code', p_plan_stop_rec.volume_uom_code);
10099: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_GROSS_WEIGHT', x_stop_attrs_rec.DEPARTURE_GROSS_WEIGHT);
10100: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_NET_WEIGHT', x_stop_attrs_rec.DEPARTURE_NET_WEIGHT);
10101: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_VOLUME', x_stop_attrs_rec.DEPARTURE_VOLUME);
10102: END IF;
10095: END IF;
10096: IF l_debug_on THEN
10097: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.weight_uom_code', p_plan_stop_rec.weight_uom_code);
10098: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.volume_uom_code', p_plan_stop_rec.volume_uom_code);
10099: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_GROSS_WEIGHT', x_stop_attrs_rec.DEPARTURE_GROSS_WEIGHT);
10100: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_NET_WEIGHT', x_stop_attrs_rec.DEPARTURE_NET_WEIGHT);
10101: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_VOLUME', x_stop_attrs_rec.DEPARTURE_VOLUME);
10102: END IF;
10103:
10096: IF l_debug_on THEN
10097: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.weight_uom_code', p_plan_stop_rec.weight_uom_code);
10098: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.volume_uom_code', p_plan_stop_rec.volume_uom_code);
10099: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_GROSS_WEIGHT', x_stop_attrs_rec.DEPARTURE_GROSS_WEIGHT);
10100: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_NET_WEIGHT', x_stop_attrs_rec.DEPARTURE_NET_WEIGHT);
10101: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_VOLUME', x_stop_attrs_rec.DEPARTURE_VOLUME);
10102: END IF;
10103:
10104: ELSE
10097: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.weight_uom_code', p_plan_stop_rec.weight_uom_code);
10098: WSH_DEBUG_SV.log(l_module_name, 'p_plan_stop_rec.volume_uom_code', p_plan_stop_rec.volume_uom_code);
10099: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_GROSS_WEIGHT', x_stop_attrs_rec.DEPARTURE_GROSS_WEIGHT);
10100: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_NET_WEIGHT', x_stop_attrs_rec.DEPARTURE_NET_WEIGHT);
10101: WSH_DEBUG_SV.log(l_module_name, 'x_stop_attrs_rec.DEPARTURE_VOLUME', x_stop_attrs_rec.DEPARTURE_VOLUME);
10102: END IF;
10103:
10104: ELSE
10105: -- new stop is empty; assume W/V = 0.
10115: x_stop_attrs_rec.WKDAY_LAYOVER_STOPS := p_plan_stop_rec.wkday_layover_stops;
10116: x_stop_attrs_rec.SHIPMENTS_TYPE_FLAG := p_plan_stop_rec.shipments_type_flag;
10117:
10118: IF l_debug_on THEN
10119: WSH_DEBUG_SV.pop(l_module_name);
10120: END IF;
10121:
10122:
10123: EXCEPTION
10129: 'WSH_TP_RELEASE.copy_stop_record',
10130: l_module_name);
10131:
10132: IF l_debug_on THEN
10133: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10134: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10135: END IF;
10136: RAISE;
10137:
10130: l_module_name);
10131:
10132: IF l_debug_on THEN
10133: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10134: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10135: END IF;
10136: RAISE;
10137:
10138: END copy_stop_record;
10185: BEGIN
10186: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10187: --
10188: IF l_debug_on IS NULL THEN
10189: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10190: END IF;
10191:
10192: IF l_debug_on THEN
10193: WSH_DEBUG_SV.push(l_module_name);
10189: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10190: END IF;
10191:
10192: IF l_debug_on THEN
10193: WSH_DEBUG_SV.push(l_module_name);
10194: WSH_DEBUG_SV.log(l_module_name, 'p_phase', p_phase);
10195: END IF;
10196: --
10197: --
10190: END IF;
10191:
10192: IF l_debug_on THEN
10193: WSH_DEBUG_SV.push(l_module_name);
10194: WSH_DEBUG_SV.log(l_module_name, 'p_phase', p_phase);
10195: END IF;
10196: --
10197: --
10198:
10204: -- Bug 3555487 initialize message stack for each major action point.
10205: FND_MSG_PUB.initialize;
10206:
10207: IF l_debug_on THEN
10208: WSH_DEBUG_SV.log(l_module_name, 'create/update trips: l_index', l_index);
10209: IF (p_phase = 2) THEN
10210: WSH_DEBUG_SV.log(l_module_name, 'x_plan_trips(l_index).lane_id', x_plan_trips(l_index).lane_id);
10211: END IF;
10212: END IF;
10206:
10207: IF l_debug_on THEN
10208: WSH_DEBUG_SV.log(l_module_name, 'create/update trips: l_index', l_index);
10209: IF (p_phase = 2) THEN
10210: WSH_DEBUG_SV.log(l_module_name, 'x_plan_trips(l_index).lane_id', x_plan_trips(l_index).lane_id);
10211: END IF;
10212: END IF;
10213:
10214: copy_trip_record(
10234: END IF;
10235: END IF;
10236:
10237: IF l_debug_on THEN
10238: WSH_DEBUG_SV.log(l_module_name, 'l_trip_attrs(1).lane_id', l_trip_attrs(1).lane_id );
10239: END IF;
10240:
10241: IF (p_phase = 1)
10242: OR (p_phase = 2 AND x_plan_trips(l_index).lane_id IS NOT NULL) THEN
10272:
10273: --
10274: --
10275: IF l_debug_on THEN
10276: WSH_DEBUG_SV.pop(l_module_name);
10277: END IF;
10278:
10279:
10280: EXCEPTION
10293: x_errors_tab => x_errors_tab,
10294: x_return_status => l_return_status);
10295: --
10296: IF l_debug_on THEN
10297: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
10298: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
10299: END IF;
10300:
10301: WHEN fnd_api.g_exc_unexpected_error THEN
10294: x_return_status => l_return_status);
10295: --
10296: IF l_debug_on THEN
10297: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
10298: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
10299: END IF;
10300:
10301: WHEN fnd_api.g_exc_unexpected_error THEN
10302: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10313: x_errors_tab => x_errors_tab,
10314: x_return_status => l_return_status);
10315: --
10316: IF l_debug_on THEN
10317: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
10318: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10319: END IF;
10320:
10321: WHEN OTHERS THEN
10314: x_return_status => l_return_status);
10315: --
10316: IF l_debug_on THEN
10317: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
10318: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10319: END IF;
10320:
10321: WHEN OTHERS THEN
10322: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10324: 'WSH_TP_RELEASE.create_update_plan_trips',
10325: l_module_name);
10326:
10327: IF l_debug_on THEN
10328: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10329: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10330: END IF;
10331:
10332: END create_update_plan_trips;
10325: l_module_name);
10326:
10327: IF l_debug_on THEN
10328: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10329: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10330: END IF;
10331:
10332: END create_update_plan_trips;
10333:
10388: BEGIN
10389: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10390: --
10391: IF l_debug_on IS NULL THEN
10392: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10393: END IF;
10394:
10395: IF l_debug_on THEN
10396: WSH_DEBUG_SV.push(l_module_name);
10392: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10393: END IF;
10394:
10395: IF l_debug_on THEN
10396: WSH_DEBUG_SV.push(l_module_name);
10397: WSH_DEBUG_SV.log(l_module_name,'p_group_id', p_group_id);
10398: WSH_DEBUG_SV.log(l_module_name,'p_entity_table_name', p_entity_table_name);
10399: WSH_DEBUG_SV.log(l_module_name,'p_entity_interface_id', p_entity_interface_id);
10400: WSH_DEBUG_SV.log(l_module_name,'p_message_appl', p_message_appl);
10393: END IF;
10394:
10395: IF l_debug_on THEN
10396: WSH_DEBUG_SV.push(l_module_name);
10397: WSH_DEBUG_SV.log(l_module_name,'p_group_id', p_group_id);
10398: WSH_DEBUG_SV.log(l_module_name,'p_entity_table_name', p_entity_table_name);
10399: WSH_DEBUG_SV.log(l_module_name,'p_entity_interface_id', p_entity_interface_id);
10400: WSH_DEBUG_SV.log(l_module_name,'p_message_appl', p_message_appl);
10401: WSH_DEBUG_SV.log(l_module_name,'p_message_name', p_message_name);
10394:
10395: IF l_debug_on THEN
10396: WSH_DEBUG_SV.push(l_module_name);
10397: WSH_DEBUG_SV.log(l_module_name,'p_group_id', p_group_id);
10398: WSH_DEBUG_SV.log(l_module_name,'p_entity_table_name', p_entity_table_name);
10399: WSH_DEBUG_SV.log(l_module_name,'p_entity_interface_id', p_entity_interface_id);
10400: WSH_DEBUG_SV.log(l_module_name,'p_message_appl', p_message_appl);
10401: WSH_DEBUG_SV.log(l_module_name,'p_message_name', p_message_name);
10402: WSH_DEBUG_SV.log(l_module_name,'p_message_text', p_message_text);
10395: IF l_debug_on THEN
10396: WSH_DEBUG_SV.push(l_module_name);
10397: WSH_DEBUG_SV.log(l_module_name,'p_group_id', p_group_id);
10398: WSH_DEBUG_SV.log(l_module_name,'p_entity_table_name', p_entity_table_name);
10399: WSH_DEBUG_SV.log(l_module_name,'p_entity_interface_id', p_entity_interface_id);
10400: WSH_DEBUG_SV.log(l_module_name,'p_message_appl', p_message_appl);
10401: WSH_DEBUG_SV.log(l_module_name,'p_message_name', p_message_name);
10402: WSH_DEBUG_SV.log(l_module_name,'p_message_text', p_message_text);
10403: WSH_DEBUG_SV.log(l_module_name,'p_token_1_name', p_token_1_name);
10396: WSH_DEBUG_SV.push(l_module_name);
10397: WSH_DEBUG_SV.log(l_module_name,'p_group_id', p_group_id);
10398: WSH_DEBUG_SV.log(l_module_name,'p_entity_table_name', p_entity_table_name);
10399: WSH_DEBUG_SV.log(l_module_name,'p_entity_interface_id', p_entity_interface_id);
10400: WSH_DEBUG_SV.log(l_module_name,'p_message_appl', p_message_appl);
10401: WSH_DEBUG_SV.log(l_module_name,'p_message_name', p_message_name);
10402: WSH_DEBUG_SV.log(l_module_name,'p_message_text', p_message_text);
10403: WSH_DEBUG_SV.log(l_module_name,'p_token_1_name', p_token_1_name);
10404: WSH_DEBUG_SV.log(l_module_name,'p_token_1_value', p_token_1_value);
10397: WSH_DEBUG_SV.log(l_module_name,'p_group_id', p_group_id);
10398: WSH_DEBUG_SV.log(l_module_name,'p_entity_table_name', p_entity_table_name);
10399: WSH_DEBUG_SV.log(l_module_name,'p_entity_interface_id', p_entity_interface_id);
10400: WSH_DEBUG_SV.log(l_module_name,'p_message_appl', p_message_appl);
10401: WSH_DEBUG_SV.log(l_module_name,'p_message_name', p_message_name);
10402: WSH_DEBUG_SV.log(l_module_name,'p_message_text', p_message_text);
10403: WSH_DEBUG_SV.log(l_module_name,'p_token_1_name', p_token_1_name);
10404: WSH_DEBUG_SV.log(l_module_name,'p_token_1_value', p_token_1_value);
10405: WSH_DEBUG_SV.log(l_module_name,'p_token_2_name', p_token_2_name);
10398: WSH_DEBUG_SV.log(l_module_name,'p_entity_table_name', p_entity_table_name);
10399: WSH_DEBUG_SV.log(l_module_name,'p_entity_interface_id', p_entity_interface_id);
10400: WSH_DEBUG_SV.log(l_module_name,'p_message_appl', p_message_appl);
10401: WSH_DEBUG_SV.log(l_module_name,'p_message_name', p_message_name);
10402: WSH_DEBUG_SV.log(l_module_name,'p_message_text', p_message_text);
10403: WSH_DEBUG_SV.log(l_module_name,'p_token_1_name', p_token_1_name);
10404: WSH_DEBUG_SV.log(l_module_name,'p_token_1_value', p_token_1_value);
10405: WSH_DEBUG_SV.log(l_module_name,'p_token_2_name', p_token_2_name);
10406: WSH_DEBUG_SV.log(l_module_name,'p_token_2_value', p_token_2_value);
10399: WSH_DEBUG_SV.log(l_module_name,'p_entity_interface_id', p_entity_interface_id);
10400: WSH_DEBUG_SV.log(l_module_name,'p_message_appl', p_message_appl);
10401: WSH_DEBUG_SV.log(l_module_name,'p_message_name', p_message_name);
10402: WSH_DEBUG_SV.log(l_module_name,'p_message_text', p_message_text);
10403: WSH_DEBUG_SV.log(l_module_name,'p_token_1_name', p_token_1_name);
10404: WSH_DEBUG_SV.log(l_module_name,'p_token_1_value', p_token_1_value);
10405: WSH_DEBUG_SV.log(l_module_name,'p_token_2_name', p_token_2_name);
10406: WSH_DEBUG_SV.log(l_module_name,'p_token_2_value', p_token_2_value);
10407: WSH_DEBUG_SV.log(l_module_name,'p_token_3_name', p_token_3_name);
10400: WSH_DEBUG_SV.log(l_module_name,'p_message_appl', p_message_appl);
10401: WSH_DEBUG_SV.log(l_module_name,'p_message_name', p_message_name);
10402: WSH_DEBUG_SV.log(l_module_name,'p_message_text', p_message_text);
10403: WSH_DEBUG_SV.log(l_module_name,'p_token_1_name', p_token_1_name);
10404: WSH_DEBUG_SV.log(l_module_name,'p_token_1_value', p_token_1_value);
10405: WSH_DEBUG_SV.log(l_module_name,'p_token_2_name', p_token_2_name);
10406: WSH_DEBUG_SV.log(l_module_name,'p_token_2_value', p_token_2_value);
10407: WSH_DEBUG_SV.log(l_module_name,'p_token_3_name', p_token_3_name);
10408: WSH_DEBUG_SV.log(l_module_name,'p_token_3_value', p_token_3_value);
10401: WSH_DEBUG_SV.log(l_module_name,'p_message_name', p_message_name);
10402: WSH_DEBUG_SV.log(l_module_name,'p_message_text', p_message_text);
10403: WSH_DEBUG_SV.log(l_module_name,'p_token_1_name', p_token_1_name);
10404: WSH_DEBUG_SV.log(l_module_name,'p_token_1_value', p_token_1_value);
10405: WSH_DEBUG_SV.log(l_module_name,'p_token_2_name', p_token_2_name);
10406: WSH_DEBUG_SV.log(l_module_name,'p_token_2_value', p_token_2_value);
10407: WSH_DEBUG_SV.log(l_module_name,'p_token_3_name', p_token_3_name);
10408: WSH_DEBUG_SV.log(l_module_name,'p_token_3_value', p_token_3_value);
10409: WSH_DEBUG_SV.log(l_module_name,'p_token_4_name', p_token_4_name);
10402: WSH_DEBUG_SV.log(l_module_name,'p_message_text', p_message_text);
10403: WSH_DEBUG_SV.log(l_module_name,'p_token_1_name', p_token_1_name);
10404: WSH_DEBUG_SV.log(l_module_name,'p_token_1_value', p_token_1_value);
10405: WSH_DEBUG_SV.log(l_module_name,'p_token_2_name', p_token_2_name);
10406: WSH_DEBUG_SV.log(l_module_name,'p_token_2_value', p_token_2_value);
10407: WSH_DEBUG_SV.log(l_module_name,'p_token_3_name', p_token_3_name);
10408: WSH_DEBUG_SV.log(l_module_name,'p_token_3_value', p_token_3_value);
10409: WSH_DEBUG_SV.log(l_module_name,'p_token_4_name', p_token_4_name);
10410: WSH_DEBUG_SV.log(l_module_name,'p_token_4_value', p_token_4_value);
10403: WSH_DEBUG_SV.log(l_module_name,'p_token_1_name', p_token_1_name);
10404: WSH_DEBUG_SV.log(l_module_name,'p_token_1_value', p_token_1_value);
10405: WSH_DEBUG_SV.log(l_module_name,'p_token_2_name', p_token_2_name);
10406: WSH_DEBUG_SV.log(l_module_name,'p_token_2_value', p_token_2_value);
10407: WSH_DEBUG_SV.log(l_module_name,'p_token_3_name', p_token_3_name);
10408: WSH_DEBUG_SV.log(l_module_name,'p_token_3_value', p_token_3_value);
10409: WSH_DEBUG_SV.log(l_module_name,'p_token_4_name', p_token_4_name);
10410: WSH_DEBUG_SV.log(l_module_name,'p_token_4_value', p_token_4_value);
10411: END IF;
10404: WSH_DEBUG_SV.log(l_module_name,'p_token_1_value', p_token_1_value);
10405: WSH_DEBUG_SV.log(l_module_name,'p_token_2_name', p_token_2_name);
10406: WSH_DEBUG_SV.log(l_module_name,'p_token_2_value', p_token_2_value);
10407: WSH_DEBUG_SV.log(l_module_name,'p_token_3_name', p_token_3_name);
10408: WSH_DEBUG_SV.log(l_module_name,'p_token_3_value', p_token_3_value);
10409: WSH_DEBUG_SV.log(l_module_name,'p_token_4_name', p_token_4_name);
10410: WSH_DEBUG_SV.log(l_module_name,'p_token_4_value', p_token_4_value);
10411: END IF;
10412:
10405: WSH_DEBUG_SV.log(l_module_name,'p_token_2_name', p_token_2_name);
10406: WSH_DEBUG_SV.log(l_module_name,'p_token_2_value', p_token_2_value);
10407: WSH_DEBUG_SV.log(l_module_name,'p_token_3_name', p_token_3_name);
10408: WSH_DEBUG_SV.log(l_module_name,'p_token_3_value', p_token_3_value);
10409: WSH_DEBUG_SV.log(l_module_name,'p_token_4_name', p_token_4_name);
10410: WSH_DEBUG_SV.log(l_module_name,'p_token_4_value', p_token_4_value);
10411: END IF;
10412:
10413: l_index := x_errors_tab.COUNT + 1;
10406: WSH_DEBUG_SV.log(l_module_name,'p_token_2_value', p_token_2_value);
10407: WSH_DEBUG_SV.log(l_module_name,'p_token_3_name', p_token_3_name);
10408: WSH_DEBUG_SV.log(l_module_name,'p_token_3_value', p_token_3_value);
10409: WSH_DEBUG_SV.log(l_module_name,'p_token_4_name', p_token_4_name);
10410: WSH_DEBUG_SV.log(l_module_name,'p_token_4_value', p_token_4_value);
10411: END IF;
10412:
10413: l_index := x_errors_tab.COUNT + 1;
10414:
10446:
10447:
10448: c := FND_MSG_PUB.count_msg;
10449: IF l_debug_on THEN
10450: WSH_DEBUG_SV.log(l_module_name,'COUNT--',c);
10451: END IF;
10452: FOR i in 1..c LOOP
10453: FND_MSG_PUB.get(p_encoded => FND_API.G_FALSE,
10454: p_msg_index => i,
10477: FND_MSG_PUB.initialize;
10478:
10479:
10480: IF l_debug_on THEN
10481: WSH_DEBUG_SV.log(l_module_name,'l_index--',l_index);
10482: END IF;
10483:
10484: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10485:
10483:
10484: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10485:
10486: IF l_debug_on THEN
10487: WSH_DEBUG_SV.pop(l_module_name);
10488: END IF;
10489:
10490:
10491: EXCEPTION
10495: 'WSH_TP_RELEASE.stamp_interface_error',
10496: l_module_name);
10497:
10498: IF l_debug_on THEN
10499: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10501: END IF;
10502:
10503: END stamp_interface_error;
10496: l_module_name);
10497:
10498: IF l_debug_on THEN
10499: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10501: END IF;
10502:
10503: END stamp_interface_error;
10504:
10536:
10537: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10538: --
10539: IF l_debug_on IS NULL THEN
10540: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10541: END IF;
10542:
10543: IF l_debug_on THEN
10544: WSH_DEBUG_SV.push(l_module_name);
10540: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10541: END IF;
10542:
10543: IF l_debug_on THEN
10544: WSH_DEBUG_SV.push(l_module_name);
10545: END IF;
10546:
10547: SAVEPOINT before_insert;
10548:
10583:
10584: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10585:
10586: IF l_debug_on THEN
10587: WSH_DEBUG_SV.pop(l_module_name);
10588: END IF;
10589:
10590:
10591: EXCEPTION
10596: l_module_name);
10597: ROLLBACK TO before_insert;
10598:
10599: IF l_debug_on THEN
10600: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10601: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10602: END IF;
10603:
10604: END insert_interface_errors;
10597: ROLLBACK TO before_insert;
10598:
10599: IF l_debug_on THEN
10600: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10601: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10602: END IF;
10603:
10604: END insert_interface_errors;
10605:
10637: BEGIN
10638: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10639: --
10640: IF l_debug_on IS NULL THEN
10641: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10642: END IF;
10643:
10644: IF l_debug_on THEN
10645: WSH_DEBUG_SV.push(l_module_name);
10641: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10642: END IF;
10643:
10644: IF l_debug_on THEN
10645: WSH_DEBUG_SV.push(l_module_name);
10646: WSH_DEBUG_SV.log(l_module_name, 'p_context.group_id', p_context.group_id);
10647: END IF;
10648: --
10649: --
10642: END IF;
10643:
10644: IF l_debug_on THEN
10645: WSH_DEBUG_SV.push(l_module_name);
10646: WSH_DEBUG_SV.log(l_module_name, 'p_context.group_id', p_context.group_id);
10647: END IF;
10648: --
10649: --
10650: OPEN c_name(p_context.group_id);
10656:
10657: --
10658: --
10659: IF l_debug_on THEN
10660: WSH_DEBUG_SV.log(l_module_name, 'l_plan_trip_num', l_plan_trip_num);
10661: WSH_DEBUG_SV.pop(l_module_name);
10662: END IF;
10663:
10664: RETURN l_plan_trip_num;
10657: --
10658: --
10659: IF l_debug_on THEN
10660: WSH_DEBUG_SV.log(l_module_name, 'l_plan_trip_num', l_plan_trip_num);
10661: WSH_DEBUG_SV.pop(l_module_name);
10662: END IF;
10663:
10664: RETURN l_plan_trip_num;
10665:
10668: WSH_UTIL_CORE.DEFAULT_HANDLER(
10669: 'WSH_TP_RELEASE.get_plan_trip_num',
10670: l_module_name);
10671: IF l_debug_on THEN
10672: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10673: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10674: END IF;
10675: IF c_name%ISOPEN THEN
10676: CLOSE c_name;
10669: 'WSH_TP_RELEASE.get_plan_trip_num',
10670: l_module_name);
10671: IF l_debug_on THEN
10672: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10673: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10674: END IF;
10675: IF c_name%ISOPEN THEN
10676: CLOSE c_name;
10677: END IF;
10716:
10717: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10718: --
10719: IF l_debug_on IS NULL THEN
10720: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10721: END IF;
10722:
10723: IF l_debug_on THEN
10724: WSH_DEBUG_SV.push(l_module_name);
10720: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10721: END IF;
10722:
10723: IF l_debug_on THEN
10724: WSH_DEBUG_SV.push(l_module_name);
10725: WSH_DEBUG_SV.logmsg(l_module_name, 'line exceptions count: '|| p_details_loc_tab.count);
10726: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery exceptions count: '|| p_deliveries_loc_tab.count);
10727: WSH_DEBUG_SV.logmsg(l_module_name, 'stop exceptions count: '|| p_stops_loc_tab.count);
10728: END IF;
10721: END IF;
10722:
10723: IF l_debug_on THEN
10724: WSH_DEBUG_SV.push(l_module_name);
10725: WSH_DEBUG_SV.logmsg(l_module_name, 'line exceptions count: '|| p_details_loc_tab.count);
10726: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery exceptions count: '|| p_deliveries_loc_tab.count);
10727: WSH_DEBUG_SV.logmsg(l_module_name, 'stop exceptions count: '|| p_stops_loc_tab.count);
10728: END IF;
10729:
10722:
10723: IF l_debug_on THEN
10724: WSH_DEBUG_SV.push(l_module_name);
10725: WSH_DEBUG_SV.logmsg(l_module_name, 'line exceptions count: '|| p_details_loc_tab.count);
10726: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery exceptions count: '|| p_deliveries_loc_tab.count);
10727: WSH_DEBUG_SV.logmsg(l_module_name, 'stop exceptions count: '|| p_stops_loc_tab.count);
10728: END IF;
10729:
10730: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10723: IF l_debug_on THEN
10724: WSH_DEBUG_SV.push(l_module_name);
10725: WSH_DEBUG_SV.logmsg(l_module_name, 'line exceptions count: '|| p_details_loc_tab.count);
10726: WSH_DEBUG_SV.logmsg(l_module_name, 'delivery exceptions count: '|| p_deliveries_loc_tab.count);
10727: WSH_DEBUG_SV.logmsg(l_module_name, 'stop exceptions count: '|| p_stops_loc_tab.count);
10728: END IF;
10729:
10730: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10731:
10817:
10818: END IF;
10819:
10820: IF l_debug_on THEN
10821: WSH_DEBUG_SV.pop(l_module_name);
10822: END IF;
10823:
10824: EXCEPTION
10825: WHEN OTHERS THEN
10825: WHEN OTHERS THEN
10826: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10827: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_TP_RELEASE.log_wv_exception', l_module_name);
10828: IF l_debug_on THEN
10829: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10830: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10831: END IF;
10832:
10833: END Log_WV_Exceptions;
10826: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10827: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_TP_RELEASE.log_wv_exception', l_module_name);
10828: IF l_debug_on THEN
10829: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10830: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10831: END IF;
10832:
10833: END Log_WV_Exceptions;
10834: