[Home] [Help]
709: l_copy_sched_cont_flag VARCHAR2(1) := 'Y';
710:
711: BEGIN
712:
713: -- Standard Start of API savepoint
714: SAVEPOINT copy_event_header;
715:
716: -- Standard call to check for call compatibility.
717: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
712:
713: -- Standard Start of API savepoint
714: SAVEPOINT copy_event_header;
715:
716: -- Standard call to check for call compatibility.
717: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
718: p_api_version,
719: l_api_name,
720: G_PKG_NAME)
1114:
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: );
1125: EXCEPTION
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
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,
1154: p_count => x_msg_count,
1155: p_data => x_msg_data