1 PACKAGE WSH_SHIPPING_INFO as
2 /* $Header: WSHSHINS.pls 120.1 2006/12/09 00:13:32 rlanka noship $ */
3
4 --
5 -- Package type declarations
6 --
7
8 TYPE Tracking_Info_Rec_Typ IS RECORD (
9 delivery_status VARCHAR2(30),
10 trip_name VARCHAR2(30),
11 location_name VARCHAR2(190),
12 actual_arrival_date DATE,
13 actual_departure_date DATE,
14 ship_method_code VARCHAR2(30),
15 bill_of_lading VARCHAR2(50),
16 carrier_name HZ_PARTIES.PARTY_NAME%TYPE -- Bug 5697730
17 );
18
19 TYPE Tracking_Info_Tab_Typ IS TABLE OF Tracking_Info_Rec_Typ
20 INDEX BY BINARY_INTEGER;
21
22
23 --
24 -- Tracking_Info_Rec_Typ details
25 -- delivery_status -> 'UNSHIPPED', 'IN-TRANSIT' or 'DELIVERED'
26 -- trip_name -> name of the trip the delivery is on
27 -- location_name -> location of delivery
28 -- actual arrival/departure dates - dates at the location
29 -- ship_method_code -> freight carrier code
30 -- bill_of_lading -> bill of lading contract between shipper
31 -- and carrier for the trip
32 --
33
34 --
35 -- Procedure: Track_Shipment
36 -- Parameters: p_delivery_name - Name of Delivery to track
37 -- p_tracking_number_dd - Tracking Number of Delivery
38 -- Line
39 -- p_mode - 'FULL' or 'CURRENT'
40 -- 'FULL' Gives complete tracking information
41 -- 'CURRENT' Provides simple tracking information
42 -- a) If the delivery is not shipped, initial
43 -- trip/location information is provided
44 -- b) If the delivery is shipped, it provides
45 -- the current shipment information
46 -- c) If the delivery has been delivered, it
47 -- provides the final trip/location information
48 -- when delivered to the customer
49 -- x_tracking_details - Record of all the tracking
50 -- details for a shipment
51 -- x_return_status - Status of procedure call
52 -- - FND_API.G_RET_STS_SUCCESS
53 -- - FND_API.G_RET_STS_ERROR
54 -- Description: This procedure will provide tracking information
55 -- for a shipment
56 --
57
58 PROCEDURE Track_Shipment
59 (p_delivery_name IN VARCHAR2 DEFAULT NULL,
60 p_tracking_number_dd IN VARCHAR2 DEFAULT NULL,
61 p_mode IN VARCHAR2,
62 x_tracking_details OUT NOCOPY Tracking_Info_Tab_Typ,
63 x_return_status OUT NOCOPY VARCHAR2
64 );
65
66
67 END WSH_SHIPPING_INFO;