1: PACKAGE BODY WSH_TPA_SELECTOR_PKG AS
2: /* $Header: WSHTPSLB.pls 120.0 2005/05/26 18:02:23 appldev noship $ */
3:
4:
5: --
56: IF Get_First_Line%ISOPEN THEN
57: CLOSE Get_First_Line;
58: END IF;
59:
60: WSH_TPA_SELECTOR_PKG.DeliveryDetailTP (
61: l_del_detail_id,
62: x_customer_number,
63: x_ship_to_ece_locn_code,
64: x_inter_ship_to_ece_locn_code,
135: IF Get_First_Line%ISOPEN THEN
136: CLOSE Get_First_Line;
137: END IF;
138:
139: WSH_TPA_SELECTOR_PKG.DeliveryDetailTP (
140: p_container_instance_id,
141: x_customer_number,
142: x_ship_to_ece_locn_code,
143: x_inter_ship_to_ece_locn_code,
433: END IF;
434:
435: IF p_delivery_id IS NOT NULL THEN
436:
437: WSH_TPA_SELECTOR_PKG.DeliveryTP (
438: p_delivery_id,
439: x_customer_number,
440: x_ship_to_ece_locn_code,
441: x_inter_ship_to_ece_locn_code,
444: return;
445:
446: ELSIF p_container_instance_id IS NOT NULL THEN
447:
448: WSH_TPA_SELECTOR_PKG.ContainerTP (
449: p_container_instance_id,
450: x_customer_number,
451: x_ship_to_ece_locn_code,
452: x_inter_ship_to_ece_locn_code,
503:
504: IF p_entity_type = 'DELIVERY' THEN
505: IF p_entity_id IS NOT NULL THEN
506:
507: WSH_TPA_SELECTOR_PKG.DeliveryTP (
508: p_entity_id,
509: x_customer_number,
510: x_ship_to_ece_locn_code,
511: x_inter_ship_to_ece_locn_code,
542:
543: END DefaultTP;
544:
545:
546: END WSH_TPA_SELECTOR_PKG;