67: end if;
68:
69: EXCEPTION
70: WHEN OTHERS THEN
71: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
72: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_INVALID_GEN_ID');
73: FND_MSG_PUB.ADD;
74: END IF;
75: x_return_status := FND_API.G_RET_STS_ERROR;
69: EXCEPTION
70: WHEN OTHERS THEN
71: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
72: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_INVALID_GEN_ID');
73: FND_MSG_PUB.ADD;
74: END IF;
75: x_return_status := FND_API.G_RET_STS_ERROR;
76: FND_MSG_PUB.Count_And_Get
77: ( p_count => x_msg_count ,
72: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_INVALID_GEN_ID');
73: FND_MSG_PUB.ADD;
74: END IF;
75: x_return_status := FND_API.G_RET_STS_ERROR;
76: FND_MSG_PUB.Count_And_Get
77: ( p_count => x_msg_count ,
78: p_data => x_msg_data
79: );
80: x_msg_data := substr(x_msg_data,1,4000);
190: END IF;
191:
192: -- Initialize message list if p_init_msg_list is set to TRUE.
193: IF FND_API.to_Boolean( p_init_msg_list ) THEN
194: FND_MSG_PUB.initialize;
195: END IF;
196:
197: -- Initialize API return status to success
198: x_return_status := FND_API.G_RET_STS_SUCCESS;
201:
202:
203: -- 1: Check Maintenance Object Type, only support 3 (Serialized Asset Numbers) for now
204: IF p_maintenance_object_type <> 3 THEN
205: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
206: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_INVALID_MAINT_OBJ_TYPE');
207: FND_MSG_PUB.ADD;
208: END IF;
209: RAISE FND_API.G_EXC_ERROR;
203: -- 1: Check Maintenance Object Type, only support 3 (Serialized Asset Numbers) for now
204: IF p_maintenance_object_type <> 3 THEN
205: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
206: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_INVALID_MAINT_OBJ_TYPE');
207: FND_MSG_PUB.ADD;
208: END IF;
209: RAISE FND_API.G_EXC_ERROR;
210: END IF;
211:
305: IF l_x_act_return_status <> FND_API.G_RET_STS_SUCCESS OR
306: l_x_pm_return_status <> FND_API.G_RET_STS_SUCCESS OR
307: l_x_supp_return_status <> FND_API.G_RET_STS_SUCCESS
308: THEN
309: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
310: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_INST_API_FAILED');
311: FND_MSG_PUB.ADD;
312: END IF;
313: RAISE FND_API.G_EXC_ERROR;
307: l_x_supp_return_status <> FND_API.G_RET_STS_SUCCESS
308: THEN
309: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
310: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_INST_API_FAILED');
311: FND_MSG_PUB.ADD;
312: END IF;
313: RAISE FND_API.G_EXC_ERROR;
314: END IF;
315:
364: IF FND_API.To_Boolean( p_commit ) THEN
365: COMMIT WORK;
366: END IF;
367: -- Standard call to get message count and if count is 1, get message info.
368: FND_MSG_PUB.Count_And_Get
369: ( p_count => x_msg_count ,
370: p_data => x_msg_data
371: );
372: x_msg_data := substr(x_msg_data,1,4000);
384: end if;
385:
386: x_return_status := FND_API.G_RET_STS_ERROR ;
387:
388: FND_MSG_PUB.Count_And_Get
389: ( p_count => x_msg_count ,
390: p_data => x_msg_data
391: );
392:
400: end if;
401:
402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
403:
404: FND_MSG_PUB.Count_And_Get
405: ( p_count => x_msg_count ,
406: p_data => x_msg_data
407: );
408:
416: end if;
417:
418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
419:
420: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
421: THEN
422: FND_MSG_PUB.Add_Exc_Msg
423: ( G_PKG_NAME ,
424: l_api_name
418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
419:
420: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
421: THEN
422: FND_MSG_PUB.Add_Exc_Msg
423: ( G_PKG_NAME ,
424: l_api_name
425: );
426: END IF;
424: l_api_name
425: );
426: END IF;
427:
428: FND_MSG_PUB.Count_And_Get
429: ( p_count => x_msg_count ,
430: p_data => x_msg_data
431: );
432: