[Home] [Help]
PACKAGE BODY: APPS.POS_HZ_LOCATION_BO_PKG
Source
1 PACKAGE BODY pos_hz_location_bo_pkg AS
2 /* $Header: POSSPLOCB.pls 120.1 2010/11/25 12:10:26 puppulur noship $ */
3 /*#
4 * Use this routine to get hz locations bo
5 * @param p_api_version The version of API
6 * @param p_init_msg_list The Initialization message list
7 * @param p_party_id The party_id
8 * @param x_hz_location_bo The pos hz locations bo
9 * @param x_return_status The return status
10 * @param x_msg_count The message count
11 * @param x_msg_data The message data
12 * @rep:scope public
13 * @rep:lifecycle active
14 * @rep:displayname Get HZ Location BO
15 * @rep:catagory BUSSINESS_ENTITY AP_SUPPLIER
16 */
17 PROCEDURE get_hz_location_bo(p_api_version IN NUMBER DEFAULT NULL,
18 p_init_msg_list IN VARCHAR2 DEFAULT NULL,
19 p_party_id IN NUMBER,
20 p_orig_system IN VARCHAR2,
21 p_orig_system_reference IN VARCHAR2,
22 x_hz_location_bo OUT NOCOPY pos_hz_location_bo_tbl,
23 x_return_status OUT NOCOPY VARCHAR2,
24 x_msg_count OUT NOCOPY NUMBER,
25 x_msg_data OUT NOCOPY VARCHAR2) IS
26
27 l_pos_hz_location_bo pos_hz_location_bo_tbl;
28
29 BEGIN
30
31 SELECT pos_hz_location_bo(hz.location_id,
32 hz.last_update_date,
33 hz.last_updated_by,
34 hz.creation_date,
35 hz.created_by,
36 hz.last_update_login,
37 hz.request_id,
38 hz.program_application_id,
39 hz.program_id,
40 hz.program_update_date,
41 hz.wh_update_date,
42 hz.attribute_category,
43 hz.attribute1,
44 hz.attribute2,
45 hz.attribute3,
46 hz.attribute4,
47 hz.attribute5,
48 hz.attribute6,
49 hz.attribute7,
50 hz.attribute8,
51 hz.attribute9,
52 hz.attribute10,
53 hz.attribute11,
54 hz.attribute12,
55 hz.attribute13,
56 hz.attribute14,
57 hz.attribute15,
58 hz.attribute16,
59 hz.attribute17,
60 hz.attribute18,
61 hz.attribute19,
62 hz.attribute20,
63 hz.global_attribute_category,
64 hz.global_attribute1,
65 hz.global_attribute2,
66 hz.global_attribute3,
67 hz.global_attribute4,
68 hz.global_attribute5,
69 hz.global_attribute6,
70 hz.global_attribute7,
71 hz.global_attribute8,
72 hz.global_attribute9,
73 hz.global_attribute10,
74 hz.global_attribute11,
75 hz.global_attribute12,
76 hz.global_attribute13,
77 hz.global_attribute14,
78 hz.global_attribute15,
79 hz.global_attribute16,
80 hz.global_attribute17,
81 hz.global_attribute18,
82 hz.global_attribute19,
83 hz.global_attribute20,
84 hz.orig_system_reference,
85 hz.country,
86 hz.address1,
87 hz.address2,
88 hz.address3,
89 hz.address4,
90 hz.city,
91 hz.postal_code,
92 hz.state,
93 hz.province,
94 hz.county,
95 hz.address_key,
96 hz.address_style,
97 hz.validated_flag,
98 hz.address_lines_phonetic,
99 hz.apartment_flag,
100 hz.po_box_number,
101 hz.house_number,
102 hz.street_suffix,
103 hz.apartment_number,
104 hz.secondary_suffix_element,
105 hz.street,
106 hz.rural_route_type,
107 hz.rural_route_number,
108 hz.street_number,
109 hz.building,
110 hz.floor,
111 hz.suite,
112 hz.room,
113 hz.postal_plus4_code,
114 hz.time_zone,
115 hz.overseas_address_flag,
116 hz.post_office,
117 hz.position,
118 hz.delivery_point_code,
119 hz.location_directions,
120 hz.address_effective_date,
121 hz.address_expiration_date,
122 hz.address_error_code,
123 hz.clli_code,
124 hz.dodaac,
125 hz.trailing_directory_code,
126 hz.language,
127 hz.life_cycle_status,
128 hz.short_description,
129 hz.description,
130 hz.content_source_type,
131 hz.loc_hierarchy_id,
132 hz.sales_tax_geocode,
133 hz.sales_tax_inside_city_limits,
134 hz.fa_location_id,
135 hz.object_version_number,
136 hz.created_by_module,
137 hz.application_id,
138 hz.timezone_id,
139 hz.geometry_status_code,
140 hz.actual_content_source,
141 hz.validation_status_code,
142 hz.date_validated,
143 hz.do_not_validate_flag,
144 NULL)
145 BULK COLLECT INTO l_pos_hz_location_bo
146 FROM hz_locations hz,
147 ap_suppliers ap,
148 ap_supplier_sites_all ss
149 WHERE ap.party_id = p_party_id
150 AND ss.vendor_id = ap.vendor_id
151 AND hz.location_id = ss.location_id;
152
153 x_hz_location_bo := l_pos_hz_location_bo;
154
155 EXCEPTION
156 WHEN fnd_api.g_exc_error THEN
157
158 x_return_status := fnd_api.g_ret_sts_error;
159 x_msg_count := 1;
160 x_msg_data := SQLCODE || SQLERRM;
161 WHEN fnd_api.g_exc_unexpected_error THEN
162
163 x_return_status := fnd_api.g_ret_sts_unexp_error;
164 x_msg_count := 1;
165 x_msg_data := SQLCODE || SQLERRM;
166 WHEN OTHERS THEN
167
168 x_return_status := fnd_api.g_ret_sts_unexp_error;
169
170 x_msg_count := 1;
171 x_msg_data := SQLCODE || SQLERRM;
172 END get_hz_location_bo;
173 /*#
174 * Use this routine to create hz locations bo
175 * @param p_api_version The version of API
176 * @param p_init_msg_list The Initialization message list
177 * @param p_location_rec The hz_location_v2pub.location_rec_type
178 * @param x_location_id The location id
179 * @param x_return_status The return status
180 * @param x_msg_count The message count
181 * @param x_msg_data The message data
182 * @rep:scope public
183 * @rep:lifecycle active
184 * @rep:displayname Create HZ Location BO
185 * @rep:catagory BUSSINESS_ENTITY AP_SUPPLIER
186 */
187
188 PROCEDURE create_hz_location_bo(p_api_version IN NUMBER DEFAULT NULL,
189 p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
190 p_orig_system IN VARCHAR2,
191 p_orig_system_reference IN VARCHAR2,
192 p_hz_location_bo IN pos_hz_location_bo,
193 p_create_update_flag IN VARCHAR2,
194 x_location_id OUT NOCOPY NUMBER,
195 x_object_version_number OUT NOCOPY NUMBER,
196 x_return_status OUT NOCOPY VARCHAR2,
197 x_msg_count OUT NOCOPY NUMBER,
198 x_msg_data OUT NOCOPY VARCHAR2) IS
199 p_location_rec hz_location_v2pub.location_rec_type;
200
201 BEGIN
202
203 p_location_rec.location_id := p_hz_location_bo.location_id;
204 p_location_rec.orig_system_reference := p_orig_system_reference;
205 p_location_rec.orig_system := p_orig_system;
206 p_location_rec.country := p_hz_location_bo.country;
207 p_location_rec.address1 := p_hz_location_bo.address1;
208 p_location_rec.address2 := p_hz_location_bo.address2;
209 p_location_rec.address3 := p_hz_location_bo.address3;
210 p_location_rec.address4 := p_hz_location_bo.address4;
211 p_location_rec.city := p_hz_location_bo.city;
212 p_location_rec.postal_code := p_hz_location_bo.postal_code;
213 p_location_rec.state := p_hz_location_bo.state;
214 p_location_rec.province := p_hz_location_bo.province;
215 p_location_rec.county := p_hz_location_bo.county;
216 p_location_rec.address_key := p_hz_location_bo.address_key;
217 p_location_rec.address_style := p_hz_location_bo.address_style;
218 p_location_rec.validated_flag := p_hz_location_bo.validated_flag;
219 p_location_rec.address_lines_phonetic := p_hz_location_bo.address_lines_phonetic;
220 p_location_rec.po_box_number := p_hz_location_bo.po_box_number;
221 p_location_rec.house_number := p_hz_location_bo.house_number;
222 p_location_rec.street_suffix := p_hz_location_bo.street_suffix;
223 p_location_rec.street := p_hz_location_bo.street;
224 p_location_rec.street_number := p_hz_location_bo.street_number;
225 p_location_rec.floor := p_hz_location_bo.floor_name;
226 p_location_rec.suite := p_hz_location_bo.suite;
227 p_location_rec.postal_plus4_code := p_hz_location_bo.postal_plus4_code;
228 p_location_rec.position := p_hz_location_bo.position;
229 p_location_rec.location_directions := p_hz_location_bo.location_directions;
230 p_location_rec.address_effective_date := p_hz_location_bo.address_effective_date;
231 p_location_rec.address_expiration_date := p_hz_location_bo.address_expiration_date;
232 p_location_rec.clli_code := p_hz_location_bo.clli_code;
233 p_location_rec.language := p_hz_location_bo.language;
234 p_location_rec.short_description := p_hz_location_bo.short_description;
235 p_location_rec.description := p_hz_location_bo.description;
236 p_location_rec.geometry := p_hz_location_bo.geometry;
237 p_location_rec.geometry_status_code := p_hz_location_bo.geometry_status_code;
238 p_location_rec.loc_hierarchy_id := p_hz_location_bo.loc_hierarchy_id;
239 p_location_rec.sales_tax_geocode := p_hz_location_bo.sales_tax_geocode;
240 p_location_rec.sales_tax_inside_city_limits := p_hz_location_bo.sales_tax_inside_city_limits;
241 p_location_rec.fa_location_id := p_hz_location_bo.fa_location_id;
242 p_location_rec.content_source_type := p_hz_location_bo.content_source_type;
243 p_location_rec.attribute_category := p_hz_location_bo.attribute_category;
244 p_location_rec.attribute1 := p_hz_location_bo.attribute1;
245 p_location_rec.attribute2 := p_hz_location_bo.attribute2;
246 p_location_rec.attribute3 := p_hz_location_bo.attribute3;
247 p_location_rec.attribute4 := p_hz_location_bo.attribute4;
248 p_location_rec.attribute5 := p_hz_location_bo.attribute5;
249 p_location_rec.attribute6 := p_hz_location_bo.attribute6;
250 p_location_rec.attribute7 := p_hz_location_bo.attribute7;
251 p_location_rec.attribute8 := p_hz_location_bo.attribute8;
252 p_location_rec.attribute9 := p_hz_location_bo.attribute9;
253 p_location_rec.attribute10 := p_hz_location_bo.attribute10;
254 p_location_rec.attribute11 := p_hz_location_bo.attribute11;
255 p_location_rec.attribute12 := p_hz_location_bo.attribute12;
256 p_location_rec.attribute13 := p_hz_location_bo.attribute13;
257 p_location_rec.attribute14 := p_hz_location_bo.attribute14;
258 p_location_rec.attribute15 := p_hz_location_bo.attribute15;
259 p_location_rec.attribute16 := p_hz_location_bo.attribute16;
260 p_location_rec.attribute17 := p_hz_location_bo.attribute17;
261 p_location_rec.attribute18 := p_hz_location_bo.attribute18;
262 p_location_rec.attribute19 := p_hz_location_bo.attribute19;
263 p_location_rec.attribute20 := p_hz_location_bo.attribute20;
264 p_location_rec.timezone_id := p_hz_location_bo.timezone_id;
265 p_location_rec.created_by_module := p_hz_location_bo.created_by_module;
266 p_location_rec.application_id := p_hz_location_bo.application_id;
267 p_location_rec.actual_content_source := p_hz_location_bo.actual_content_source;
268 p_location_rec.delivery_point_code := p_hz_location_bo.delivery_point_code;
269
270 IF p_create_update_flag = 'C' THEN
271 hz_location_v2pub.create_location(p_init_msg_list,
272 p_location_rec,
273 x_location_id,
274 x_return_status,
275 x_msg_count,
276 x_msg_data);
277 ELSIF p_create_update_flag = 'U' THEN
278 hz_location_v2pub.update_location(p_init_msg_list,
279 p_location_rec,
280 x_object_version_number,
281 x_return_status,
282 x_msg_count,
283 x_msg_data);
284 END IF;
285
286 EXCEPTION
287 WHEN fnd_api.g_exc_error THEN
288
289 x_return_status := fnd_api.g_ret_sts_error;
290 fnd_msg_pub.count_and_get(p_count => x_msg_count,
291 p_data => x_msg_data);
292 WHEN fnd_api.g_exc_unexpected_error THEN
293
294 x_return_status := fnd_api.g_ret_sts_unexp_error;
295 fnd_msg_pub.count_and_get(p_count => x_msg_count,
296 p_data => x_msg_data);
297 WHEN OTHERS THEN
298
299 x_return_status := fnd_api.g_ret_sts_unexp_error;
300
301 fnd_msg_pub.count_and_get(p_count => x_msg_count,
302 p_data => x_msg_data);
303 END;
304 /*#
305 * Use this routine to create hz locations bo
306 * @param p_api_version The version of API
307 * @param p_init_msg_list The Initialization message list
308 * @param p_location_rec The hz_location_v2pub.location_rec_type
309 * @param x_object_version_number The object version number
310 * @param x_return_status The return status
311 * @param x_msg_count The message count
312 * @param x_msg_data The message data
313 * @rep:scope public
314 * @rep:lifecycle active
315 * @rep:displayname Update Vendor Contact
316 * @rep:catagory BUSSINESS_ENTITY AP_SUPPLIER
317 */
318 /*PROCEDURE update_hz_location_bo(p_api_version IN NUMBER DEFAULT NULL,
319 p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
320 p_location_rec IN hz_location_v2pub.location_rec_type,
321 x_object_version_number IN OUT NOCOPY NUMBER,
322 x_return_status OUT NOCOPY VARCHAR2,
323 x_msg_count OUT NOCOPY NUMBER,
324 x_msg_data OUT NOCOPY VARCHAR2) IS
325
326 BEGIN
327
328 hz_location_v2pub.update_location(p_init_msg_list,
329 p_location_rec,
330 x_object_version_number,
331 x_return_status,
332 x_msg_count,
333 x_msg_data);
334
335 EXCEPTION
336 WHEN fnd_api.g_exc_error THEN
337
338 x_return_status := fnd_api.g_ret_sts_error;
339 fnd_msg_pub.count_and_get(p_count => x_msg_count,
340 p_data => x_msg_data);
341 WHEN fnd_api.g_exc_unexpected_error THEN
342
343 x_return_status := fnd_api.g_ret_sts_unexp_error;
344 fnd_msg_pub.count_and_get(p_count => x_msg_count,
345 p_data => x_msg_data);
346 WHEN OTHERS THEN
347
348 x_return_status := fnd_api.g_ret_sts_unexp_error;
349
350 fnd_msg_pub.count_and_get(p_count => x_msg_count,
351 p_data => x_msg_data);
352 END update_hz_location_bo;
353 */
354 END pos_hz_location_bo_pkg;