25: -- 12-MAY-2001 PMOTHUKU Created this available procedures below
26: -- Implemented the procedures separetly so that they
27: --
28: -- ==============================================================================
29: AMS_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
30: AMS_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
31: AMS_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
32:
33: FUNCTION get_agenda_name (p_agenda_id IN NUMBER)
26: -- Implemented the procedures separetly so that they
27: --
28: -- ==============================================================================
29: AMS_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
30: AMS_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
31: AMS_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
32:
33: FUNCTION get_agenda_name (p_agenda_id IN NUMBER)
34: RETURN VARCHAR2
27: --
28: -- ==============================================================================
29: AMS_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
30: AMS_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
31: AMS_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
32:
33: FUNCTION get_agenda_name (p_agenda_id IN NUMBER)
34: RETURN VARCHAR2
35: IS
209: IF l_return_status = fnd_api.g_ret_sts_error
210: OR l_return_status = fnd_api.g_ret_sts_unexp_error THEN
211: FOR l_counter IN 1 .. x_msg_count
212: LOOP
213: l_mesg_text := fnd_msg_pub.get (p_encoded => fnd_api.g_false);
214: l_stmt_num := 2;
215: p_errnum := 1;
216: p_errmsg := substr(l_mesg_text||' , '|| TO_CHAR (l_stmt_num) ||
217: ' , ' || '): ' || l_counter ||
355: IF l_return_status = fnd_api.g_ret_sts_error
356: OR l_return_status = fnd_api.g_ret_sts_unexp_error THEN
357: FOR l_counter IN 1 .. x_msg_count
358: LOOP
359: l_mesg_text := fnd_msg_pub.get (p_encoded => fnd_api.g_false);
360: l_stmt_num := 2;
361: p_errnum := 1;
362: p_errmsg := substr(l_mesg_text||' , '|| TO_CHAR (l_stmt_num) ||
363: ' , ' || '): ' || l_counter ||
584: IF l_return_status = fnd_api.g_ret_sts_error
585: OR l_return_status = fnd_api.g_ret_sts_unexp_error THEN
586: FOR l_counter IN 1 .. x_msg_count
587: LOOP
588: l_mesg_text := fnd_msg_pub.get (p_encoded => fnd_api.g_false);
589: l_stmt_num := 2;
590: p_errnum := 1;
591: p_errmsg := substr(l_mesg_text||' , '|| TO_CHAR (l_stmt_num) ||
592: ' , ' || '): ' || l_counter ||
724:
725: -- Initialize message list if p_init_msg_list is set to TRUE.
726: IF FND_API.to_Boolean( p_init_msg_list )
727: THEN
728: FND_MSG_PUB.initialize;
729: END IF;
730:
731: -- Debug Message
732: IF (AMS_DEBUG_HIGH_ON) THEN
1115: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1116: END IF;
1117:
1118: -- Standard call to get message count and if count is 1, get message info.
1119: FND_MSG_PUB.Count_And_Get
1120: (p_count => x_msg_count,
1121: p_data => x_msg_data
1122: );
1123:
1126: WHEN FND_API.G_EXC_ERROR THEN
1127: ROLLBACK TO copy_event_header;
1128: x_return_status := FND_API.G_RET_STS_ERROR;
1129: -- Standard call to get message count and if count=1, get the message
1130: FND_MSG_PUB.Count_And_Get (
1131: p_encoded => FND_API.G_FALSE,
1132: p_count => x_msg_count,
1133: p_data => x_msg_data
1134: );
1135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1136: ROLLBACK TO copy_event_header;
1137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1138: -- Standard call to get message count and if count=1, get the message
1139: FND_MSG_PUB.Count_And_Get (
1140: p_encoded => FND_API.G_FALSE,
1141: p_count => x_msg_count,
1142: p_data => x_msg_data
1143: );
1144:
1145: WHEN OTHERS THEN
1146: ROLLBACK TO copy_event_header;
1147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1148: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1149: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1150: END IF;
1151: -- Standard call to get message count and if count=1, get the message
1152: FND_MSG_PUB.Count_And_Get (
1145: WHEN OTHERS THEN
1146: ROLLBACK TO copy_event_header;
1147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1148: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1149: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1150: END IF;
1151: -- Standard call to get message count and if count=1, get the message
1152: FND_MSG_PUB.Count_And_Get (
1153: p_encoded => FND_API.G_FALSE,
1148: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1149: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1150: END IF;
1151: -- Standard call to get message count and if count=1, get the message
1152: FND_MSG_PUB.Count_And_Get (
1153: p_encoded => FND_API.G_FALSE,
1154: p_count => x_msg_count,
1155: p_data => x_msg_data
1156: );