DBA Data[Home] [Help]

PACKAGE: APPS.WSH_U_TRACK

Source


1 PACKAGE WSH_U_TRACK AUTHID CURRENT_USER AS
2 /* $Header: WSHUTRKS.pls 115.7 2002/11/12 02:03:18 nparikh ship $ */
3 
4 TYPE EnhancedTrackInRec IS RECORD (
5 				InquiryNumber				VARCHAR2(35),
6 				TypeOfInquiryNumber		VARCHAR2(1),
7 				InternalKey					VARCHAR2(120),
8 				SenderShipperNumber		VARCHAR2(10),
9 				FromPickupDate				DATE,
10 				ToPickupDate				DATE,
11 				DestinationPostalCode	VARCHAR2(16),
12 				DestinationCountry		VARCHAR2(3));
13 
14 TYPE TrackHeaderRec IS RECORD (
15 				UPSOnLine					VARCHAR2(9),
16 				AppVersion					NUMBER,
17 				TypeofResponse				VARCHAR2(1),
18 				InquiryNumber				VARCHAR2(35),
19 				TypeOfInquiryNumber		VARCHAR2(1),
20 				SenderShiperNumber		VARCHAR2(10),
21 				InternalKey					VARCHAR2(120),
22 				FromPickupDate				DATE,
23 				ToPickupDate				DATE,
24 				DestinationPostalCode	VARCHAR2(11),
25 				DestinationCountry		VARCHAR2(3));
26 
27 TYPE TrackErrorRec IS RECORD(
28 				UPSOnLine					VARCHAR2(9),
29 				AppVersion					NUMBER,
30 				ReturnCode					NUMBER,
31 				MessageNumber				VARCHAR2(4),
32 				MessageText					VARCHAR2(500));
33 
34 TYPE TrackAddress IS RECORD(
35 				UPSOnLine					VARCHAR2(9),
36 				AppVersion					NUMBER,
37 				TypeOfAddress				VARCHAR2(1),
38 				Name							VARCHAR2(50),
39 				Address1						VARCHAR2(100),
40 				Address2						VARCHAR2(100),
41 				Address3						VARCHAR2(100),
42 				City							VARCHAR2(30),
43 				StateProv					VARCHAR2(5),
44 				PostalCode					VARCHAR2(16),
45 				Country						VARCHAR2(3));
46 
47 TYPE TrackAddressTblTyp IS TABLE OF TrackAddress
48 				INDEX BY BINARY_INTEGER;
49 
50 
51 TYPE MultiSumHdrRec IS RECORD (
52 				UPSOnLine						VARCHAR2(9),
53 				AppVersion						NUMBER,
54 				InternalShipmentKey			VARCHAR2(120),
55 				ServiceLevelDescription		VARCHAR2(70),
56 				PickupDate						DATE,
57 				ScheduledDeliveryDate		DATE,
58 				TotalShipmentWeight			NUMBER(19,2),
59 				WeightUOM						VARCHAR2(3),
60 				NumberOfPackagesInShipment NUMBER,
61 				NumberOfPackagesDelivered	NUMBER,
62 				NumberOfPackagesActive		NUMBER,
63 				ConsigneeAddressIndex		NUMBER,
64 				MPieceSummaryDtlIndex		NUMBER);
65 
66 TYPE MultiSumHdrTblTyp IS TABLE OF MultiSumHdrRec
67 				INDEX BY BINARY_INTEGER;
68 
69 
70 TYPE MultiSumDtlRec IS RECORD (
71 				UPSOnLine					VARCHAR2(9),
72 				AppVersion					NUMBER,
73 				TrackingNumber				VARCHAR2(35),
74 				InternalPackageKey		VARCHAR2(120),
75 				ActivityDetailIndex		NUMBER);
76 
77 
78 TYPE MultiSumDtlTblTyp IS TABLE OF MultiSumDtlRec
79 				INDEX BY BINARY_INTEGER;
80 
81 
82 TYPE PkgDtlSegRec IS RECORD (
83 				UPSOnLine							VARCHAR2(9),
84 				AppVersion							NUMBER,
85 				TrackingNumber						VARCHAR2(35),
86 				InternalPackageKey				VARCHAR2(120),
87 				ShipmentNumber						VARCHAR2(35),
88 				InternalShipmentKey				VARCHAR2(85),
89 				PickupDate							DATE,
90 				NumberOfPackagesInShipment		NUMBER,
91 				ServiceLevelDescription			VARCHAR2(35),
92 				PackageWeight						NUMBER(10,2),
93 				WeightUOM							VARCHAR2(3),
94 				SignedForByName					VARCHAR2(15),
95 				Location								VARCHAR2(15),
96 				CusotmerReferenceNumber			VARCHAR2(35),
97 				ConsigneeAddressIndex			NUMBER,
98 				ActivityDetailIndex				NUMBER);
99 				/* Row Id for the corresponding row in the Activity Detail Table */
100 
101 TYPE PkgDtlSegTblTyp IS TABLE OF PkgDtlSegRec
102 				INDEX BY BINARY_INTEGER;
103 
104 
105 TYPE PkgProgressHdrRec IS RECORD (
106 				UPSOnLine							VARCHAR2(9),
107 				AppVersion							NUMBER,
108 				NumberOfActivityDetailLines	VARCHAR2(4),
109 				ActivityDetailIndex				NUMBER);
110 				/* Row Id for the corresponding row in the Activity Detail Table */
111 
112 
113 TYPE ActivityDtlSegment IS RECORD (
114 				UPSOnLine						VARCHAR2(9),
115 				AppVersion						NUMBER,
116 				StatusType						VARCHAR2(1),
117 				StatusLongDescription		VARCHAR2(140),
118 				ActivityDate					DATE, /*YYYYMMDD HH24:MI:SS*/
119 				-- ActivityTime				VARCHAR2(6),
120 				ActivityAddressIndex		BINARY_INTEGER);
121 				/* Pointer to the Address Record in the Address Table.*/
122 
123 TYPE ActivityDetailTblTyp IS TABLE OF ActivityDtlSegment
124 				INDEX BY BINARY_INTEGER;
125 
126 PROCEDURE EnhancedTracking(
127 				p_api_version            IN   NUMBER,
128 				p_init_msg_list          IN   VARCHAR2 DEFAULT FND_API.G_FALSE,
129 				x_return_status         OUT NOCOPY    VARCHAR2,
130 				x_msg_count             OUT NOCOPY    NUMBER,
131 				x_msg_data              OUT NOCOPY    VARCHAR2,
132 				p_AppVersion				 IN	VARCHAR2,
133 				p_AcceptLicenseAgreement IN   VARCHAR2,
134 				p_ResponseType				 IN	VARCHAR2,
135 				p_request_in				 IN	EnhancedTrackInRec,
136 				x_track_header				OUT NOCOPY 	TrackHeaderRec,
137 				x_track_error				OUT NOCOPY 	TrackErrorRec,
138 				x_track_address			OUT NOCOPY 	TrackAddressTblTyp,
139 				x_multi_sum_header		OUT NOCOPY 	MultiSumHdrTblTyp,
140 				x_multi_sum_detail		OUT NOCOPY 	MultiSumDtlTblTyp,
141 				x_pkg_detail_segment		OUT NOCOPY 	PkgDtlSegTblTyp,
142 				x_pkg_progress				OUT NOCOPY 	PkgProgressHdrRec,
143 				x_activity_detail			OUT NOCOPY 	ActivityDetailTblTyp);
144 
145 END WSH_U_TRACK;