194: -- p_cas_id Customer account site Id.
195: -- p_parent_os Parent original system.
196: -- OUT:
197: -- x_return_status Return status after the call. The status can
198: -- be fnd_api.g_ret_sts_success (success),
199: -- fnd_api.g_ret_sts_error (error),
200: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
201: -- x_msg_count Number of messages in message stack.
202: -- x_msg_data Message text if x_msg_count is 1.
195: -- p_parent_os Parent original system.
196: -- OUT:
197: -- x_return_status Return status after the call. The status can
198: -- be fnd_api.g_ret_sts_success (success),
199: -- fnd_api.g_ret_sts_error (error),
200: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
201: -- x_msg_count Number of messages in message stack.
202: -- x_msg_data Message text if x_msg_count is 1.
203: --
196: -- OUT:
197: -- x_return_status Return status after the call. The status can
198: -- be fnd_api.g_ret_sts_success (success),
199: -- fnd_api.g_ret_sts_error (error),
200: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
201: -- x_msg_count Number of messages in message stack.
202: -- x_msg_data Message text if x_msg_count is 1.
203: --
204: -- NOTES
236: -- Standard start of API savepoint
237: SAVEPOINT create_casu_pvt;
238:
239: -- initialize API return status to success.
240: x_return_status := FND_API.G_RET_STS_SUCCESS;
241:
242: -- Debug info.
243: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
244: hz_utility_v2pub.debug(p_message=>'create_cust_site_uses(+)',
267: x_return_status => x_return_status,
268: x_msg_count => x_msg_count,
269: x_msg_data => x_msg_data);
270:
271: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
272: RAISE FND_API.G_EXC_ERROR;
273: END IF;
274:
275: assign_cust_site_use_rec(
268: x_msg_count => x_msg_count,
269: x_msg_data => x_msg_data);
270:
271: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
272: RAISE FND_API.G_EXC_ERROR;
273: END IF;
274:
275: assign_cust_site_use_rec(
276: p_cust_site_use_obj => p_casu_objs(i),
283:
284: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_site_use (
285: p_cust_site_use_rec => l_casu_rec,
286: p_customer_profile_rec => NULL,
287: p_create_profile => FND_API.G_FALSE,
288: p_create_profile_amt => FND_API.G_FALSE,
289: x_site_use_id => l_casu_id,
290: x_return_status => x_return_status,
291: x_msg_count => x_msg_count,
284: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_site_use (
285: p_cust_site_use_rec => l_casu_rec,
286: p_customer_profile_rec => NULL,
287: p_create_profile => FND_API.G_FALSE,
288: p_create_profile_amt => FND_API.G_FALSE,
289: x_site_use_id => l_casu_id,
290: x_return_status => x_return_status,
291: x_msg_count => x_msg_count,
292: x_msg_data => x_msg_data
291: x_msg_count => x_msg_count,
292: x_msg_data => x_msg_data
293: );
294:
295: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
296: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
297: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.create_cust_site_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
298: p_prefix=>l_debug_prefix,
299: p_msg_level=>fnd_log.level_procedure);
297: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.create_cust_site_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
298: p_prefix=>l_debug_prefix,
299: p_msg_level=>fnd_log.level_procedure);
300: END IF;
301: RAISE FND_API.G_EXC_ERROR;
302: END IF;
303:
304: -- assign site_use_id
305: p_casu_objs(i).site_use_id := l_casu_id;
318: x_msg_count => x_msg_count,
319: x_msg_data => x_msg_data
320: );
321:
322: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
323: RAISE FND_API.G_EXC_ERROR;
324: END IF;
325:
326: HZ_CUST_ACCT_BO_PVT.create_cust_profile_amts(
319: x_msg_data => x_msg_data
320: );
321:
322: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
323: RAISE FND_API.G_EXC_ERROR;
324: END IF;
325:
326: HZ_CUST_ACCT_BO_PVT.create_cust_profile_amts(
327: p_cpa_objs => p_casu_objs(i).site_use_profile_obj.cust_profile_amt_objs,
332: x_msg_count => x_msg_count,
333: x_msg_data => x_msg_data
334: );
335:
336: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
337: RAISE FND_API.G_EXC_ERROR;
338: END IF;
339: END IF;
340:
333: x_msg_data => x_msg_data
334: );
335:
336: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
337: RAISE FND_API.G_EXC_ERROR;
338: END IF;
339: END IF;
340:
341: ------------------------
356: x_msg_count => x_msg_count,
357: x_msg_data => x_msg_data
358: );
359:
360: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
361: RAISE FND_API.G_EXC_ERROR;
362: END IF;
363: END IF;
364:
357: x_msg_data => x_msg_data
358: );
359:
360: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
361: RAISE FND_API.G_EXC_ERROR;
362: END IF;
363: END IF;
364:
365: ------------------------
374: x_msg_count => x_msg_count,
375: x_msg_data => x_msg_data
376: );
377:
378: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
379: RAISE FND_API.G_EXC_ERROR;
380: END IF;
381: END IF;
382: END LOOP;
375: x_msg_data => x_msg_data
376: );
377:
378: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
379: RAISE FND_API.G_EXC_ERROR;
380: END IF;
381: END IF;
382: END LOOP;
383:
394: p_msg_level=>fnd_log.level_procedure);
395: END IF;
396:
397: EXCEPTION
398: WHEN fnd_api.g_exc_error THEN
399: ROLLBACK TO create_casu_pvt;
400: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
401: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
402: FND_MSG_PUB.ADD;
400: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
401: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
402: FND_MSG_PUB.ADD;
403:
404: x_return_status := fnd_api.g_ret_sts_error;
405:
406: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
407: p_count => x_msg_count,
408: p_data => x_msg_data);
402: FND_MSG_PUB.ADD;
403:
404: x_return_status := fnd_api.g_ret_sts_error;
405:
406: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
407: p_count => x_msg_count,
408: p_data => x_msg_data);
409:
410: -- Debug info.
419: p_prefix=>l_debug_prefix,
420: p_msg_level=>fnd_log.level_procedure);
421: END IF;
422:
423: WHEN fnd_api.g_exc_unexpected_error THEN
424: ROLLBACK TO create_casu_pvt;
425: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
426: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
427: FND_MSG_PUB.ADD;
425: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
426: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
427: FND_MSG_PUB.ADD;
428:
429: x_return_status := fnd_api.g_ret_sts_unexp_error;
430:
431: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
432: p_count => x_msg_count,
433: p_data => x_msg_data);
427: FND_MSG_PUB.ADD;
428:
429: x_return_status := fnd_api.g_ret_sts_unexp_error;
430:
431: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
432: p_count => x_msg_count,
433: p_data => x_msg_data);
434:
435: -- Debug info.
450: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
451: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
452: FND_MSG_PUB.ADD;
453:
454: x_return_status := fnd_api.g_ret_sts_unexp_error;
455:
456: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
457: fnd_message.set_token('ERROR' ,SQLERRM);
458: fnd_msg_pub.add;
456: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
457: fnd_message.set_token('ERROR' ,SQLERRM);
458: fnd_msg_pub.add;
459:
460: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
461: p_count => x_msg_count,
462: p_data => x_msg_data);
463:
464: -- Debug info.
489: -- p_cas_id Customer account site Id.
490: -- p_parent_os Parent original system.
491: -- OUT:
492: -- x_return_status Return status after the call. The status can
493: -- be fnd_api.g_ret_sts_success (success),
494: -- fnd_api.g_ret_sts_error (error),
495: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
496: -- x_msg_count Number of messages in message stack.
497: -- x_msg_data Message text if x_msg_count is 1.
490: -- p_parent_os Parent original system.
491: -- OUT:
492: -- x_return_status Return status after the call. The status can
493: -- be fnd_api.g_ret_sts_success (success),
494: -- fnd_api.g_ret_sts_error (error),
495: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
496: -- x_msg_count Number of messages in message stack.
497: -- x_msg_data Message text if x_msg_count is 1.
498: --
491: -- OUT:
492: -- x_return_status Return status after the call. The status can
493: -- be fnd_api.g_ret_sts_success (success),
494: -- fnd_api.g_ret_sts_error (error),
495: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
496: -- x_msg_count Number of messages in message stack.
497: -- x_msg_data Message text if x_msg_count is 1.
498: --
499: -- NOTES
558: -- Standard start of API savepoint
559: SAVEPOINT save_casu_pvt;
560:
561: -- initialize API return status to success.
562: x_return_status := FND_API.G_RET_STS_SUCCESS;
563:
564: -- Debug info.
565: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
566: hz_utility_v2pub.debug(p_message=>'save_cust_site_uses(+)',
610: IF(l_create_update_flag = 'E') THEN
611: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
612: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
613: FND_MSG_PUB.ADD;
614: RAISE FND_API.G_EXC_ERROR;
615: END IF;
616:
617: -- check if the cust site use record is create or update
618: -- since cust site use has os+osr, use os+osr to check if record exist or not
628:
629: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_site_use (
630: p_cust_site_use_rec => l_casu_rec,
631: p_customer_profile_rec => NULL,
632: p_create_profile => FND_API.G_FALSE,
633: p_create_profile_amt => FND_API.G_FALSE,
634: x_site_use_id => l_casu_id,
635: x_return_status => x_return_status,
636: x_msg_count => x_msg_count,
629: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_site_use (
630: p_cust_site_use_rec => l_casu_rec,
631: p_customer_profile_rec => NULL,
632: p_create_profile => FND_API.G_FALSE,
633: p_create_profile_amt => FND_API.G_FALSE,
634: x_site_use_id => l_casu_id,
635: x_return_status => x_return_status,
636: x_msg_count => x_msg_count,
637: x_msg_data => x_msg_data
636: x_msg_count => x_msg_count,
637: x_msg_data => x_msg_data
638: );
639:
640: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
641: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
642: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_site_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
643: p_prefix=>l_debug_prefix,
644: p_msg_level=>fnd_log.level_procedure);
642: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_site_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
643: p_prefix=>l_debug_prefix,
644: p_msg_level=>fnd_log.level_procedure);
645: END IF;
646: RAISE fnd_api.g_exc_error;
647: END IF;
648:
649: -- assign site_use_id
650: p_casu_objs(i).site_use_id := l_casu_id;
661: x_msg_count => x_msg_count,
662: x_msg_data => x_msg_data
663: );
664:
665: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
666: RAISE FND_API.G_EXC_ERROR;
667: END IF;
668:
669: HZ_CUST_ACCT_BO_PVT.create_cust_profile_amts(
662: x_msg_data => x_msg_data
663: );
664:
665: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
666: RAISE FND_API.G_EXC_ERROR;
667: END IF;
668:
669: HZ_CUST_ACCT_BO_PVT.create_cust_profile_amts(
670: p_cpa_objs => p_casu_objs(i).site_use_profile_obj.cust_profile_amt_objs,
675: x_msg_count => x_msg_count,
676: x_msg_data => x_msg_data
677: );
678:
679: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
680: RAISE FND_API.G_EXC_ERROR;
681: END IF;
682:
683: END IF;
676: x_msg_data => x_msg_data
677: );
678:
679: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
680: RAISE FND_API.G_EXC_ERROR;
681: END IF;
682:
683: END IF;
684:
694: x_msg_count => x_msg_count,
695: x_msg_data => x_msg_data
696: );
697:
698: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
699: RAISE FND_API.G_EXC_ERROR;
700: END IF;
701:
702: OPEN get_ovn(l_casu_id);
695: x_msg_data => x_msg_data
696: );
697:
698: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
699: RAISE FND_API.G_EXC_ERROR;
700: END IF;
701:
702: OPEN get_ovn(l_casu_id);
703: FETCH get_ovn INTO l_site_use_code, l_ovn;
723: x_msg_count => x_msg_count,
724: x_msg_data => x_msg_data
725: );
726:
727: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
728: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
729: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_site_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
730: p_prefix=>l_debug_prefix,
731: p_msg_level=>fnd_log.level_procedure);
729: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_site_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
730: p_prefix=>l_debug_prefix,
731: p_msg_level=>fnd_log.level_procedure);
732: END IF;
733: RAISE fnd_api.g_exc_error;
734: END IF;
735:
736: -- assign site_use_id
737: p_casu_objs(i).site_use_id := l_casu_id;
748: x_msg_count => x_msg_count,
749: x_msg_data => x_msg_data
750: );
751:
752: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
753: RAISE FND_API.G_EXC_ERROR;
754: END IF;
755:
756: HZ_CUST_ACCT_BO_PVT.save_cust_profile_amts(
749: x_msg_data => x_msg_data
750: );
751:
752: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
753: RAISE FND_API.G_EXC_ERROR;
754: END IF;
755:
756: HZ_CUST_ACCT_BO_PVT.save_cust_profile_amts(
757: p_cpa_objs => p_casu_objs(i).site_use_profile_obj.cust_profile_amt_objs,
783: x_msg_count => x_msg_count,
784: x_msg_data => x_msg_data
785: );
786:
787: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
788: RAISE FND_API.G_EXC_ERROR;
789: END IF;
790: END IF;
791:
784: x_msg_data => x_msg_data
785: );
786:
787: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
788: RAISE FND_API.G_EXC_ERROR;
789: END IF;
790: END IF;
791:
792: ------------------------
801: x_msg_count => x_msg_count,
802: x_msg_data => x_msg_data
803: );
804:
805: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
806: RAISE FND_API.G_EXC_ERROR;
807: END IF;
808: END IF;
809:
802: x_msg_data => x_msg_data
803: );
804:
805: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
806: RAISE FND_API.G_EXC_ERROR;
807: END IF;
808: END IF;
809:
810: END LOOP;
821: p_prefix=>l_debug_prefix,
822: p_msg_level=>fnd_log.level_procedure);
823: END IF;
824: EXCEPTION
825: WHEN fnd_api.g_exc_error THEN
826: ROLLBACK TO save_casu_pvt;
827: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
828: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
829: FND_MSG_PUB.ADD;
827: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
828: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
829: FND_MSG_PUB.ADD;
830:
831: x_return_status := fnd_api.g_ret_sts_error;
832:
833: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
834: p_count => x_msg_count,
835: p_data => x_msg_data);
829: FND_MSG_PUB.ADD;
830:
831: x_return_status := fnd_api.g_ret_sts_error;
832:
833: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
834: p_count => x_msg_count,
835: p_data => x_msg_data);
836:
837: -- Debug info.
846: p_prefix=>l_debug_prefix,
847: p_msg_level=>fnd_log.level_procedure);
848: END IF;
849:
850: WHEN fnd_api.g_exc_unexpected_error THEN
851: ROLLBACK TO save_casu_pvt;
852: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
853: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
854: FND_MSG_PUB.ADD;
852: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
853: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
854: FND_MSG_PUB.ADD;
855:
856: x_return_status := fnd_api.g_ret_sts_unexp_error;
857:
858: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
859: p_count => x_msg_count,
860: p_data => x_msg_data);
854: FND_MSG_PUB.ADD;
855:
856: x_return_status := fnd_api.g_ret_sts_unexp_error;
857:
858: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
859: p_count => x_msg_count,
860: p_data => x_msg_data);
861:
862: -- Debug info.
877: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
878: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
879: FND_MSG_PUB.ADD;
880:
881: x_return_status := fnd_api.g_ret_sts_unexp_error;
882:
883: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
884: fnd_message.set_token('ERROR' ,SQLERRM);
885: fnd_msg_pub.add;
883: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
884: fnd_message.set_token('ERROR' ,SQLERRM);
885: fnd_msg_pub.add;
886:
887: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
888: p_count => x_msg_count,
889: p_data => x_msg_data);
890:
891: -- Debug info.
926: l_parent_acct_osr VARCHAR2(255);
927: l_cbm VARCHAR2(30);
928: BEGIN
929: -- initialize API return status to success
930: x_return_status := FND_API.G_RET_STS_SUCCESS;
931:
932: -- Debug info.
933: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
934: hz_utility_v2pub.debug(p_message=>'save_cust_acct_sites(+)',
945: IF(p_create_update_flag = 'C') THEN
946: -- Create cust account sites
947: FOR i IN 1..p_cas_objs.COUNT LOOP
948: HZ_CUST_ACCT_SITE_BO_PUB.do_create_cust_acct_site_bo(
949: p_init_msg_list => fnd_api.g_false,
950: p_validate_bo_flag => fnd_api.g_false,
951: p_cust_acct_site_obj => p_cas_objs(i),
952: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
953: p_obj_source => p_obj_source,
946: -- Create cust account sites
947: FOR i IN 1..p_cas_objs.COUNT LOOP
948: HZ_CUST_ACCT_SITE_BO_PUB.do_create_cust_acct_site_bo(
949: p_init_msg_list => fnd_api.g_false,
950: p_validate_bo_flag => fnd_api.g_false,
951: p_cust_acct_site_obj => p_cas_objs(i),
952: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
953: p_obj_source => p_obj_source,
954: x_return_status => x_return_status,
961: px_parent_acct_os => l_parent_acct_os,
962: px_parent_acct_osr => l_parent_acct_osr
963: );
964:
965: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
966: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
967: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_acct_sites, parent id: '||l_parent_acct_id||' '||l_parent_acct_os||'-'||l_parent_acct_osr,
968: p_prefix=>l_debug_prefix,
969: p_msg_level=>fnd_log.level_procedure);
967: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_acct_sites, parent id: '||l_parent_acct_id||' '||l_parent_acct_os||'-'||l_parent_acct_osr,
968: p_prefix=>l_debug_prefix,
969: p_msg_level=>fnd_log.level_procedure);
970: END IF;
971: RAISE fnd_api.g_exc_error;
972: END IF;
973:
974: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
975: END LOOP;
976: ELSE
977: -- Create/update cust account site
978: FOR i IN 1..p_cas_objs.COUNT LOOP
979: HZ_CUST_ACCT_SITE_BO_PUB.do_save_cust_acct_site_bo(
980: p_init_msg_list => fnd_api.g_false,
981: p_validate_bo_flag => fnd_api.g_false,
982: p_cust_acct_site_obj => p_cas_objs(i),
983: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
984: p_obj_source => p_obj_source,
977: -- Create/update cust account site
978: FOR i IN 1..p_cas_objs.COUNT LOOP
979: HZ_CUST_ACCT_SITE_BO_PUB.do_save_cust_acct_site_bo(
980: p_init_msg_list => fnd_api.g_false,
981: p_validate_bo_flag => fnd_api.g_false,
982: p_cust_acct_site_obj => p_cas_objs(i),
983: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
984: p_obj_source => p_obj_source,
985: x_return_status => x_return_status,
992: px_parent_acct_os => l_parent_acct_os,
993: px_parent_acct_osr => l_parent_acct_osr
994: );
995:
996: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
997: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
998: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_acct_sites, parent id: '||l_parent_acct_id||' '||l_parent_acct_os||'-'||l_parent_acct_osr,
999: p_prefix=>l_debug_prefix,
1000: p_msg_level=>fnd_log.level_procedure);
998: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_acct_sites, parent id: '||l_parent_acct_id||' '||l_parent_acct_os||'-'||l_parent_acct_osr,
999: p_prefix=>l_debug_prefix,
1000: p_msg_level=>fnd_log.level_procedure);
1001: END IF;
1002: RAISE fnd_api.g_exc_error;
1003: END IF;
1004:
1005: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
1006: END LOOP;
1018: p_prefix=>l_debug_prefix,
1019: p_msg_level=>fnd_log.level_procedure);
1020: END IF;
1021: EXCEPTION
1022: WHEN fnd_api.g_exc_error THEN
1023: x_return_status := fnd_api.g_ret_sts_error;
1024:
1025: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1026: p_count => x_msg_count,
1019: p_msg_level=>fnd_log.level_procedure);
1020: END IF;
1021: EXCEPTION
1022: WHEN fnd_api.g_exc_error THEN
1023: x_return_status := fnd_api.g_ret_sts_error;
1024:
1025: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1026: p_count => x_msg_count,
1027: p_data => x_msg_data);
1021: EXCEPTION
1022: WHEN fnd_api.g_exc_error THEN
1023: x_return_status := fnd_api.g_ret_sts_error;
1024:
1025: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1026: p_count => x_msg_count,
1027: p_data => x_msg_data);
1028:
1029: -- Debug info.
1037: hz_utility_v2pub.debug(p_message=>'save_cust_acct_sites(-)',
1038: p_prefix=>l_debug_prefix,
1039: p_msg_level=>fnd_log.level_procedure);
1040: END IF;
1041: WHEN fnd_api.g_exc_unexpected_error THEN
1042: x_return_status := fnd_api.g_ret_sts_unexp_error;
1043:
1044: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1045: p_count => x_msg_count,
1038: p_prefix=>l_debug_prefix,
1039: p_msg_level=>fnd_log.level_procedure);
1040: END IF;
1041: WHEN fnd_api.g_exc_unexpected_error THEN
1042: x_return_status := fnd_api.g_ret_sts_unexp_error;
1043:
1044: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1045: p_count => x_msg_count,
1046: p_data => x_msg_data);
1040: END IF;
1041: WHEN fnd_api.g_exc_unexpected_error THEN
1042: x_return_status := fnd_api.g_ret_sts_unexp_error;
1043:
1044: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1045: p_count => x_msg_count,
1046: p_data => x_msg_data);
1047:
1048: -- Debug info.
1057: p_prefix=>l_debug_prefix,
1058: p_msg_level=>fnd_log.level_procedure);
1059: END IF;
1060: WHEN OTHERS THEN
1061: x_return_status := fnd_api.g_ret_sts_unexp_error;
1062:
1063: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1064: fnd_message.set_token('ERROR' ,SQLERRM);
1065: fnd_msg_pub.add;
1063: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1064: fnd_message.set_token('ERROR' ,SQLERRM);
1065: fnd_msg_pub.add;
1066:
1067: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1068: p_count => x_msg_count,
1069: p_data => x_msg_data);
1070:
1071: -- Debug info.
1275: -- p_cas_id Customer account site Id.
1276: -- p_parent_os Parent original system.
1277: -- OUT:
1278: -- x_return_status Return status after the call. The status can
1279: -- be fnd_api.g_ret_sts_success (success),
1280: -- fnd_api.g_ret_sts_error (error),
1281: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1282: -- x_msg_count Number of messages in message stack.
1283: -- x_msg_data Message text if x_msg_count is 1.
1276: -- p_parent_os Parent original system.
1277: -- OUT:
1278: -- x_return_status Return status after the call. The status can
1279: -- be fnd_api.g_ret_sts_success (success),
1280: -- fnd_api.g_ret_sts_error (error),
1281: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1282: -- x_msg_count Number of messages in message stack.
1283: -- x_msg_data Message text if x_msg_count is 1.
1284: --
1277: -- OUT:
1278: -- x_return_status Return status after the call. The status can
1279: -- be fnd_api.g_ret_sts_success (success),
1280: -- fnd_api.g_ret_sts_error (error),
1281: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1282: -- x_msg_count Number of messages in message stack.
1283: -- x_msg_data Message text if x_msg_count is 1.
1284: --
1285: -- NOTES
1317: -- Standard start of API savepoint
1318: SAVEPOINT create_casu_v2_pvt;
1319:
1320: -- initialize API return status to success.
1321: x_return_status := FND_API.G_RET_STS_SUCCESS;
1322:
1323: -- Debug info.
1324: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1325: hz_utility_v2pub.debug(p_message=>'create_cust_site_v2_uses(+)',
1348: x_return_status => x_return_status,
1349: x_msg_count => x_msg_count,
1350: x_msg_data => x_msg_data);
1351:
1352: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1353: RAISE FND_API.G_EXC_ERROR;
1354: END IF;
1355:
1356: assign_cust_site_use_v2_rec(
1349: x_msg_count => x_msg_count,
1350: x_msg_data => x_msg_data);
1351:
1352: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1353: RAISE FND_API.G_EXC_ERROR;
1354: END IF;
1355:
1356: assign_cust_site_use_v2_rec(
1357: p_cust_site_use_v2_obj => p_casu_v2_objs(i),
1364:
1365: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_site_use (
1366: p_cust_site_use_rec => l_casu_rec,
1367: p_customer_profile_rec => NULL,
1368: p_create_profile => FND_API.G_FALSE,
1369: p_create_profile_amt => FND_API.G_FALSE,
1370: x_site_use_id => l_casu_id,
1371: x_return_status => x_return_status,
1372: x_msg_count => x_msg_count,
1365: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_site_use (
1366: p_cust_site_use_rec => l_casu_rec,
1367: p_customer_profile_rec => NULL,
1368: p_create_profile => FND_API.G_FALSE,
1369: p_create_profile_amt => FND_API.G_FALSE,
1370: x_site_use_id => l_casu_id,
1371: x_return_status => x_return_status,
1372: x_msg_count => x_msg_count,
1373: x_msg_data => x_msg_data
1372: x_msg_count => x_msg_count,
1373: x_msg_data => x_msg_data
1374: );
1375:
1376: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1377: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1378: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.create_cust_site_v2_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
1379: p_prefix=>l_debug_prefix,
1380: p_msg_level=>fnd_log.level_procedure);
1378: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.create_cust_site_v2_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
1379: p_prefix=>l_debug_prefix,
1380: p_msg_level=>fnd_log.level_procedure);
1381: END IF;
1382: RAISE FND_API.G_EXC_ERROR;
1383: END IF;
1384:
1385: -- assign site_use_id
1386: p_casu_v2_objs(i).site_use_id := l_casu_id;
1399: x_msg_count => x_msg_count,
1400: x_msg_data => x_msg_data
1401: );
1402:
1403: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1404: RAISE FND_API.G_EXC_ERROR;
1405: END IF;
1406:
1407: HZ_CUST_ACCT_BO_PVT.create_cust_profile_amts(
1400: x_msg_data => x_msg_data
1401: );
1402:
1403: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1404: RAISE FND_API.G_EXC_ERROR;
1405: END IF;
1406:
1407: HZ_CUST_ACCT_BO_PVT.create_cust_profile_amts(
1408: p_cpa_objs => p_casu_v2_objs(i).site_use_profile_obj.cust_profile_amt_objs,
1413: x_msg_count => x_msg_count,
1414: x_msg_data => x_msg_data
1415: );
1416:
1417: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1418: RAISE FND_API.G_EXC_ERROR;
1419: END IF;
1420: END IF;
1421:
1414: x_msg_data => x_msg_data
1415: );
1416:
1417: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1418: RAISE FND_API.G_EXC_ERROR;
1419: END IF;
1420: END IF;
1421:
1422: ------------------------
1437: x_msg_count => x_msg_count,
1438: x_msg_data => x_msg_data
1439: );
1440:
1441: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1442: RAISE FND_API.G_EXC_ERROR;
1443: END IF;
1444: END IF;
1445:
1438: x_msg_data => x_msg_data
1439: );
1440:
1441: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1442: RAISE FND_API.G_EXC_ERROR;
1443: END IF;
1444: END IF;
1445:
1446: ------------------------
1456: x_msg_count => x_msg_count,
1457: x_msg_data => x_msg_data
1458: );
1459:
1460: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1461: RAISE FND_API.G_EXC_ERROR;
1462: END IF;
1463: END IF;
1464: END LOOP;
1457: x_msg_data => x_msg_data
1458: );
1459:
1460: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1461: RAISE FND_API.G_EXC_ERROR;
1462: END IF;
1463: END IF;
1464: END LOOP;
1465:
1476: p_msg_level=>fnd_log.level_procedure);
1477: END IF;
1478:
1479: EXCEPTION
1480: WHEN fnd_api.g_exc_error THEN
1481: ROLLBACK TO create_casu_v2_pvt;
1482: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1483: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1484: FND_MSG_PUB.ADD;
1482: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1483: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1484: FND_MSG_PUB.ADD;
1485:
1486: x_return_status := fnd_api.g_ret_sts_error;
1487:
1488: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1489: p_count => x_msg_count,
1490: p_data => x_msg_data);
1484: FND_MSG_PUB.ADD;
1485:
1486: x_return_status := fnd_api.g_ret_sts_error;
1487:
1488: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1489: p_count => x_msg_count,
1490: p_data => x_msg_data);
1491:
1492: -- Debug info.
1501: p_prefix=>l_debug_prefix,
1502: p_msg_level=>fnd_log.level_procedure);
1503: END IF;
1504:
1505: WHEN fnd_api.g_exc_unexpected_error THEN
1506: ROLLBACK TO create_casu_v2_pvt;
1507: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1508: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1509: FND_MSG_PUB.ADD;
1507: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1508: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1509: FND_MSG_PUB.ADD;
1510:
1511: x_return_status := fnd_api.g_ret_sts_unexp_error;
1512:
1513: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1514: p_count => x_msg_count,
1515: p_data => x_msg_data);
1509: FND_MSG_PUB.ADD;
1510:
1511: x_return_status := fnd_api.g_ret_sts_unexp_error;
1512:
1513: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1514: p_count => x_msg_count,
1515: p_data => x_msg_data);
1516:
1517: -- Debug info.
1532: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1533: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1534: FND_MSG_PUB.ADD;
1535:
1536: x_return_status := fnd_api.g_ret_sts_unexp_error;
1537:
1538: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1539: fnd_message.set_token('ERROR' ,SQLERRM);
1540: fnd_msg_pub.add;
1538: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1539: fnd_message.set_token('ERROR' ,SQLERRM);
1540: fnd_msg_pub.add;
1541:
1542: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1543: p_count => x_msg_count,
1544: p_data => x_msg_data);
1545:
1546: -- Debug info.
1571: -- p_cas_id Customer account site Id.
1572: -- p_parent_os Parent original system.
1573: -- OUT:
1574: -- x_return_status Return status after the call. The status can
1575: -- be fnd_api.g_ret_sts_success (success),
1576: -- fnd_api.g_ret_sts_error (error),
1577: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1578: -- x_msg_count Number of messages in message stack.
1579: -- x_msg_data Message text if x_msg_count is 1.
1572: -- p_parent_os Parent original system.
1573: -- OUT:
1574: -- x_return_status Return status after the call. The status can
1575: -- be fnd_api.g_ret_sts_success (success),
1576: -- fnd_api.g_ret_sts_error (error),
1577: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1578: -- x_msg_count Number of messages in message stack.
1579: -- x_msg_data Message text if x_msg_count is 1.
1580: --
1573: -- OUT:
1574: -- x_return_status Return status after the call. The status can
1575: -- be fnd_api.g_ret_sts_success (success),
1576: -- fnd_api.g_ret_sts_error (error),
1577: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1578: -- x_msg_count Number of messages in message stack.
1579: -- x_msg_data Message text if x_msg_count is 1.
1580: --
1581: -- NOTES
1630: -- Standard start of API savepoint
1631: SAVEPOINT save_casu_v2_pvt;
1632:
1633: -- initialize API return status to success.
1634: x_return_status := FND_API.G_RET_STS_SUCCESS;
1635:
1636: -- Debug info.
1637: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1638: hz_utility_v2pub.debug(p_message=>'save_cust_site_v2_uses(+)',
1668: IF(l_create_update_flag = 'E') THEN
1669: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1670: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1671: FND_MSG_PUB.ADD;
1672: RAISE FND_API.G_EXC_ERROR;
1673: END IF;
1674:
1675: -- check if the cust site use record is create or update
1676: -- since cust site use has os+osr, use os+osr to check if record exist or not
1686:
1687: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_site_use (
1688: p_cust_site_use_rec => l_casu_rec,
1689: p_customer_profile_rec => NULL,
1690: p_create_profile => FND_API.G_FALSE,
1691: p_create_profile_amt => FND_API.G_FALSE,
1692: x_site_use_id => l_casu_id,
1693: x_return_status => x_return_status,
1694: x_msg_count => x_msg_count,
1687: HZ_CUST_ACCOUNT_SITE_V2PUB.create_cust_site_use (
1688: p_cust_site_use_rec => l_casu_rec,
1689: p_customer_profile_rec => NULL,
1690: p_create_profile => FND_API.G_FALSE,
1691: p_create_profile_amt => FND_API.G_FALSE,
1692: x_site_use_id => l_casu_id,
1693: x_return_status => x_return_status,
1694: x_msg_count => x_msg_count,
1695: x_msg_data => x_msg_data
1694: x_msg_count => x_msg_count,
1695: x_msg_data => x_msg_data
1696: );
1697:
1698: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1699: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1700: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_site_v2_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
1701: p_prefix=>l_debug_prefix,
1702: p_msg_level=>fnd_log.level_procedure);
1700: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_site_v2_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
1701: p_prefix=>l_debug_prefix,
1702: p_msg_level=>fnd_log.level_procedure);
1703: END IF;
1704: RAISE fnd_api.g_exc_error;
1705: END IF;
1706:
1707: -- assign site_use_id
1708: p_casu_v2_objs(i).site_use_id := l_casu_id;
1719: x_msg_count => x_msg_count,
1720: x_msg_data => x_msg_data
1721: );
1722:
1723: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1724: RAISE FND_API.G_EXC_ERROR;
1725: END IF;
1726:
1727: HZ_CUST_ACCT_BO_PVT.create_cust_profile_amts(
1720: x_msg_data => x_msg_data
1721: );
1722:
1723: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1724: RAISE FND_API.G_EXC_ERROR;
1725: END IF;
1726:
1727: HZ_CUST_ACCT_BO_PVT.create_cust_profile_amts(
1728: p_cpa_objs => p_casu_v2_objs(i).site_use_profile_obj.cust_profile_amt_objs,
1733: x_msg_count => x_msg_count,
1734: x_msg_data => x_msg_data
1735: );
1736:
1737: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1738: RAISE FND_API.G_EXC_ERROR;
1739: END IF;
1740:
1741: END IF;
1734: x_msg_data => x_msg_data
1735: );
1736:
1737: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1738: RAISE FND_API.G_EXC_ERROR;
1739: END IF;
1740:
1741: END IF;
1742:
1752: x_msg_count => x_msg_count,
1753: x_msg_data => x_msg_data
1754: );
1755:
1756: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1757: RAISE FND_API.G_EXC_ERROR;
1758: END IF;
1759:
1760: OPEN get_ovn(l_casu_id);
1753: x_msg_data => x_msg_data
1754: );
1755:
1756: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1757: RAISE FND_API.G_EXC_ERROR;
1758: END IF;
1759:
1760: OPEN get_ovn(l_casu_id);
1761: FETCH get_ovn INTO l_site_use_code, l_ovn;
1781: x_msg_count => x_msg_count,
1782: x_msg_data => x_msg_data
1783: );
1784:
1785: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1786: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1787: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_site_v2_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
1788: p_prefix=>l_debug_prefix,
1789: p_msg_level=>fnd_log.level_procedure);
1787: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_site_v2_uses, acct_site_id: '||p_cas_id||' , cust_acct_site_os: '||l_casu_os||' , cust_acct_site_osr: '||l_casu_osr,
1788: p_prefix=>l_debug_prefix,
1789: p_msg_level=>fnd_log.level_procedure);
1790: END IF;
1791: RAISE fnd_api.g_exc_error;
1792: END IF;
1793:
1794: -- assign site_use_id
1795: p_casu_v2_objs(i).site_use_id := l_casu_id;
1806: x_msg_count => x_msg_count,
1807: x_msg_data => x_msg_data
1808: );
1809:
1810: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1811: RAISE FND_API.G_EXC_ERROR;
1812: END IF;
1813:
1814: HZ_CUST_ACCT_BO_PVT.save_cust_profile_amts(
1807: x_msg_data => x_msg_data
1808: );
1809:
1810: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1811: RAISE FND_API.G_EXC_ERROR;
1812: END IF;
1813:
1814: HZ_CUST_ACCT_BO_PVT.save_cust_profile_amts(
1815: p_cpa_objs => p_casu_v2_objs(i).site_use_profile_obj.cust_profile_amt_objs,
1841: x_msg_count => x_msg_count,
1842: x_msg_data => x_msg_data
1843: );
1844:
1845: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1846: RAISE FND_API.G_EXC_ERROR;
1847: END IF;
1848: END IF;
1849:
1842: x_msg_data => x_msg_data
1843: );
1844:
1845: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1846: RAISE FND_API.G_EXC_ERROR;
1847: END IF;
1848: END IF;
1849:
1850: ------------------------
1860: x_msg_count => x_msg_count,
1861: x_msg_data => x_msg_data
1862: );
1863:
1864: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1865: RAISE FND_API.G_EXC_ERROR;
1866: END IF;
1867: END IF;
1868:
1861: x_msg_data => x_msg_data
1862: );
1863:
1864: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1865: RAISE FND_API.G_EXC_ERROR;
1866: END IF;
1867: END IF;
1868:
1869: END LOOP;
1880: p_prefix=>l_debug_prefix,
1881: p_msg_level=>fnd_log.level_procedure);
1882: END IF;
1883: EXCEPTION
1884: WHEN fnd_api.g_exc_error THEN
1885: ROLLBACK TO save_casu_v2_pvt;
1886: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1887: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1888: FND_MSG_PUB.ADD;
1886: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1887: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1888: FND_MSG_PUB.ADD;
1889:
1890: x_return_status := fnd_api.g_ret_sts_error;
1891:
1892: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1893: p_count => x_msg_count,
1894: p_data => x_msg_data);
1888: FND_MSG_PUB.ADD;
1889:
1890: x_return_status := fnd_api.g_ret_sts_error;
1891:
1892: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1893: p_count => x_msg_count,
1894: p_data => x_msg_data);
1895:
1896: -- Debug info.
1905: p_prefix=>l_debug_prefix,
1906: p_msg_level=>fnd_log.level_procedure);
1907: END IF;
1908:
1909: WHEN fnd_api.g_exc_unexpected_error THEN
1910: ROLLBACK TO save_casu_v2_pvt;
1911: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1912: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1913: FND_MSG_PUB.ADD;
1911: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1912: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1913: FND_MSG_PUB.ADD;
1914:
1915: x_return_status := fnd_api.g_ret_sts_unexp_error;
1916:
1917: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1918: p_count => x_msg_count,
1919: p_data => x_msg_data);
1913: FND_MSG_PUB.ADD;
1914:
1915: x_return_status := fnd_api.g_ret_sts_unexp_error;
1916:
1917: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1918: p_count => x_msg_count,
1919: p_data => x_msg_data);
1920:
1921: -- Debug info.
1936: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1937: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'CUST_ACCT_SITE_USE');
1938: FND_MSG_PUB.ADD;
1939:
1940: x_return_status := fnd_api.g_ret_sts_unexp_error;
1941:
1942: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1943: fnd_message.set_token('ERROR' ,SQLERRM);
1944: fnd_msg_pub.add;
1942: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1943: fnd_message.set_token('ERROR' ,SQLERRM);
1944: fnd_msg_pub.add;
1945:
1946: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1947: p_count => x_msg_count,
1948: p_data => x_msg_data);
1949:
1950: -- Debug info.
1985: l_parent_acct_osr VARCHAR2(255);
1986: l_cbm VARCHAR2(30);
1987: BEGIN
1988: -- initialize API return status to success
1989: x_return_status := FND_API.G_RET_STS_SUCCESS;
1990:
1991: -- Debug info.
1992: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1993: hz_utility_v2pub.debug(p_message=>'save_cust_acct_v2_sites(+)',
2004: IF(p_create_update_flag = 'C') THEN
2005: -- Create cust account sites
2006: FOR i IN 1..p_cas_v2_objs.COUNT LOOP
2007: HZ_CUST_ACCT_SITE_BO_PUB.do_create_cust_acct_site_v2_bo(
2008: p_init_msg_list => fnd_api.g_false,
2009: p_validate_bo_flag => fnd_api.g_false,
2010: p_cust_acct_site_v2_obj => p_cas_v2_objs(i),
2011: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
2012: p_obj_source => p_obj_source,
2005: -- Create cust account sites
2006: FOR i IN 1..p_cas_v2_objs.COUNT LOOP
2007: HZ_CUST_ACCT_SITE_BO_PUB.do_create_cust_acct_site_v2_bo(
2008: p_init_msg_list => fnd_api.g_false,
2009: p_validate_bo_flag => fnd_api.g_false,
2010: p_cust_acct_site_v2_obj => p_cas_v2_objs(i),
2011: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
2012: p_obj_source => p_obj_source,
2013: x_return_status => x_return_status,
2020: px_parent_acct_os => l_parent_acct_os,
2021: px_parent_acct_osr => l_parent_acct_osr
2022: );
2023:
2024: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2025: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2026: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_acct_v2_sites, parent id: '||l_parent_acct_id||' '||l_parent_acct_os||'-'||l_parent_acct_osr,
2027: p_prefix=>l_debug_prefix,
2028: p_msg_level=>fnd_log.level_procedure);
2026: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_acct_v2_sites, parent id: '||l_parent_acct_id||' '||l_parent_acct_os||'-'||l_parent_acct_osr,
2027: p_prefix=>l_debug_prefix,
2028: p_msg_level=>fnd_log.level_procedure);
2029: END IF;
2030: RAISE fnd_api.g_exc_error;
2031: END IF;
2032:
2033: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2034: END LOOP;
2035: ELSE
2036: -- Create/update cust account site
2037: FOR i IN 1..p_cas_v2_objs.COUNT LOOP
2038: HZ_CUST_ACCT_SITE_BO_PUB.do_save_cust_acct_site_v2_bo(
2039: p_init_msg_list => fnd_api.g_false,
2040: p_validate_bo_flag => fnd_api.g_false,
2041: p_cust_acct_site_v2_obj => p_cas_v2_objs(i),
2042: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
2043: p_obj_source => p_obj_source,
2036: -- Create/update cust account site
2037: FOR i IN 1..p_cas_v2_objs.COUNT LOOP
2038: HZ_CUST_ACCT_SITE_BO_PUB.do_save_cust_acct_site_v2_bo(
2039: p_init_msg_list => fnd_api.g_false,
2040: p_validate_bo_flag => fnd_api.g_false,
2041: p_cust_acct_site_v2_obj => p_cas_v2_objs(i),
2042: p_created_by_module => HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE,
2043: p_obj_source => p_obj_source,
2044: x_return_status => x_return_status,
2051: px_parent_acct_os => l_parent_acct_os,
2052: px_parent_acct_osr => l_parent_acct_osr
2053: );
2054:
2055: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2056: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2057: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_acct_v2_sites, parent id: '||l_parent_acct_id||' '||l_parent_acct_os||'-'||l_parent_acct_osr,
2058: p_prefix=>l_debug_prefix,
2059: p_msg_level=>fnd_log.level_procedure);
2057: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_cust_acct_site_bo_pvt.save_cust_acct_v2_sites, parent id: '||l_parent_acct_id||' '||l_parent_acct_os||'-'||l_parent_acct_osr,
2058: p_prefix=>l_debug_prefix,
2059: p_msg_level=>fnd_log.level_procedure);
2060: END IF;
2061: RAISE fnd_api.g_exc_error;
2062: END IF;
2063:
2064: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2065: END LOOP;
2077: p_prefix=>l_debug_prefix,
2078: p_msg_level=>fnd_log.level_procedure);
2079: END IF;
2080: EXCEPTION
2081: WHEN fnd_api.g_exc_error THEN
2082: x_return_status := fnd_api.g_ret_sts_error;
2083:
2084: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2085: p_count => x_msg_count,
2078: p_msg_level=>fnd_log.level_procedure);
2079: END IF;
2080: EXCEPTION
2081: WHEN fnd_api.g_exc_error THEN
2082: x_return_status := fnd_api.g_ret_sts_error;
2083:
2084: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2085: p_count => x_msg_count,
2086: p_data => x_msg_data);
2080: EXCEPTION
2081: WHEN fnd_api.g_exc_error THEN
2082: x_return_status := fnd_api.g_ret_sts_error;
2083:
2084: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2085: p_count => x_msg_count,
2086: p_data => x_msg_data);
2087:
2088: -- Debug info.
2096: hz_utility_v2pub.debug(p_message=>'save_cust_acct_v2_sites(-)',
2097: p_prefix=>l_debug_prefix,
2098: p_msg_level=>fnd_log.level_procedure);
2099: END IF;
2100: WHEN fnd_api.g_exc_unexpected_error THEN
2101: x_return_status := fnd_api.g_ret_sts_unexp_error;
2102:
2103: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2104: p_count => x_msg_count,
2097: p_prefix=>l_debug_prefix,
2098: p_msg_level=>fnd_log.level_procedure);
2099: END IF;
2100: WHEN fnd_api.g_exc_unexpected_error THEN
2101: x_return_status := fnd_api.g_ret_sts_unexp_error;
2102:
2103: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2104: p_count => x_msg_count,
2105: p_data => x_msg_data);
2099: END IF;
2100: WHEN fnd_api.g_exc_unexpected_error THEN
2101: x_return_status := fnd_api.g_ret_sts_unexp_error;
2102:
2103: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2104: p_count => x_msg_count,
2105: p_data => x_msg_data);
2106:
2107: -- Debug info.
2116: p_prefix=>l_debug_prefix,
2117: p_msg_level=>fnd_log.level_procedure);
2118: END IF;
2119: WHEN OTHERS THEN
2120: x_return_status := fnd_api.g_ret_sts_unexp_error;
2121:
2122: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2123: fnd_message.set_token('ERROR' ,SQLERRM);
2124: fnd_msg_pub.add;
2122: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2123: fnd_message.set_token('ERROR' ,SQLERRM);
2124: fnd_msg_pub.add;
2125:
2126: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2127: p_count => x_msg_count,
2128: p_data => x_msg_data);
2129:
2130: -- Debug info.