DBA Data[Home] [Help]

APPS.WSH_DELIVERY_LEGS_PVT dependencies on WSH_DELIVERY_LEGS

Line 1: PACKAGE BODY WSH_DELIVERY_LEGS_PVT as

1: PACKAGE BODY WSH_DELIVERY_LEGS_PVT as
2: /* $Header: WSHDGTHB.pls 120.2 2007/01/05 01:03:45 jishen noship $ */
3:
4: --
5: -- Procedure: Create_Delivery_Leg

Line 14: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_DELIVERY_LEGS_PVT';

10: -- validations are provided.
11: --
12:
13: --
14: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_DELIVERY_LEGS_PVT';
15: --
16: PROCEDURE Create_Delivery_Leg (
17: p_delivery_leg_info IN Delivery_Leg_Rec_Type,
18: x_rowid OUT NOCOPY VARCHAR2,

Line 25: FROM wsh_delivery_legs

21: ) IS
22:
23: CURSOR get_rowid IS
24: SELECT rowid
25: FROM wsh_delivery_legs
26: WHERE delivery_leg_id = x_delivery_leg_id;
27:
28: CURSOR get_next_delivery_leg IS
29: SELECT wsh_delivery_legs_s.nextval

Line 29: SELECT wsh_delivery_legs_s.nextval

25: FROM wsh_delivery_legs
26: WHERE delivery_leg_id = x_delivery_leg_id;
27:
28: CURSOR get_next_delivery_leg IS
29: SELECT wsh_delivery_legs_s.nextval
30: FROM sys.dual;
31:
32: /* csun 02/25/2002 */
33: l_freight_cost_info WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;

Line 73: INSERT INTO wsh_delivery_legs (

69: CLOSE get_next_delivery_leg;
70: IF l_debug_on THEN
71: WSH_DEBUG_SV.log(l_module_name,'x_delivery_leg_id',x_delivery_leg_id);
72: END IF;
73: INSERT INTO wsh_delivery_legs (
74: delivery_leg_id
75: ,delivery_id
76: ,sequence_number
77: ,pick_up_stop_id

Line 161: -- Insert into WSH_DELIVERY_LEGS

157: );
158:
159: --
160: -- DBI Project
161: -- Insert into WSH_DELIVERY_LEGS
162: -- Call DBI API after the Insert.
163: -- This API will also check for DBI Installed or not
164: l_stop_tab(1) := p_delivery_leg_info.pick_up_stop_id;
165: l_stop_tab(2) := p_delivery_leg_info.drop_off_stop_id;

Line 211: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(

207: IF l_debug_on THEN
208: WSH_DEBUG_SV.log(l_module_name,'FTE is installed');
209: END IF;
210: --
211: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
212: p_entity_type => 'DELIVERY_LEG',
213: p_entity_ids => l_leg_id_tab,
214: x_return_status => l_return_status);
215: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN

Line 259: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_PVT.CREATE_DELIVERY_LEG',l_module_name);

255: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
256: END IF;
257: --
258: WHEN WSH_CREATE_FC_ERROR THEN
259: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_PVT.CREATE_DELIVERY_LEG',l_module_name);
260: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
261: --
262: IF l_debug_on THEN
263: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CREATE_FC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);

Line 268: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_PVT.CREATE_DELIVERY_LEG',l_module_name);

264: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_FC_ERROR');
265: END IF;
266: --
267: WHEN others THEN
268: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_PVT.CREATE_DELIVERY_LEG',l_module_name);
269: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
270: --
271: IF l_debug_on THEN
272: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 295: FROM wsh_delivery_legs

291: ) IS
292:
293: CURSOR get_rowid IS
294: SELECT rowid
295: FROM wsh_delivery_legs
296: WHERE delivery_leg_id = p_delivery_leg_info.delivery_leg_id;
297:
298: l_rowid VARCHAR2(30);
299:

Line 337: UPDATE wsh_delivery_legs

333: ELSE
334: l_rowid := p_rowid;
335: END IF;
336:
337: UPDATE wsh_delivery_legs
338: SET
339: delivery_leg_id = p_delivery_leg_info.delivery_leg_id
340: , delivery_id = p_delivery_leg_info.delivery_id
341: ,sequence_number = p_delivery_leg_info.sequence_number

Line 434: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_PVT.UPDATE_DELIVERY_LEG',l_module_name);

430: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
431: END IF;
432: --
433: WHEN others THEN
434: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_PVT.UPDATE_DELIVERY_LEG',l_module_name);
435: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
436: --
437: IF l_debug_on THEN
438: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 465: FROM wsh_delivery_legs

461: ) IS
462:
463: CURSOR get_del_leg_id_rowid (v_rowid VARCHAR2) IS
464: SELECT delivery_leg_id
465: FROM wsh_delivery_legs
466: WHERE rowid = v_rowid;
467:
468: CURSOR check_docs (l_leg_id NUMBER) IS
469: SELECT entity_id

Line 472: entity_name = 'WSH_DELIVERY_LEGS' AND

468: CURSOR check_docs (l_leg_id NUMBER) IS
469: SELECT entity_id
470: FROM wsh_document_instances
471: WHERE entity_id = l_leg_id AND
472: entity_name = 'WSH_DELIVERY_LEGS' AND
473: status <> 'CANCELLED'
474: FOR UPDATE NOWAIT;
475:
476: -- DBI Project

Line 479: FROM wsh_delivery_legs

475:
476: -- DBI Project
477: CURSOR get_stop_ids(v_del_leg_id NUMBER) IS
478: SELECT pick_up_stop_id,drop_off_stop_id
479: FROM wsh_delivery_legs
480: WHERE delivery_leg_id = v_del_leg_id;
481:
482: l_stop_tab WSH_UTIL_CORE.id_tab_type;
483: l_dbi_rs VARCHAR2(1);

Line 511: FROM wsh_delivery_legs wdl,

507: SELECT pick_up_stop_id, drop_off_stop_id, wts1.trip_id,
508: nvl(shipment_direction,'O') shipment_direction,
509: wt.name trip_name,
510: wdl.delivery_id --J-IB-HEALI
511: FROM wsh_delivery_legs wdl,
512: wsh_trip_stops wts1,
513: wsh_new_deliveries wnd,
514: wsh_trips wt
515: WHERE delivery_leg_id = p_delivery_leg_id

Line 544: FROM wsh_delivery_legs wdl,

540: --
541: CURSOR dlvy_csr (p_stop_id IN NUMBER)
542: IS
543: SELECT 1
544: FROM wsh_delivery_legs wdl,
545: wsh_new_deliveries wnd
546: WHERE wdl.delivery_id = wnd.delivery_id
547: AND wnd.status_code IN ('IT','CL')
548: AND ( wdl.pick_up_stop_id = p_stop_id or wdl.drop_off_stop_id = p_stop_id)

Line 674: p_entity_name => 'WSH_DELIVERY_LEGS',

670: p_api_version => 1.0,
671: x_return_status => x_return_status,
672: x_msg_count => l_msg_count,
673: x_msg_data => l_msg_data,
674: p_entity_name => 'WSH_DELIVERY_LEGS',
675: p_entity_id => p_delivery_leg_id);
676:
677: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
678: --

Line 701: DELETE FROM wsh_delivery_legs

697: Fetch get_stop_ids into l_stop_tab(1),l_stop_tab(2);
698: Close get_stop_ids;
699: --
700:
701: DELETE FROM wsh_delivery_legs
702: WHERE delivery_leg_id = l_delivery_leg_id;
703:
704:
705: IF (SQL%NOTFOUND) THEN

Line 720: -- Delete from WSH_DELIVERY_LEGS

716:
717:
718: --
719: -- DBI Project
720: -- Delete from WSH_DELIVERY_LEGS
721: -- Call DBI API after the Update.
722: -- This API will also check for DBI Installed or not
723:
724: IF l_debug_on THEN

Line 1125: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_PVT.DELETE_DELIVERY_LEG',l_module_name);

1121:
1122: -- J-IB-NPARIKH-}
1123:
1124: WHEN others THEN
1125: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_PVT.DELETE_DELIVERY_LEG',l_module_name);
1126: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1127: --
1128: IF l_debug_on THEN
1129: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 1149: FROM wsh_delivery_legs

1145: ) IS
1146:
1147: CURSOR lock_row IS
1148: SELECT *
1149: FROM wsh_delivery_legs
1150: WHERE rowid = p_rowid
1151: FOR UPDATE OF delivery_leg_id NOWAIT;
1152:
1153: Recinfo lock_row%ROWTYPE;

Line 1499: FROM wsh_delivery_legs

1495: /* Harmonization Project I **heali */
1496: ROWID,
1497: /* K: MDC: sperera */
1498: parent_delivery_leg_id
1499: FROM wsh_delivery_legs
1500: WHERE delivery_leg_id = p_delivery_leg_id;
1501:
1502: others EXCEPTION;
1503:

Line 1551: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_PVT.POPULATE_RECORD',l_module_name);

1547: END IF;
1548: --
1549: EXCEPTION
1550: WHEN others THEN
1551: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_PVT.POPULATE_RECORD',l_module_name);
1552: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1553: --
1554: IF l_debug_on THEN
1555: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);

Line 1586: FROM wsh_delivery_legs

1582: WHERE delivery_id = x_delivery_id;
1583:
1584: CURSOR get_leg_status(x_leg_id NUMBER) IS
1585: SELECT delivery_id, pick_up_stop_id, drop_off_stop_id
1586: FROM wsh_delivery_legs
1587: WHERE delivery_leg_id = x_leg_id;
1588:
1589: CURSOR get_stop_status(x_stop_id NUMBER) IS
1590: SELECT status_code

Line 1865: FROM wsh_delivery_legs

1861: l_del_name VARCHAR2(30);
1862:
1863: CURSOR c_lock_dlvy_leg(p_leg_id NUMBER) IS
1864: SELECT delivery_leg_id
1865: FROM wsh_delivery_legs
1866: WHERE delivery_leg_id = p_leg_id
1867: FOR UPDATE NOWAIT;
1868:
1869: CURSOR c_lock_legs_of_dlvy(p_dlvy_id NUMBER) IS

Line 1871: FROM wsh_delivery_legs

1867: FOR UPDATE NOWAIT;
1868:
1869: CURSOR c_lock_legs_of_dlvy(p_dlvy_id NUMBER) IS
1870: SELECT delivery_leg_id
1871: FROM wsh_delivery_legs
1872: WHERE delivery_id = p_dlvy_id
1873: FOR UPDATE NOWAIT;
1874:
1875: l_debug_on BOOLEAN;

Line 1933: END WSH_DELIVERY_LEGS_PVT;

1929:
1930: END Lock_Dlvy_Leg_No_Compare;
1931:
1932:
1933: END WSH_DELIVERY_LEGS_PVT;
1934: