178: p_attribute15 => null);
179: commit;
180: end loop;
181:
182: FND_MSG_PUB.Count_And_Get
183: (p_count => l_msg_count ,
184: p_data => errbuf
185: );
186: EXCEPTION
186: EXCEPTION
187: WHEN FND_API.G_EXC_ERROR THEN
188: ROLLBACK TO create_usage_history_pvt;
189: retcode := 2;
190: FND_MSG_PUB.Count_And_Get
191: (p_count => l_msg_count ,
192: p_data => errbuf
193: );
194: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
193: );
194: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
195: ROLLBACK TO create_usage_history_pvt;
196: retcode := 2;
197: FND_MSG_PUB.Count_And_Get
198: (p_count => l_msg_count ,
199: p_data => errbuf
200: );
201: WHEN OTHERS THEN
200: );
201: WHEN OTHERS THEN
202: ROLLBACK TO create_usage_history_pvt;
203: retcode := 2;
204: IF FND_MSG_PUB.Check_Msg_Level
205: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
206: FND_MSG_PUB.Add_Exc_Msg
207: ( G_PKG_NAME ,
208: l_api_name
201: WHEN OTHERS THEN
202: ROLLBACK TO create_usage_history_pvt;
203: retcode := 2;
204: IF FND_MSG_PUB.Check_Msg_Level
205: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
206: FND_MSG_PUB.Add_Exc_Msg
207: ( G_PKG_NAME ,
208: l_api_name
209: );
202: ROLLBACK TO create_usage_history_pvt;
203: retcode := 2;
204: IF FND_MSG_PUB.Check_Msg_Level
205: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
206: FND_MSG_PUB.Add_Exc_Msg
207: ( G_PKG_NAME ,
208: l_api_name
209: );
210: END IF;
207: ( G_PKG_NAME ,
208: l_api_name
209: );
210: END IF;
211: FND_MSG_PUB.Count_And_Get
212: (p_count => l_msg_count ,
213: p_data => errbuf
214: );
215: END create_usage_history;