[Home] [Help]
6:
7: SORT_TYPE_RL CONSTANT NUMBER :=1;
8: SORT_TYPE_UI CONSTANT NUMBER :=2;
9:
10: DELIVERY_TYPE_STANDARD CONSTANT NUMBER :=1;
11: DELIVERY_TYPE_CONSOL CONSTANT NUMBER :=2;
12: DELIVERY_TYPE_CHILD CONSTANT NUMBER :=3;
13:
14: TYPE trip_info_rec IS RECORD
1425: BEGIN
1426:
1427: SAVEPOINT RATE_TRIP;
1428: --
1429: -- Standard call to check for call compatibility.
1430: IF NOT FND_API.Compatible_API_Call
1431: (
1432: l_api_version,
1433: p_api_version,
1748: IF (l_tp_rel_rate_event = 'SHIP-CONFIRM') THEN
1749: -- OK to rate without reprice flag checking
1750: l_rate_mode := 'TP-REL';
1751: ELSIF (l_tp_rel_rate_event = 'TP-RELEASE') THEN
1752: -- Rate as a standard trip with reprice flag checking
1753: -- We still don't allow LCSS on this trip
1754: -- So lane_id cannot be null
1755: l_rate_mode := 'REGULAR';
1756: ELSE
1790: END IF;
1791:
1792: ELSE -- tp_plan_name IS NULL
1793:
1794: -- If this is a standard trip, rate it normally
1795: -- redirect to the existing api which does rating
1796: -- at ship confirm
1797:
1798: l_rate_mode := 'REGULAR';
3594: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3595:
3596:
3597:
3598: x_delivery_type:=DELIVERY_TYPE_STANDARD;
3599:
3600: l_delivery_type:=NULL;
3601: OPEN c_delivery_type(p_delivery_id);
3602: FETCH c_delivery_type into l_delivery_type;
3620: THEN
3621: x_delivery_type:=DELIVERY_TYPE_CHILD;
3622:
3623: ELSE
3624: x_delivery_type:=DELIVERY_TYPE_STANDARD;
3625: END IF;
3626:
3627:
3628: END IF;
3703:
3704: BEGIN
3705:
3706:
3707: -- Standard call to check for call compatibility.
3708: IF NOT FND_API.Compatible_API_Call
3709: (
3710: l_api_version,
3711: p_api_version,