1: PACKAGE BODY OKL_INS_CLAIM_ASSET_PUB AS
2: /* $Header: OKLPCLAB.pls 115.7 2004/04/13 10:37:49 rnaik noship $ */
3:
4: PROCEDURE create_lease_claim(
5: p_api_version IN NUMBER,
72: p_data => l_msg_data);
73: WHEN OTHERS THEN
74: --ROLLBACK TO create_fulfillment;
75: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
76: FND_MSG_PUB.ADD_EXC_MSG('OKL_INS_CLAIM_ASSET_PUB','create_lease_claim');
77: FND_MSG_PUB.count_and_get(p_count => l_msg_count,
78: p_data => l_msg_data);
79: x_return_status:=l_return_status;
80: END create_lease_claim;
136: p_data => l_msg_data);
137: WHEN OTHERS THEN
138: --ROLLBACK TO create_fulfillment;
139: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
140: FND_MSG_PUB.ADD_EXC_MSG('OKL_INS_CLAIM_ASSET_PUB','hold_streams');
141: FND_MSG_PUB.count_and_get(p_count => l_msg_count,
142: p_data => l_msg_data);
143: x_return_status := l_return_status;
144:
143: x_return_status := l_return_status;
144:
145: END hold_streams;
146:
147: END OKL_INS_CLAIM_ASSET_PUB;