42:
43: BEGIN
44:
45: --Standard call to check for call compatibility
46: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
47: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
48: END IF;
49:
50: --Call the private procedure to cancel requisition
43: BEGIN
44:
45: --Standard call to check for call compatibility
46: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
47: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
48: END IF;
49:
50: --Call the private procedure to cancel requisition
51: l_progress := '010';
62:
63: l_progress := '020';
64:
65: EXCEPTION
66: WHEN FND_API.G_EXC_ERROR THEN
67: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
68: x_return_status := FND_API.G_RET_STS_ERROR;
69: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
70: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
64:
65: EXCEPTION
66: WHEN FND_API.G_EXC_ERROR THEN
67: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
68: x_return_status := FND_API.G_RET_STS_ERROR;
69: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
70: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
71: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
72: WHEN OTHERS THEN
65: EXCEPTION
66: WHEN FND_API.G_EXC_ERROR THEN
67: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
68: x_return_status := FND_API.G_RET_STS_ERROR;
69: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
70: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
71: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
72: WHEN OTHERS THEN
73: FND_MSG_PUB.add_exc_msg(G_PKG_NAME, l_api_name || '.' || l_progress);
67: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
68: x_return_status := FND_API.G_RET_STS_ERROR;
69: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
70: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
71: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
72: WHEN OTHERS THEN
73: FND_MSG_PUB.add_exc_msg(G_PKG_NAME, l_api_name || '.' || l_progress);
74: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
75: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
71: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
72: WHEN OTHERS THEN
73: FND_MSG_PUB.add_exc_msg(G_PKG_NAME, l_api_name || '.' || l_progress);
74: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
75: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
76:
77: END cancel_requisition;
78:
79: