[Home] [Help]
1: PACKAGE BODY EAM_ASSET_LOG_PUB AS
2: /* $Header: EAMPALGB.pls 120.3 2005/11/10 23:23:59 jamulu noship $ */
3:
4: /*
5: --Start of comments
2: /* $Header: EAMPALGB.pls 120.3 2005/11/10 23:23:59 jamulu noship $ */
3:
4: /*
5: --Start of comments
6: -- API name : EAM_ASSET_LOG_PUB
7: -- Type : Public
8: -- Function : Inserts Asset Log into EAM ASSET LOG Table
9: -- Pre-reqs : None.
10: */
34: x_return_status OUT NOCOPY varchar2,
35: x_msg_count OUT NOCOPY number,
36: x_msg_data OUT NOCOPY varchar2)
37: IS
38: l_api_name CONSTANT varchar2(30) :='EAM_ASSET_LOG_PUB';
39: l_api_version CONSTANT number := 1.0;
40: l_association_id number;
41: l_validated boolean;
42: l_item_type number;
63: cii.last_vld_organization_id = mp.organization_id;
64:
65: BEGIN
66: /* Standard Start of API savepoint */
67: SAVEPOINT EAM_ASSET_LOG_PUB_SV;
68:
69: /* Standard call to check for call compatibility. */
70: IF NOT FND_API.Compatible_API_Call
71: ( l_api_version ,
252: );
253:
254: EXCEPTION
255: WHEN FND_API.G_EXC_ERROR THEN
256: ROLLBACK TO EAM_ASSET_LOG_PUB_SV;
257: x_return_status := FND_API.G_RET_STS_ERROR ;
258: FND_MSG_PUB.Get
259: ( p_msg_index_out => x_msg_count ,
260: p_data => x_msg_data
260: p_data => x_msg_data
261: );
262:
263: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
264: ROLLBACK TO EAM_ASSET_LOG_PUB_SV;
265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
266: FND_MSG_PUB.get
267: ( p_msg_index_out => x_msg_count ,
268: p_data => x_msg_data
268: p_data => x_msg_data
269: );
270:
271: WHEN OTHERS THEN
272: ROLLBACK TO EAM_ASSET_LOG_PUB_SV;
273: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
274:
275: IF FND_MSG_PUB.Check_Msg_Level
276: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
287: );
288:
289: END LOG_EVENT;
290:
291: END EAM_ASSET_LOG_PUB;