1: PACKAGE BODY HZ_ORG_CUST_BO_PUB AS
2: /*$Header: ARHBOABB.pls 120.19 2008/02/06 10:31:34 vsegu ship $ */
3: PROCEDURE do_create_org_cust_bo(
4: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
6: p_org_cust_obj IN OUT NOCOPY HZ_ORG_CUST_BO,
7: p_created_by_module IN VARCHAR2,
8: p_obj_source IN VARCHAR2 := null,
1: PACKAGE BODY HZ_ORG_CUST_BO_PUB AS
2: /*$Header: ARHBOABB.pls 120.19 2008/02/06 10:31:34 vsegu ship $ */
3: PROCEDURE do_create_org_cust_bo(
4: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
6: p_org_cust_obj IN OUT NOCOPY HZ_ORG_CUST_BO,
7: p_created_by_module IN VARCHAR2,
8: p_obj_source IN VARCHAR2 := null,
9: x_return_status OUT NOCOPY VARCHAR2,
12: x_organization_id OUT NOCOPY NUMBER
13: );
14:
15: PROCEDURE do_update_org_cust_bo(
16: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
17: p_org_cust_obj IN OUT NOCOPY HZ_ORG_CUST_BO,
18: p_created_by_module IN VARCHAR2,
19: p_obj_source IN VARCHAR2 := null,
20: x_return_status OUT NOCOPY VARCHAR2,
23: x_organization_id OUT NOCOPY NUMBER
24: );
25:
26: PROCEDURE do_save_org_cust_bo(
27: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
28: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
29: p_org_cust_obj IN OUT NOCOPY HZ_ORG_CUST_BO,
30: p_created_by_module IN VARCHAR2,
31: p_obj_source IN VARCHAR2 := null,
24: );
25:
26: PROCEDURE do_save_org_cust_bo(
27: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
28: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
29: p_org_cust_obj IN OUT NOCOPY HZ_ORG_CUST_BO,
30: p_created_by_module IN VARCHAR2,
31: p_obj_source IN VARCHAR2 := null,
32: x_return_status OUT NOCOPY VARCHAR2,
39: --
40: -- DESCRIPTION
41: -- Create org customer account.
42: PROCEDURE do_create_org_cust_bo(
43: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
44: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
45: p_org_cust_obj IN OUT NOCOPY HZ_ORG_CUST_BO,
46: p_created_by_module IN VARCHAR2,
47: p_obj_source IN VARCHAR2 := null,
40: -- DESCRIPTION
41: -- Create org customer account.
42: PROCEDURE do_create_org_cust_bo(
43: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
44: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
45: p_org_cust_obj IN OUT NOCOPY HZ_ORG_CUST_BO,
46: p_created_by_module IN VARCHAR2,
47: p_obj_source IN VARCHAR2 := null,
48: x_return_status OUT NOCOPY VARCHAR2,
63: -- Standard start of API savepoint
64: SAVEPOINT do_create_org_cust_bo_pub;
65:
66: -- initialize API return status to success.
67: x_return_status := FND_API.G_RET_STS_SUCCESS;
68:
69: -- Initialize message list if p_init_msg_list is set to TRUE
70: IF FND_API.to_Boolean(p_init_msg_list) THEN
71: FND_MSG_PUB.initialize;
66: -- initialize API return status to success.
67: x_return_status := FND_API.G_RET_STS_SUCCESS;
68:
69: -- Initialize message list if p_init_msg_list is set to TRUE
70: IF FND_API.to_Boolean(p_init_msg_list) THEN
71: FND_MSG_PUB.initialize;
72: END IF;
73:
74: -- Debug info.
78: p_msg_level=>fnd_log.level_procedure);
79: END IF;
80:
81: -- Base on p_validate_bo_flag, check the completeness of business objects
82: IF(p_validate_bo_flag = FND_API.G_TRUE) THEN
83: HZ_REGISTRY_VALIDATE_BO_PVT.get_bus_obj_struct(
84: p_bus_object_code => 'ORG_CUST',
85: x_bus_object => l_bus_object
86: );
90: p_ca_objs => p_org_cust_obj.account_objs
91: );
92:
93: IF NOT(l_valid_obj) THEN
94: RAISE fnd_api.g_exc_error;
95: END IF;
96:
97: -- find out if raise event at the end
98: l_raise_event := HZ_PARTY_BO_PVT.is_raising_create_event(
123:
124: l_cbm := HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE;
125:
126: HZ_ORGANIZATION_BO_PUB.do_create_organization_bo(
127: p_init_msg_list => fnd_api.g_false,
128: p_validate_bo_flag => FND_API.G_FALSE,
129: p_organization_obj => p_org_cust_obj.organization_obj,
130: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
131: p_obj_source => p_obj_source,
124: l_cbm := HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE;
125:
126: HZ_ORGANIZATION_BO_PUB.do_create_organization_bo(
127: p_init_msg_list => fnd_api.g_false,
128: p_validate_bo_flag => FND_API.G_FALSE,
129: p_organization_obj => p_org_cust_obj.organization_obj,
130: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
131: p_obj_source => p_obj_source,
132: x_return_status => x_return_status,
136: x_organization_os => l_organization_os,
137: x_organization_osr => l_organization_osr
138: );
139:
140: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
141: RAISE fnd_api.g_exc_error;
142: END IF;
143:
144: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
137: x_organization_osr => l_organization_osr
138: );
139:
140: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
141: RAISE fnd_api.g_exc_error;
142: END IF;
143:
144: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
145:
156: p_parent_osr => l_organization_osr,
157: p_parent_obj_type => 'ORG'
158: );
159:
160: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
161: RAISE fnd_api.g_exc_error;
162: END IF;
163: END IF;
164:
157: p_parent_obj_type => 'ORG'
158: );
159:
160: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
161: RAISE fnd_api.g_exc_error;
162: END IF;
163: END IF;
164:
165: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
201: p_prefix=>l_debug_prefix,
202: p_msg_level=>fnd_log.level_procedure);
203: END IF;
204: EXCEPTION
205: WHEN fnd_api.g_exc_error THEN
206: ROLLBACK TO do_create_org_cust_bo_pub;
207:
208: -- reset Global variable
209: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
212: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
213: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
214: FND_MSG_PUB.ADD;
215:
216: x_return_status := fnd_api.g_ret_sts_error;
217:
218: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
219: p_count => x_msg_count,
220: p_data => x_msg_data);
214: FND_MSG_PUB.ADD;
215:
216: x_return_status := fnd_api.g_ret_sts_error;
217:
218: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
219: p_count => x_msg_count,
220: p_data => x_msg_data);
221:
222: -- Debug info.
231: p_prefix=>l_debug_prefix,
232: p_msg_level=>fnd_log.level_procedure);
233: END IF;
234:
235: WHEN fnd_api.g_exc_unexpected_error THEN
236: ROLLBACK TO do_create_org_cust_bo_pub;
237:
238: -- reset Global variable
239: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
242: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
243: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
244: FND_MSG_PUB.ADD;
245:
246: x_return_status := fnd_api.g_ret_sts_unexp_error;
247:
248: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
249: p_count => x_msg_count,
250: p_data => x_msg_data);
244: FND_MSG_PUB.ADD;
245:
246: x_return_status := fnd_api.g_ret_sts_unexp_error;
247:
248: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
249: p_count => x_msg_count,
250: p_data => x_msg_data);
251:
252: -- Debug info.
272: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
273: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
274: FND_MSG_PUB.ADD;
275:
276: x_return_status := fnd_api.g_ret_sts_unexp_error;
277:
278: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
279: fnd_message.set_token('ERROR' ,SQLERRM);
280: fnd_msg_pub.add;
278: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
279: fnd_message.set_token('ERROR' ,SQLERRM);
280: fnd_msg_pub.add;
281:
282: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
283: p_count => x_msg_count,
284: p_data => x_msg_data);
285:
286: -- Debug info.
297: END IF;
298: END do_create_org_cust_bo;
299:
300: PROCEDURE create_org_cust_bo(
301: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
302: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
303: p_org_cust_obj IN HZ_ORG_CUST_BO,
304: p_created_by_module IN VARCHAR2,
305: x_return_status OUT NOCOPY VARCHAR2,
298: END do_create_org_cust_bo;
299:
300: PROCEDURE create_org_cust_bo(
301: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
302: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
303: p_org_cust_obj IN HZ_ORG_CUST_BO,
304: p_created_by_module IN VARCHAR2,
305: x_return_status OUT NOCOPY VARCHAR2,
306: x_msg_count OUT NOCOPY NUMBER,
323: );
324: END create_org_cust_bo;
325:
326: PROCEDURE create_org_cust_bo(
327: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
328: p_org_cust_obj IN HZ_ORG_CUST_BO,
329: p_created_by_module IN VARCHAR2,
330: p_obj_source IN VARCHAR2 := null,
331: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
327: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
328: p_org_cust_obj IN HZ_ORG_CUST_BO,
329: p_created_by_module IN VARCHAR2,
330: p_obj_source IN VARCHAR2 := null,
331: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
332: x_return_status OUT NOCOPY VARCHAR2,
333: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
334: x_return_obj OUT NOCOPY HZ_ORG_CUST_BO,
335: x_organization_id OUT NOCOPY NUMBER
339: l_oc_obj HZ_ORG_CUST_BO;
340: BEGIN
341: l_oc_obj := p_org_cust_obj;
342: do_create_org_cust_bo(
343: p_init_msg_list => fnd_api.g_true,
344: p_validate_bo_flag => p_validate_bo_flag,
345: p_org_cust_obj => l_oc_obj,
346: p_created_by_module => p_created_by_module,
347: p_obj_source => p_obj_source,
353: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
354: x_return_status => x_return_status,
355: x_msg_count => l_msg_count,
356: x_msg_data => l_msg_data);
357: IF FND_API.to_Boolean(p_return_obj_flag) THEN
358: x_return_obj := l_oc_obj;
359: END IF;
360: END create_org_cust_bo;
361:
363: --
364: -- DESCRIPTION
365: -- Update org customer account.
366: PROCEDURE do_update_org_cust_bo(
367: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
368: p_org_cust_obj IN OUT NOCOPY HZ_ORG_CUST_BO,
369: p_created_by_module IN VARCHAR2,
370: p_obj_source IN VARCHAR2 := null,
371: x_return_status OUT NOCOPY VARCHAR2,
385: -- Standard start of API savepoint
386: SAVEPOINT do_update_org_cust_bo_pub;
387:
388: -- initialize API return status to success.
389: x_return_status := FND_API.G_RET_STS_SUCCESS;
390:
391: -- Initialize message list if p_init_msg_list is set to TRUE
392: IF FND_API.to_Boolean(p_init_msg_list) THEN
393: FND_MSG_PUB.initialize;
388: -- initialize API return status to success.
389: x_return_status := FND_API.G_RET_STS_SUCCESS;
390:
391: -- Initialize message list if p_init_msg_list is set to TRUE
392: IF FND_API.to_Boolean(p_init_msg_list) THEN
393: FND_MSG_PUB.initialize;
394: END IF;
395:
396: -- Debug info.
422: x_return_status => x_return_status,
423: x_msg_count => x_msg_count,
424: x_msg_data => x_msg_data);
425:
426: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
427: RAISE FND_API.G_EXC_ERROR;
428: END IF;
429:
430: -- get organization_id and then call
423: x_msg_count => x_msg_count,
424: x_msg_data => x_msg_data);
425:
426: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
427: RAISE FND_API.G_EXC_ERROR;
428: END IF;
429:
430: -- get organization_id and then call
431: l_org_raise_event := HZ_PARTY_BO_PVT.is_raising_update_event(
456: HZ_PARTY_BO_PVT.G_CALL_UPDATE_CUST_BO := 'Y';
457: l_cbm := HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE;
458:
459: HZ_ORGANIZATION_BO_PUB.do_update_organization_bo(
460: p_init_msg_list => fnd_api.g_false,
461: p_organization_obj => p_org_cust_obj.organization_obj,
462: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
463: p_obj_source => p_obj_source,
464: x_return_status => x_return_status,
468: x_organization_os => l_organization_os,
469: x_organization_osr => l_organization_osr
470: );
471:
472: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
473: RAISE FND_API.G_EXC_ERROR;
474: END IF;
475:
476: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
469: x_organization_osr => l_organization_osr
470: );
471:
472: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
473: RAISE FND_API.G_EXC_ERROR;
474: END IF;
475:
476: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
477:
488: p_parent_osr => l_organization_osr,
489: p_parent_obj_type => 'ORG'
490: );
491:
492: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
493: RAISE fnd_api.g_exc_error;
494: END IF;
495: END IF;
496:
489: p_parent_obj_type => 'ORG'
490: );
491:
492: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
493: RAISE fnd_api.g_exc_error;
494: END IF;
495: END IF;
496:
497: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
537: p_msg_level=>fnd_log.level_procedure);
538: END IF;
539:
540: EXCEPTION
541: WHEN fnd_api.g_exc_error THEN
542: ROLLBACK TO do_update_org_cust_bo_pub;
543:
544: -- reset Global variable
545: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
549: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
550: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
551: FND_MSG_PUB.ADD;
552:
553: x_return_status := fnd_api.g_ret_sts_error;
554:
555: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
556: p_count => x_msg_count,
557: p_data => x_msg_data);
551: FND_MSG_PUB.ADD;
552:
553: x_return_status := fnd_api.g_ret_sts_error;
554:
555: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
556: p_count => x_msg_count,
557: p_data => x_msg_data);
558:
559: -- Debug info.
568: p_prefix=>l_debug_prefix,
569: p_msg_level=>fnd_log.level_procedure);
570: END IF;
571:
572: WHEN fnd_api.g_exc_unexpected_error THEN
573: ROLLBACK TO do_update_org_cust_bo_pub;
574:
575: -- reset Global variable
576: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
580: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
581: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
582: FND_MSG_PUB.ADD;
583:
584: x_return_status := fnd_api.g_ret_sts_unexp_error;
585:
586: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
587: p_count => x_msg_count,
588: p_data => x_msg_data);
582: FND_MSG_PUB.ADD;
583:
584: x_return_status := fnd_api.g_ret_sts_unexp_error;
585:
586: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
587: p_count => x_msg_count,
588: p_data => x_msg_data);
589:
590: -- Debug info.
611: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
612: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
613: FND_MSG_PUB.ADD;
614:
615: x_return_status := fnd_api.g_ret_sts_unexp_error;
616:
617: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
618: fnd_message.set_token('ERROR' ,SQLERRM);
619: fnd_msg_pub.add;
617: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
618: fnd_message.set_token('ERROR' ,SQLERRM);
619: fnd_msg_pub.add;
620:
621: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
622: p_count => x_msg_count,
623: p_data => x_msg_data);
624:
625: -- Debug info.
636: END IF;
637: END do_update_org_cust_bo;
638:
639: PROCEDURE update_org_cust_bo(
640: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
641: p_org_cust_obj IN HZ_ORG_CUST_BO,
642: p_created_by_module IN VARCHAR2,
643: x_return_status OUT NOCOPY VARCHAR2,
644: x_msg_count OUT NOCOPY NUMBER,
663: PROCEDURE update_org_cust_bo(
664: p_org_cust_obj IN HZ_ORG_CUST_BO,
665: p_created_by_module IN VARCHAR2,
666: p_obj_source IN VARCHAR2 := null,
667: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
668: x_return_status OUT NOCOPY VARCHAR2,
669: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
670: x_return_obj OUT NOCOPY HZ_ORG_CUST_BO,
671: x_organization_id OUT NOCOPY NUMBER
675: l_oc_obj HZ_ORG_CUST_BO;
676: BEGIN
677: l_oc_obj := p_org_cust_obj;
678: do_update_org_cust_bo(
679: p_init_msg_list => fnd_api.g_true,
680: p_org_cust_obj => l_oc_obj,
681: p_created_by_module => p_created_by_module,
682: p_obj_source => p_obj_source,
683: x_return_status => x_return_status,
688: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
689: x_return_status => x_return_status,
690: x_msg_count => l_msg_count,
691: x_msg_data => l_msg_data);
692: IF FND_API.to_Boolean(p_return_obj_flag) THEN
693: x_return_obj := l_oc_obj;
694: END IF;
695: END update_org_cust_bo;
696:
698: --
699: -- DESCRIPTION
700: -- Create or update org customer account.
701: PROCEDURE do_save_org_cust_bo(
702: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
703: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
704: p_org_cust_obj IN OUT NOCOPY HZ_ORG_CUST_BO,
705: p_created_by_module IN VARCHAR2,
706: p_obj_source IN VARCHAR2 := null,
699: -- DESCRIPTION
700: -- Create or update org customer account.
701: PROCEDURE do_save_org_cust_bo(
702: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
703: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
704: p_org_cust_obj IN OUT NOCOPY HZ_ORG_CUST_BO,
705: p_created_by_module IN VARCHAR2,
706: p_obj_source IN VARCHAR2 := null,
707: x_return_status OUT NOCOPY VARCHAR2,
715: l_debug_prefix VARCHAR2(30) := '';
716: l_create_update_flag VARCHAR2(1);
717: BEGIN
718: -- initialize API return status to success.
719: x_return_status := FND_API.G_RET_STS_SUCCESS;
720:
721: -- Initialize message list if p_init_msg_list is set to TRUE
722: IF FND_API.to_Boolean(p_init_msg_list) THEN
723: FND_MSG_PUB.initialize;
718: -- initialize API return status to success.
719: x_return_status := FND_API.G_RET_STS_SUCCESS;
720:
721: -- Initialize message list if p_init_msg_list is set to TRUE
722: IF FND_API.to_Boolean(p_init_msg_list) THEN
723: FND_MSG_PUB.initialize;
724: END IF;
725:
726: -- Debug info.
749: FND_MSG_PUB.ADD;
750: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
751: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
752: FND_MSG_PUB.ADD;
753: RAISE FND_API.G_EXC_ERROR;
754: END IF;
755:
756: IF(l_create_update_flag = 'C') THEN
757: do_create_org_cust_bo(
754: END IF;
755:
756: IF(l_create_update_flag = 'C') THEN
757: do_create_org_cust_bo(
758: p_init_msg_list => fnd_api.g_false,
759: p_validate_bo_flag => p_validate_bo_flag,
760: p_org_cust_obj => p_org_cust_obj,
761: p_created_by_module => p_created_by_module,
762: x_return_status => x_return_status,
765: x_organization_id => x_organization_id
766: );
767: ELSIF(l_create_update_flag = 'U') THEN
768: do_update_org_cust_bo(
769: p_init_msg_list => fnd_api.g_false,
770: p_org_cust_obj => p_org_cust_obj,
771: p_created_by_module => p_created_by_module,
772: x_return_status => x_return_status,
773: x_msg_count => x_msg_count,
774: x_msg_data => x_msg_data,
775: x_organization_id => x_organization_id
776: );
777: ELSE
778: RAISE FND_API.G_EXC_ERROR;
779: END IF;
780:
781: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
782: RAISE fnd_api.g_exc_error;
777: ELSE
778: RAISE FND_API.G_EXC_ERROR;
779: END IF;
780:
781: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
782: RAISE fnd_api.g_exc_error;
783: END IF;
784:
785: -- Debug info.
778: RAISE FND_API.G_EXC_ERROR;
779: END IF;
780:
781: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
782: RAISE fnd_api.g_exc_error;
783: END IF;
784:
785: -- Debug info.
786: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
795: p_msg_level=>fnd_log.level_procedure);
796: END IF;
797:
798: EXCEPTION
799: WHEN fnd_api.g_exc_error THEN
800: x_return_status := fnd_api.g_ret_sts_error;
801:
802: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
803: p_count => x_msg_count,
796: END IF;
797:
798: EXCEPTION
799: WHEN fnd_api.g_exc_error THEN
800: x_return_status := fnd_api.g_ret_sts_error;
801:
802: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
803: p_count => x_msg_count,
804: p_data => x_msg_data);
798: EXCEPTION
799: WHEN fnd_api.g_exc_error THEN
800: x_return_status := fnd_api.g_ret_sts_error;
801:
802: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
803: p_count => x_msg_count,
804: p_data => x_msg_data);
805:
806: -- Debug info.
815: p_prefix=>l_debug_prefix,
816: p_msg_level=>fnd_log.level_procedure);
817: END IF;
818:
819: WHEN fnd_api.g_exc_unexpected_error THEN
820: x_return_status := fnd_api.g_ret_sts_unexp_error;
821:
822: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
823: p_count => x_msg_count,
816: p_msg_level=>fnd_log.level_procedure);
817: END IF;
818:
819: WHEN fnd_api.g_exc_unexpected_error THEN
820: x_return_status := fnd_api.g_ret_sts_unexp_error;
821:
822: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
823: p_count => x_msg_count,
824: p_data => x_msg_data);
818:
819: WHEN fnd_api.g_exc_unexpected_error THEN
820: x_return_status := fnd_api.g_ret_sts_unexp_error;
821:
822: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
823: p_count => x_msg_count,
824: p_data => x_msg_data);
825:
826: -- Debug info.
835: p_prefix=>l_debug_prefix,
836: p_msg_level=>fnd_log.level_procedure);
837: END IF;
838: WHEN OTHERS THEN
839: x_return_status := fnd_api.g_ret_sts_unexp_error;
840:
841: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
842: fnd_message.set_token('ERROR' ,SQLERRM);
843: fnd_msg_pub.add;
841: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
842: fnd_message.set_token('ERROR' ,SQLERRM);
843: fnd_msg_pub.add;
844:
845: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
846: p_count => x_msg_count,
847: p_data => x_msg_data);
848:
849: -- Debug info.
860: END IF;
861: END do_save_org_cust_bo;
862:
863: PROCEDURE save_org_cust_bo(
864: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
865: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
866: p_org_cust_obj IN HZ_ORG_CUST_BO,
867: p_created_by_module IN VARCHAR2,
868: x_return_status OUT NOCOPY VARCHAR2,
861: END do_save_org_cust_bo;
862:
863: PROCEDURE save_org_cust_bo(
864: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
865: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
866: p_org_cust_obj IN HZ_ORG_CUST_BO,
867: p_created_by_module IN VARCHAR2,
868: x_return_status OUT NOCOPY VARCHAR2,
869: x_msg_count OUT NOCOPY NUMBER,
886: );
887: END save_org_cust_bo;
888:
889: PROCEDURE save_org_cust_bo(
890: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
891: p_org_cust_obj IN HZ_ORG_CUST_BO,
892: p_created_by_module IN VARCHAR2,
893: p_obj_source IN VARCHAR2 := null,
894: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
890: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
891: p_org_cust_obj IN HZ_ORG_CUST_BO,
892: p_created_by_module IN VARCHAR2,
893: p_obj_source IN VARCHAR2 := null,
894: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
895: x_return_status OUT NOCOPY VARCHAR2,
896: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
897: x_return_obj OUT NOCOPY HZ_ORG_CUST_BO,
898: x_organization_id OUT NOCOPY NUMBER
902: l_oc_obj HZ_ORG_CUST_BO;
903: BEGIN
904: l_oc_obj := p_org_cust_obj;
905: do_save_org_cust_bo(
906: p_init_msg_list => fnd_api.g_true,
907: p_validate_bo_flag => p_validate_bo_flag,
908: p_org_cust_obj => l_oc_obj,
909: p_created_by_module => p_created_by_module,
910: p_obj_source => p_obj_source,
916: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
917: x_return_status => x_return_status,
918: x_msg_count => l_msg_count,
919: x_msg_data => l_msg_data);
920: IF FND_API.to_Boolean(p_return_obj_flag) THEN
921: x_return_obj := l_oc_obj;
922: END IF;
923: END save_org_cust_bo;
924:
934: -- ARGUMENTS
935: -- IN:
936: -- p_init_msg_list Initialize message stack if it is set to
937: -- p_organization_id Organization ID.
938: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
939: -- p_organization_os Organization orig system.
940: -- p_organization_osr Organization orig system reference.
941: -- OUT:
942: -- x_org_cust_obj Logical organization customer record.
940: -- p_organization_osr Organization orig system reference.
941: -- OUT:
942: -- x_org_cust_obj Logical organization customer record.
943: -- x_return_status Return status after the call. The status can
944: -- be fnd_api.g_ret_sts_success (success),
945: -- fnd_api.g_ret_sts_error (error),
946: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
947: -- x_msg_count Number of messages in message stack.
948: -- x_msg_data Message text if x_msg_count is 1.
941: -- OUT:
942: -- x_org_cust_obj Logical organization customer record.
943: -- x_return_status Return status after the call. The status can
944: -- be fnd_api.g_ret_sts_success (success),
945: -- fnd_api.g_ret_sts_error (error),
946: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
947: -- x_msg_count Number of messages in message stack.
948: -- x_msg_data Message text if x_msg_count is 1.
949: --
942: -- x_org_cust_obj Logical organization customer record.
943: -- x_return_status Return status after the call. The status can
944: -- be fnd_api.g_ret_sts_success (success),
945: -- fnd_api.g_ret_sts_error (error),
946: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
947: -- x_msg_count Number of messages in message stack.
948: -- x_msg_data Message text if x_msg_count is 1.
949: --
950: -- NOTES
975:
976:
977:
978: PROCEDURE get_org_cust_bo(
979: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
980: p_organization_id IN NUMBER,
981: p_organization_os IN VARCHAR2,
982: p_organization_osr IN VARCHAR2,
983: x_org_cust_obj OUT NOCOPY HZ_ORG_CUST_BO,
992: l_organization_osr varchar2(255);
993: BEGIN
994:
995: -- initialize API return status to success.
996: x_return_status := FND_API.G_RET_STS_SUCCESS;
997:
998: -- Initialize message list if p_init_msg_list is set to TRUE
999: IF FND_API.to_Boolean(p_init_msg_list) THEN
1000: FND_MSG_PUB.initialize;
995: -- initialize API return status to success.
996: x_return_status := FND_API.G_RET_STS_SUCCESS;
997:
998: -- Initialize message list if p_init_msg_list is set to TRUE
999: IF FND_API.to_Boolean(p_init_msg_list) THEN
1000: FND_MSG_PUB.initialize;
1001: END IF;
1002:
1003:
1023: x_return_status => x_return_status,
1024: x_msg_count => x_msg_count,
1025: x_msg_data => x_msg_data);
1026:
1027: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1028: RAISE fnd_api.g_exc_error;
1029: END IF;
1030:
1031: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_cust_bo(
1024: x_msg_count => x_msg_count,
1025: x_msg_data => x_msg_data);
1026:
1027: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1028: RAISE fnd_api.g_exc_error;
1029: END IF;
1030:
1031: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_cust_bo(
1032: p_init_msg_list => fnd_api.g_false,
1028: RAISE fnd_api.g_exc_error;
1029: END IF;
1030:
1031: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_cust_bo(
1032: p_init_msg_list => fnd_api.g_false,
1033: p_organization_id => l_organization_id,
1034: p_action_type => NULL,
1035: x_org_cust_obj => x_org_cust_obj,
1036: x_return_status => x_return_status,
1036: x_return_status => x_return_status,
1037: x_msg_count => x_msg_count,
1038: x_msg_data => x_msg_data);
1039:
1040: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1041: RAISE FND_API.G_EXC_ERROR;
1042: END IF;
1043:
1044:
1037: x_msg_count => x_msg_count,
1038: x_msg_data => x_msg_data);
1039:
1040: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1041: RAISE FND_API.G_EXC_ERROR;
1042: END IF;
1043:
1044:
1045: -- Debug info.
1059:
1060:
1061: EXCEPTION
1062:
1063: WHEN fnd_api.g_exc_error THEN
1064: x_return_status := fnd_api.g_ret_sts_error;
1065:
1066: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1067: p_count => x_msg_count,
1060:
1061: EXCEPTION
1062:
1063: WHEN fnd_api.g_exc_error THEN
1064: x_return_status := fnd_api.g_ret_sts_error;
1065:
1066: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1067: p_count => x_msg_count,
1068: p_data => x_msg_data);
1062:
1063: WHEN fnd_api.g_exc_error THEN
1064: x_return_status := fnd_api.g_ret_sts_error;
1065:
1066: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1067: p_count => x_msg_count,
1068: p_data => x_msg_data);
1069:
1070: -- Debug info.
1078: hz_utility_v2pub.debug(p_message=>'hz_org_cust_bo_pub.get_org_cust_bo (-)',
1079: p_prefix=>l_debug_prefix,
1080: p_msg_level=>fnd_log.level_procedure);
1081: END IF;
1082: WHEN fnd_api.g_exc_unexpected_error THEN
1083: x_return_status := fnd_api.g_ret_sts_unexp_error;
1084:
1085: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1086: p_count => x_msg_count,
1079: p_prefix=>l_debug_prefix,
1080: p_msg_level=>fnd_log.level_procedure);
1081: END IF;
1082: WHEN fnd_api.g_exc_unexpected_error THEN
1083: x_return_status := fnd_api.g_ret_sts_unexp_error;
1084:
1085: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1086: p_count => x_msg_count,
1087: p_data => x_msg_data);
1081: END IF;
1082: WHEN fnd_api.g_exc_unexpected_error THEN
1083: x_return_status := fnd_api.g_ret_sts_unexp_error;
1084:
1085: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1086: p_count => x_msg_count,
1087: p_data => x_msg_data);
1088:
1089: -- Debug info.
1098: p_prefix=>l_debug_prefix,
1099: p_msg_level=>fnd_log.level_procedure);
1100: END IF;
1101: WHEN OTHERS THEN
1102: x_return_status := fnd_api.g_ret_sts_unexp_error;
1103:
1104: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1105: fnd_message.set_token('ERROR' ,SQLERRM);
1106: fnd_msg_pub.add;
1104: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1105: fnd_message.set_token('ERROR' ,SQLERRM);
1106: fnd_msg_pub.add;
1107:
1108: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1109: p_count => x_msg_count,
1110: p_data => x_msg_data);
1111:
1112: -- Debug info.
1135: l_msg_data VARCHAR2(2000);
1136: l_msg_count NUMBER;
1137: BEGIN
1138: get_org_cust_bo(
1139: p_init_msg_list => fnd_api.g_true,
1140: p_organization_id => p_organization_id,
1141: p_organization_os => p_organization_os,
1142: p_organization_osr => p_organization_osr,
1143: x_org_cust_obj => x_org_cust_obj,
1167: -- ARGUMENTS
1168: -- IN:
1169: -- p_init_msg_list Initialize message stack if it is set to
1170: -- p_event_id BES Event identifier.
1171: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
1172: -- OUT:
1173: -- x_org_cust_objs One or more created logical organization customer.
1174: -- x_return_status Return status after the call. The status can
1175: -- be fnd_api.g_ret_sts_success (success),
1171: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
1172: -- OUT:
1173: -- x_org_cust_objs One or more created logical organization customer.
1174: -- x_return_status Return status after the call. The status can
1175: -- be fnd_api.g_ret_sts_success (success),
1176: -- fnd_api.g_ret_sts_error (error),
1177: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1178: -- x_msg_count Number of messages in message stack.
1179: -- x_msg_data Message text if x_msg_count is 1.
1172: -- OUT:
1173: -- x_org_cust_objs One or more created logical organization customer.
1174: -- x_return_status Return status after the call. The status can
1175: -- be fnd_api.g_ret_sts_success (success),
1176: -- fnd_api.g_ret_sts_error (error),
1177: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1178: -- x_msg_count Number of messages in message stack.
1179: -- x_msg_data Message text if x_msg_count is 1.
1180: --
1173: -- x_org_cust_objs One or more created logical organization customer.
1174: -- x_return_status Return status after the call. The status can
1175: -- be fnd_api.g_ret_sts_success (success),
1176: -- fnd_api.g_ret_sts_error (error),
1177: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1178: -- x_msg_count Number of messages in message stack.
1179: -- x_msg_data Message text if x_msg_count is 1.
1180: --
1181: -- NOTES
1201: */
1202:
1203:
1204: PROCEDURE get_org_custs_created(
1205: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1206: p_event_id IN NUMBER,
1207: x_org_cust_objs OUT NOCOPY HZ_ORG_CUST_BO_TBL,
1208: x_return_status OUT NOCOPY VARCHAR2,
1209: x_msg_count OUT NOCOPY NUMBER,
1212: l_debug_prefix VARCHAR2(30) := '';
1213: begin
1214:
1215: -- initialize API return status to success.
1216: x_return_status := FND_API.G_RET_STS_SUCCESS;
1217:
1218: -- Initialize message list if p_init_msg_list is set to TRUE
1219: IF FND_API.to_Boolean(p_init_msg_list) THEN
1220: FND_MSG_PUB.initialize;
1215: -- initialize API return status to success.
1216: x_return_status := FND_API.G_RET_STS_SUCCESS;
1217:
1218: -- Initialize message list if p_init_msg_list is set to TRUE
1219: IF FND_API.to_Boolean(p_init_msg_list) THEN
1220: FND_MSG_PUB.initialize;
1221: END IF;
1222:
1223:
1233: p_event_type => 'C',
1234: p_bo_code => 'ORG_CUST',
1235: x_return_status => x_return_status);
1236:
1237: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1238: RAISE FND_API.G_EXC_ERROR;
1239: END IF;
1240:
1241: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_custs_created(
1234: p_bo_code => 'ORG_CUST',
1235: x_return_status => x_return_status);
1236:
1237: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1238: RAISE FND_API.G_EXC_ERROR;
1239: END IF;
1240:
1241: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_custs_created(
1242: p_init_msg_list => fnd_api.g_false,
1238: RAISE FND_API.G_EXC_ERROR;
1239: END IF;
1240:
1241: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_custs_created(
1242: p_init_msg_list => fnd_api.g_false,
1243: p_event_id => p_event_id,
1244: x_org_cust_objs => x_org_cust_objs,
1245: x_return_status => x_return_status,
1246: x_msg_count => x_msg_count,
1245: x_return_status => x_return_status,
1246: x_msg_count => x_msg_count,
1247: x_msg_data => x_msg_data);
1248:
1249: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1250: RAISE FND_API.G_EXC_ERROR;
1251: END IF;
1252:
1253:
1246: x_msg_count => x_msg_count,
1247: x_msg_data => x_msg_data);
1248:
1249: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1250: RAISE FND_API.G_EXC_ERROR;
1251: END IF;
1252:
1253:
1254:
1269:
1270:
1271: EXCEPTION
1272:
1273: WHEN fnd_api.g_exc_error THEN
1274: x_return_status := fnd_api.g_ret_sts_error;
1275:
1276: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1277: p_count => x_msg_count,
1270:
1271: EXCEPTION
1272:
1273: WHEN fnd_api.g_exc_error THEN
1274: x_return_status := fnd_api.g_ret_sts_error;
1275:
1276: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1277: p_count => x_msg_count,
1278: p_data => x_msg_data);
1272:
1273: WHEN fnd_api.g_exc_error THEN
1274: x_return_status := fnd_api.g_ret_sts_error;
1275:
1276: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1277: p_count => x_msg_count,
1278: p_data => x_msg_data);
1279:
1280: -- Debug info.
1288: hz_utility_v2pub.debug(p_message=>'hz_org_cust_bo_pub.get_org_custs_created(-)',
1289: p_prefix=>l_debug_prefix,
1290: p_msg_level=>fnd_log.level_procedure);
1291: END IF;
1292: WHEN fnd_api.g_exc_unexpected_error THEN
1293: x_return_status := fnd_api.g_ret_sts_unexp_error;
1294:
1295: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1296: p_count => x_msg_count,
1289: p_prefix=>l_debug_prefix,
1290: p_msg_level=>fnd_log.level_procedure);
1291: END IF;
1292: WHEN fnd_api.g_exc_unexpected_error THEN
1293: x_return_status := fnd_api.g_ret_sts_unexp_error;
1294:
1295: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1296: p_count => x_msg_count,
1297: p_data => x_msg_data);
1291: END IF;
1292: WHEN fnd_api.g_exc_unexpected_error THEN
1293: x_return_status := fnd_api.g_ret_sts_unexp_error;
1294:
1295: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1296: p_count => x_msg_count,
1297: p_data => x_msg_data);
1298:
1299: -- Debug info.
1308: p_prefix=>l_debug_prefix,
1309: p_msg_level=>fnd_log.level_procedure);
1310: END IF;
1311: WHEN OTHERS THEN
1312: x_return_status := fnd_api.g_ret_sts_unexp_error;
1313:
1314: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1315: fnd_message.set_token('ERROR' ,SQLERRM);
1316: fnd_msg_pub.add;
1314: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1315: fnd_message.set_token('ERROR' ,SQLERRM);
1316: fnd_msg_pub.add;
1317:
1318: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1319: p_count => x_msg_count,
1320: p_data => x_msg_data);
1321:
1322: -- Debug info.
1343: l_msg_data VARCHAR2(2000);
1344: l_msg_count NUMBER;
1345: BEGIN
1346: get_org_custs_created(
1347: p_init_msg_list => fnd_api.g_true,
1348: p_event_id => p_event_id,
1349: x_org_cust_objs => x_org_cust_objs,
1350: x_return_status => x_return_status,
1351: x_msg_count => l_msg_count,
1377: -- ARGUMENTS
1378: -- IN:
1379: -- p_init_msg_list Initialize message stack if it is set to
1380: -- p_event_id BES Event identifier.
1381: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
1382: -- OUT:
1383: -- x_org_cust_objs One or more created logical org.
1384: -- x_return_status Return status after the call. The status can
1385: -- be fnd_api.g_ret_sts_success (success),
1381: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
1382: -- OUT:
1383: -- x_org_cust_objs One or more created logical org.
1384: -- x_return_status Return status after the call. The status can
1385: -- be fnd_api.g_ret_sts_success (success),
1386: -- fnd_api.g_ret_sts_error (error),
1387: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1388: -- x_msg_count Number of messages in message stack.
1389: -- x_msg_data Message text if x_msg_count is 1.
1382: -- OUT:
1383: -- x_org_cust_objs One or more created logical org.
1384: -- x_return_status Return status after the call. The status can
1385: -- be fnd_api.g_ret_sts_success (success),
1386: -- fnd_api.g_ret_sts_error (error),
1387: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1388: -- x_msg_count Number of messages in message stack.
1389: -- x_msg_data Message text if x_msg_count is 1.
1390: --
1383: -- x_org_cust_objs One or more created logical org.
1384: -- x_return_status Return status after the call. The status can
1385: -- be fnd_api.g_ret_sts_success (success),
1386: -- fnd_api.g_ret_sts_error (error),
1387: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1388: -- x_msg_count Number of messages in message stack.
1389: -- x_msg_data Message text if x_msg_count is 1.
1390: --
1391: -- NOTES
1407: them to the caller.
1408: */
1409:
1410: PROCEDURE get_org_custs_updated(
1411: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1412: p_event_id IN NUMBER,
1413: x_org_cust_objs OUT NOCOPY HZ_ORG_CUST_BO_TBL,
1414: x_return_status OUT NOCOPY VARCHAR2,
1415: x_msg_count OUT NOCOPY NUMBER,
1419: l_debug_prefix VARCHAR2(30) := '';
1420: begin
1421:
1422: -- initialize API return status to success.
1423: x_return_status := FND_API.G_RET_STS_SUCCESS;
1424:
1425: -- Initialize message list if p_init_msg_list is set to TRUE
1426: IF FND_API.to_Boolean(p_init_msg_list) THEN
1427: FND_MSG_PUB.initialize;
1422: -- initialize API return status to success.
1423: x_return_status := FND_API.G_RET_STS_SUCCESS;
1424:
1425: -- Initialize message list if p_init_msg_list is set to TRUE
1426: IF FND_API.to_Boolean(p_init_msg_list) THEN
1427: FND_MSG_PUB.initialize;
1428: END IF;
1429:
1430:
1440: p_event_type => 'U',
1441: p_bo_code => 'ORG_CUST',
1442: x_return_status => x_return_status);
1443:
1444: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1445: RAISE FND_API.G_EXC_ERROR;
1446: END IF;
1447:
1448: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_custs_updated(
1441: p_bo_code => 'ORG_CUST',
1442: x_return_status => x_return_status);
1443:
1444: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1445: RAISE FND_API.G_EXC_ERROR;
1446: END IF;
1447:
1448: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_custs_updated(
1449: p_init_msg_list => fnd_api.g_false,
1445: RAISE FND_API.G_EXC_ERROR;
1446: END IF;
1447:
1448: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_custs_updated(
1449: p_init_msg_list => fnd_api.g_false,
1450: p_event_id => p_event_id,
1451: x_org_cust_objs => x_org_cust_objs,
1452: x_return_status => x_return_status,
1453: x_msg_count => x_msg_count,
1452: x_return_status => x_return_status,
1453: x_msg_count => x_msg_count,
1454: x_msg_data => x_msg_data);
1455:
1456: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1457: RAISE FND_API.G_EXC_ERROR;
1458: END IF;
1459:
1460:
1453: x_msg_count => x_msg_count,
1454: x_msg_data => x_msg_data);
1455:
1456: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1457: RAISE FND_API.G_EXC_ERROR;
1458: END IF;
1459:
1460:
1461:
1476:
1477:
1478: EXCEPTION
1479:
1480: WHEN fnd_api.g_exc_error THEN
1481: x_return_status := fnd_api.g_ret_sts_error;
1482:
1483: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1484: p_count => x_msg_count,
1477:
1478: EXCEPTION
1479:
1480: WHEN fnd_api.g_exc_error THEN
1481: x_return_status := fnd_api.g_ret_sts_error;
1482:
1483: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1484: p_count => x_msg_count,
1485: p_data => x_msg_data);
1479:
1480: WHEN fnd_api.g_exc_error THEN
1481: x_return_status := fnd_api.g_ret_sts_error;
1482:
1483: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1484: p_count => x_msg_count,
1485: p_data => x_msg_data);
1486:
1487: -- Debug info.
1495: hz_utility_v2pub.debug(p_message=>'hz_org_cust_bo_pub.get_org_custs_updated(-)',
1496: p_prefix=>l_debug_prefix,
1497: p_msg_level=>fnd_log.level_procedure);
1498: END IF;
1499: WHEN fnd_api.g_exc_unexpected_error THEN
1500: x_return_status := fnd_api.g_ret_sts_unexp_error;
1501:
1502: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1503: p_count => x_msg_count,
1496: p_prefix=>l_debug_prefix,
1497: p_msg_level=>fnd_log.level_procedure);
1498: END IF;
1499: WHEN fnd_api.g_exc_unexpected_error THEN
1500: x_return_status := fnd_api.g_ret_sts_unexp_error;
1501:
1502: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1503: p_count => x_msg_count,
1504: p_data => x_msg_data);
1498: END IF;
1499: WHEN fnd_api.g_exc_unexpected_error THEN
1500: x_return_status := fnd_api.g_ret_sts_unexp_error;
1501:
1502: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1503: p_count => x_msg_count,
1504: p_data => x_msg_data);
1505:
1506: -- Debug info.
1515: p_prefix=>l_debug_prefix,
1516: p_msg_level=>fnd_log.level_procedure);
1517: END IF;
1518: WHEN OTHERS THEN
1519: x_return_status := fnd_api.g_ret_sts_unexp_error;
1520:
1521: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1522: fnd_message.set_token('ERROR' ,SQLERRM);
1523: fnd_msg_pub.add;
1521: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1522: fnd_message.set_token('ERROR' ,SQLERRM);
1523: fnd_msg_pub.add;
1524:
1525: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1526: p_count => x_msg_count,
1527: p_data => x_msg_data);
1528:
1529: -- Debug info.
1550: l_msg_data VARCHAR2(2000);
1551: l_msg_count NUMBER;
1552: BEGIN
1553: get_org_custs_updated(
1554: p_init_msg_list => fnd_api.g_true,
1555: p_event_id => p_event_id,
1556: x_org_cust_objs => x_org_cust_objs,
1557: x_return_status => x_return_status,
1558: x_msg_count => l_msg_count,
1566:
1567:
1568:
1569: PROCEDURE get_org_cust_updated(
1570: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1571: p_event_id IN NUMBER,
1572: p_org_cust_id IN NUMBER,
1573: x_org_cust_obj OUT NOCOPY HZ_ORG_CUST_BO,
1574: x_return_status OUT NOCOPY VARCHAR2,
1578: l_debug_prefix VARCHAR2(30) := '';
1579: begin
1580:
1581: -- initialize API return status to success.
1582: x_return_status := FND_API.G_RET_STS_SUCCESS;
1583:
1584: -- Initialize message list if p_init_msg_list is set to TRUE
1585: IF FND_API.to_Boolean(p_init_msg_list) THEN
1586: FND_MSG_PUB.initialize;
1581: -- initialize API return status to success.
1582: x_return_status := FND_API.G_RET_STS_SUCCESS;
1583:
1584: -- Initialize message list if p_init_msg_list is set to TRUE
1585: IF FND_API.to_Boolean(p_init_msg_list) THEN
1586: FND_MSG_PUB.initialize;
1587: END IF;
1588:
1589:
1599: p_event_type => 'U',
1600: p_bo_code => 'ORG_CUST',
1601: x_return_status => x_return_status);
1602:
1603: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1604: RAISE FND_API.G_EXC_ERROR;
1605: END IF;
1606:
1607: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_cust_updated(
1600: p_bo_code => 'ORG_CUST',
1601: x_return_status => x_return_status);
1602:
1603: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1604: RAISE FND_API.G_EXC_ERROR;
1605: END IF;
1606:
1607: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_cust_updated(
1608: p_init_msg_list => fnd_api.g_false,
1604: RAISE FND_API.G_EXC_ERROR;
1605: END IF;
1606:
1607: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_cust_updated(
1608: p_init_msg_list => fnd_api.g_false,
1609: p_event_id => p_event_id,
1610: p_org_cust_id => p_org_cust_id,
1611: x_org_cust_obj => x_org_cust_obj,
1612: x_return_status => x_return_status,
1612: x_return_status => x_return_status,
1613: x_msg_count => x_msg_count,
1614: x_msg_data => x_msg_data);
1615:
1616: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1617: RAISE FND_API.G_EXC_ERROR;
1618: END IF;
1619:
1620:
1613: x_msg_count => x_msg_count,
1614: x_msg_data => x_msg_data);
1615:
1616: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1617: RAISE FND_API.G_EXC_ERROR;
1618: END IF;
1619:
1620:
1621:
1636:
1637:
1638: EXCEPTION
1639:
1640: WHEN fnd_api.g_exc_error THEN
1641: x_return_status := fnd_api.g_ret_sts_error;
1642:
1643: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1644: p_count => x_msg_count,
1637:
1638: EXCEPTION
1639:
1640: WHEN fnd_api.g_exc_error THEN
1641: x_return_status := fnd_api.g_ret_sts_error;
1642:
1643: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1644: p_count => x_msg_count,
1645: p_data => x_msg_data);
1639:
1640: WHEN fnd_api.g_exc_error THEN
1641: x_return_status := fnd_api.g_ret_sts_error;
1642:
1643: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1644: p_count => x_msg_count,
1645: p_data => x_msg_data);
1646:
1647: -- Debug info.
1655: hz_utility_v2pub.debug(p_message=>'hz_org_cust_bo_pub.get_org_cust_updated(-)',
1656: p_prefix=>l_debug_prefix,
1657: p_msg_level=>fnd_log.level_procedure);
1658: END IF;
1659: WHEN fnd_api.g_exc_unexpected_error THEN
1660: x_return_status := fnd_api.g_ret_sts_unexp_error;
1661:
1662: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1663: p_count => x_msg_count,
1656: p_prefix=>l_debug_prefix,
1657: p_msg_level=>fnd_log.level_procedure);
1658: END IF;
1659: WHEN fnd_api.g_exc_unexpected_error THEN
1660: x_return_status := fnd_api.g_ret_sts_unexp_error;
1661:
1662: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1663: p_count => x_msg_count,
1664: p_data => x_msg_data);
1658: END IF;
1659: WHEN fnd_api.g_exc_unexpected_error THEN
1660: x_return_status := fnd_api.g_ret_sts_unexp_error;
1661:
1662: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1663: p_count => x_msg_count,
1664: p_data => x_msg_data);
1665:
1666: -- Debug info.
1675: p_prefix=>l_debug_prefix,
1676: p_msg_level=>fnd_log.level_procedure);
1677: END IF;
1678: WHEN OTHERS THEN
1679: x_return_status := fnd_api.g_ret_sts_unexp_error;
1680:
1681: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1682: fnd_message.set_token('ERROR' ,SQLERRM);
1683: fnd_msg_pub.add;
1681: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1682: fnd_message.set_token('ERROR' ,SQLERRM);
1683: fnd_msg_pub.add;
1684:
1685: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1686: p_count => x_msg_count,
1687: p_data => x_msg_data);
1688:
1689: -- Debug info.
1711: l_msg_data VARCHAR2(2000);
1712: l_msg_count NUMBER;
1713: BEGIN
1714: get_org_cust_updated(
1715: p_init_msg_list => fnd_api.g_false,
1716: p_event_id => p_event_id,
1717: p_org_cust_id => p_org_cust_id,
1718: x_org_cust_obj => x_org_cust_obj,
1719: x_return_status => x_return_status,
1727: END get_org_cust_updated;
1728:
1729: -- get TCA identifiers for create event
1730: PROCEDURE get_ids_org_custs_created (
1731: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1732: p_event_id IN NUMBER,
1733: x_org_cust_ids OUT NOCOPY HZ_EXTRACT_BO_UTIL_PVT.BO_ID_TBL,
1734: x_return_status OUT NOCOPY VARCHAR2,
1735: x_msg_count OUT NOCOPY NUMBER,
1739: l_debug_prefix VARCHAR2(30) := '';
1740:
1741: begin
1742: -- initialize API return status to success.
1743: x_return_status := FND_API.G_RET_STS_SUCCESS;
1744:
1745: -- Initialize message list if p_init_msg_list is set to TRUE
1746: IF FND_API.to_Boolean(p_init_msg_list) THEN
1747: FND_MSG_PUB.initialize;
1742: -- initialize API return status to success.
1743: x_return_status := FND_API.G_RET_STS_SUCCESS;
1744:
1745: -- Initialize message list if p_init_msg_list is set to TRUE
1746: IF FND_API.to_Boolean(p_init_msg_list) THEN
1747: FND_MSG_PUB.initialize;
1748: END IF;
1749:
1750:
1760: p_event_type => 'C',
1761: p_bo_code => 'ORG_CUST',
1762: x_return_status => x_return_status);
1763:
1764: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1765: RAISE FND_API.G_EXC_ERROR;
1766: END IF;
1767:
1768: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
1761: p_bo_code => 'ORG_CUST',
1762: x_return_status => x_return_status);
1763:
1764: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1765: RAISE FND_API.G_EXC_ERROR;
1766: END IF;
1767:
1768: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
1769: p_init_msg_list => fnd_api.g_false,
1765: RAISE FND_API.G_EXC_ERROR;
1766: END IF;
1767:
1768: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
1769: p_init_msg_list => fnd_api.g_false,
1770: p_event_id => p_event_id,
1771: x_obj_root_ids => x_org_cust_ids,
1772: x_return_status => x_return_status,
1773: x_msg_count => x_msg_count,
1772: x_return_status => x_return_status,
1773: x_msg_count => x_msg_count,
1774: x_msg_data => x_msg_data);
1775:
1776: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1777: RAISE FND_API.G_EXC_ERROR;
1778: END IF;
1779:
1780:
1773: x_msg_count => x_msg_count,
1774: x_msg_data => x_msg_data);
1775:
1776: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1777: RAISE FND_API.G_EXC_ERROR;
1778: END IF;
1779:
1780:
1781: -- Debug info.
1795:
1796:
1797: EXCEPTION
1798:
1799: WHEN fnd_api.g_exc_error THEN
1800: x_return_status := fnd_api.g_ret_sts_error;
1801:
1802: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1803: p_count => x_msg_count,
1796:
1797: EXCEPTION
1798:
1799: WHEN fnd_api.g_exc_error THEN
1800: x_return_status := fnd_api.g_ret_sts_error;
1801:
1802: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1803: p_count => x_msg_count,
1804: p_data => x_msg_data);
1798:
1799: WHEN fnd_api.g_exc_error THEN
1800: x_return_status := fnd_api.g_ret_sts_error;
1801:
1802: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1803: p_count => x_msg_count,
1804: p_data => x_msg_data);
1805:
1806: -- Debug info.
1814: hz_utility_v2pub.debug(p_message=>'get_ids_org_custs_created(-)',
1815: p_prefix=>l_debug_prefix,
1816: p_msg_level=>fnd_log.level_procedure);
1817: END IF;
1818: WHEN fnd_api.g_exc_unexpected_error THEN
1819: x_return_status := fnd_api.g_ret_sts_unexp_error;
1820:
1821: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1822: p_count => x_msg_count,
1815: p_prefix=>l_debug_prefix,
1816: p_msg_level=>fnd_log.level_procedure);
1817: END IF;
1818: WHEN fnd_api.g_exc_unexpected_error THEN
1819: x_return_status := fnd_api.g_ret_sts_unexp_error;
1820:
1821: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1822: p_count => x_msg_count,
1823: p_data => x_msg_data);
1817: END IF;
1818: WHEN fnd_api.g_exc_unexpected_error THEN
1819: x_return_status := fnd_api.g_ret_sts_unexp_error;
1820:
1821: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1822: p_count => x_msg_count,
1823: p_data => x_msg_data);
1824:
1825: -- Debug info.
1834: p_prefix=>l_debug_prefix,
1835: p_msg_level=>fnd_log.level_procedure);
1836: END IF;
1837: WHEN OTHERS THEN
1838: x_return_status := fnd_api.g_ret_sts_unexp_error;
1839:
1840: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1841: fnd_message.set_token('ERROR' ,SQLERRM);
1842: fnd_msg_pub.add;
1840: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1841: fnd_message.set_token('ERROR' ,SQLERRM);
1842: fnd_msg_pub.add;
1843:
1844: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1845: p_count => x_msg_count,
1846: p_data => x_msg_data);
1847:
1848: -- Debug info.
1862:
1863:
1864: -- get TCA identifiers for update event
1865: PROCEDURE get_ids_org_custs_updated (
1866: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1867: p_event_id IN NUMBER,
1868: x_org_cust_ids OUT NOCOPY HZ_EXTRACT_BO_UTIL_PVT.BO_ID_TBL,
1869: x_return_status OUT NOCOPY VARCHAR2,
1870: x_msg_count OUT NOCOPY NUMBER,
1873: l_debug_prefix VARCHAR2(30) := '';
1874:
1875: begin
1876: -- initialize API return status to success.
1877: x_return_status := FND_API.G_RET_STS_SUCCESS;
1878:
1879: -- Initialize message list if p_init_msg_list is set to TRUE
1880: IF FND_API.to_Boolean(p_init_msg_list) THEN
1881: FND_MSG_PUB.initialize;
1876: -- initialize API return status to success.
1877: x_return_status := FND_API.G_RET_STS_SUCCESS;
1878:
1879: -- Initialize message list if p_init_msg_list is set to TRUE
1880: IF FND_API.to_Boolean(p_init_msg_list) THEN
1881: FND_MSG_PUB.initialize;
1882: END IF;
1883:
1884:
1894: p_event_type => 'U',
1895: p_bo_code => 'ORG_CUST',
1896: x_return_status => x_return_status);
1897:
1898: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1899: RAISE FND_API.G_EXC_ERROR;
1900: END IF;
1901:
1902:
1895: p_bo_code => 'ORG_CUST',
1896: x_return_status => x_return_status);
1897:
1898: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1899: RAISE FND_API.G_EXC_ERROR;
1900: END IF;
1901:
1902:
1903: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
1900: END IF;
1901:
1902:
1903: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
1904: p_init_msg_list => fnd_api.g_false,
1905: p_event_id => p_event_id,
1906: x_obj_root_ids => x_org_cust_ids,
1907: x_return_status => x_return_status,
1908: x_msg_count => x_msg_count,
1907: x_return_status => x_return_status,
1908: x_msg_count => x_msg_count,
1909: x_msg_data => x_msg_data);
1910:
1911: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1912: RAISE FND_API.G_EXC_ERROR;
1913: END IF;
1914:
1915:
1908: x_msg_count => x_msg_count,
1909: x_msg_data => x_msg_data);
1910:
1911: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1912: RAISE FND_API.G_EXC_ERROR;
1913: END IF;
1914:
1915:
1916: -- Debug info.
1930:
1931:
1932: EXCEPTION
1933:
1934: WHEN fnd_api.g_exc_error THEN
1935: x_return_status := fnd_api.g_ret_sts_error;
1936:
1937: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1938: p_count => x_msg_count,
1931:
1932: EXCEPTION
1933:
1934: WHEN fnd_api.g_exc_error THEN
1935: x_return_status := fnd_api.g_ret_sts_error;
1936:
1937: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1938: p_count => x_msg_count,
1939: p_data => x_msg_data);
1933:
1934: WHEN fnd_api.g_exc_error THEN
1935: x_return_status := fnd_api.g_ret_sts_error;
1936:
1937: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1938: p_count => x_msg_count,
1939: p_data => x_msg_data);
1940:
1941: -- Debug info.
1949: hz_utility_v2pub.debug(p_message=>'get_ids_org_custs_updated(-)',
1950: p_prefix=>l_debug_prefix,
1951: p_msg_level=>fnd_log.level_procedure);
1952: END IF;
1953: WHEN fnd_api.g_exc_unexpected_error THEN
1954: x_return_status := fnd_api.g_ret_sts_unexp_error;
1955:
1956: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1957: p_count => x_msg_count,
1950: p_prefix=>l_debug_prefix,
1951: p_msg_level=>fnd_log.level_procedure);
1952: END IF;
1953: WHEN fnd_api.g_exc_unexpected_error THEN
1954: x_return_status := fnd_api.g_ret_sts_unexp_error;
1955:
1956: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1957: p_count => x_msg_count,
1958: p_data => x_msg_data);
1952: END IF;
1953: WHEN fnd_api.g_exc_unexpected_error THEN
1954: x_return_status := fnd_api.g_ret_sts_unexp_error;
1955:
1956: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1957: p_count => x_msg_count,
1958: p_data => x_msg_data);
1959:
1960: -- Debug info.
1969: p_prefix=>l_debug_prefix,
1970: p_msg_level=>fnd_log.level_procedure);
1971: END IF;
1972: WHEN OTHERS THEN
1973: x_return_status := fnd_api.g_ret_sts_unexp_error;
1974:
1975: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1976: fnd_message.set_token('ERROR' ,SQLERRM);
1977: fnd_msg_pub.add;
1975: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1976: fnd_message.set_token('ERROR' ,SQLERRM);
1977: fnd_msg_pub.add;
1978:
1979: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1980: p_count => x_msg_count,
1981: p_data => x_msg_data);
1982:
1983: -- Debug info.
2000: --
2001: -- DESCRIPTION
2002: -- Create org customer account.
2003: PROCEDURE do_create_org_cust_v2_bo(
2004: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2005: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2006: p_org_cust_v2_obj IN OUT NOCOPY HZ_org_cust_v2_bo,
2007: p_created_by_module IN VARCHAR2,
2008: p_obj_source IN VARCHAR2 := null,
2001: -- DESCRIPTION
2002: -- Create org customer account.
2003: PROCEDURE do_create_org_cust_v2_bo(
2004: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2005: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2006: p_org_cust_v2_obj IN OUT NOCOPY HZ_org_cust_v2_bo,
2007: p_created_by_module IN VARCHAR2,
2008: p_obj_source IN VARCHAR2 := null,
2009: x_return_status OUT NOCOPY VARCHAR2,
2024: -- Standard start of API savepoint
2025: SAVEPOINT do_create_org_cust_v2_bo_pub;
2026:
2027: -- initialize API return status to success.
2028: x_return_status := FND_API.G_RET_STS_SUCCESS;
2029:
2030: -- Initialize message list if p_init_msg_list is set to TRUE
2031: IF FND_API.to_Boolean(p_init_msg_list) THEN
2032: FND_MSG_PUB.initialize;
2027: -- initialize API return status to success.
2028: x_return_status := FND_API.G_RET_STS_SUCCESS;
2029:
2030: -- Initialize message list if p_init_msg_list is set to TRUE
2031: IF FND_API.to_Boolean(p_init_msg_list) THEN
2032: FND_MSG_PUB.initialize;
2033: END IF;
2034:
2035: -- Debug info.
2039: p_msg_level=>fnd_log.level_procedure);
2040: END IF;
2041:
2042: -- Base on p_validate_bo_flag, check the completeness of business objects
2043: IF(p_validate_bo_flag = FND_API.G_TRUE) THEN
2044: HZ_REGISTRY_VALIDATE_BO_PVT.get_bus_obj_struct(
2045: p_bus_object_code => 'ORG_CUST',
2046: x_bus_object => l_bus_object
2047: );
2051: p_ca_v2_objs => p_org_cust_v2_obj.account_objs
2052: );
2053:
2054: IF NOT(l_valid_obj) THEN
2055: RAISE fnd_api.g_exc_error;
2056: END IF;
2057:
2058: -- find out if raise event at the end
2059: l_raise_event := HZ_PARTY_BO_PVT.is_raising_create_event(
2084:
2085: l_cbm := HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE;
2086:
2087: HZ_ORGANIZATION_BO_PUB.do_create_organization_bo(
2088: p_init_msg_list => fnd_api.g_false,
2089: p_validate_bo_flag => FND_API.G_FALSE,
2090: p_organization_obj => p_org_cust_v2_obj.organization_obj,
2091: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
2092: p_obj_source => p_obj_source,
2085: l_cbm := HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE;
2086:
2087: HZ_ORGANIZATION_BO_PUB.do_create_organization_bo(
2088: p_init_msg_list => fnd_api.g_false,
2089: p_validate_bo_flag => FND_API.G_FALSE,
2090: p_organization_obj => p_org_cust_v2_obj.organization_obj,
2091: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
2092: p_obj_source => p_obj_source,
2093: x_return_status => x_return_status,
2097: x_organization_os => l_organization_os,
2098: x_organization_osr => l_organization_osr
2099: );
2100:
2101: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2102: RAISE fnd_api.g_exc_error;
2103: END IF;
2104:
2105: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2098: x_organization_osr => l_organization_osr
2099: );
2100:
2101: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2102: RAISE fnd_api.g_exc_error;
2103: END IF;
2104:
2105: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2106:
2117: p_parent_osr => l_organization_osr,
2118: p_parent_obj_type => 'ORG'
2119: );
2120:
2121: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2122: RAISE fnd_api.g_exc_error;
2123: END IF;
2124: END IF;
2125:
2118: p_parent_obj_type => 'ORG'
2119: );
2120:
2121: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2122: RAISE fnd_api.g_exc_error;
2123: END IF;
2124: END IF;
2125:
2126: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2162: p_prefix=>l_debug_prefix,
2163: p_msg_level=>fnd_log.level_procedure);
2164: END IF;
2165: EXCEPTION
2166: WHEN fnd_api.g_exc_error THEN
2167: ROLLBACK TO do_create_org_cust_v2_bo_pub;
2168:
2169: -- reset Global variable
2170: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
2173: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2174: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
2175: FND_MSG_PUB.ADD;
2176:
2177: x_return_status := fnd_api.g_ret_sts_error;
2178:
2179: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2180: p_count => x_msg_count,
2181: p_data => x_msg_data);
2175: FND_MSG_PUB.ADD;
2176:
2177: x_return_status := fnd_api.g_ret_sts_error;
2178:
2179: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2180: p_count => x_msg_count,
2181: p_data => x_msg_data);
2182:
2183: -- Debug info.
2192: p_prefix=>l_debug_prefix,
2193: p_msg_level=>fnd_log.level_procedure);
2194: END IF;
2195:
2196: WHEN fnd_api.g_exc_unexpected_error THEN
2197: ROLLBACK TO do_create_org_cust_v2_bo_pub;
2198:
2199: -- reset Global variable
2200: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
2203: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2204: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
2205: FND_MSG_PUB.ADD;
2206:
2207: x_return_status := fnd_api.g_ret_sts_unexp_error;
2208:
2209: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2210: p_count => x_msg_count,
2211: p_data => x_msg_data);
2205: FND_MSG_PUB.ADD;
2206:
2207: x_return_status := fnd_api.g_ret_sts_unexp_error;
2208:
2209: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2210: p_count => x_msg_count,
2211: p_data => x_msg_data);
2212:
2213: -- Debug info.
2233: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2234: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
2235: FND_MSG_PUB.ADD;
2236:
2237: x_return_status := fnd_api.g_ret_sts_unexp_error;
2238:
2239: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2240: fnd_message.set_token('ERROR' ,SQLERRM);
2241: fnd_msg_pub.add;
2239: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2240: fnd_message.set_token('ERROR' ,SQLERRM);
2241: fnd_msg_pub.add;
2242:
2243: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2244: p_count => x_msg_count,
2245: p_data => x_msg_data);
2246:
2247: -- Debug info.
2259: END do_create_org_cust_v2_bo;
2260:
2261:
2262: PROCEDURE create_org_cust_v2_bo(
2263: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2264: p_org_cust_v2_obj IN HZ_org_cust_v2_bo,
2265: p_created_by_module IN VARCHAR2,
2266: p_obj_source IN VARCHAR2 := null,
2267: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2263: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2264: p_org_cust_v2_obj IN HZ_org_cust_v2_bo,
2265: p_created_by_module IN VARCHAR2,
2266: p_obj_source IN VARCHAR2 := null,
2267: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2268: x_return_status OUT NOCOPY VARCHAR2,
2269: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2270: x_return_obj OUT NOCOPY HZ_org_cust_v2_bo,
2271: x_organization_id OUT NOCOPY NUMBER
2275: l_oc_obj HZ_org_cust_v2_bo;
2276: BEGIN
2277: l_oc_obj := p_org_cust_v2_obj;
2278: do_create_org_cust_v2_bo(
2279: p_init_msg_list => fnd_api.g_true,
2280: p_validate_bo_flag => p_validate_bo_flag,
2281: p_org_cust_v2_obj => l_oc_obj,
2282: p_created_by_module => p_created_by_module,
2283: p_obj_source => p_obj_source,
2289: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2290: x_return_status => x_return_status,
2291: x_msg_count => l_msg_count,
2292: x_msg_data => l_msg_data);
2293: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2294: x_return_obj := l_oc_obj;
2295: END IF;
2296: END create_org_cust_v2_bo;
2297:
2299: --
2300: -- DESCRIPTION
2301: -- Update org customer account.
2302: PROCEDURE do_update_org_cust_v2_bo(
2303: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2304: p_org_cust_v2_obj IN OUT NOCOPY HZ_org_cust_v2_bo,
2305: p_created_by_module IN VARCHAR2,
2306: p_obj_source IN VARCHAR2 := null,
2307: x_return_status OUT NOCOPY VARCHAR2,
2321: -- Standard start of API savepoint
2322: SAVEPOINT do_update_org_cust_v2_bo_pub;
2323:
2324: -- initialize API return status to success.
2325: x_return_status := FND_API.G_RET_STS_SUCCESS;
2326:
2327: -- Initialize message list if p_init_msg_list is set to TRUE
2328: IF FND_API.to_Boolean(p_init_msg_list) THEN
2329: FND_MSG_PUB.initialize;
2324: -- initialize API return status to success.
2325: x_return_status := FND_API.G_RET_STS_SUCCESS;
2326:
2327: -- Initialize message list if p_init_msg_list is set to TRUE
2328: IF FND_API.to_Boolean(p_init_msg_list) THEN
2329: FND_MSG_PUB.initialize;
2330: END IF;
2331:
2332: -- Debug info.
2358: x_return_status => x_return_status,
2359: x_msg_count => x_msg_count,
2360: x_msg_data => x_msg_data);
2361:
2362: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2363: RAISE FND_API.G_EXC_ERROR;
2364: END IF;
2365:
2366: -- get organization_id and then call
2359: x_msg_count => x_msg_count,
2360: x_msg_data => x_msg_data);
2361:
2362: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2363: RAISE FND_API.G_EXC_ERROR;
2364: END IF;
2365:
2366: -- get organization_id and then call
2367: l_org_raise_event := HZ_PARTY_BO_PVT.is_raising_update_event(
2392: HZ_PARTY_BO_PVT.G_CALL_UPDATE_CUST_BO := 'Y';
2393: l_cbm := HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE;
2394:
2395: HZ_ORGANIZATION_BO_PUB.do_update_organization_bo(
2396: p_init_msg_list => fnd_api.g_false,
2397: p_organization_obj => p_org_cust_v2_obj.organization_obj,
2398: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
2399: p_obj_source => p_obj_source,
2400: x_return_status => x_return_status,
2404: x_organization_os => l_organization_os,
2405: x_organization_osr => l_organization_osr
2406: );
2407:
2408: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2409: RAISE FND_API.G_EXC_ERROR;
2410: END IF;
2411:
2412: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2405: x_organization_osr => l_organization_osr
2406: );
2407:
2408: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2409: RAISE FND_API.G_EXC_ERROR;
2410: END IF;
2411:
2412: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2413:
2424: p_parent_osr => l_organization_osr,
2425: p_parent_obj_type => 'ORG'
2426: );
2427:
2428: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2429: RAISE fnd_api.g_exc_error;
2430: END IF;
2431: END IF;
2432:
2425: p_parent_obj_type => 'ORG'
2426: );
2427:
2428: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2429: RAISE fnd_api.g_exc_error;
2430: END IF;
2431: END IF;
2432:
2433: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2473: p_msg_level=>fnd_log.level_procedure);
2474: END IF;
2475:
2476: EXCEPTION
2477: WHEN fnd_api.g_exc_error THEN
2478: ROLLBACK TO do_update_org_cust_v2_bo_pub;
2479:
2480: -- reset Global variable
2481: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
2485: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2486: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
2487: FND_MSG_PUB.ADD;
2488:
2489: x_return_status := fnd_api.g_ret_sts_error;
2490:
2491: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2492: p_count => x_msg_count,
2493: p_data => x_msg_data);
2487: FND_MSG_PUB.ADD;
2488:
2489: x_return_status := fnd_api.g_ret_sts_error;
2490:
2491: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2492: p_count => x_msg_count,
2493: p_data => x_msg_data);
2494:
2495: -- Debug info.
2504: p_prefix=>l_debug_prefix,
2505: p_msg_level=>fnd_log.level_procedure);
2506: END IF;
2507:
2508: WHEN fnd_api.g_exc_unexpected_error THEN
2509: ROLLBACK TO do_update_org_cust_v2_bo_pub;
2510:
2511: -- reset Global variable
2512: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
2516: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2517: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
2518: FND_MSG_PUB.ADD;
2519:
2520: x_return_status := fnd_api.g_ret_sts_unexp_error;
2521:
2522: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2523: p_count => x_msg_count,
2524: p_data => x_msg_data);
2518: FND_MSG_PUB.ADD;
2519:
2520: x_return_status := fnd_api.g_ret_sts_unexp_error;
2521:
2522: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2523: p_count => x_msg_count,
2524: p_data => x_msg_data);
2525:
2526: -- Debug info.
2547: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2548: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
2549: FND_MSG_PUB.ADD;
2550:
2551: x_return_status := fnd_api.g_ret_sts_unexp_error;
2552:
2553: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2554: fnd_message.set_token('ERROR' ,SQLERRM);
2555: fnd_msg_pub.add;
2553: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2554: fnd_message.set_token('ERROR' ,SQLERRM);
2555: fnd_msg_pub.add;
2556:
2557: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2558: p_count => x_msg_count,
2559: p_data => x_msg_data);
2560:
2561: -- Debug info.
2576: PROCEDURE update_org_cust_v2_bo(
2577: p_org_cust_v2_obj IN HZ_org_cust_v2_bo,
2578: p_created_by_module IN VARCHAR2,
2579: p_obj_source IN VARCHAR2 := null,
2580: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2581: x_return_status OUT NOCOPY VARCHAR2,
2582: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2583: x_return_obj OUT NOCOPY HZ_org_cust_v2_bo,
2584: x_organization_id OUT NOCOPY NUMBER
2588: l_oc_obj HZ_org_cust_v2_bo;
2589: BEGIN
2590: l_oc_obj := p_org_cust_v2_obj;
2591: do_update_org_cust_v2_bo(
2592: p_init_msg_list => fnd_api.g_true,
2593: p_org_cust_v2_obj => l_oc_obj,
2594: p_created_by_module => p_created_by_module,
2595: p_obj_source => p_obj_source,
2596: x_return_status => x_return_status,
2601: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2602: x_return_status => x_return_status,
2603: x_msg_count => l_msg_count,
2604: x_msg_data => l_msg_data);
2605: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2606: x_return_obj := l_oc_obj;
2607: END IF;
2608: END update_org_cust_v2_bo;
2609:
2611: --
2612: -- DESCRIPTION
2613: -- Create or update org customer account.
2614: PROCEDURE do_save_org_cust_v2_bo(
2615: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2616: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2617: p_org_cust_v2_obj IN OUT NOCOPY HZ_org_cust_v2_bo,
2618: p_created_by_module IN VARCHAR2,
2619: p_obj_source IN VARCHAR2 := null,
2612: -- DESCRIPTION
2613: -- Create or update org customer account.
2614: PROCEDURE do_save_org_cust_v2_bo(
2615: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2616: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2617: p_org_cust_v2_obj IN OUT NOCOPY HZ_org_cust_v2_bo,
2618: p_created_by_module IN VARCHAR2,
2619: p_obj_source IN VARCHAR2 := null,
2620: x_return_status OUT NOCOPY VARCHAR2,
2628: l_debug_prefix VARCHAR2(30) := '';
2629: l_create_update_flag VARCHAR2(1);
2630: BEGIN
2631: -- initialize API return status to success.
2632: x_return_status := FND_API.G_RET_STS_SUCCESS;
2633:
2634: -- Initialize message list if p_init_msg_list is set to TRUE
2635: IF FND_API.to_Boolean(p_init_msg_list) THEN
2636: FND_MSG_PUB.initialize;
2631: -- initialize API return status to success.
2632: x_return_status := FND_API.G_RET_STS_SUCCESS;
2633:
2634: -- Initialize message list if p_init_msg_list is set to TRUE
2635: IF FND_API.to_Boolean(p_init_msg_list) THEN
2636: FND_MSG_PUB.initialize;
2637: END IF;
2638:
2639: -- Debug info.
2662: FND_MSG_PUB.ADD;
2663: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2664: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG_CUST');
2665: FND_MSG_PUB.ADD;
2666: RAISE FND_API.G_EXC_ERROR;
2667: END IF;
2668:
2669: IF(l_create_update_flag = 'C') THEN
2670: do_create_org_cust_v2_bo(
2667: END IF;
2668:
2669: IF(l_create_update_flag = 'C') THEN
2670: do_create_org_cust_v2_bo(
2671: p_init_msg_list => fnd_api.g_false,
2672: p_validate_bo_flag => p_validate_bo_flag,
2673: p_org_cust_v2_obj => p_org_cust_v2_obj,
2674: p_created_by_module => p_created_by_module,
2675: x_return_status => x_return_status,
2678: x_organization_id => x_organization_id
2679: );
2680: ELSIF(l_create_update_flag = 'U') THEN
2681: do_update_org_cust_v2_bo(
2682: p_init_msg_list => fnd_api.g_false,
2683: p_org_cust_v2_obj => p_org_cust_v2_obj,
2684: p_created_by_module => p_created_by_module,
2685: x_return_status => x_return_status,
2686: x_msg_count => x_msg_count,
2687: x_msg_data => x_msg_data,
2688: x_organization_id => x_organization_id
2689: );
2690: ELSE
2691: RAISE FND_API.G_EXC_ERROR;
2692: END IF;
2693:
2694: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2695: RAISE fnd_api.g_exc_error;
2690: ELSE
2691: RAISE FND_API.G_EXC_ERROR;
2692: END IF;
2693:
2694: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2695: RAISE fnd_api.g_exc_error;
2696: END IF;
2697:
2698: -- Debug info.
2691: RAISE FND_API.G_EXC_ERROR;
2692: END IF;
2693:
2694: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2695: RAISE fnd_api.g_exc_error;
2696: END IF;
2697:
2698: -- Debug info.
2699: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
2708: p_msg_level=>fnd_log.level_procedure);
2709: END IF;
2710:
2711: EXCEPTION
2712: WHEN fnd_api.g_exc_error THEN
2713: x_return_status := fnd_api.g_ret_sts_error;
2714:
2715: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2716: p_count => x_msg_count,
2709: END IF;
2710:
2711: EXCEPTION
2712: WHEN fnd_api.g_exc_error THEN
2713: x_return_status := fnd_api.g_ret_sts_error;
2714:
2715: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2716: p_count => x_msg_count,
2717: p_data => x_msg_data);
2711: EXCEPTION
2712: WHEN fnd_api.g_exc_error THEN
2713: x_return_status := fnd_api.g_ret_sts_error;
2714:
2715: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2716: p_count => x_msg_count,
2717: p_data => x_msg_data);
2718:
2719: -- Debug info.
2728: p_prefix=>l_debug_prefix,
2729: p_msg_level=>fnd_log.level_procedure);
2730: END IF;
2731:
2732: WHEN fnd_api.g_exc_unexpected_error THEN
2733: x_return_status := fnd_api.g_ret_sts_unexp_error;
2734:
2735: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2736: p_count => x_msg_count,
2729: p_msg_level=>fnd_log.level_procedure);
2730: END IF;
2731:
2732: WHEN fnd_api.g_exc_unexpected_error THEN
2733: x_return_status := fnd_api.g_ret_sts_unexp_error;
2734:
2735: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2736: p_count => x_msg_count,
2737: p_data => x_msg_data);
2731:
2732: WHEN fnd_api.g_exc_unexpected_error THEN
2733: x_return_status := fnd_api.g_ret_sts_unexp_error;
2734:
2735: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2736: p_count => x_msg_count,
2737: p_data => x_msg_data);
2738:
2739: -- Debug info.
2748: p_prefix=>l_debug_prefix,
2749: p_msg_level=>fnd_log.level_procedure);
2750: END IF;
2751: WHEN OTHERS THEN
2752: x_return_status := fnd_api.g_ret_sts_unexp_error;
2753:
2754: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2755: fnd_message.set_token('ERROR' ,SQLERRM);
2756: fnd_msg_pub.add;
2754: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2755: fnd_message.set_token('ERROR' ,SQLERRM);
2756: fnd_msg_pub.add;
2757:
2758: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2759: p_count => x_msg_count,
2760: p_data => x_msg_data);
2761:
2762: -- Debug info.
2774: END do_save_org_cust_v2_bo;
2775:
2776:
2777: PROCEDURE save_org_cust_v2_bo(
2778: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2779: p_org_cust_v2_obj IN HZ_ORG_CUST_V2_BO,
2780: p_created_by_module IN VARCHAR2,
2781: p_obj_source IN VARCHAR2 := null,
2782: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2778: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2779: p_org_cust_v2_obj IN HZ_ORG_CUST_V2_BO,
2780: p_created_by_module IN VARCHAR2,
2781: p_obj_source IN VARCHAR2 := null,
2782: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2783: x_return_status OUT NOCOPY VARCHAR2,
2784: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2785: x_return_obj OUT NOCOPY HZ_ORG_CUST_V2_BO,
2786: x_organization_id OUT NOCOPY NUMBER
2790: l_oc_obj HZ_org_cust_v2_bo;
2791: BEGIN
2792: l_oc_obj := p_org_cust_v2_obj;
2793: do_save_org_cust_v2_bo(
2794: p_init_msg_list => fnd_api.g_true,
2795: p_validate_bo_flag => p_validate_bo_flag,
2796: p_org_cust_v2_obj => l_oc_obj,
2797: p_created_by_module => p_created_by_module,
2798: p_obj_source => p_obj_source,
2804: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2805: x_return_status => x_return_status,
2806: x_msg_count => l_msg_count,
2807: x_msg_data => l_msg_data);
2808: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2809: x_return_obj := l_oc_obj;
2810: END IF;
2811: END save_org_cust_v2_bo;
2812:
2822: -- ARGUMENTS
2823: -- IN:
2824: -- p_init_msg_list Initialize message stack if it is set to
2825: -- p_organization_id Organization ID.
2826: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
2827: -- p_organization_os Organization orig system.
2828: -- p_organization_osr Organization orig system reference.
2829: -- OUT:
2830: -- x_org_cust_v2_obj Logical organization customer record.
2828: -- p_organization_osr Organization orig system reference.
2829: -- OUT:
2830: -- x_org_cust_v2_obj Logical organization customer record.
2831: -- x_return_status Return status after the call. The status can
2832: -- be fnd_api.g_ret_sts_success (success),
2833: -- fnd_api.g_ret_sts_error (error),
2834: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2835: -- x_msg_count Number of messages in message stack.
2836: -- x_msg_data Message text if x_msg_count is 1.
2829: -- OUT:
2830: -- x_org_cust_v2_obj Logical organization customer record.
2831: -- x_return_status Return status after the call. The status can
2832: -- be fnd_api.g_ret_sts_success (success),
2833: -- fnd_api.g_ret_sts_error (error),
2834: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2835: -- x_msg_count Number of messages in message stack.
2836: -- x_msg_data Message text if x_msg_count is 1.
2837: --
2830: -- x_org_cust_v2_obj Logical organization customer record.
2831: -- x_return_status Return status after the call. The status can
2832: -- be fnd_api.g_ret_sts_success (success),
2833: -- fnd_api.g_ret_sts_error (error),
2834: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2835: -- x_msg_count Number of messages in message stack.
2836: -- x_msg_data Message text if x_msg_count is 1.
2837: --
2838: -- NOTES
2863:
2864:
2865:
2866: PROCEDURE get_org_cust_v2_bo(
2867: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2868: p_organization_id IN NUMBER,
2869: p_organization_os IN VARCHAR2,
2870: p_organization_osr IN VARCHAR2,
2871: x_org_cust_v2_obj OUT NOCOPY HZ_ORG_CUST_V2_BO,
2880: l_organization_osr varchar2(255);
2881: BEGIN
2882:
2883: -- initialize API return status to success.
2884: x_return_status := FND_API.G_RET_STS_SUCCESS;
2885:
2886: -- Initialize message list if p_init_msg_list is set to TRUE
2887: IF FND_API.to_Boolean(p_init_msg_list) THEN
2888: FND_MSG_PUB.initialize;
2883: -- initialize API return status to success.
2884: x_return_status := FND_API.G_RET_STS_SUCCESS;
2885:
2886: -- Initialize message list if p_init_msg_list is set to TRUE
2887: IF FND_API.to_Boolean(p_init_msg_list) THEN
2888: FND_MSG_PUB.initialize;
2889: END IF;
2890:
2891:
2911: x_return_status => x_return_status,
2912: x_msg_count => x_msg_count,
2913: x_msg_data => x_msg_data);
2914:
2915: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2916: RAISE fnd_api.g_exc_error;
2917: END IF;
2918:
2919: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_cust_v2_bo(
2912: x_msg_count => x_msg_count,
2913: x_msg_data => x_msg_data);
2914:
2915: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2916: RAISE fnd_api.g_exc_error;
2917: END IF;
2918:
2919: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_cust_v2_bo(
2920: p_init_msg_list => fnd_api.g_false,
2916: RAISE fnd_api.g_exc_error;
2917: END IF;
2918:
2919: HZ_EXTRACT_ORG_CUST_BO_PVT.get_org_cust_v2_bo(
2920: p_init_msg_list => fnd_api.g_false,
2921: p_organization_id => l_organization_id,
2922: p_action_type => NULL,
2923: x_org_cust_v2_obj => x_org_cust_v2_obj,
2924: x_return_status => x_return_status,
2924: x_return_status => x_return_status,
2925: x_msg_count => x_msg_count,
2926: x_msg_data => x_msg_data);
2927:
2928: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2929: RAISE FND_API.G_EXC_ERROR;
2930: END IF;
2931:
2932:
2925: x_msg_count => x_msg_count,
2926: x_msg_data => x_msg_data);
2927:
2928: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2929: RAISE FND_API.G_EXC_ERROR;
2930: END IF;
2931:
2932:
2933: -- Debug info.
2947:
2948:
2949: EXCEPTION
2950:
2951: WHEN fnd_api.g_exc_error THEN
2952: x_return_status := fnd_api.g_ret_sts_error;
2953:
2954: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2955: p_count => x_msg_count,
2948:
2949: EXCEPTION
2950:
2951: WHEN fnd_api.g_exc_error THEN
2952: x_return_status := fnd_api.g_ret_sts_error;
2953:
2954: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2955: p_count => x_msg_count,
2956: p_data => x_msg_data);
2950:
2951: WHEN fnd_api.g_exc_error THEN
2952: x_return_status := fnd_api.g_ret_sts_error;
2953:
2954: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2955: p_count => x_msg_count,
2956: p_data => x_msg_data);
2957:
2958: -- Debug info.
2966: hz_utility_v2pub.debug(p_message=>'hz_org_cust_bo_pub.get_org_cust_v2_bo (-)',
2967: p_prefix=>l_debug_prefix,
2968: p_msg_level=>fnd_log.level_procedure);
2969: END IF;
2970: WHEN fnd_api.g_exc_unexpected_error THEN
2971: x_return_status := fnd_api.g_ret_sts_unexp_error;
2972:
2973: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2974: p_count => x_msg_count,
2967: p_prefix=>l_debug_prefix,
2968: p_msg_level=>fnd_log.level_procedure);
2969: END IF;
2970: WHEN fnd_api.g_exc_unexpected_error THEN
2971: x_return_status := fnd_api.g_ret_sts_unexp_error;
2972:
2973: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2974: p_count => x_msg_count,
2975: p_data => x_msg_data);
2969: END IF;
2970: WHEN fnd_api.g_exc_unexpected_error THEN
2971: x_return_status := fnd_api.g_ret_sts_unexp_error;
2972:
2973: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2974: p_count => x_msg_count,
2975: p_data => x_msg_data);
2976:
2977: -- Debug info.
2986: p_prefix=>l_debug_prefix,
2987: p_msg_level=>fnd_log.level_procedure);
2988: END IF;
2989: WHEN OTHERS THEN
2990: x_return_status := fnd_api.g_ret_sts_unexp_error;
2991:
2992: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2993: fnd_message.set_token('ERROR' ,SQLERRM);
2994: fnd_msg_pub.add;
2992: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2993: fnd_message.set_token('ERROR' ,SQLERRM);
2994: fnd_msg_pub.add;
2995:
2996: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2997: p_count => x_msg_count,
2998: p_data => x_msg_data);
2999:
3000: -- Debug info.
3023: l_msg_data VARCHAR2(2000);
3024: l_msg_count NUMBER;
3025: BEGIN
3026: get_org_cust_v2_bo(
3027: p_init_msg_list => fnd_api.g_true,
3028: p_organization_id => p_organization_id,
3029: p_organization_os => p_organization_os,
3030: p_organization_osr => p_organization_osr,
3031: x_org_cust_v2_obj => x_org_cust_v2_obj,
3054: -- ARGUMENTS
3055: -- IN:
3056: -- p_init_msg_list Initialize message stack if it is set to
3057: -- p_event_id BES Event identifier.
3058: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3059: -- OUT:
3060: -- x_org_cust_v2_objs One or more created logical organization customer.
3061: -- x_return_status Return status after the call. The status can
3062: -- be fnd_api.g_ret_sts_success (success),
3058: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3059: -- OUT:
3060: -- x_org_cust_v2_objs One or more created logical organization customer.
3061: -- x_return_status Return status after the call. The status can
3062: -- be fnd_api.g_ret_sts_success (success),
3063: -- fnd_api.g_ret_sts_error (error),
3064: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3065: -- x_msg_count Number of messages in message stack.
3066: -- x_msg_data Message text if x_msg_count is 1.
3059: -- OUT:
3060: -- x_org_cust_v2_objs One or more created logical organization customer.
3061: -- x_return_status Return status after the call. The status can
3062: -- be fnd_api.g_ret_sts_success (success),
3063: -- fnd_api.g_ret_sts_error (error),
3064: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3065: -- x_msg_count Number of messages in message stack.
3066: -- x_msg_data Message text if x_msg_count is 1.
3067: --
3060: -- x_org_cust_v2_objs One or more created logical organization customer.
3061: -- x_return_status Return status after the call. The status can
3062: -- be fnd_api.g_ret_sts_success (success),
3063: -- fnd_api.g_ret_sts_error (error),
3064: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3065: -- x_msg_count Number of messages in message stack.
3066: -- x_msg_data Message text if x_msg_count is 1.
3067: --
3068: -- NOTES
3088: */
3089:
3090:
3091: PROCEDURE get_v2_org_custs_created(
3092: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3093: p_event_id IN NUMBER,
3094: x_org_cust_v2_objs OUT NOCOPY HZ_ORG_CUST_V2_BO_TBL,
3095: x_return_status OUT NOCOPY VARCHAR2,
3096: x_msg_count OUT NOCOPY NUMBER,
3099: l_debug_prefix VARCHAR2(30) := '';
3100: begin
3101:
3102: -- initialize API return status to success.
3103: x_return_status := FND_API.G_RET_STS_SUCCESS;
3104:
3105: -- Initialize message list if p_init_msg_list is set to TRUE
3106: IF FND_API.to_Boolean(p_init_msg_list) THEN
3107: FND_MSG_PUB.initialize;
3102: -- initialize API return status to success.
3103: x_return_status := FND_API.G_RET_STS_SUCCESS;
3104:
3105: -- Initialize message list if p_init_msg_list is set to TRUE
3106: IF FND_API.to_Boolean(p_init_msg_list) THEN
3107: FND_MSG_PUB.initialize;
3108: END IF;
3109:
3110:
3120: p_event_type => 'C',
3121: p_bo_code => 'ORG_CUST',
3122: x_return_status => x_return_status);
3123:
3124: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3125: RAISE FND_API.G_EXC_ERROR;
3126: END IF;
3127:
3128: HZ_EXTRACT_ORG_CUST_BO_PVT.get_v2_org_custs_created(
3121: p_bo_code => 'ORG_CUST',
3122: x_return_status => x_return_status);
3123:
3124: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3125: RAISE FND_API.G_EXC_ERROR;
3126: END IF;
3127:
3128: HZ_EXTRACT_ORG_CUST_BO_PVT.get_v2_org_custs_created(
3129: p_init_msg_list => fnd_api.g_false,
3125: RAISE FND_API.G_EXC_ERROR;
3126: END IF;
3127:
3128: HZ_EXTRACT_ORG_CUST_BO_PVT.get_v2_org_custs_created(
3129: p_init_msg_list => fnd_api.g_false,
3130: p_event_id => p_event_id,
3131: x_org_cust_v2_objs => x_org_cust_v2_objs,
3132: x_return_status => x_return_status,
3133: x_msg_count => x_msg_count,
3132: x_return_status => x_return_status,
3133: x_msg_count => x_msg_count,
3134: x_msg_data => x_msg_data);
3135:
3136: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3137: RAISE FND_API.G_EXC_ERROR;
3138: END IF;
3139:
3140:
3133: x_msg_count => x_msg_count,
3134: x_msg_data => x_msg_data);
3135:
3136: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3137: RAISE FND_API.G_EXC_ERROR;
3138: END IF;
3139:
3140:
3141:
3156:
3157:
3158: EXCEPTION
3159:
3160: WHEN fnd_api.g_exc_error THEN
3161: x_return_status := fnd_api.g_ret_sts_error;
3162:
3163: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3164: p_count => x_msg_count,
3157:
3158: EXCEPTION
3159:
3160: WHEN fnd_api.g_exc_error THEN
3161: x_return_status := fnd_api.g_ret_sts_error;
3162:
3163: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3164: p_count => x_msg_count,
3165: p_data => x_msg_data);
3159:
3160: WHEN fnd_api.g_exc_error THEN
3161: x_return_status := fnd_api.g_ret_sts_error;
3162:
3163: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3164: p_count => x_msg_count,
3165: p_data => x_msg_data);
3166:
3167: -- Debug info.
3175: hz_utility_v2pub.debug(p_message=>'hz_org_cust_bo_pub.get_v2_org_custs_created(-)',
3176: p_prefix=>l_debug_prefix,
3177: p_msg_level=>fnd_log.level_procedure);
3178: END IF;
3179: WHEN fnd_api.g_exc_unexpected_error THEN
3180: x_return_status := fnd_api.g_ret_sts_unexp_error;
3181:
3182: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3183: p_count => x_msg_count,
3176: p_prefix=>l_debug_prefix,
3177: p_msg_level=>fnd_log.level_procedure);
3178: END IF;
3179: WHEN fnd_api.g_exc_unexpected_error THEN
3180: x_return_status := fnd_api.g_ret_sts_unexp_error;
3181:
3182: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3183: p_count => x_msg_count,
3184: p_data => x_msg_data);
3178: END IF;
3179: WHEN fnd_api.g_exc_unexpected_error THEN
3180: x_return_status := fnd_api.g_ret_sts_unexp_error;
3181:
3182: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3183: p_count => x_msg_count,
3184: p_data => x_msg_data);
3185:
3186: -- Debug info.
3195: p_prefix=>l_debug_prefix,
3196: p_msg_level=>fnd_log.level_procedure);
3197: END IF;
3198: WHEN OTHERS THEN
3199: x_return_status := fnd_api.g_ret_sts_unexp_error;
3200:
3201: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3202: fnd_message.set_token('ERROR' ,SQLERRM);
3203: fnd_msg_pub.add;
3201: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3202: fnd_message.set_token('ERROR' ,SQLERRM);
3203: fnd_msg_pub.add;
3204:
3205: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3206: p_count => x_msg_count,
3207: p_data => x_msg_data);
3208:
3209: -- Debug info.
3230: l_msg_data VARCHAR2(2000);
3231: l_msg_count NUMBER;
3232: BEGIN
3233: get_v2_org_custs_created(
3234: p_init_msg_list => fnd_api.g_true,
3235: p_event_id => p_event_id,
3236: x_org_cust_v2_objs => x_org_cust_v2_objs,
3237: x_return_status => x_return_status,
3238: x_msg_count => l_msg_count,
3259: -- ARGUMENTS
3260: -- IN:
3261: -- p_init_msg_list Initialize message stack if it is set to
3262: -- p_event_id BES Event identifier.
3263: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3264: -- OUT:
3265: -- x_org_cust_v2_objs One or more created logical org.
3266: -- x_return_status Return status after the call. The status can
3267: -- be fnd_api.g_ret_sts_success (success),
3263: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3264: -- OUT:
3265: -- x_org_cust_v2_objs One or more created logical org.
3266: -- x_return_status Return status after the call. The status can
3267: -- be fnd_api.g_ret_sts_success (success),
3268: -- fnd_api.g_ret_sts_error (error),
3269: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3270: -- x_msg_count Number of messages in message stack.
3271: -- x_msg_data Message text if x_msg_count is 1.
3264: -- OUT:
3265: -- x_org_cust_v2_objs One or more created logical org.
3266: -- x_return_status Return status after the call. The status can
3267: -- be fnd_api.g_ret_sts_success (success),
3268: -- fnd_api.g_ret_sts_error (error),
3269: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3270: -- x_msg_count Number of messages in message stack.
3271: -- x_msg_data Message text if x_msg_count is 1.
3272: --
3265: -- x_org_cust_v2_objs One or more created logical org.
3266: -- x_return_status Return status after the call. The status can
3267: -- be fnd_api.g_ret_sts_success (success),
3268: -- fnd_api.g_ret_sts_error (error),
3269: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3270: -- x_msg_count Number of messages in message stack.
3271: -- x_msg_data Message text if x_msg_count is 1.
3272: --
3273: -- NOTES
3289: them to the caller.
3290: */
3291:
3292: PROCEDURE get_v2_org_custs_updated(
3293: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3294: p_event_id IN NUMBER,
3295: x_org_cust_v2_objs OUT NOCOPY HZ_ORG_CUST_V2_BO_TBL,
3296: x_return_status OUT NOCOPY VARCHAR2,
3297: x_msg_count OUT NOCOPY NUMBER,
3301: l_debug_prefix VARCHAR2(30) := '';
3302: begin
3303:
3304: -- initialize API return status to success.
3305: x_return_status := FND_API.G_RET_STS_SUCCESS;
3306:
3307: -- Initialize message list if p_init_msg_list is set to TRUE
3308: IF FND_API.to_Boolean(p_init_msg_list) THEN
3309: FND_MSG_PUB.initialize;
3304: -- initialize API return status to success.
3305: x_return_status := FND_API.G_RET_STS_SUCCESS;
3306:
3307: -- Initialize message list if p_init_msg_list is set to TRUE
3308: IF FND_API.to_Boolean(p_init_msg_list) THEN
3309: FND_MSG_PUB.initialize;
3310: END IF;
3311:
3312:
3322: p_event_type => 'U',
3323: p_bo_code => 'ORG_CUST',
3324: x_return_status => x_return_status);
3325:
3326: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3327: RAISE FND_API.G_EXC_ERROR;
3328: END IF;
3329:
3330: HZ_EXTRACT_ORG_CUST_BO_PVT.get_v2_org_custs_updated(
3323: p_bo_code => 'ORG_CUST',
3324: x_return_status => x_return_status);
3325:
3326: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3327: RAISE FND_API.G_EXC_ERROR;
3328: END IF;
3329:
3330: HZ_EXTRACT_ORG_CUST_BO_PVT.get_v2_org_custs_updated(
3331: p_init_msg_list => fnd_api.g_false,
3327: RAISE FND_API.G_EXC_ERROR;
3328: END IF;
3329:
3330: HZ_EXTRACT_ORG_CUST_BO_PVT.get_v2_org_custs_updated(
3331: p_init_msg_list => fnd_api.g_false,
3332: p_event_id => p_event_id,
3333: x_org_cust_v2_objs => x_org_cust_v2_objs,
3334: x_return_status => x_return_status,
3335: x_msg_count => x_msg_count,
3334: x_return_status => x_return_status,
3335: x_msg_count => x_msg_count,
3336: x_msg_data => x_msg_data);
3337:
3338: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3339: RAISE FND_API.G_EXC_ERROR;
3340: END IF;
3341:
3342:
3335: x_msg_count => x_msg_count,
3336: x_msg_data => x_msg_data);
3337:
3338: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3339: RAISE FND_API.G_EXC_ERROR;
3340: END IF;
3341:
3342:
3343:
3358:
3359:
3360: EXCEPTION
3361:
3362: WHEN fnd_api.g_exc_error THEN
3363: x_return_status := fnd_api.g_ret_sts_error;
3364:
3365: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3366: p_count => x_msg_count,
3359:
3360: EXCEPTION
3361:
3362: WHEN fnd_api.g_exc_error THEN
3363: x_return_status := fnd_api.g_ret_sts_error;
3364:
3365: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3366: p_count => x_msg_count,
3367: p_data => x_msg_data);
3361:
3362: WHEN fnd_api.g_exc_error THEN
3363: x_return_status := fnd_api.g_ret_sts_error;
3364:
3365: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3366: p_count => x_msg_count,
3367: p_data => x_msg_data);
3368:
3369: -- Debug info.
3377: hz_utility_v2pub.debug(p_message=>'hz_org_cust_bo_pub.get_v2_org_custs_updated(-)',
3378: p_prefix=>l_debug_prefix,
3379: p_msg_level=>fnd_log.level_procedure);
3380: END IF;
3381: WHEN fnd_api.g_exc_unexpected_error THEN
3382: x_return_status := fnd_api.g_ret_sts_unexp_error;
3383:
3384: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3385: p_count => x_msg_count,
3378: p_prefix=>l_debug_prefix,
3379: p_msg_level=>fnd_log.level_procedure);
3380: END IF;
3381: WHEN fnd_api.g_exc_unexpected_error THEN
3382: x_return_status := fnd_api.g_ret_sts_unexp_error;
3383:
3384: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3385: p_count => x_msg_count,
3386: p_data => x_msg_data);
3380: END IF;
3381: WHEN fnd_api.g_exc_unexpected_error THEN
3382: x_return_status := fnd_api.g_ret_sts_unexp_error;
3383:
3384: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3385: p_count => x_msg_count,
3386: p_data => x_msg_data);
3387:
3388: -- Debug info.
3397: p_prefix=>l_debug_prefix,
3398: p_msg_level=>fnd_log.level_procedure);
3399: END IF;
3400: WHEN OTHERS THEN
3401: x_return_status := fnd_api.g_ret_sts_unexp_error;
3402:
3403: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3404: fnd_message.set_token('ERROR' ,SQLERRM);
3405: fnd_msg_pub.add;
3403: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3404: fnd_message.set_token('ERROR' ,SQLERRM);
3405: fnd_msg_pub.add;
3406:
3407: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3408: p_count => x_msg_count,
3409: p_data => x_msg_data);
3410:
3411: -- Debug info.
3432: l_msg_data VARCHAR2(2000);
3433: l_msg_count NUMBER;
3434: BEGIN
3435: get_v2_org_custs_updated(
3436: p_init_msg_list => fnd_api.g_true,
3437: p_event_id => p_event_id,
3438: x_org_cust_v2_objs => x_org_cust_v2_objs,
3439: x_return_status => x_return_status,
3440: x_msg_count => l_msg_count,
3447: END get_v2_org_custs_updated;
3448:
3449:
3450: PROCEDURE get_v2_org_cust_updated(
3451: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3452: p_event_id IN NUMBER,
3453: p_org_cust_id IN NUMBER,
3454: x_org_cust_v2_obj OUT NOCOPY HZ_ORG_CUST_V2_BO,
3455: x_return_status OUT NOCOPY VARCHAR2,
3459: l_debug_prefix VARCHAR2(30) := '';
3460: begin
3461:
3462: -- initialize API return status to success.
3463: x_return_status := FND_API.G_RET_STS_SUCCESS;
3464:
3465: -- Initialize message list if p_init_msg_list is set to TRUE
3466: IF FND_API.to_Boolean(p_init_msg_list) THEN
3467: FND_MSG_PUB.initialize;
3462: -- initialize API return status to success.
3463: x_return_status := FND_API.G_RET_STS_SUCCESS;
3464:
3465: -- Initialize message list if p_init_msg_list is set to TRUE
3466: IF FND_API.to_Boolean(p_init_msg_list) THEN
3467: FND_MSG_PUB.initialize;
3468: END IF;
3469:
3470:
3480: p_event_type => 'U',
3481: p_bo_code => 'ORG_CUST',
3482: x_return_status => x_return_status);
3483:
3484: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3485: RAISE FND_API.G_EXC_ERROR;
3486: END IF;
3487:
3488: HZ_EXTRACT_ORG_CUST_BO_PVT.get_v2_org_cust_updated(
3481: p_bo_code => 'ORG_CUST',
3482: x_return_status => x_return_status);
3483:
3484: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3485: RAISE FND_API.G_EXC_ERROR;
3486: END IF;
3487:
3488: HZ_EXTRACT_ORG_CUST_BO_PVT.get_v2_org_cust_updated(
3489: p_init_msg_list => fnd_api.g_false,
3485: RAISE FND_API.G_EXC_ERROR;
3486: END IF;
3487:
3488: HZ_EXTRACT_ORG_CUST_BO_PVT.get_v2_org_cust_updated(
3489: p_init_msg_list => fnd_api.g_false,
3490: p_event_id => p_event_id,
3491: p_org_cust_id => p_org_cust_id,
3492: x_org_cust_v2_obj => x_org_cust_v2_obj,
3493: x_return_status => x_return_status,
3493: x_return_status => x_return_status,
3494: x_msg_count => x_msg_count,
3495: x_msg_data => x_msg_data);
3496:
3497: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3498: RAISE FND_API.G_EXC_ERROR;
3499: END IF;
3500:
3501:
3494: x_msg_count => x_msg_count,
3495: x_msg_data => x_msg_data);
3496:
3497: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3498: RAISE FND_API.G_EXC_ERROR;
3499: END IF;
3500:
3501:
3502:
3517:
3518:
3519: EXCEPTION
3520:
3521: WHEN fnd_api.g_exc_error THEN
3522: x_return_status := fnd_api.g_ret_sts_error;
3523:
3524: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3525: p_count => x_msg_count,
3518:
3519: EXCEPTION
3520:
3521: WHEN fnd_api.g_exc_error THEN
3522: x_return_status := fnd_api.g_ret_sts_error;
3523:
3524: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3525: p_count => x_msg_count,
3526: p_data => x_msg_data);
3520:
3521: WHEN fnd_api.g_exc_error THEN
3522: x_return_status := fnd_api.g_ret_sts_error;
3523:
3524: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3525: p_count => x_msg_count,
3526: p_data => x_msg_data);
3527:
3528: -- Debug info.
3536: hz_utility_v2pub.debug(p_message=>'hz_org_cust_bo_pub.get_v2_org_cust_updated(-)',
3537: p_prefix=>l_debug_prefix,
3538: p_msg_level=>fnd_log.level_procedure);
3539: END IF;
3540: WHEN fnd_api.g_exc_unexpected_error THEN
3541: x_return_status := fnd_api.g_ret_sts_unexp_error;
3542:
3543: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3544: p_count => x_msg_count,
3537: p_prefix=>l_debug_prefix,
3538: p_msg_level=>fnd_log.level_procedure);
3539: END IF;
3540: WHEN fnd_api.g_exc_unexpected_error THEN
3541: x_return_status := fnd_api.g_ret_sts_unexp_error;
3542:
3543: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3544: p_count => x_msg_count,
3545: p_data => x_msg_data);
3539: END IF;
3540: WHEN fnd_api.g_exc_unexpected_error THEN
3541: x_return_status := fnd_api.g_ret_sts_unexp_error;
3542:
3543: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3544: p_count => x_msg_count,
3545: p_data => x_msg_data);
3546:
3547: -- Debug info.
3556: p_prefix=>l_debug_prefix,
3557: p_msg_level=>fnd_log.level_procedure);
3558: END IF;
3559: WHEN OTHERS THEN
3560: x_return_status := fnd_api.g_ret_sts_unexp_error;
3561:
3562: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3563: fnd_message.set_token('ERROR' ,SQLERRM);
3564: fnd_msg_pub.add;
3562: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3563: fnd_message.set_token('ERROR' ,SQLERRM);
3564: fnd_msg_pub.add;
3565:
3566: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3567: p_count => x_msg_count,
3568: p_data => x_msg_data);
3569:
3570: -- Debug info.
3592: l_msg_data VARCHAR2(2000);
3593: l_msg_count NUMBER;
3594: BEGIN
3595: get_v2_org_cust_updated(
3596: p_init_msg_list => fnd_api.g_false,
3597: p_event_id => p_event_id,
3598: p_org_cust_id => p_org_cust_id,
3599: x_org_cust_v2_obj => x_org_cust_v2_obj,
3600: x_return_status => x_return_status,