27:
28: l_data VARCHAR2(100);
29: l_api_name CONSTANT VARCHAR2(30) := 'okl_cash_receipt_pub';
30: l_count NUMBER ;
31: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
32:
33: l_api_version NUMBER ;
34: l_init_msg_list VARCHAR2(1) ;
35: l_msg_count NUMBER ;
36: l_msg_data VARCHAR2(2000);
37:
38: BEGIN
39:
40: x_return_status := FND_API.G_RET_STS_SUCCESS;
41:
42: SAVEPOINT cash_receipt_pub;
43:
44: lp_over_pay := p_over_pay;
69: ,p_xcav_tbl => lp_xcav_tbl
70: ,x_cash_receipt_id => l_cash_receipt_id
71: );
72:
73: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
74: RAISE FND_API.G_EXC_ERROR;
75: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
76: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
77: END IF;
70: ,x_cash_receipt_id => l_cash_receipt_id
71: );
72:
73: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
74: RAISE FND_API.G_EXC_ERROR;
75: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
76: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
77: END IF;
78:
71: );
72:
73: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
74: RAISE FND_API.G_EXC_ERROR;
75: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
76: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
77: END IF;
78:
79: EXCEPTION
72:
73: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
74: RAISE FND_API.G_EXC_ERROR;
75: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
76: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
77: END IF;
78:
79: EXCEPTION
80: