14:
15: l_api_name CONSTANT VARCHAR2(40) := 'GET_TRX_ACCT_OPT';
16: l_api_version CONSTANT NUMBER := 1.0;
17: l_row_count NUMBER;
18: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
19: l_taov_rec taov_rec_type;
20: l_org_id NUMBER;
21: l_stmt VARCHAR2(3000);
22: TYPE ref_cursor IS REF CURSOR;
24:
25:
26: BEGIN
27:
28: x_return_status := OKL_API.G_RET_STS_SUCCESS;
29:
30:
31: l_return_status := OKL_API.START_ACTIVITY( l_api_name
32: ,g_pkg_name
27:
28: x_return_status := OKL_API.G_RET_STS_SUCCESS;
29:
30:
31: l_return_status := OKL_API.START_ACTIVITY( l_api_name
32: ,g_pkg_name
33: ,p_init_msg_list
34: ,l_api_version
35: ,p_api_version
36: ,'_PVT'
37: ,l_return_status);
38:
39:
40: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
41: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
42: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
43: RAISE OKL_API.G_EXCEPTION_ERROR;
44: END IF;
37: ,l_return_status);
38:
39:
40: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
41: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
42: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
43: RAISE OKL_API.G_EXCEPTION_ERROR;
44: END IF;
45:
38:
39:
40: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
41: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
42: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
43: RAISE OKL_API.G_EXCEPTION_ERROR;
44: END IF;
45:
46:
39:
40: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
41: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
42: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
43: RAISE OKL_API.G_EXCEPTION_ERROR;
44: END IF;
45:
46:
47: l_stmt := 'SELECT
121: CLOSE trx_acct_csr;
122:
123: x_taov_rec := l_taov_rec;
124:
125: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
126:
127:
128: EXCEPTION
129:
126:
127:
128: EXCEPTION
129:
130: WHEN OKL_API.G_EXCEPTION_ERROR THEN
131:
132: x_return_status := OKL_API.HANDLE_EXCEPTIONS(l_api_name
133: ,g_pkg_name
134: ,'OKL_API.G_RET_STS_ERROR'
128: EXCEPTION
129:
130: WHEN OKL_API.G_EXCEPTION_ERROR THEN
131:
132: x_return_status := OKL_API.HANDLE_EXCEPTIONS(l_api_name
133: ,g_pkg_name
134: ,'OKL_API.G_RET_STS_ERROR'
135: ,x_msg_count
136: ,x_msg_data
130: WHEN OKL_API.G_EXCEPTION_ERROR THEN
131:
132: x_return_status := OKL_API.HANDLE_EXCEPTIONS(l_api_name
133: ,g_pkg_name
134: ,'OKL_API.G_RET_STS_ERROR'
135: ,x_msg_count
136: ,x_msg_data
137: ,'_PVT'
138: );
136: ,x_msg_data
137: ,'_PVT'
138: );
139:
140: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
141:
142: x_return_status := OKL_API.HANDLE_EXCEPTIONS(l_api_name
143: ,g_pkg_name
144: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
138: );
139:
140: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
141:
142: x_return_status := OKL_API.HANDLE_EXCEPTIONS(l_api_name
143: ,g_pkg_name
144: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
145: ,x_msg_count
146: ,x_msg_data
140: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
141:
142: x_return_status := OKL_API.HANDLE_EXCEPTIONS(l_api_name
143: ,g_pkg_name
144: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
145: ,x_msg_count
146: ,x_msg_data
147: ,'_PVT'
148: );
148: );
149:
150: WHEN OTHERS THEN
151:
152: x_return_status := OKL_API.HANDLE_EXCEPTIONS(l_api_name
153: ,g_pkg_name
154: ,'OTHERS'
155: ,x_msg_count
156: ,x_msg_data
174:
175: l_api_name CONSTANT VARCHAR2(40) := 'UPDT_TRX_ACCT_OPT';
176: l_api_version CONSTANT NUMBER := 1.0;
177: l_row_count NUMBER;
178: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
179:
180: l_init_msg_list VARCHAR2(1);
181: l_msg_count NUMBER;
182: l_msg_data VARCHAR2(2000);
189:
190: BEGIN
191:
192:
193: x_return_status := OKL_API.G_RET_STS_SUCCESS;
194: l_taov_rec_in := p_taov_rec;
195:
196:
197: GET_TRX_ACCT_OPT(p_api_version => 1.0,
202: p_taov_rec => l_taov_rec_in,
203: x_taov_rec => l_taov_rec_out);
204:
205:
206: IF (l_taov_rec_out.ID = OKL_API.G_MISS_NUM) OR
207: (l_taov_rec_out.ID IS NULL) THEN
208:
209:
210: OKL_TRX_ACCT_OPTS_PUB.INSERT_TRX_ACCT_OPTS(p_api_version => 1.0,
217:
218:
219: ELSE
220:
221: IF (p_taov_rec.id = OKL_API.G_MISS_NUM) OR
222: (p_taov_rec.id IS NULL) THEN
223: l_taov_rec_in.id := l_taov_rec_out.id;
224: END IF;
225: