13: IS
14: l_count NUMBER;
15: l_data VARCHAR2(100);
16: l_api_name CONSTANT VARCHAR2(30) := 'eva_getparametervalues';
17: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
18: BEGIN
19: x_return_status := FND_API.G_RET_STS_SUCCESS;
20: SAVEPOINT getparametervalues;
21:
15: l_data VARCHAR2(100);
16: l_api_name CONSTANT VARCHAR2(30) := 'eva_getparametervalues';
17: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
18: BEGIN
19: x_return_status := FND_API.G_RET_STS_SUCCESS;
20: SAVEPOINT getparametervalues;
21:
22:
23:
33: ,x_ctx_parameter_tbl => x_ctx_parameter_tbl
34: ,p_line_id => p_line_id );
35:
36:
37: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
38: RAISE FND_API.G_EXC_ERROR;
39: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
40: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
41: END IF;
34: ,p_line_id => p_line_id );
35:
36:
37: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
38: RAISE FND_API.G_EXC_ERROR;
39: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
40: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
41: END IF;
42:
35:
36:
37: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
38: RAISE FND_API.G_EXC_ERROR;
39: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
40: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
41: END IF;
42:
43:
36:
37: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
38: RAISE FND_API.G_EXC_ERROR;
39: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
40: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
41: END IF;
42:
43:
44:
44:
45:
46:
47: EXCEPTION
48: WHEN FND_API.G_EXC_ERROR THEN
49: ROLLBACK TO getparametervalues;
50: x_return_status := FND_API.G_RET_STS_ERROR;
51:
52: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
46:
47: EXCEPTION
48: WHEN FND_API.G_EXC_ERROR THEN
49: ROLLBACK TO getparametervalues;
50: x_return_status := FND_API.G_RET_STS_ERROR;
51:
52: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
53: ,p_count => x_msg_count
54: ,p_data => x_msg_data);
52: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
53: ,p_count => x_msg_count
54: ,p_data => x_msg_data);
55:
56: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
57: ROLLBACK TO getparametervalues;
58: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
59: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
60: ,p_count => x_msg_count
54: ,p_data => x_msg_data);
55:
56: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
57: ROLLBACK TO getparametervalues;
58: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
59: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
60: ,p_count => x_msg_count
61: ,p_data => x_msg_data);
62:
66: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
67: ,p_count => x_msg_count
68: ,p_data => x_msg_data);
69: -- notify caller of an UNEXPECTED error
70: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
71: END EVA_GetParameterValues;
72:
73: PROCEDURE EVA_GetFunctionValue(p_api_version IN NUMBER
74: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
83: ) IS
84: l_count NUMBER;
85: l_data VARCHAR2(100);
86: l_api_name CONSTANT VARCHAR2(30) := 'eva_getfunctionvalue';
87: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
88: BEGIN
89: x_return_status := FND_API.G_RET_STS_SUCCESS;
90: SAVEPOINT getfunctionvalue;
91: okl_formulaevaluate_pvt.EVA_GetFunctionValue(p_api_version => p_api_version
85: l_data VARCHAR2(100);
86: l_api_name CONSTANT VARCHAR2(30) := 'eva_getfunctionvalue';
87: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
88: BEGIN
89: x_return_status := FND_API.G_RET_STS_SUCCESS;
90: SAVEPOINT getfunctionvalue;
91: okl_formulaevaluate_pvt.EVA_GetFunctionValue(p_api_version => p_api_version
92: ,p_init_msg_list => p_init_msg_list
93: ,x_return_status => l_return_status
98: ,p_line_id => p_line_id
99: ,p_ctx_parameter_tbl => p_ctx_parameter_tbl
100: ,x_function_tbl => x_function_tbl);
101:
102: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
103: RAISE FND_API.G_EXC_ERROR;
104: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106: END IF;
99: ,p_ctx_parameter_tbl => p_ctx_parameter_tbl
100: ,x_function_tbl => x_function_tbl);
101:
102: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
103: RAISE FND_API.G_EXC_ERROR;
104: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106: END IF;
107:
100: ,x_function_tbl => x_function_tbl);
101:
102: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
103: RAISE FND_API.G_EXC_ERROR;
104: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106: END IF;
107:
108:
101:
102: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
103: RAISE FND_API.G_EXC_ERROR;
104: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
106: END IF;
107:
108:
109: EXCEPTION
106: END IF;
107:
108:
109: EXCEPTION
110: WHEN FND_API.G_EXC_ERROR THEN
111: ROLLBACK TO getfunctionvalue;
112: x_return_status := FND_API.G_RET_STS_ERROR;
113:
114: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
108:
109: EXCEPTION
110: WHEN FND_API.G_EXC_ERROR THEN
111: ROLLBACK TO getfunctionvalue;
112: x_return_status := FND_API.G_RET_STS_ERROR;
113:
114: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
115: ,p_count => x_msg_count
116: ,p_data => x_msg_data);
114: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
115: ,p_count => x_msg_count
116: ,p_data => x_msg_data);
117:
118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
119: ROLLBACK TO getfunctionvalue;
120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
121: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
122: ,p_count => x_msg_count
116: ,p_data => x_msg_data);
117:
118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
119: ROLLBACK TO getfunctionvalue;
120: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
121: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
122: ,p_count => x_msg_count
123: ,p_data => x_msg_data);
124:
128: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
129: ,p_count => x_msg_count
130: ,p_data => x_msg_data);
131: -- notify caller of an UNEXPECTED error
132: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
133: END EVA_GetFunctionValue;
134:
135: END OKL_FORMULAEVALUATE_PUB;