20: -- EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
21: --
22: -- ARGUMENTS
23: -- IN:
24: -- p_init_msg_list Initialize message stack if it is set to FND_API.G_TRUE. Default is FND_API.G_FALSE.
25: -- p_party_id party ID.
26: -- p_party_site_id party site ID. If this id is not passed in, multiple site objects will be returned.
27: -- p_party_site_os party site orig system.
28: -- p_party_site_osr party site orig system reference.
29: --
30: -- OUT:
31: -- x_party_site_objs Logical party site records.
32: -- x_return_status Return status after the call. The status can
33: -- be fnd_api.g_ret_sts_success (success),
34: -- fnd_api.g_ret_sts_error (error),
35: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
36: -- x_msg_count Number of messages in message stack.
37: -- x_msg_data Message text if x_msg_count is 1.
30: -- OUT:
31: -- x_party_site_objs Logical party site records.
32: -- x_return_status Return status after the call. The status can
33: -- be fnd_api.g_ret_sts_success (success),
34: -- fnd_api.g_ret_sts_error (error),
35: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
36: -- x_msg_count Number of messages in message stack.
37: -- x_msg_data Message text if x_msg_count is 1.
38: --
31: -- x_party_site_objs Logical party site records.
32: -- x_return_status Return status after the call. The status can
33: -- be fnd_api.g_ret_sts_success (success),
34: -- fnd_api.g_ret_sts_error (error),
35: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
36: -- x_msg_count Number of messages in message stack.
37: -- x_msg_data Message text if x_msg_count is 1.
38: --
39: -- NOTES
73: */
74:
75:
76: PROCEDURE get_party_site_bos(
77: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
78: p_party_id IN NUMBER,
79: p_party_site_id IN NUMBER,
80: p_action_type IN VARCHAR2 := NULL,
81: x_party_site_objs OUT NOCOPY HZ_PARTY_SITE_BO_TBL,
314: BEGIN
315:
316:
317: -- initialize API return status to success.
318: x_return_status := FND_API.G_RET_STS_SUCCESS;
319:
320: -- Initialize message list if p_init_msg_list is set to TRUE
321: IF FND_API.to_Boolean(p_init_msg_list) THEN
322: FND_MSG_PUB.initialize;
317: -- initialize API return status to success.
318: x_return_status := FND_API.G_RET_STS_SUCCESS;
319:
320: -- Initialize message list if p_init_msg_list is set to TRUE
321: IF FND_API.to_Boolean(p_init_msg_list) THEN
322: FND_MSG_PUB.initialize;
323: END IF;
324:
325:
338:
339: for i in 1..x_party_site_objs.count loop
340:
341: hz_extract_cont_point_bo_pvt.get_phone_bos
342: (p_init_msg_list => fnd_api.g_false,
343: p_phone_id => null,
344: p_parent_id => x_party_site_objs(i).party_site_id,
345: p_parent_table_name => 'HZ_PARTY_SITES',
346: p_action_type => p_action_type,
348: x_return_status => x_return_status,
349: x_msg_count => x_msg_count,
350: x_msg_data => x_msg_data);
351:
352: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
353: RAISE FND_API.G_EXC_ERROR;
354: END IF;
355:
356: hz_extract_ext_attri_bo_pvt.get_ext_attribute_bos
349: x_msg_count => x_msg_count,
350: x_msg_data => x_msg_data);
351:
352: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
353: RAISE FND_API.G_EXC_ERROR;
354: END IF;
355:
356: hz_extract_ext_attri_bo_pvt.get_ext_attribute_bos
357: (p_init_msg_list => fnd_api.g_false,
353: RAISE FND_API.G_EXC_ERROR;
354: END IF;
355:
356: hz_extract_ext_attri_bo_pvt.get_ext_attribute_bos
357: (p_init_msg_list => fnd_api.g_false,
358: p_ext_object_id => x_party_site_objs(i).party_site_id,
359: p_ext_object_name => 'HZ_PARTY_SITES',
360: p_action_type => p_action_type,
361: x_ext_attribute_objs => x_party_site_objs(i).ext_attributes_objs,
362: x_return_status => x_return_status,
363: x_msg_count => x_msg_count,
364: x_msg_data => x_msg_data);
365:
366: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
367: RAISE FND_API.G_EXC_ERROR;
368: END IF;
369:
370: hz_extract_cont_point_bo_pvt.get_telex_bos
363: x_msg_count => x_msg_count,
364: x_msg_data => x_msg_data);
365:
366: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
367: RAISE FND_API.G_EXC_ERROR;
368: END IF;
369:
370: hz_extract_cont_point_bo_pvt.get_telex_bos
371: (p_init_msg_list => fnd_api.g_false,
367: RAISE FND_API.G_EXC_ERROR;
368: END IF;
369:
370: hz_extract_cont_point_bo_pvt.get_telex_bos
371: (p_init_msg_list => fnd_api.g_false,
372: p_telex_id => null,
373: p_parent_id => x_party_site_objs(i).party_site_id,
374: p_parent_table_name => 'HZ_PARTY_SITES',
375: p_action_type => p_action_type,
377: x_return_status => x_return_status,
378: x_msg_count => x_msg_count,
379: x_msg_data => x_msg_data);
380:
381: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
382: RAISE FND_API.G_EXC_ERROR;
383: END IF;
384:
385:
378: x_msg_count => x_msg_count,
379: x_msg_data => x_msg_data);
380:
381: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
382: RAISE FND_API.G_EXC_ERROR;
383: END IF;
384:
385:
386: hz_extract_cont_point_bo_pvt.get_email_bos
383: END IF;
384:
385:
386: hz_extract_cont_point_bo_pvt.get_email_bos
387: (p_init_msg_list => fnd_api.g_false,
388: p_email_id => null,
389: p_parent_id => x_party_site_objs(i).party_site_id,
390: p_parent_table_name => 'HZ_PARTY_SITES',
391: p_action_type => p_action_type,
393: x_return_status => x_return_status,
394: x_msg_count => x_msg_count,
395: x_msg_data => x_msg_data);
396:
397: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
398: RAISE FND_API.G_EXC_ERROR;
399: END IF;
400:
401:
394: x_msg_count => x_msg_count,
395: x_msg_data => x_msg_data);
396:
397: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
398: RAISE FND_API.G_EXC_ERROR;
399: END IF;
400:
401:
402: hz_extract_cont_point_bo_pvt.get_web_bos
399: END IF;
400:
401:
402: hz_extract_cont_point_bo_pvt.get_web_bos
403: (p_init_msg_list => fnd_api.g_false,
404: p_web_id => null,
405: p_parent_id => x_party_site_objs(i).party_site_id,
406: p_parent_table_name => 'HZ_PARTY_SITES',
407: p_action_type => p_action_type,
409: x_return_status => x_return_status,
410: x_msg_count => x_msg_count,
411: x_msg_data => x_msg_data);
412:
413: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
414: RAISE FND_API.G_EXC_ERROR;
415: END IF;
416:
417: -- SSM for location obj
410: x_msg_count => x_msg_count,
411: x_msg_data => x_msg_data);
412:
413: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
414: RAISE FND_API.G_EXC_ERROR;
415: END IF;
416:
417: -- SSM for location obj
418: HZ_EXTRACT_ORIG_SYS_REF_BO_PVT.get_orig_sys_ref_bos
415: END IF;
416:
417: -- SSM for location obj
418: HZ_EXTRACT_ORIG_SYS_REF_BO_PVT.get_orig_sys_ref_bos
419: (p_init_msg_list => fnd_api.g_false,
420: p_owner_table_id => x_party_site_objs(i).location_obj.location_id,
421: p_owner_table_name => 'HZ_LOCATIONS',
422: p_action_type => NULL, --p_action_type,
423: x_orig_sys_ref_objs => x_party_site_objs(i).location_obj.orig_sys_objs,
424: x_return_status => x_return_status,
425: x_msg_count => x_msg_count,
426: x_msg_data => x_msg_data);
427:
428: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
429: RAISE FND_API.G_EXC_ERROR;
430: END IF;
431:
432: -- Ext attributes for location obj
425: x_msg_count => x_msg_count,
426: x_msg_data => x_msg_data);
427:
428: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
429: RAISE FND_API.G_EXC_ERROR;
430: END IF;
431:
432: -- Ext attributes for location obj
433:
431:
432: -- Ext attributes for location obj
433:
434: hz_extract_ext_attri_bo_pvt.get_ext_attribute_bos
435: (p_init_msg_list => fnd_api.g_false,
436: p_ext_object_id => x_party_site_objs(i).location_obj.location_id,
437: p_ext_object_name => 'HZ_LOCATIONS',
438: p_action_type => p_action_type,
439: x_ext_attribute_objs => x_party_site_objs(i).location_obj.ext_attributes_objs,
440: x_return_status => x_return_status,
441: x_msg_count => x_msg_count,
442: x_msg_data => x_msg_data);
443:
444: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
445: RAISE FND_API.G_EXC_ERROR;
446: END IF;
447:
448: end loop;
441: x_msg_count => x_msg_count,
442: x_msg_data => x_msg_data);
443:
444: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
445: RAISE FND_API.G_EXC_ERROR;
446: END IF;
447:
448: end loop;
449:
464:
465:
466: EXCEPTION
467:
468: WHEN fnd_api.g_exc_error THEN
469: x_return_status := fnd_api.g_ret_sts_error;
470:
471: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
472: p_count => x_msg_count,
465:
466: EXCEPTION
467:
468: WHEN fnd_api.g_exc_error THEN
469: x_return_status := fnd_api.g_ret_sts_error;
470:
471: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
472: p_count => x_msg_count,
473: p_data => x_msg_data);
467:
468: WHEN fnd_api.g_exc_error THEN
469: x_return_status := fnd_api.g_ret_sts_error;
470:
471: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
472: p_count => x_msg_count,
473: p_data => x_msg_data);
474:
475: -- Debug info.
483: hz_utility_v2pub.debug(p_message=>'get_party_site_bos(-)',
484: p_prefix=>l_debug_prefix,
485: p_msg_level=>fnd_log.level_procedure);
486: END IF;
487: WHEN fnd_api.g_exc_unexpected_error THEN
488: x_return_status := fnd_api.g_ret_sts_unexp_error;
489:
490: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
491: p_count => x_msg_count,
484: p_prefix=>l_debug_prefix,
485: p_msg_level=>fnd_log.level_procedure);
486: END IF;
487: WHEN fnd_api.g_exc_unexpected_error THEN
488: x_return_status := fnd_api.g_ret_sts_unexp_error;
489:
490: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
491: p_count => x_msg_count,
492: p_data => x_msg_data);
486: END IF;
487: WHEN fnd_api.g_exc_unexpected_error THEN
488: x_return_status := fnd_api.g_ret_sts_unexp_error;
489:
490: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
491: p_count => x_msg_count,
492: p_data => x_msg_data);
493:
494: -- Debug info.
503: p_prefix=>l_debug_prefix,
504: p_msg_level=>fnd_log.level_procedure);
505: END IF;
506: WHEN OTHERS THEN
507: x_return_status := fnd_api.g_ret_sts_unexp_error;
508:
509: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
510: fnd_message.set_token('ERROR' ,SQLERRM);
511: fnd_msg_pub.add;
509: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
510: fnd_message.set_token('ERROR' ,SQLERRM);
511: fnd_msg_pub.add;
512:
513: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
514: p_count => x_msg_count,
515: p_data => x_msg_data);
516:
517: -- Debug info.