DBA Data[Home] [Help]

APPS.IBE_ADDRESS_V2PVT dependencies on FND_API

Line 6: l_true VARCHAR2(1) := FND_API.G_TRUE;

2: /* $Header: IBEVADB.pls 120.9 2006/01/09 00:59:56 banatara ship $ */
3:
4:
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'IBE_ADDRESS_V2PVT';
6: l_true VARCHAR2(1) := FND_API.G_TRUE;
7:
8:
9: ----------------- private procedures -----------------------------------------
10:

Line 13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

9: ----------------- private procedures -----------------------------------------
10:
11: PROCEDURE do_create_address(
12: p_api_version IN NUMBER,
13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14: p_commit IN VARCHAR2 := FND_API.G_FALSE,
15: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
16: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
17: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,

Line 14: p_commit IN VARCHAR2 := FND_API.G_FALSE,

10:
11: PROCEDURE do_create_address(
12: p_api_version IN NUMBER,
13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14: p_commit IN VARCHAR2 := FND_API.G_FALSE,
15: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
16: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
17: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
18: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,

Line 17: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,

13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14: p_commit IN VARCHAR2 := FND_API.G_FALSE,
15: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
16: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
17: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
18: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
19: p_billto IN VARCHAR2 := FND_API.G_FALSE,
20: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
21: p_default_primary IN VARCHAR2,

Line 18: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,

14: p_commit IN VARCHAR2 := FND_API.G_FALSE,
15: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
16: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
17: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
18: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
19: p_billto IN VARCHAR2 := FND_API.G_FALSE,
20: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
21: p_default_primary IN VARCHAR2,
22: x_return_status OUT NOCOPY VARCHAR2,

Line 19: p_billto IN VARCHAR2 := FND_API.G_FALSE,

15: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
16: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
17: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
18: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
19: p_billto IN VARCHAR2 := FND_API.G_FALSE,
20: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
21: p_default_primary IN VARCHAR2,
22: x_return_status OUT NOCOPY VARCHAR2,
23: x_msg_count OUT NOCOPY NUMBER,

Line 20: p_shipto IN VARCHAR2 := FND_API.G_FALSE,

16: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
17: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
18: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
19: p_billto IN VARCHAR2 := FND_API.G_FALSE,
20: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
21: p_default_primary IN VARCHAR2,
22: x_return_status OUT NOCOPY VARCHAR2,
23: x_msg_count OUT NOCOPY NUMBER,
24: x_msg_data OUT NOCOPY VARCHAR2,

Line 31: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

27: );
28:
29: PROCEDURE do_delete_address(
30: p_api_version IN NUMBER,
31: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
32: p_commit IN VARCHAR2 := FND_API.G_FALSE,
33: p_party_id IN NUMBER,
34: p_party_site_id IN NUMBER,
35: p_ps_object_version_number IN NUMBER,

Line 32: p_commit IN VARCHAR2 := FND_API.G_FALSE,

28:
29: PROCEDURE do_delete_address(
30: p_api_version IN NUMBER,
31: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
32: p_commit IN VARCHAR2 := FND_API.G_FALSE,
33: p_party_id IN NUMBER,
34: p_party_site_id IN NUMBER,
35: p_ps_object_version_number IN NUMBER,
36: p_bill_object_version_number IN NUMBER,

Line 58: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

54: -----------------------public procedures -------------------------------------
55:
56: PROCEDURE create_address(
57: p_api_version IN NUMBER,
58: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
59: p_commit IN VARCHAR2 := FND_API.G_FALSE,
60: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
61: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
62: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,

Line 59: p_commit IN VARCHAR2 := FND_API.G_FALSE,

55:
56: PROCEDURE create_address(
57: p_api_version IN NUMBER,
58: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
59: p_commit IN VARCHAR2 := FND_API.G_FALSE,
60: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
61: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
62: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
63: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,

Line 62: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,

58: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
59: p_commit IN VARCHAR2 := FND_API.G_FALSE,
60: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
61: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
62: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
63: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
64: p_billto IN VARCHAR2 := FND_API.G_FALSE,
65: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
66: p_default_primary IN VARCHAR2 := FND_API.G_TRUE,

Line 63: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,

59: p_commit IN VARCHAR2 := FND_API.G_FALSE,
60: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
61: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
62: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
63: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
64: p_billto IN VARCHAR2 := FND_API.G_FALSE,
65: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
66: p_default_primary IN VARCHAR2 := FND_API.G_TRUE,
67: x_return_status OUT NOCOPY VARCHAR2,

Line 64: p_billto IN VARCHAR2 := FND_API.G_FALSE,

60: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
61: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
62: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
63: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
64: p_billto IN VARCHAR2 := FND_API.G_FALSE,
65: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
66: p_default_primary IN VARCHAR2 := FND_API.G_TRUE,
67: x_return_status OUT NOCOPY VARCHAR2,
68: x_msg_count OUT NOCOPY NUMBER,

Line 65: p_shipto IN VARCHAR2 := FND_API.G_FALSE,

61: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
62: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
63: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
64: p_billto IN VARCHAR2 := FND_API.G_FALSE,
65: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
66: p_default_primary IN VARCHAR2 := FND_API.G_TRUE,
67: x_return_status OUT NOCOPY VARCHAR2,
68: x_msg_count OUT NOCOPY NUMBER,
69: x_msg_data OUT NOCOPY VARCHAR2,

Line 66: p_default_primary IN VARCHAR2 := FND_API.G_TRUE,

62: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
63: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
64: p_billto IN VARCHAR2 := FND_API.G_FALSE,
65: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
66: p_default_primary IN VARCHAR2 := FND_API.G_TRUE,
67: x_return_status OUT NOCOPY VARCHAR2,
68: x_msg_count OUT NOCOPY NUMBER,
69: x_msg_data OUT NOCOPY VARCHAR2,
70: x_location_id OUT NOCOPY NUMBER,

Line 98: IF NOT FND_API.compatible_api_call(l_api_version,

94: -- standard start of API savepoint
95: SAVEPOINT create_address_pvt;
96:
97: -- standard call to check for call compatibility
98: IF NOT FND_API.compatible_api_call(l_api_version,
99: p_api_version,
100: l_api_name,
101: G_PKG_NAME)
102: THEN

Line 103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

99: p_api_version,
100: l_api_name,
101: G_PKG_NAME)
102: THEN
103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
104: END IF;
105:
106: -- initialize message list if p_init_msg_list is set to TRUE.
107: IF FND_API.to_boolean(p_init_msg_list) THEN

Line 107: IF FND_API.to_boolean(p_init_msg_list) THEN

103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
104: END IF;
105:
106: -- initialize message list if p_init_msg_list is set to TRUE.
107: IF FND_API.to_boolean(p_init_msg_list) THEN
108: FND_MSG_PUB.initialize;
109: END IF;
110:
111: begin

Line 131: if p_primary_shipto = FND_API.G_TRUE then

127: x_party_site_id
128: );
129: end;
130: --3639679 begin
131: if p_primary_shipto = FND_API.G_TRUE then
132: UPDATE
133: IBE_ORD_ONECLICK_ALL
134: SET
135: LAST_UPDATE_DATE = sysdate,

Line 142: if p_primary_billto = FND_API.G_TRUE then

138: party_id = p_party_site.party_id
139: and SHIP_TO_PTY_SITE_ID is null;
140: end if;
141:
142: if p_primary_billto = FND_API.G_TRUE then
143: UPDATE
144: IBE_ORD_ONECLICK_ALL
145: SET
146: LAST_UPDATE_DATE = sysdate,

Line 155: IF FND_API.to_boolean(p_commit) THEN

151: end if;
152: --3639679 end
153:
154: -- standard check of p_commit
155: IF FND_API.to_boolean(p_commit) THEN
156: commit;
157: END IF;
158:
159: -- standard call to get message count and if count is 1, get message info

Line 161: p_encoded => FND_API.G_FALSE,

157: END IF;
158:
159: -- standard call to get message count and if count is 1, get message info
160: FND_MSG_PUB.count_and_get(
161: p_encoded => FND_API.G_FALSE,
162: p_count => x_msg_count,
163: p_data => x_msg_data
164: );
165:

Line 173: WHEN FND_API.G_EXC_ERROR THEN

169:
170: --IBE_UTIL.disable_debug();
171:
172: EXCEPTION
173: WHEN FND_API.G_EXC_ERROR THEN
174: --IBE_UTIL.enable_debug();
175:
176: ROLLBACK TO create_address_pvt;
177: x_return_status := FND_API.G_RET_STS_ERROR;

Line 177: x_return_status := FND_API.G_RET_STS_ERROR;

173: WHEN FND_API.G_EXC_ERROR THEN
174: --IBE_UTIL.enable_debug();
175:
176: ROLLBACK TO create_address_pvt;
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: FND_MSG_PUB.count_and_get(
179: p_encoded => FND_API.G_FALSE,
180: p_count => x_msg_count,
181: p_data => x_msg_data

Line 179: p_encoded => FND_API.G_FALSE,

175:
176: ROLLBACK TO create_address_pvt;
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: FND_MSG_PUB.count_and_get(
179: p_encoded => FND_API.G_FALSE,
180: p_count => x_msg_count,
181: p_data => x_msg_data
182: );
183: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 193: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

189: END IF;
190:
191: --IBE_UTIL.disable_debug();
192:
193: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
194: --IBE_UTIL.enable_debug();
195:
196: ROLLBACK TO create_address_pvt;
197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

193: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
194: --IBE_UTIL.enable_debug();
195:
196: ROLLBACK TO create_address_pvt;
197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
198: FND_MSG_PUB.count_and_get(
199: p_encoded => FND_API.G_FALSE,
200: p_count => x_msg_count,
201: p_data => x_msg_data

Line 199: p_encoded => FND_API.G_FALSE,

195:
196: ROLLBACK TO create_address_pvt;
197: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
198: FND_MSG_PUB.count_and_get(
199: p_encoded => FND_API.G_FALSE,
200: p_count => x_msg_count,
201: p_data => x_msg_data
202: );
203: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

213: WHEN OTHERS THEN
214: --IBE_UTIL.enable_debug();
215:
216: ROLLBACK TO create_address_pvt;
217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
218: FND_MSG_PUB.count_and_get(
219: p_encoded => FND_API.G_FALSE,
220: p_count => x_msg_count,
221: p_data => x_msg_data

Line 219: p_encoded => FND_API.G_FALSE,

215:
216: ROLLBACK TO create_address_pvt;
217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
218: FND_MSG_PUB.count_and_get(
219: p_encoded => FND_API.G_FALSE,
220: p_count => x_msg_count,
221: p_data => x_msg_data
222: );
223: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 236: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

232: END;
233:
234: PROCEDURE update_address(
235: p_api_version IN NUMBER,
236: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
237: p_commit IN VARCHAR2 := FND_API.G_FALSE,
238: p_party_site_id IN NUMBER,
239: p_ps_object_version_number IN NUMBER,
240: p_bill_object_version_number IN NUMBER,

Line 237: p_commit IN VARCHAR2 := FND_API.G_FALSE,

233:
234: PROCEDURE update_address(
235: p_api_version IN NUMBER,
236: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
237: p_commit IN VARCHAR2 := FND_API.G_FALSE,
238: p_party_site_id IN NUMBER,
239: p_ps_object_version_number IN NUMBER,
240: p_bill_object_version_number IN NUMBER,
241: p_ship_object_version_number IN NUMBER,

Line 294: IF NOT FND_API.compatible_api_call(l_api_version,

290: -- standard start of API savepoint
291: SAVEPOINT update_address_pvt;
292:
293: -- standard call to check for call compatibility
294: IF NOT FND_API.compatible_api_call(l_api_version,
295: p_api_version,
296: l_api_name,
297: G_PKG_NAME)
298: THEN

Line 299: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

295: p_api_version,
296: l_api_name,
297: G_PKG_NAME)
298: THEN
299: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
300: END IF;
301:
302: -- initialize message list if p_init_msg_list is set to TRUE.
303: IF FND_API.to_boolean(p_init_msg_list) THEN

Line 303: IF FND_API.to_boolean(p_init_msg_list) THEN

299: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
300: END IF;
301:
302: -- initialize message list if p_init_msg_list is set to TRUE.
303: IF FND_API.to_boolean(p_init_msg_list) THEN
304: FND_MSG_PUB.initialize;
305: END IF;
306:
307: --

Line 351: -- l_chk_ps.party_id := FND_API.G_MISS_NUM;

347: --
348: -- Update party_site if it's changed
349: --
350: if l_ps_changed = true then
351: -- l_chk_ps.party_id := FND_API.G_MISS_NUM;
352:
353: HZ_PARTY_SITE_V2PUB.update_party_site(
354: p_init_msg_list,
355: l_chk_ps,

Line 370: if p_primary_billto = FND_API.G_FALSE and p_billto = FND_API.G_FALSE then

366: l_chk_psu.site_use_type := 'BILL_TO';
367: --TCA API doesn't alllowing unsetting primary, NOOP
368: l_chk_psu.primary_per_type := 'N';
369: --if both billto flags are false, inactivate billto usage
370: if p_primary_billto = FND_API.G_FALSE and p_billto = FND_API.G_FALSE then
371: l_chk_psu.status := 'I';
372: elsif p_primary_billto = FND_API.G_TRUE then
373: l_chk_psu.status := 'A';
374: l_chk_psu.primary_per_type := 'Y';

Line 372: elsif p_primary_billto = FND_API.G_TRUE then

368: l_chk_psu.primary_per_type := 'N';
369: --if both billto flags are false, inactivate billto usage
370: if p_primary_billto = FND_API.G_FALSE and p_billto = FND_API.G_FALSE then
371: l_chk_psu.status := 'I';
372: elsif p_primary_billto = FND_API.G_TRUE then
373: l_chk_psu.status := 'A';
374: l_chk_psu.primary_per_type := 'Y';
375: elsif p_billto = FND_API.G_TRUE then
376: l_chk_psu.status := 'A';

Line 375: elsif p_billto = FND_API.G_TRUE then

371: l_chk_psu.status := 'I';
372: elsif p_primary_billto = FND_API.G_TRUE then
373: l_chk_psu.status := 'A';
374: l_chk_psu.primary_per_type := 'Y';
375: elsif p_billto = FND_API.G_TRUE then
376: l_chk_psu.status := 'A';
377: --TCA API doesn't alllowing unsetting primary, NOOP
378: l_chk_psu.primary_per_type := 'N';
379: end if;

Line 397: elsif l_psu_changed = 'N' and (p_billto = FND_API.G_TRUE or p_primary_billto = FND_API.G_TRUE) THEN

393: x_msg_data
394: );
395: close c_party_site_use;
396: --if BILL _TO PSU record not found, create a new one
397: elsif l_psu_changed = 'N' and (p_billto = FND_API.G_TRUE or p_primary_billto = FND_API.G_TRUE) THEN
398: l_chk_psu.created_by_module := l_chk_ps.created_by_module;
399: l_chk_psu.party_site_use_id := NULL;
400: if l_chk_psu.created_by_module is NULL then
401: l_chk_psu.created_by_module := 'USER MANAGEMENT';

Line 421: if p_primary_shipto = FND_API.G_FALSE and p_shipto = FND_API.G_FALSE then

417: l_chk_psu.site_use_type := 'SHIP_TO';
418: --TCA API doesn't alllowing unsetting primary, NOOP
419: l_chk_psu.primary_per_type := 'N';
420: --if both shipto flags are false, inactivate shipto usage
421: if p_primary_shipto = FND_API.G_FALSE and p_shipto = FND_API.G_FALSE then
422: l_chk_psu.status:='I';
423: elsif p_primary_shipto = FND_API.G_TRUE then
424: l_chk_psu.status:='A';
425: l_chk_psu.primary_per_type:='Y';

Line 423: elsif p_primary_shipto = FND_API.G_TRUE then

419: l_chk_psu.primary_per_type := 'N';
420: --if both shipto flags are false, inactivate shipto usage
421: if p_primary_shipto = FND_API.G_FALSE and p_shipto = FND_API.G_FALSE then
422: l_chk_psu.status:='I';
423: elsif p_primary_shipto = FND_API.G_TRUE then
424: l_chk_psu.status:='A';
425: l_chk_psu.primary_per_type:='Y';
426: elsif p_shipto = FND_API.G_TRUE then
427: l_chk_psu.status:='A';

Line 426: elsif p_shipto = FND_API.G_TRUE then

422: l_chk_psu.status:='I';
423: elsif p_primary_shipto = FND_API.G_TRUE then
424: l_chk_psu.status:='A';
425: l_chk_psu.primary_per_type:='Y';
426: elsif p_shipto = FND_API.G_TRUE then
427: l_chk_psu.status:='A';
428: --TCA API doesn't alllowing unsetting primary, NOOP
429: l_chk_psu.primary_per_type:='N';
430: end if;

Line 449: elsif l_psu_changed = 'N' and (p_shipto = FND_API.G_TRUE or p_primary_shipto = FND_API.G_TRUE) THEN

445: x_msg_data
446: );
447: close c_party_site_use;
448: --if SHIP_TO PSU record not found, create a new one
449: elsif l_psu_changed = 'N' and (p_shipto = FND_API.G_TRUE or p_primary_shipto = FND_API.G_TRUE) THEN
450: l_chk_psu.party_site_use_id := NULL;
451: l_chk_psu.created_by_module := l_chk_ps.created_by_module;
452: if l_chk_psu.created_by_module is NULL then
453: l_chk_psu.created_by_module := 'USER MANAGEMENT';

Line 466: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

462: x_msg_data
463: );
464: end if;
465:
466: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
467: RAISE FND_API.G_EXC_ERROR;
468: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
470: END IF;

Line 467: RAISE FND_API.G_EXC_ERROR;

463: );
464: end if;
465:
466: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
467: RAISE FND_API.G_EXC_ERROR;
468: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
470: END IF;
471:

Line 468: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

464: end if;
465:
466: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
467: RAISE FND_API.G_EXC_ERROR;
468: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
470: END IF;
471:
472: --

Line 469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

465:
466: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
467: RAISE FND_API.G_EXC_ERROR;
468: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
470: END IF;
471:
472: --
473: -- set return parameters

Line 490: l_chk_loc.address2 := nvl(l_chk_loc.address2,FND_API.G_MISS_CHAR);

486:
487: Open c_get_location_ovn(p_location.location_id);
488: FETCH c_get_location_ovn INTO l_loc_object_version_number;
489: --Convert null to G_Miss, as TCA is ignoring null
490: l_chk_loc.address2 := nvl(l_chk_loc.address2,FND_API.G_MISS_CHAR);
491: l_chk_loc.address3 := nvl(l_chk_loc.address3,FND_API.G_MISS_CHAR);
492: l_chk_loc.address4 := nvl(l_chk_loc.address4,FND_API.G_MISS_CHAR);
493: l_chk_loc.city := nvl(l_chk_loc.city,FND_API.G_MISS_CHAR);
494: l_chk_loc.postal_code := nvl(l_chk_loc.postal_code,FND_API.G_MISS_CHAR);

Line 491: l_chk_loc.address3 := nvl(l_chk_loc.address3,FND_API.G_MISS_CHAR);

487: Open c_get_location_ovn(p_location.location_id);
488: FETCH c_get_location_ovn INTO l_loc_object_version_number;
489: --Convert null to G_Miss, as TCA is ignoring null
490: l_chk_loc.address2 := nvl(l_chk_loc.address2,FND_API.G_MISS_CHAR);
491: l_chk_loc.address3 := nvl(l_chk_loc.address3,FND_API.G_MISS_CHAR);
492: l_chk_loc.address4 := nvl(l_chk_loc.address4,FND_API.G_MISS_CHAR);
493: l_chk_loc.city := nvl(l_chk_loc.city,FND_API.G_MISS_CHAR);
494: l_chk_loc.postal_code := nvl(l_chk_loc.postal_code,FND_API.G_MISS_CHAR);
495: l_chk_loc.state := nvl(l_chk_loc.state,FND_API.G_MISS_CHAR);

Line 492: l_chk_loc.address4 := nvl(l_chk_loc.address4,FND_API.G_MISS_CHAR);

488: FETCH c_get_location_ovn INTO l_loc_object_version_number;
489: --Convert null to G_Miss, as TCA is ignoring null
490: l_chk_loc.address2 := nvl(l_chk_loc.address2,FND_API.G_MISS_CHAR);
491: l_chk_loc.address3 := nvl(l_chk_loc.address3,FND_API.G_MISS_CHAR);
492: l_chk_loc.address4 := nvl(l_chk_loc.address4,FND_API.G_MISS_CHAR);
493: l_chk_loc.city := nvl(l_chk_loc.city,FND_API.G_MISS_CHAR);
494: l_chk_loc.postal_code := nvl(l_chk_loc.postal_code,FND_API.G_MISS_CHAR);
495: l_chk_loc.state := nvl(l_chk_loc.state,FND_API.G_MISS_CHAR);
496: l_chk_loc.province := nvl(l_chk_loc.province,FND_API.G_MISS_CHAR);

Line 493: l_chk_loc.city := nvl(l_chk_loc.city,FND_API.G_MISS_CHAR);

489: --Convert null to G_Miss, as TCA is ignoring null
490: l_chk_loc.address2 := nvl(l_chk_loc.address2,FND_API.G_MISS_CHAR);
491: l_chk_loc.address3 := nvl(l_chk_loc.address3,FND_API.G_MISS_CHAR);
492: l_chk_loc.address4 := nvl(l_chk_loc.address4,FND_API.G_MISS_CHAR);
493: l_chk_loc.city := nvl(l_chk_loc.city,FND_API.G_MISS_CHAR);
494: l_chk_loc.postal_code := nvl(l_chk_loc.postal_code,FND_API.G_MISS_CHAR);
495: l_chk_loc.state := nvl(l_chk_loc.state,FND_API.G_MISS_CHAR);
496: l_chk_loc.province := nvl(l_chk_loc.province,FND_API.G_MISS_CHAR);
497: l_chk_loc.county := nvl(l_chk_loc.county,FND_API.G_MISS_CHAR);

Line 494: l_chk_loc.postal_code := nvl(l_chk_loc.postal_code,FND_API.G_MISS_CHAR);

490: l_chk_loc.address2 := nvl(l_chk_loc.address2,FND_API.G_MISS_CHAR);
491: l_chk_loc.address3 := nvl(l_chk_loc.address3,FND_API.G_MISS_CHAR);
492: l_chk_loc.address4 := nvl(l_chk_loc.address4,FND_API.G_MISS_CHAR);
493: l_chk_loc.city := nvl(l_chk_loc.city,FND_API.G_MISS_CHAR);
494: l_chk_loc.postal_code := nvl(l_chk_loc.postal_code,FND_API.G_MISS_CHAR);
495: l_chk_loc.state := nvl(l_chk_loc.state,FND_API.G_MISS_CHAR);
496: l_chk_loc.province := nvl(l_chk_loc.province,FND_API.G_MISS_CHAR);
497: l_chk_loc.county := nvl(l_chk_loc.county,FND_API.G_MISS_CHAR);
498: l_chk_loc.address_lines_phonetic := nvl(l_chk_loc.address_lines_phonetic,FND_API.G_MISS_CHAR);

Line 495: l_chk_loc.state := nvl(l_chk_loc.state,FND_API.G_MISS_CHAR);

491: l_chk_loc.address3 := nvl(l_chk_loc.address3,FND_API.G_MISS_CHAR);
492: l_chk_loc.address4 := nvl(l_chk_loc.address4,FND_API.G_MISS_CHAR);
493: l_chk_loc.city := nvl(l_chk_loc.city,FND_API.G_MISS_CHAR);
494: l_chk_loc.postal_code := nvl(l_chk_loc.postal_code,FND_API.G_MISS_CHAR);
495: l_chk_loc.state := nvl(l_chk_loc.state,FND_API.G_MISS_CHAR);
496: l_chk_loc.province := nvl(l_chk_loc.province,FND_API.G_MISS_CHAR);
497: l_chk_loc.county := nvl(l_chk_loc.county,FND_API.G_MISS_CHAR);
498: l_chk_loc.address_lines_phonetic := nvl(l_chk_loc.address_lines_phonetic,FND_API.G_MISS_CHAR);
499: --End conversion

Line 496: l_chk_loc.province := nvl(l_chk_loc.province,FND_API.G_MISS_CHAR);

492: l_chk_loc.address4 := nvl(l_chk_loc.address4,FND_API.G_MISS_CHAR);
493: l_chk_loc.city := nvl(l_chk_loc.city,FND_API.G_MISS_CHAR);
494: l_chk_loc.postal_code := nvl(l_chk_loc.postal_code,FND_API.G_MISS_CHAR);
495: l_chk_loc.state := nvl(l_chk_loc.state,FND_API.G_MISS_CHAR);
496: l_chk_loc.province := nvl(l_chk_loc.province,FND_API.G_MISS_CHAR);
497: l_chk_loc.county := nvl(l_chk_loc.county,FND_API.G_MISS_CHAR);
498: l_chk_loc.address_lines_phonetic := nvl(l_chk_loc.address_lines_phonetic,FND_API.G_MISS_CHAR);
499: --End conversion
500: HZ_LOCATION_V2PUB.update_location(

Line 497: l_chk_loc.county := nvl(l_chk_loc.county,FND_API.G_MISS_CHAR);

493: l_chk_loc.city := nvl(l_chk_loc.city,FND_API.G_MISS_CHAR);
494: l_chk_loc.postal_code := nvl(l_chk_loc.postal_code,FND_API.G_MISS_CHAR);
495: l_chk_loc.state := nvl(l_chk_loc.state,FND_API.G_MISS_CHAR);
496: l_chk_loc.province := nvl(l_chk_loc.province,FND_API.G_MISS_CHAR);
497: l_chk_loc.county := nvl(l_chk_loc.county,FND_API.G_MISS_CHAR);
498: l_chk_loc.address_lines_phonetic := nvl(l_chk_loc.address_lines_phonetic,FND_API.G_MISS_CHAR);
499: --End conversion
500: HZ_LOCATION_V2PUB.update_location(
501: p_init_msg_list,

Line 498: l_chk_loc.address_lines_phonetic := nvl(l_chk_loc.address_lines_phonetic,FND_API.G_MISS_CHAR);

494: l_chk_loc.postal_code := nvl(l_chk_loc.postal_code,FND_API.G_MISS_CHAR);
495: l_chk_loc.state := nvl(l_chk_loc.state,FND_API.G_MISS_CHAR);
496: l_chk_loc.province := nvl(l_chk_loc.province,FND_API.G_MISS_CHAR);
497: l_chk_loc.county := nvl(l_chk_loc.county,FND_API.G_MISS_CHAR);
498: l_chk_loc.address_lines_phonetic := nvl(l_chk_loc.address_lines_phonetic,FND_API.G_MISS_CHAR);
499: --End conversion
500: HZ_LOCATION_V2PUB.update_location(
501: p_init_msg_list,
502: l_chk_loc,

Line 510: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

506: x_msg_data
507: );
508: Close c_get_location_ovn;
509:
510: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
511: RAISE FND_API.G_EXC_ERROR;
512: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
513: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
514: END IF;

Line 511: RAISE FND_API.G_EXC_ERROR;

507: );
508: Close c_get_location_ovn;
509:
510: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
511: RAISE FND_API.G_EXC_ERROR;
512: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
513: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
514: END IF;
515:

Line 512: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

508: Close c_get_location_ovn;
509:
510: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
511: RAISE FND_API.G_EXC_ERROR;
512: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
513: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
514: END IF;
515:
516: --check BILL_TO usage

Line 513: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

509:
510: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
511: RAISE FND_API.G_EXC_ERROR;
512: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
513: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
514: END IF;
515:
516: --check BILL_TO usage
517: -- value T=changed, F=not changed, N=usage not found

Line 523: if p_primary_billto = FND_API.G_FALSE and p_billto = FND_API.G_FALSE then

519: l_chk_psu.site_use_type := 'BILL_TO';
520: --TCA API doesn't alllowing unsetting primary, NOOP
521: l_chk_psu.primary_per_type := 'N';
522: --if both billto flags are false, inactivate billto usage
523: if p_primary_billto = FND_API.G_FALSE and p_billto = FND_API.G_FALSE then
524: l_chk_psu.status := 'I';
525: elsif p_primary_billto = FND_API.G_TRUE then
526: l_chk_psu.status := 'A';
527: l_chk_psu.primary_per_type := 'Y';

Line 525: elsif p_primary_billto = FND_API.G_TRUE then

521: l_chk_psu.primary_per_type := 'N';
522: --if both billto flags are false, inactivate billto usage
523: if p_primary_billto = FND_API.G_FALSE and p_billto = FND_API.G_FALSE then
524: l_chk_psu.status := 'I';
525: elsif p_primary_billto = FND_API.G_TRUE then
526: l_chk_psu.status := 'A';
527: l_chk_psu.primary_per_type := 'Y';
528: elsif p_billto = FND_API.G_TRUE then
529: l_chk_psu.status := 'A';

Line 528: elsif p_billto = FND_API.G_TRUE then

524: l_chk_psu.status := 'I';
525: elsif p_primary_billto = FND_API.G_TRUE then
526: l_chk_psu.status := 'A';
527: l_chk_psu.primary_per_type := 'Y';
528: elsif p_billto = FND_API.G_TRUE then
529: l_chk_psu.status := 'A';
530: --TCA API doesn't alllowing unsetting primary, NOOP
531: l_chk_psu.primary_per_type := 'N';
532: end if;

Line 550: elsif l_psu_changed = 'N' and (p_billto = FND_API.G_TRUE or p_primary_billto = FND_API.G_TRUE) THEN

546: x_msg_data
547: );
548: close c_party_site_use;
549: --if BILL _TO PSU record not found, create a new one
550: elsif l_psu_changed = 'N' and (p_billto = FND_API.G_TRUE or p_primary_billto = FND_API.G_TRUE) THEN
551: l_chk_psu.created_by_module := l_chk_ps.created_by_module;
552: l_chk_psu.party_site_use_id := NULL;
553: if l_chk_psu.created_by_module is NULL then
554: l_chk_psu.created_by_module := 'USER MANAGEMENT';

Line 574: if p_primary_shipto = FND_API.G_FALSE and p_shipto = FND_API.G_FALSE then

570: l_chk_psu.site_use_type := 'SHIP_TO';
571: --TCA API doesn't alllowing unsetting primary, NOOP
572: l_chk_psu.primary_per_type := 'N';
573: --if both shipto flags are false, inactivate shipto usage
574: if p_primary_shipto = FND_API.G_FALSE and p_shipto = FND_API.G_FALSE then
575: l_chk_psu.status:='I';
576: elsif p_primary_shipto = FND_API.G_TRUE then
577: l_chk_psu.status:='A';
578: l_chk_psu.primary_per_type:='Y';

Line 576: elsif p_primary_shipto = FND_API.G_TRUE then

572: l_chk_psu.primary_per_type := 'N';
573: --if both shipto flags are false, inactivate shipto usage
574: if p_primary_shipto = FND_API.G_FALSE and p_shipto = FND_API.G_FALSE then
575: l_chk_psu.status:='I';
576: elsif p_primary_shipto = FND_API.G_TRUE then
577: l_chk_psu.status:='A';
578: l_chk_psu.primary_per_type:='Y';
579: elsif p_shipto = FND_API.G_TRUE then
580: l_chk_psu.status:='A';

Line 579: elsif p_shipto = FND_API.G_TRUE then

575: l_chk_psu.status:='I';
576: elsif p_primary_shipto = FND_API.G_TRUE then
577: l_chk_psu.status:='A';
578: l_chk_psu.primary_per_type:='Y';
579: elsif p_shipto = FND_API.G_TRUE then
580: l_chk_psu.status:='A';
581: --TCA API doesn't alllowing unsetting primary, NOOP
582: l_chk_psu.primary_per_type:='N';
583: end if;

Line 602: elsif l_psu_changed = 'N' and (p_shipto = FND_API.G_TRUE or p_primary_shipto = FND_API.G_TRUE) THEN

598: x_msg_data
599: );
600: close c_party_site_use;
601: --if SHIP_TO PSU record not found, create a new one
602: elsif l_psu_changed = 'N' and (p_shipto = FND_API.G_TRUE or p_primary_shipto = FND_API.G_TRUE) THEN
603: l_chk_psu.party_site_use_id := NULL;
604: l_chk_psu.created_by_module := l_chk_ps.created_by_module;
605: if l_chk_psu.created_by_module is NULL then
606: l_chk_psu.created_by_module := 'USER MANAGEMENT';

Line 619: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

615: x_msg_data
616: );
617: end if;
618:
619: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
620: RAISE FND_API.G_EXC_ERROR;
621: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END IF;

Line 620: RAISE FND_API.G_EXC_ERROR;

616: );
617: end if;
618:
619: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
620: RAISE FND_API.G_EXC_ERROR;
621: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END IF;
624:

Line 621: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

617: end if;
618:
619: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
620: RAISE FND_API.G_EXC_ERROR;
621: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END IF;
624:
625: x_location_id := p_location.location_id;

Line 622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

618:
619: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
620: RAISE FND_API.G_EXC_ERROR;
621: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END IF;
624:
625: x_location_id := p_location.location_id;
626: x_party_site_id := p_party_site_id;

Line 655: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

651: x_msg_count,
652: x_msg_data
653: );
654:
655: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
656: RAISE FND_API.G_EXC_ERROR;
657: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
659: END IF;

Line 656: RAISE FND_API.G_EXC_ERROR;

652: x_msg_data
653: );
654:
655: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
656: RAISE FND_API.G_EXC_ERROR;
657: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
659: END IF;
660:

Line 657: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

653: );
654:
655: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
656: RAISE FND_API.G_EXC_ERROR;
657: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
659: END IF;
660:
661: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

654:
655: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
656: RAISE FND_API.G_EXC_ERROR;
657: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
659: END IF;
660:
661: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
662: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.delete_address(-)');

Line 692: FND_API.G_FALSE,

688: p_primary_billto,
689: p_primary_shipto,
690: p_billto,
691: p_shipto,
692: FND_API.G_FALSE,
693: x_return_status,
694: x_msg_count,
695: x_msg_data,
696: x_location_id,

Line 730: IF FND_API.to_boolean(p_commit) THEN

726: END IF;
727:
728:
729: -- standard check of p_commit
730: IF FND_API.to_boolean(p_commit) THEN
731: commit;
732: END IF;
733:
734: -- standard call to get message count and if count is 1, get message info

Line 736: p_encoded => FND_API.G_FALSE,

732: END IF;
733:
734: -- standard call to get message count and if count is 1, get message info
735: FND_MSG_PUB.count_and_get(
736: p_encoded => FND_API.G_FALSE,
737: p_count => x_msg_count,
738: p_data => x_msg_data
739: );
740:

Line 748: WHEN FND_API.G_EXC_ERROR THEN

744:
745: --IBE_UTIL.disable_debug();
746:
747: EXCEPTION
748: WHEN FND_API.G_EXC_ERROR THEN
749: --IBE_UTIL.enable_debug();
750:
751: ROLLBACK TO update_address_pvt;
752: x_return_status := FND_API.G_RET_STS_ERROR;

Line 752: x_return_status := FND_API.G_RET_STS_ERROR;

748: WHEN FND_API.G_EXC_ERROR THEN
749: --IBE_UTIL.enable_debug();
750:
751: ROLLBACK TO update_address_pvt;
752: x_return_status := FND_API.G_RET_STS_ERROR;
753: FND_MSG_PUB.count_and_get(
754: p_encoded => FND_API.G_FALSE,
755: p_count => x_msg_count,
756: p_data => x_msg_data

Line 754: p_encoded => FND_API.G_FALSE,

750:
751: ROLLBACK TO update_address_pvt;
752: x_return_status := FND_API.G_RET_STS_ERROR;
753: FND_MSG_PUB.count_and_get(
754: p_encoded => FND_API.G_FALSE,
755: p_count => x_msg_count,
756: p_data => x_msg_data
757: );
758: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 768: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

764: END IF;
765:
766: --IBE_UTIL.disable_debug();
767:
768: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
769: --IBE_UTIL.enable_debug();
770:
771: ROLLBACK TO update_address_pvt;
772: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 772: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

768: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
769: --IBE_UTIL.enable_debug();
770:
771: ROLLBACK TO update_address_pvt;
772: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
773: FND_MSG_PUB.count_and_get(
774: p_encoded => FND_API.G_FALSE,
775: p_count => x_msg_count,
776: p_data => x_msg_data

Line 774: p_encoded => FND_API.G_FALSE,

770:
771: ROLLBACK TO update_address_pvt;
772: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
773: FND_MSG_PUB.count_and_get(
774: p_encoded => FND_API.G_FALSE,
775: p_count => x_msg_count,
776: p_data => x_msg_data
777: );
778: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 792: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

788: WHEN OTHERS THEN
789: --IBE_UTIL.enable_debug();
790:
791: ROLLBACK TO update_address_pvt;
792: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
793: FND_MSG_PUB.count_and_get(
794: p_encoded => FND_API.G_FALSE,
795: p_count => x_msg_count,
796: p_data => x_msg_data

Line 794: p_encoded => FND_API.G_FALSE,

790:
791: ROLLBACK TO update_address_pvt;
792: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
793: FND_MSG_PUB.count_and_get(
794: p_encoded => FND_API.G_FALSE,
795: p_count => x_msg_count,
796: p_data => x_msg_data
797: );
798: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 812: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

808:
809:
810: PROCEDURE delete_address(
811: p_api_version IN NUMBER,
812: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
813: p_commit IN VARCHAR2 := FND_API.G_FALSE,
814: p_party_id IN NUMBER,
815: p_party_site_id IN NUMBER,
816: p_ps_object_version_number IN NUMBER,

Line 813: p_commit IN VARCHAR2 := FND_API.G_FALSE,

809:
810: PROCEDURE delete_address(
811: p_api_version IN NUMBER,
812: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
813: p_commit IN VARCHAR2 := FND_API.G_FALSE,
814: p_party_id IN NUMBER,
815: p_party_site_id IN NUMBER,
816: p_ps_object_version_number IN NUMBER,
817: p_bill_object_version_number IN NUMBER,

Line 843: IF NOT FND_API.compatible_api_call(l_api_version,

839: -- standard start of API savepoint
840: SAVEPOINT delete_address_pvt;
841:
842: -- standard call to check for call compatibility
843: IF NOT FND_API.compatible_api_call(l_api_version,
844: p_api_version,
845: l_api_name,
846: G_PKG_NAME)
847: THEN

Line 848: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

844: p_api_version,
845: l_api_name,
846: G_PKG_NAME)
847: THEN
848: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
849: END IF;
850:
851: -- initialize message list if p_init_msg_list is set to TRUE.
852: IF FND_API.to_boolean(p_init_msg_list) THEN

Line 852: IF FND_API.to_boolean(p_init_msg_list) THEN

848: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
849: END IF;
850:
851: -- initialize message list if p_init_msg_list is set to TRUE.
852: IF FND_API.to_boolean(p_init_msg_list) THEN
853: FND_MSG_PUB.initialize;
854: END IF;
855:
856: --

Line 878: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

874: x_msg_count,
875: x_msg_data
876: );
877:
878: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
879: RAISE FND_API.G_EXC_ERROR;
880: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
881: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
882: END IF;

Line 879: RAISE FND_API.G_EXC_ERROR;

875: x_msg_data
876: );
877:
878: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
879: RAISE FND_API.G_EXC_ERROR;
880: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
881: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
882: END IF;
883:

Line 880: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

876: );
877:
878: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
879: RAISE FND_API.G_EXC_ERROR;
880: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
881: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
882: END IF;
883:
884: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 881: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

877:
878: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
879: RAISE FND_API.G_EXC_ERROR;
880: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
881: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
882: END IF;
883:
884: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
885: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.do_delete_address(-)');

Line 915: IF FND_API.to_boolean(p_commit) THEN

911: BILL_TO_PTY_SITE_ID = p_party_site_id;
912:
913:
914: -- standard check of p_commit
915: IF FND_API.to_boolean(p_commit) THEN
916: commit;
917: END IF;
918:
919: -- standard call to get message count and if count is 1, get message info

Line 921: p_encoded => FND_API.G_FALSE,

917: END IF;
918:
919: -- standard call to get message count and if count is 1, get message info
920: FND_MSG_PUB.count_and_get(
921: p_encoded => FND_API.G_FALSE,
922: p_count => x_msg_count,
923: p_data => x_msg_data
924: );
925:

Line 933: WHEN FND_API.G_EXC_ERROR THEN

929:
930: --IBE_UTIL.disable_debug();
931:
932: EXCEPTION
933: WHEN FND_API.G_EXC_ERROR THEN
934: --IBE_UTIL.enable_debug();
935:
936: ROLLBACK TO delete_address_pvt;
937: x_return_status := FND_API.G_RET_STS_ERROR;

Line 937: x_return_status := FND_API.G_RET_STS_ERROR;

933: WHEN FND_API.G_EXC_ERROR THEN
934: --IBE_UTIL.enable_debug();
935:
936: ROLLBACK TO delete_address_pvt;
937: x_return_status := FND_API.G_RET_STS_ERROR;
938: FND_MSG_PUB.count_and_get(
939: p_encoded => FND_API.G_FALSE,
940: p_count => x_msg_count,
941: p_data => x_msg_data

Line 939: p_encoded => FND_API.G_FALSE,

935:
936: ROLLBACK TO delete_address_pvt;
937: x_return_status := FND_API.G_RET_STS_ERROR;
938: FND_MSG_PUB.count_and_get(
939: p_encoded => FND_API.G_FALSE,
940: p_count => x_msg_count,
941: p_data => x_msg_data
942: );
943: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

949: END IF;
950:
951: --IBE_UTIL.disable_debug();
952:
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954: --IBE_UTIL.enable_debug();
955:
956: ROLLBACK TO delete_address_pvt;
957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954: --IBE_UTIL.enable_debug();
955:
956: ROLLBACK TO delete_address_pvt;
957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
958: FND_MSG_PUB.count_and_get(
959: p_encoded => FND_API.G_FALSE,
960: p_count => x_msg_count,
961: p_data => x_msg_data

Line 959: p_encoded => FND_API.G_FALSE,

955:
956: ROLLBACK TO delete_address_pvt;
957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
958: FND_MSG_PUB.count_and_get(
959: p_encoded => FND_API.G_FALSE,
960: p_count => x_msg_count,
961: p_data => x_msg_data
962: );
963: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 977: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

973: WHEN OTHERS THEN
974: --IBE_UTIL.enable_debug();
975:
976: ROLLBACK TO delete_address_pvt;
977: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
978: FND_MSG_PUB.count_and_get(
979: p_encoded => FND_API.G_FALSE,
980: p_count => x_msg_count,
981: p_data => x_msg_data

Line 979: p_encoded => FND_API.G_FALSE,

975:
976: ROLLBACK TO delete_address_pvt;
977: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
978: FND_MSG_PUB.count_and_get(
979: p_encoded => FND_API.G_FALSE,
980: p_count => x_msg_count,
981: p_data => x_msg_data
982: );
983: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 997: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

993: END;
994:
995: PROCEDURE set_address_usage(
996: p_api_version IN NUMBER,
997: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
998: p_commit IN VARCHAR2 := FND_API.G_FALSE,
999: p_party_site_id IN NUMBER,
1000: p_primary_flag IN VARCHAR2 := FND_API.G_FALSE,
1001: p_site_use_type IN VARCHAR2,

Line 998: p_commit IN VARCHAR2 := FND_API.G_FALSE,

994:
995: PROCEDURE set_address_usage(
996: p_api_version IN NUMBER,
997: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
998: p_commit IN VARCHAR2 := FND_API.G_FALSE,
999: p_party_site_id IN NUMBER,
1000: p_primary_flag IN VARCHAR2 := FND_API.G_FALSE,
1001: p_site_use_type IN VARCHAR2,
1002: p_createdby IN VARCHAR2 := 'User Management',

Line 1000: p_primary_flag IN VARCHAR2 := FND_API.G_FALSE,

996: p_api_version IN NUMBER,
997: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
998: p_commit IN VARCHAR2 := FND_API.G_FALSE,
999: p_party_site_id IN NUMBER,
1000: p_primary_flag IN VARCHAR2 := FND_API.G_FALSE,
1001: p_site_use_type IN VARCHAR2,
1002: p_createdby IN VARCHAR2 := 'User Management',
1003: x_return_status OUT NOCOPY VARCHAR2,
1004: x_msg_count OUT NOCOPY NUMBER,

Line 1041: IF NOT FND_API.compatible_api_call(l_api_version,

1037: -- standard start of API savepoint
1038: SAVEPOINT set_address__usage_pvt;
1039:
1040: -- standard call to check for call compatibility
1041: IF NOT FND_API.compatible_api_call(l_api_version,
1042: p_api_version,
1043: l_api_name,
1044: G_PKG_NAME)
1045: THEN

Line 1046: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1042: p_api_version,
1043: l_api_name,
1044: G_PKG_NAME)
1045: THEN
1046: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1047: END IF;
1048:
1049: -- initialize message list if p_init_msg_list is set to TRUE.
1050: IF FND_API.to_boolean(p_init_msg_list) THEN

Line 1050: IF FND_API.to_boolean(p_init_msg_list) THEN

1046: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1047: END IF;
1048:
1049: -- initialize message list if p_init_msg_list is set to TRUE.
1050: IF FND_API.to_boolean(p_init_msg_list) THEN
1051: FND_MSG_PUB.initialize;
1052: END IF;
1053:
1054: -- try finding an existing party site use

Line 1060: if (p_primary_flag = FND_API.G_TRUE) then

1056: OPEN c_party_site_use;
1057: FETCH c_party_site_use INTO l_party_site_use_id, l_object_version_number;
1058:
1059:
1060: if (p_primary_flag = FND_API.G_TRUE) then
1061: l_party_site_use.primary_per_type := 'Y';
1062: end if;
1063:
1064: IF c_party_site_use%FOUND THEN

Line 1116: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1112: END IF;
1113:
1114: CLOSE c_party_site_use;
1115:
1116: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1117: RAISE FND_API.G_EXC_ERROR;
1118: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1120: END IF;

Line 1117: RAISE FND_API.G_EXC_ERROR;

1113:
1114: CLOSE c_party_site_use;
1115:
1116: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1117: RAISE FND_API.G_EXC_ERROR;
1118: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1120: END IF;
1121:

Line 1118: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1114: CLOSE c_party_site_use;
1115:
1116: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1117: RAISE FND_API.G_EXC_ERROR;
1118: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1120: END IF;
1121:
1122: -- standard check of p_commit

Line 1119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1115:
1116: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1117: RAISE FND_API.G_EXC_ERROR;
1118: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1120: END IF;
1121:
1122: -- standard check of p_commit
1123: IF FND_API.to_boolean(p_commit) THEN

Line 1123: IF FND_API.to_boolean(p_commit) THEN

1119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1120: END IF;
1121:
1122: -- standard check of p_commit
1123: IF FND_API.to_boolean(p_commit) THEN
1124: commit;
1125: END IF;
1126:
1127: -- standard call to get message count and if count is 1, get message info

Line 1129: p_encoded => FND_API.G_FALSE,

1125: END IF;
1126:
1127: -- standard call to get message count and if count is 1, get message info
1128: FND_MSG_PUB.count_and_get(
1129: p_encoded => FND_API.G_FALSE,
1130: p_count => x_msg_count,
1131: p_data => x_msg_data
1132: );
1133:

Line 1141: WHEN FND_API.G_EXC_ERROR THEN

1137:
1138: --IBE_UTIL.disable_debug();
1139:
1140: EXCEPTION
1141: WHEN FND_API.G_EXC_ERROR THEN
1142: --IBE_UTIL.enable_debug();
1143:
1144: ROLLBACK TO set_address__usage_pvt;
1145: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1145: x_return_status := FND_API.G_RET_STS_ERROR;

1141: WHEN FND_API.G_EXC_ERROR THEN
1142: --IBE_UTIL.enable_debug();
1143:
1144: ROLLBACK TO set_address__usage_pvt;
1145: x_return_status := FND_API.G_RET_STS_ERROR;
1146: FND_MSG_PUB.count_and_get(
1147: p_encoded => FND_API.G_FALSE,
1148: p_count => x_msg_count,
1149: p_data => x_msg_data

Line 1147: p_encoded => FND_API.G_FALSE,

1143:
1144: ROLLBACK TO set_address__usage_pvt;
1145: x_return_status := FND_API.G_RET_STS_ERROR;
1146: FND_MSG_PUB.count_and_get(
1147: p_encoded => FND_API.G_FALSE,
1148: p_count => x_msg_count,
1149: p_data => x_msg_data
1150: );
1151: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1161: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1157: END IF;
1158:
1159: --IBE_UTIL.disable_debug();
1160:
1161: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1162: --IBE_UTIL.enable_debug();
1163:
1164: ROLLBACK TO set_address__usage_pvt;
1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1161: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1162: --IBE_UTIL.enable_debug();
1163:
1164: ROLLBACK TO set_address__usage_pvt;
1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: FND_MSG_PUB.count_and_get(
1167: p_encoded => FND_API.G_FALSE,
1168: p_count => x_msg_count,
1169: p_data => x_msg_data

Line 1167: p_encoded => FND_API.G_FALSE,

1163:
1164: ROLLBACK TO set_address__usage_pvt;
1165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1166: FND_MSG_PUB.count_and_get(
1167: p_encoded => FND_API.G_FALSE,
1168: p_count => x_msg_count,
1169: p_data => x_msg_data
1170: );
1171: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1181: WHEN OTHERS THEN
1182: --IBE_UTIL.enable_debug();
1183:
1184: ROLLBACK TO set_address__usage_pvt;
1185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1186: FND_MSG_PUB.count_and_get(
1187: p_encoded => FND_API.G_FALSE,
1188: p_count => x_msg_count,
1189: p_data => x_msg_data

Line 1187: p_encoded => FND_API.G_FALSE,

1183:
1184: ROLLBACK TO set_address__usage_pvt;
1185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1186: FND_MSG_PUB.count_and_get(
1187: p_encoded => FND_API.G_FALSE,
1188: p_count => x_msg_count,
1189: p_data => x_msg_data
1190: );
1191: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1204: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1200: END;
1201:
1202: PROCEDURE get_primary_addr_details(
1203: p_api_version IN NUMBER,
1204: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1205: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1206: p_party_id IN NUMBER,
1207: p_site_use_type IN VARCHAR2,
1208: p_org_id IN NUMBER,

Line 1205: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1201:
1202: PROCEDURE get_primary_addr_details(
1203: p_api_version IN NUMBER,
1204: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1205: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1206: p_party_id IN NUMBER,
1207: p_site_use_type IN VARCHAR2,
1208: p_org_id IN NUMBER,
1209: p_alt_party_id IN NUMBER,

Line 1232: if(x_party_site_id = FND_API.G_MISS_NUM OR x_party_site_id is null) THEN

1228: x_msg_count => x_msg_count,
1229: x_msg_data => x_msg_data,
1230: x_party_site_id => x_party_site_id
1231: );
1232: if(x_party_site_id = FND_API.G_MISS_NUM OR x_party_site_id is null) THEN
1233: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1234: IBE_UTIL.debug(' getPrimary Addr Details of alt PartyId ');
1235: END IF;
1236: x_party_id := p_alt_party_id;

Line 1248: if(x_party_Site_id = FND_API.G_MISS_NUM OR x_party_site_id is null) then

1244: x_msg_data => x_msg_data,
1245: x_party_site_id => x_party_site_id
1246: );
1247: END IF;
1248: if(x_party_Site_id = FND_API.G_MISS_NUM OR x_party_site_id is null) then
1249: x_party_id := null;
1250: end if;
1251: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1252: IBE_UTIL.debug('Ending getPrimary Addr Details with party_site_id '||x_party_site_id);

Line 1258: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1254: END;
1255:
1256: PROCEDURE get_primary_addr_id(
1257: p_api_version IN NUMBER,
1258: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1259: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1260: p_party_id IN NUMBER,
1261: p_site_use_type IN VARCHAR2,
1262: p_org_id IN NUMBER,

Line 1259: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1255:
1256: PROCEDURE get_primary_addr_id(
1257: p_api_version IN NUMBER,
1258: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1259: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1260: p_party_id IN NUMBER,
1261: p_site_use_type IN VARCHAR2,
1262: p_org_id IN NUMBER,
1263: p_get_org_prim_addr IN VARCHAR2 := FND_API.G_FALSE,

Line 1263: p_get_org_prim_addr IN VARCHAR2 := FND_API.G_FALSE,

1259: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1260: p_party_id IN NUMBER,
1261: p_site_use_type IN VARCHAR2,
1262: p_org_id IN NUMBER,
1263: p_get_org_prim_addr IN VARCHAR2 := FND_API.G_FALSE,
1264: x_return_status OUT NOCOPY VARCHAR2,
1265: x_msg_count OUT NOCOPY NUMBER,
1266: x_msg_data OUT NOCOPY VARCHAR2,
1267: x_party_site_id OUT NOCOPY NUMBER)

Line 1384: IF NOT FND_API.compatible_api_call(l_api_version,

1380: -- standard start of API savepoint
1381: SAVEPOINT get_primary_addr_id_pvt;
1382:
1383: -- standard call to check for call compatibility
1384: IF NOT FND_API.compatible_api_call(l_api_version,
1385: p_api_version,
1386: l_api_name,
1387: G_PKG_NAME)
1388: THEN

Line 1389: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1385: p_api_version,
1386: l_api_name,
1387: G_PKG_NAME)
1388: THEN
1389: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1390: END IF;
1391:
1392: -- initialize message list if p_init_msg_list is set to TRUE.
1393: IF FND_API.to_boolean(p_init_msg_list) THEN

Line 1393: IF FND_API.to_boolean(p_init_msg_list) THEN

1389: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1390: END IF;
1391:
1392: -- initialize message list if p_init_msg_list is set to TRUE.
1393: IF FND_API.to_boolean(p_init_msg_list) THEN
1394: FND_MSG_PUB.initialize;
1395: END IF;
1396:
1397: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1433: if FND_API.to_boolean(p_get_org_prim_addr) then

1429:
1430:
1431: /* madesai - 7/10 fixed bug 2608767 */
1432: if x_party_site_id IS NULL then
1433: if FND_API.to_boolean(p_get_org_prim_addr) then
1434: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1435: IBE_UTIL.debug('ContactPrimAddr not found,get Org Primary Addr');
1436: END IF;
1437: OPEN c_getOrgPartyId(p_party_id);

Line 1463: x_return_status := FND_API.G_RET_STS_SUCCESS;

1459: else
1460: x_party_site_id := null;
1461: end if;--p_get_org_prim_addr of loop
1462: end if;--getPrimAddrId cursor end
1463: x_return_status := FND_API.G_RET_STS_SUCCESS;
1464: -- standard check of p_commit
1465: IF FND_API.to_boolean(p_commit) THEN
1466: commit;
1467: END IF;

Line 1465: IF FND_API.to_boolean(p_commit) THEN

1461: end if;--p_get_org_prim_addr of loop
1462: end if;--getPrimAddrId cursor end
1463: x_return_status := FND_API.G_RET_STS_SUCCESS;
1464: -- standard check of p_commit
1465: IF FND_API.to_boolean(p_commit) THEN
1466: commit;
1467: END IF;
1468:
1469: -- standard call to get message count and if count is 1, get message info

Line 1471: p_encoded => FND_API.G_FALSE,

1467: END IF;
1468:
1469: -- standard call to get message count and if count is 1, get message info
1470: FND_MSG_PUB.count_and_get(
1471: p_encoded => FND_API.G_FALSE,
1472: p_count => x_msg_count,
1473: p_data => x_msg_data
1474: );
1475:

Line 1488: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1484: WHEN OTHERS THEN
1485: --IBE_UTIL.enable_debug();
1486:
1487: ROLLBACK TO get_primary_addr_id_pvt;
1488: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1489: FND_MSG_PUB.count_and_get(
1490: p_encoded => FND_API.G_FALSE,
1491: p_count => x_msg_count,
1492: p_data => x_msg_data

Line 1490: p_encoded => FND_API.G_FALSE,

1486:
1487: ROLLBACK TO get_primary_addr_id_pvt;
1488: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1489: FND_MSG_PUB.count_and_get(
1490: p_encoded => FND_API.G_FALSE,
1491: p_count => x_msg_count,
1492: p_data => x_msg_data
1493: );
1494: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1508: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1504:
1505:
1506: PROCEDURE get_primary_address(
1507: p_api_version IN NUMBER,
1508: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1509: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1510: p_party_id IN NUMBER,
1511: p_site_use_type IN VARCHAR2,
1512: x_return_status OUT NOCOPY VARCHAR2,

Line 1509: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1505:
1506: PROCEDURE get_primary_address(
1507: p_api_version IN NUMBER,
1508: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1509: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1510: p_party_id IN NUMBER,
1511: p_site_use_type IN VARCHAR2,
1512: x_return_status OUT NOCOPY VARCHAR2,
1513: x_msg_count OUT NOCOPY NUMBER,

Line 1534: IF NOT FND_API.compatible_api_call(l_api_version,

1530: -- standard start of API savepoint
1531: SAVEPOINT get_primary_address_pvt;
1532:
1533: -- standard call to check for call compatibility
1534: IF NOT FND_API.compatible_api_call(l_api_version,
1535: p_api_version,
1536: l_api_name,
1537: G_PKG_NAME)
1538: THEN

Line 1539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1535: p_api_version,
1536: l_api_name,
1537: G_PKG_NAME)
1538: THEN
1539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1540: END IF;
1541:
1542: -- initialize message list if p_init_msg_list is set to TRUE.
1543: IF FND_API.to_boolean(p_init_msg_list) THEN

Line 1543: IF FND_API.to_boolean(p_init_msg_list) THEN

1539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1540: END IF;
1541:
1542: -- initialize message list if p_init_msg_list is set to TRUE.
1543: IF FND_API.to_boolean(p_init_msg_list) THEN
1544: FND_MSG_PUB.initialize;
1545: END IF;
1546:
1547: BEGIN

Line 1573: x_return_status := FND_API.G_RET_STS_SUCCESS;

1569: x_party_site_id := -1;
1570: x_location_id := -1;
1571: END;
1572:
1573: x_return_status := FND_API.G_RET_STS_SUCCESS;
1574:
1575: -- standard check of p_commit
1576: IF FND_API.to_boolean(p_commit) THEN
1577: commit;

Line 1576: IF FND_API.to_boolean(p_commit) THEN

1572:
1573: x_return_status := FND_API.G_RET_STS_SUCCESS;
1574:
1575: -- standard check of p_commit
1576: IF FND_API.to_boolean(p_commit) THEN
1577: commit;
1578: END IF;
1579:
1580: -- standard call to get message count and if count is 1, get message info

Line 1582: p_encoded => FND_API.G_FALSE,

1578: END IF;
1579:
1580: -- standard call to get message count and if count is 1, get message info
1581: FND_MSG_PUB.count_and_get(
1582: p_encoded => FND_API.G_FALSE,
1583: p_count => x_msg_count,
1584: p_data => x_msg_data
1585: );
1586:

Line 1598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1594: WHEN OTHERS THEN
1595: --IBE_UTIL.enable_debug();
1596:
1597: ROLLBACK TO get_primary_address_pvt;
1598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1599: FND_MSG_PUB.count_and_get(
1600: p_encoded => FND_API.G_FALSE,
1601: p_count => x_msg_count,
1602: p_data => x_msg_data

Line 1600: p_encoded => FND_API.G_FALSE,

1596:
1597: ROLLBACK TO get_primary_address_pvt;
1598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1599: FND_MSG_PUB.count_and_get(
1600: p_encoded => FND_API.G_FALSE,
1601: p_count => x_msg_count,
1602: p_data => x_msg_data
1603: );
1604: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1618: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1614:
1615:
1616: PROCEDURE do_create_address(
1617: p_api_version IN NUMBER,
1618: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1619: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1620: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
1621: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
1622: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,

Line 1619: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1615:
1616: PROCEDURE do_create_address(
1617: p_api_version IN NUMBER,
1618: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1619: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1620: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
1621: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
1622: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
1623: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,

Line 1622: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,

1618: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1619: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1620: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
1621: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
1622: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
1623: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
1624: p_billto IN VARCHAR2 := FND_API.G_FALSE,
1625: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
1626: p_default_primary IN VARCHAR2,

Line 1623: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,

1619: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1620: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
1621: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
1622: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
1623: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
1624: p_billto IN VARCHAR2 := FND_API.G_FALSE,
1625: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
1626: p_default_primary IN VARCHAR2,
1627: x_return_status OUT NOCOPY VARCHAR2,

Line 1624: p_billto IN VARCHAR2 := FND_API.G_FALSE,

1620: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
1621: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
1622: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
1623: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
1624: p_billto IN VARCHAR2 := FND_API.G_FALSE,
1625: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
1626: p_default_primary IN VARCHAR2,
1627: x_return_status OUT NOCOPY VARCHAR2,
1628: x_msg_count OUT NOCOPY NUMBER,

Line 1625: p_shipto IN VARCHAR2 := FND_API.G_FALSE,

1621: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
1622: p_primary_billto IN VARCHAR2 := FND_API.G_FALSE,
1623: p_primary_shipto IN VARCHAR2 := FND_API.G_FALSE,
1624: p_billto IN VARCHAR2 := FND_API.G_FALSE,
1625: p_shipto IN VARCHAR2 := FND_API.G_FALSE,
1626: p_default_primary IN VARCHAR2,
1627: x_return_status OUT NOCOPY VARCHAR2,
1628: x_msg_count OUT NOCOPY NUMBER,
1629: x_msg_data OUT NOCOPY VARCHAR2,

Line 1650: l_lock_flag VARCHAR2(1) := FND_API.G_FALSE;

1646: l_primary_shipto VARCHAR2(1) := p_primary_shipto;
1647: l_createdby VARCHAR2(150) :='User Management';
1648: l_org_id NUMBER;
1649: l_addr_val VARCHAR2(30);
1650: l_lock_flag VARCHAR2(1) := FND_API.G_FALSE;
1651:
1652: BEGIN
1653:
1654: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1662: l_location.location_id := FND_API.G_MISS_NUM;

1658: --
1659: -- create a location
1660: --
1661:
1662: l_location.location_id := FND_API.G_MISS_NUM;
1663: l_location.address_effective_date := sysdate;
1664:
1665: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1666: IBE_UTIL.debug('hz_location_v2pub.create_location(+)');

Line 1691: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1687: x_msg_data
1688: );
1689:
1690: l_location.location_id := x_location_id;
1691: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1692: RAISE FND_API.G_EXC_ERROR;
1693: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1695: END IF;

Line 1692: RAISE FND_API.G_EXC_ERROR;

1688: );
1689:
1690: l_location.location_id := x_location_id;
1691: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1692: RAISE FND_API.G_EXC_ERROR;
1693: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1695: END IF;
1696:

Line 1693: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1689:
1690: l_location.location_id := x_location_id;
1691: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1692: RAISE FND_API.G_EXC_ERROR;
1693: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1695: END IF;
1696:
1697: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1690: l_location.location_id := x_location_id;
1691: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1692: RAISE FND_API.G_EXC_ERROR;
1693: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1695: END IF;
1696:
1697: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1698: IBE_UTIL.debug('hz_location_v2pub.create_location(-)');

Line 1707: l_party_site.party_site_id := FND_API.G_MISS_NUM;

1703: --
1704: -- prepare to create a party site
1705: --
1706:
1707: l_party_site.party_site_id := FND_API.G_MISS_NUM;
1708: l_party_site.location_id := x_location_id;
1709: l_party_site.status := 'A';
1710: --V2
1711: --l_party_site.start_date_active := sysdate;

Line 1725: IF l_party_site_number = FND_API.G_MISS_CHAR OR

1721: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1722: IBE_UTIL.debug('HZ_GENERATE_PARTY_SITE_NUMBER is off');
1723: END IF;
1724:
1725: IF l_party_site_number = FND_API.G_MISS_CHAR OR
1726: l_party_site_number IS NULL THEN
1727:
1728: l_count := 1;
1729:

Line 1783: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1779: x_msg_count,
1780: x_msg_data
1781: );
1782:
1783: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1784: RAISE FND_API.G_EXC_ERROR;
1785: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1787: END IF;

Line 1784: RAISE FND_API.G_EXC_ERROR;

1780: x_msg_data
1781: );
1782:
1783: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1784: RAISE FND_API.G_EXC_ERROR;
1785: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1787: END IF;
1788:

Line 1785: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1781: );
1782:
1783: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1784: RAISE FND_API.G_EXC_ERROR;
1785: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1787: END IF;
1788:
1789: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1782:
1783: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1784: RAISE FND_API.G_EXC_ERROR;
1785: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1787: END IF;
1788:
1789: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1790: IBE_UTIL.debug('hz_party_site_v2pub.create_party_site(-)');

Line 1799: IF p_default_primary = FND_API.G_TRUE THEN

1795: -- if p_default_primary is true, create a primary address
1796: -- if user does not already have one.
1797: --
1798:
1799: IF p_default_primary = FND_API.G_TRUE THEN
1800:
1801: -- check primary billing address
1802:
1803: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1820: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1816: l_prim_site_id,
1817: l_prim_loc_id
1818: );
1819:
1820: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1821: RAISE FND_API.G_EXC_ERROR;
1822: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1823: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1824: END IF;

Line 1821: RAISE FND_API.G_EXC_ERROR;

1817: l_prim_loc_id
1818: );
1819:
1820: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1821: RAISE FND_API.G_EXC_ERROR;
1822: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1823: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1824: END IF;
1825:

Line 1822: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1818: );
1819:
1820: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1821: RAISE FND_API.G_EXC_ERROR;
1822: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1823: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1824: END IF;
1825:
1826: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1823: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1819:
1820: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1821: RAISE FND_API.G_EXC_ERROR;
1822: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1823: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1824: END IF;
1825:
1826: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1827: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.get_primary_address(-)');

Line 1833: l_primary_billto := FND_API.G_TRUE;

1829: END IF;
1830:
1831: IF (l_prim_site_id = -1) THEN
1832: -- no primary billing address
1833: l_primary_billto := FND_API.G_TRUE;
1834: END IF;
1835:
1836: -- check primary shipping address
1837:

Line 1855: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1851: l_prim_site_id,
1852: l_prim_loc_id
1853: );
1854:
1855: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1856: RAISE FND_API.G_EXC_ERROR;
1857: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1859: END IF;

Line 1856: RAISE FND_API.G_EXC_ERROR;

1852: l_prim_loc_id
1853: );
1854:
1855: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1856: RAISE FND_API.G_EXC_ERROR;
1857: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1859: END IF;
1860:

Line 1857: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1853: );
1854:
1855: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1856: RAISE FND_API.G_EXC_ERROR;
1857: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1859: END IF;
1860:
1861: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1854:
1855: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1856: RAISE FND_API.G_EXC_ERROR;
1857: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1859: END IF;
1860:
1861: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1862: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.get_primary_address(-)');

Line 1868: l_primary_shipto := FND_API.G_TRUE;

1864: END IF;
1865:
1866: IF (l_prim_site_id = -1) THEN
1867: -- no primary shipping address
1868: l_primary_shipto := FND_API.G_TRUE;
1869: END IF;
1870:
1871: END IF;
1872:

Line 1878: IF (l_primary_billto = FND_API.G_TRUE OR p_billto = FND_API.G_TRUE)THEN

1874: --
1875: -- create a party site use for bill to or ship to
1876: --
1877:
1878: IF (l_primary_billto = FND_API.G_TRUE OR p_billto = FND_API.G_TRUE)THEN
1879:
1880: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1881: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.set_primary_address(+) for BILL_TO');
1882: END IF;

Line 1898: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1894: x_msg_data,
1895: l_party_site_use_id
1896: );
1897:
1898: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1899: RAISE FND_API.G_EXC_ERROR;
1900: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1901: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1902: END IF;

Line 1899: RAISE FND_API.G_EXC_ERROR;

1895: l_party_site_use_id
1896: );
1897:
1898: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1899: RAISE FND_API.G_EXC_ERROR;
1900: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1901: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1902: END IF;
1903:

Line 1900: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1896: );
1897:
1898: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1899: RAISE FND_API.G_EXC_ERROR;
1900: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1901: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1902: END IF;
1903:
1904: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1901: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1897:
1898: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1899: RAISE FND_API.G_EXC_ERROR;
1900: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1901: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1902: END IF;
1903:
1904: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1905: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.set_primary_address(-)');

Line 1911: IF (l_primary_shipto = FND_API.G_TRUE OR p_shipto = FND_API.G_TRUE) THEN

1907: END IF;
1908:
1909: END IF;
1910:
1911: IF (l_primary_shipto = FND_API.G_TRUE OR p_shipto = FND_API.G_TRUE) THEN
1912: l_createdby := l_location.created_by_module;
1913: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1914: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.set_primary_address(+) for SHIP_TO');
1915: END IF;

Line 1930: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1926: x_msg_data,
1927: l_party_site_use_id
1928: );
1929:
1930: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1931: RAISE FND_API.G_EXC_ERROR;
1932: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1933: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1934: END IF;

Line 1931: RAISE FND_API.G_EXC_ERROR;

1927: l_party_site_use_id
1928: );
1929:
1930: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1931: RAISE FND_API.G_EXC_ERROR;
1932: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1933: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1934: END IF;
1935:

Line 1932: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1928: );
1929:
1930: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1931: RAISE FND_API.G_EXC_ERROR;
1932: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1933: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1934: END IF;
1935:
1936: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1933: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1929:
1930: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1931: RAISE FND_API.G_EXC_ERROR;
1932: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1933: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1934: END IF;
1935:
1936: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1937: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.set_address_usage(-)');

Line 1990: FND_API.G_TRUE

1986: x_return_status,
1987: x_msg_count,
1988: x_msg_data,
1989: l_loc_id,
1990: FND_API.G_TRUE
1991: );
1992: */
1993: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1994: RAISE FND_API.G_EXC_ERROR;

Line 1993: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1989: l_loc_id,
1990: FND_API.G_TRUE
1991: );
1992: */
1993: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1994: RAISE FND_API.G_EXC_ERROR;
1995: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1997: END IF;

Line 1994: RAISE FND_API.G_EXC_ERROR;

1990: FND_API.G_TRUE
1991: );
1992: */
1993: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1994: RAISE FND_API.G_EXC_ERROR;
1995: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1997: END IF;
1998:

Line 1995: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1991: );
1992: */
1993: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1994: RAISE FND_API.G_EXC_ERROR;
1995: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1997: END IF;
1998:
1999: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 1996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1992: */
1993: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1994: RAISE FND_API.G_EXC_ERROR;
1995: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1997: END IF;
1998:
1999: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2000: IBE_UTIL.debug('hz_tax_assignment_pub.create_loc_assignment(-)');

Line 2012: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2008: END;
2009:
2010: PROCEDURE do_delete_address(
2011: p_api_version IN NUMBER,
2012: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2013: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2014: p_party_id IN NUMBER,
2015: p_party_site_id IN NUMBER,
2016: p_ps_object_version_number IN NUMBER,

Line 2013: p_commit IN VARCHAR2 := FND_API.G_FALSE,

2009:
2010: PROCEDURE do_delete_address(
2011: p_api_version IN NUMBER,
2012: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2013: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2014: p_party_id IN NUMBER,
2015: p_party_site_id IN NUMBER,
2016: p_ps_object_version_number IN NUMBER,
2017: p_bill_object_version_number IN NUMBER,

Line 2098: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

2094: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2095: IBE_UTIL.debug('hz_party_v2pub.update_party_site_use(-)');
2096: END IF;
2097:
2098: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2099: RAISE FND_API.G_EXC_ERROR;
2100: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2102: END IF;

Line 2099: RAISE FND_API.G_EXC_ERROR;

2095: IBE_UTIL.debug('hz_party_v2pub.update_party_site_use(-)');
2096: END IF;
2097:
2098: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2099: RAISE FND_API.G_EXC_ERROR;
2100: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2102: END IF;
2103:

Line 2100: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2096: END IF;
2097:
2098: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2099: RAISE FND_API.G_EXC_ERROR;
2100: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2102: END IF;
2103:
2104: IF (IBE_UTIL.G_DEBUGON = l_true) THEN

Line 2101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2097:
2098: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2099: RAISE FND_API.G_EXC_ERROR;
2100: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2102: END IF;
2103:
2104: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2105: IBE_UTIL.debug('hz_party_v2pub.update_party_site(-)');

Line 2123: l_gmiss := FND_API.G_MISS_CHAR;

2119: l_dummy NUMBER;
2120: l_gmiss VARCHAR2(1) := NULL;
2121: BEGIN
2122:
2123: l_gmiss := FND_API.G_MISS_CHAR;
2124: -- for debug purpose
2125: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2126: IBE_UTIL.debug('location_id = ' || p_location.location_id || '.');
2127: IBE_UTIL.debug('address1 = ' || p_location.address1 || '.');

Line 2186: l_gmiss := FND_API.G_MISS_CHAR;

2182: l_dummy NUMBER;
2183: l_gmiss VARCHAR2(1) := NULL;
2184: BEGIN
2185:
2186: l_gmiss := FND_API.G_MISS_CHAR;
2187: -- for debug purpose
2188: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2189: IBE_UTIL.debug('party_site_id = ' || p_party_site.party_site_id || '.');
2190: IBE_UTIL.debug('party_site_name = ' || p_party_site.party_site_name || '.');

Line 2290: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2286:
2287:
2288: PROCEDURE valid_usages (
2289: p_api_version IN NUMBER,
2290: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2291: p_party_site_id IN NUMBER,
2292: p_operating_unit_id IN NUMBER,
2293: p_usage_codes IN JTF_VARCHAR2_TABLE_100,
2294: x_return_codes OUT NOCOPY JTF_VARCHAR2_TABLE_100,

Line 2322: IF NOT FND_API.Compatible_API_Call(l_api_version,

2318:
2319: --IBE_UTIL.enable_debug();
2320:
2321: -- Standard call to check for call compatibility.
2322: IF NOT FND_API.Compatible_API_Call(l_api_version,
2323: p_api_version,
2324: l_api_name,
2325: G_PKG_NAME)
2326: THEN

Line 2327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2323: p_api_version,
2324: l_api_name,
2325: G_PKG_NAME)
2326: THEN
2327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2328: END IF;
2329:
2330: -- Initialize message list if p_init_msg_list is set to TRUE.
2331: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 2331: IF FND_API.to_Boolean(p_init_msg_list) THEN

2327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2328: END IF;
2329:
2330: -- Initialize message list if p_init_msg_list is set to TRUE.
2331: IF FND_API.to_Boolean(p_init_msg_list) THEN
2332: FND_MSG_PUB.initialize;
2333: END IF;
2334:
2335: -- Initialize API return status to success

Line 2336: x_return_status := FND_API.G_RET_STS_SUCCESS;

2332: FND_MSG_PUB.initialize;
2333: END IF;
2334:
2335: -- Initialize API return status to success
2336: x_return_status := FND_API.G_RET_STS_SUCCESS;
2337:
2338: --
2339: -- Get the country associated with the party site
2340: --

Line 2348: RAISE FND_API.G_EXC_ERROR;

2344: CLOSE c1;
2345: FND_MESSAGE.Set_Name('IBE', 'IBE_OU_GET_PSITE_COUNTRY_FAIL');
2346: FND_MESSAGE.Set_Token('PARTY_SITE_ID', p_party_site_id);
2347: FND_MSG_PUB.Add;
2348: RAISE FND_API.G_EXC_ERROR;
2349: END IF;
2350: CLOSE c1;
2351:
2352: x_return_codes := JTF_VARCHAR2_TABLE_100();

Line 2356: x_return_codes(i) := FND_API.G_RET_STS_ERROR;

2352: x_return_codes := JTF_VARCHAR2_TABLE_100();
2353: FOR i IN 1..p_usage_codes.COUNT LOOP
2354:
2355: x_return_codes.EXTEND();
2356: x_return_codes(i) := FND_API.G_RET_STS_ERROR;
2357:
2358: --
2359: -- Process SHIP_TO_COUNTRY usage code
2360: --

Line 2376: x_return_codes(i) := FND_API.G_RET_STS_SUCCESS;

2372: l_flag := TRUE;
2373: END IF;
2374:
2375: IF (r2.org_information1 = l_psite_terr_code) THEN
2376: x_return_codes(i) := FND_API.G_RET_STS_SUCCESS;
2377: EXIT;
2378: END IF;
2379:
2380: END LOOP; -- end for r2

Line 2383: x_return_codes(i) := FND_API.G_RET_STS_SUCCESS;

2379:
2380: END LOOP; -- end for r2
2381:
2382: IF (l_flag = FALSE) THEN
2383: x_return_codes(i) := FND_API.G_RET_STS_SUCCESS;
2384: END IF;
2385:
2386: END IF; -- end if SHIP_TO_COUNTRY
2387:

Line 2407: x_return_codes(i) := FND_API.G_RET_STS_SUCCESS;

2403: l_flag := TRUE;
2404: END IF;
2405:
2406: IF (r2.org_information1 = l_psite_terr_code) THEN
2407: x_return_codes(i) := FND_API.G_RET_STS_SUCCESS;
2408: EXIT;
2409: END IF;
2410:
2411: END LOOP; -- end for r2

Line 2414: x_return_codes(i) := FND_API.G_RET_STS_SUCCESS;

2410:
2411: END LOOP; -- end for r2
2412:
2413: IF (l_flag = FALSE) THEN
2414: x_return_codes(i) := FND_API.G_RET_STS_SUCCESS;
2415: END IF;
2416:
2417: END IF; -- end if BILL_TO_COUNTRY
2418:

Line 2425: WHEN FND_API.G_EXC_ERROR THEN

2421: --IBE_UTIL.disable_debug();
2422:
2423: EXCEPTION
2424:
2425: WHEN FND_API.G_EXC_ERROR THEN
2426: x_return_status := FND_API.G_RET_STS_ERROR;
2427: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2428: p_data => x_msg_data,
2429: p_encoded => 'F');

Line 2426: x_return_status := FND_API.G_RET_STS_ERROR;

2422:
2423: EXCEPTION
2424:
2425: WHEN FND_API.G_EXC_ERROR THEN
2426: x_return_status := FND_API.G_RET_STS_ERROR;
2427: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2428: p_data => x_msg_data,
2429: p_encoded => 'F');
2430:

Line 2431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2427: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2428: p_data => x_msg_data,
2429: p_encoded => 'F');
2430:
2431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2433: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2434: p_data => x_msg_data,
2435: p_encoded => 'F');

Line 2432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2428: p_data => x_msg_data,
2429: p_encoded => 'F');
2430:
2431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2432: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2433: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2434: p_data => x_msg_data,
2435: p_encoded => 'F');
2436:

Line 2443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2439: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2440: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2441: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2442: FND_MSG_PUB.Add;
2443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2444:
2445: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2446: THEN
2447: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);

Line 2458: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2454: END;
2455:
2456: PROCEDURE copy_party_site (
2457: p_api_version IN NUMBER,
2458: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2459: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2460: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
2461: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
2462: x_party_site_id OUT NOCOPY NUMBER,

Line 2459: p_commit IN VARCHAR2 := FND_API.G_FALSE,

2455:
2456: PROCEDURE copy_party_site (
2457: p_api_version IN NUMBER,
2458: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2459: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2460: p_party_site IN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE,
2461: p_location IN HZ_LOCATION_V2PUB.LOCATION_REC_TYPE,
2462: x_party_site_id OUT NOCOPY NUMBER,
2463: x_return_status OUT NOCOPY VARCHAR2,

Line 2479: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2475: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2476: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:Begin ');
2477: END IF;
2478: /*PROCEDURE create_party_site (
2479: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2480: p_party_site_rec IN PARTY_SITE_REC_TYPE,
2481: x_party_site_id OUT NOCOPY NUMBER,
2482: x_party_site_number OUT NOCOPY VARCHAR2,
2483: x_return_status OUT NOCOPY VARCHAR2,

Line 2498: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

2494: x_return_status => x_return_status,
2495: x_msg_count => x_msg_count,
2496: x_msg_data => x_msg_data );
2497:
2498: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2499: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2500: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:Expected error ');
2501: END IF;
2502:

Line 2503: RAISE FND_API.G_EXC_ERROR;

2499: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2500: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:Expected error ');
2501: END IF;
2502:
2503: RAISE FND_API.G_EXC_ERROR;
2504: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2505: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2506: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:Unexpected error ');
2507: END IF;

Line 2504: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2500: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:Expected error ');
2501: END IF;
2502:
2503: RAISE FND_API.G_EXC_ERROR;
2504: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2505: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2506: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:Unexpected error ');
2507: END IF;
2508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 2508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2504: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2505: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2506: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:Unexpected error ');
2507: END IF;
2508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2509: END IF;
2510:
2511: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2512: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:Done ');

Line 2520: WHEN FND_API.G_EXC_ERROR THEN

2516: x_party_site_id := l_party_site_id;
2517:
2518: EXCEPTION
2519:
2520: WHEN FND_API.G_EXC_ERROR THEN
2521: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2522: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:In the expected exception block ');
2523: END IF;
2524:

Line 2525: x_return_status := FND_API.G_RET_STS_ERROR;

2521: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2522: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:In the expected exception block ');
2523: END IF;
2524:
2525: x_return_status := FND_API.G_RET_STS_ERROR;
2526: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2527: p_data => x_msg_data,
2528: p_encoded => 'F');
2529:

Line 2538: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2534: IBE_UTIL.debug('Error msg: '||substr(lx_msg_data,1,240));
2535: end loop;
2536:
2537:
2538: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2539: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2540: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:In the unexpected exception block ');
2541: END IF;
2542:

Line 2543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2539: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2540: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:In the unexpected exception block ');
2541: END IF;
2542:
2543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2544: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2545: p_data => x_msg_data,
2546: p_encoded => 'F');
2547:

Line 2561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2557: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2558: IBE_UTIL.debug('IBE_ADDRESS_V2PVT.copy_pary_site:In the others exception block ');
2559: END IF;
2560:
2561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2562:
2563: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2564: THEN
2565: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);