1: Package Body OKL_CONTRACT_APPROVAL_PUB AS
2: /* $Header: OKLPCAVB.pls 115.5 2002/03/21 18:03:28 pkm ship $ */
3: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
4: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_CONTRACT_APPROVAL_PUB';
5: -- Start of comments
6: --
7: -- Procedure Name : start_process
19: p_status IN VARCHAR2,
20: p_do_commit IN VARCHAR2) IS
21: l_api_name CONSTANT VARCHAR2(30) := 'start_process';
22: l_api_version CONSTANT NUMBER := 1;
23: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
24: BEGIN
25: l_return_status := OKC_API.START_ACTIVITY(SUBSTR(l_api_name,1,26),
26: G_PKG_NAME,
27: p_init_msg_list,
21: l_api_name CONSTANT VARCHAR2(30) := 'start_process';
22: l_api_version CONSTANT NUMBER := 1;
23: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
24: BEGIN
25: l_return_status := OKC_API.START_ACTIVITY(SUBSTR(l_api_name,1,26),
26: G_PKG_NAME,
27: p_init_msg_list,
28: l_api_version,
29: p_api_version,
28: l_api_version,
29: p_api_version,
30: '_PUB',
31: x_return_status);
32: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
34: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
35: RAISE OKC_API.G_EXCEPTION_ERROR;
36: END IF;
29: p_api_version,
30: '_PUB',
31: x_return_status);
32: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
34: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
35: RAISE OKC_API.G_EXCEPTION_ERROR;
36: END IF;
37: --
30: '_PUB',
31: x_return_status);
32: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
34: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
35: RAISE OKC_API.G_EXCEPTION_ERROR;
36: END IF;
37: --
38: -- Call Before Logic Hook
31: x_return_status);
32: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
33: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
34: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
35: RAISE OKC_API.G_EXCEPTION_ERROR;
36: END IF;
37: --
38: -- Call Before Logic Hook
39: --
37: --
38: -- Call Before Logic Hook
39: --
40: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
41: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
42: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
43: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
44: RAISE OKC_API.G_EXCEPTION_ERROR;
45: END IF;
38: -- Call Before Logic Hook
39: --
40: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
41: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
42: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
43: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
44: RAISE OKC_API.G_EXCEPTION_ERROR;
45: END IF;
46: OKL_CONTRACT_APPROVAL_PVT.start_process(p_api_version,
39: --
40: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
41: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
42: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
43: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
44: RAISE OKC_API.G_EXCEPTION_ERROR;
45: END IF;
46: OKL_CONTRACT_APPROVAL_PVT.start_process(p_api_version,
47: p_init_msg_list,
40: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
41: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
42: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
43: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
44: RAISE OKC_API.G_EXCEPTION_ERROR;
45: END IF;
46: OKL_CONTRACT_APPROVAL_PVT.start_process(p_api_version,
47: p_init_msg_list,
48: x_return_status,
50: x_msg_data,
51: p_contract_id,
52: p_status,
53: p_do_commit);
54: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
55: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
56: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
57: RAISE OKC_API.G_EXCEPTION_ERROR;
58: END IF;
51: p_contract_id,
52: p_status,
53: p_do_commit);
54: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
55: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
56: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
57: RAISE OKC_API.G_EXCEPTION_ERROR;
58: END IF;
59: --
52: p_status,
53: p_do_commit);
54: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
55: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
56: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
57: RAISE OKC_API.G_EXCEPTION_ERROR;
58: END IF;
59: --
60: -- Call After Logic Hook
53: p_do_commit);
54: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
55: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
56: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
57: RAISE OKC_API.G_EXCEPTION_ERROR;
58: END IF;
59: --
60: -- Call After Logic Hook
61: --
59: --
60: -- Call After Logic Hook
61: --
62: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
63: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
64: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
65: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
66: RAISE OKC_API.G_EXCEPTION_ERROR;
67: END IF;
60: -- Call After Logic Hook
61: --
62: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
63: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
64: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
65: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
66: RAISE OKC_API.G_EXCEPTION_ERROR;
67: END IF;
68: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
61: --
62: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
63: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
64: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
65: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
66: RAISE OKC_API.G_EXCEPTION_ERROR;
67: END IF;
68: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
69: EXCEPTION
62: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
63: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
64: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
65: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
66: RAISE OKC_API.G_EXCEPTION_ERROR;
67: END IF;
68: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
69: EXCEPTION
70: WHEN OKC_API.G_EXCEPTION_ERROR THEN
64: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
65: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
66: RAISE OKC_API.G_EXCEPTION_ERROR;
67: END IF;
68: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
69: EXCEPTION
70: WHEN OKC_API.G_EXCEPTION_ERROR THEN
71: x_return_status := OKC_API.HANDLE_EXCEPTIONS
72: (SUBSTR(l_api_name,1,26),
66: RAISE OKC_API.G_EXCEPTION_ERROR;
67: END IF;
68: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
69: EXCEPTION
70: WHEN OKC_API.G_EXCEPTION_ERROR THEN
71: x_return_status := OKC_API.HANDLE_EXCEPTIONS
72: (SUBSTR(l_api_name,1,26),
73: G_PKG_NAME,
74: 'OKC_API.G_RET_STS_ERROR',
67: END IF;
68: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
69: EXCEPTION
70: WHEN OKC_API.G_EXCEPTION_ERROR THEN
71: x_return_status := OKC_API.HANDLE_EXCEPTIONS
72: (SUBSTR(l_api_name,1,26),
73: G_PKG_NAME,
74: 'OKC_API.G_RET_STS_ERROR',
75: x_msg_count,
70: WHEN OKC_API.G_EXCEPTION_ERROR THEN
71: x_return_status := OKC_API.HANDLE_EXCEPTIONS
72: (SUBSTR(l_api_name,1,26),
73: G_PKG_NAME,
74: 'OKC_API.G_RET_STS_ERROR',
75: x_msg_count,
76: x_msg_data,
77: '_PUB');
78: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
74: 'OKC_API.G_RET_STS_ERROR',
75: x_msg_count,
76: x_msg_data,
77: '_PUB');
78: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
79: x_return_status := OKC_API.HANDLE_EXCEPTIONS
80: (SUBSTR(l_api_name,1,26),
81: G_PKG_NAME,
82: 'OKC_API.G_RET_STS_UNEXP_ERROR',
75: x_msg_count,
76: x_msg_data,
77: '_PUB');
78: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
79: x_return_status := OKC_API.HANDLE_EXCEPTIONS
80: (SUBSTR(l_api_name,1,26),
81: G_PKG_NAME,
82: 'OKC_API.G_RET_STS_UNEXP_ERROR',
83: x_msg_count,
78: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
79: x_return_status := OKC_API.HANDLE_EXCEPTIONS
80: (SUBSTR(l_api_name,1,26),
81: G_PKG_NAME,
82: 'OKC_API.G_RET_STS_UNEXP_ERROR',
83: x_msg_count,
84: x_msg_data,
85: '_PUB');
86: WHEN OTHERS THEN
83: x_msg_count,
84: x_msg_data,
85: '_PUB');
86: WHEN OTHERS THEN
87: x_return_status := OKC_API.HANDLE_EXCEPTIONS
88: (SUBSTR(l_api_name,1,26),
89: G_PKG_NAME,
90: 'OTHERS',
91: x_msg_count,
109: p_contract_id IN NUMBER,
110: p_do_commit IN VARCHAR2) IS
111: l_api_name CONSTANT VARCHAR2(30) := 'stop_process';
112: l_api_version CONSTANT NUMBER := 1;
113: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
114: BEGIN
115: l_return_status := OKC_API.START_ACTIVITY(SUBSTR(l_api_name,1,26),
116: G_PKG_NAME,
117: p_init_msg_list,
111: l_api_name CONSTANT VARCHAR2(30) := 'stop_process';
112: l_api_version CONSTANT NUMBER := 1;
113: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
114: BEGIN
115: l_return_status := OKC_API.START_ACTIVITY(SUBSTR(l_api_name,1,26),
116: G_PKG_NAME,
117: p_init_msg_list,
118: l_api_version,
119: p_api_version,
118: l_api_version,
119: p_api_version,
120: '_PUB',
121: x_return_status);
122: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: RAISE OKC_API.G_EXCEPTION_ERROR;
126: END IF;
119: p_api_version,
120: '_PUB',
121: x_return_status);
122: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: RAISE OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: --
120: '_PUB',
121: x_return_status);
122: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: RAISE OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: --
128: -- Call Before Logic Hook
121: x_return_status);
122: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: RAISE OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: --
128: -- Call Before Logic Hook
129: --
127: --
128: -- Call Before Logic Hook
129: --
130: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
131: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
133: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
134: RAISE OKC_API.G_EXCEPTION_ERROR;
135: END IF;
128: -- Call Before Logic Hook
129: --
130: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
131: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
133: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
134: RAISE OKC_API.G_EXCEPTION_ERROR;
135: END IF;
136: OKL_CONTRACT_APPROVAL_PVT.stop_process(p_api_version,
129: --
130: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
131: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
133: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
134: RAISE OKC_API.G_EXCEPTION_ERROR;
135: END IF;
136: OKL_CONTRACT_APPROVAL_PVT.stop_process(p_api_version,
137: p_init_msg_list,
130: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
131: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
133: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
134: RAISE OKC_API.G_EXCEPTION_ERROR;
135: END IF;
136: OKL_CONTRACT_APPROVAL_PVT.stop_process(p_api_version,
137: p_init_msg_list,
138: x_return_status,
139: x_msg_count,
140: x_msg_data,
141: p_contract_id,
142: p_do_commit);
143: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
144: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
145: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
146: RAISE OKC_API.G_EXCEPTION_ERROR;
147: END IF;
140: x_msg_data,
141: p_contract_id,
142: p_do_commit);
143: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
144: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
145: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
146: RAISE OKC_API.G_EXCEPTION_ERROR;
147: END IF;
148: --
141: p_contract_id,
142: p_do_commit);
143: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
144: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
145: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
146: RAISE OKC_API.G_EXCEPTION_ERROR;
147: END IF;
148: --
149: -- Call After Logic Hook
142: p_do_commit);
143: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
144: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
145: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
146: RAISE OKC_API.G_EXCEPTION_ERROR;
147: END IF;
148: --
149: -- Call After Logic Hook
150: --
148: --
149: -- Call After Logic Hook
150: --
151: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
152: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
153: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
154: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
155: RAISE OKC_API.G_EXCEPTION_ERROR;
156: END IF;
149: -- Call After Logic Hook
150: --
151: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
152: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
153: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
154: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
155: RAISE OKC_API.G_EXCEPTION_ERROR;
156: END IF;
157: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
150: --
151: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
152: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
153: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
154: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
155: RAISE OKC_API.G_EXCEPTION_ERROR;
156: END IF;
157: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
158: EXCEPTION
151: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
152: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
153: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
154: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
155: RAISE OKC_API.G_EXCEPTION_ERROR;
156: END IF;
157: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
158: EXCEPTION
159: WHEN OKC_API.G_EXCEPTION_ERROR THEN
153: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
154: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
155: RAISE OKC_API.G_EXCEPTION_ERROR;
156: END IF;
157: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
158: EXCEPTION
159: WHEN OKC_API.G_EXCEPTION_ERROR THEN
160: x_return_status := OKC_API.HANDLE_EXCEPTIONS
161: (SUBSTR(l_api_name,1,26),
155: RAISE OKC_API.G_EXCEPTION_ERROR;
156: END IF;
157: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
158: EXCEPTION
159: WHEN OKC_API.G_EXCEPTION_ERROR THEN
160: x_return_status := OKC_API.HANDLE_EXCEPTIONS
161: (SUBSTR(l_api_name,1,26),
162: G_PKG_NAME,
163: 'OKC_API.G_RET_STS_ERROR',
156: END IF;
157: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
158: EXCEPTION
159: WHEN OKC_API.G_EXCEPTION_ERROR THEN
160: x_return_status := OKC_API.HANDLE_EXCEPTIONS
161: (SUBSTR(l_api_name,1,26),
162: G_PKG_NAME,
163: 'OKC_API.G_RET_STS_ERROR',
164: x_msg_count,
159: WHEN OKC_API.G_EXCEPTION_ERROR THEN
160: x_return_status := OKC_API.HANDLE_EXCEPTIONS
161: (SUBSTR(l_api_name,1,26),
162: G_PKG_NAME,
163: 'OKC_API.G_RET_STS_ERROR',
164: x_msg_count,
165: x_msg_data,
166: '_PUB');
167: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
163: 'OKC_API.G_RET_STS_ERROR',
164: x_msg_count,
165: x_msg_data,
166: '_PUB');
167: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
168: x_return_status := OKC_API.HANDLE_EXCEPTIONS
169: (SUBSTR(l_api_name,1,26),
170: G_PKG_NAME,
171: 'OKC_API.G_RET_STS_UNEXP_ERROR',
164: x_msg_count,
165: x_msg_data,
166: '_PUB');
167: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
168: x_return_status := OKC_API.HANDLE_EXCEPTIONS
169: (SUBSTR(l_api_name,1,26),
170: G_PKG_NAME,
171: 'OKC_API.G_RET_STS_UNEXP_ERROR',
172: x_msg_count,
167: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
168: x_return_status := OKC_API.HANDLE_EXCEPTIONS
169: (SUBSTR(l_api_name,1,26),
170: G_PKG_NAME,
171: 'OKC_API.G_RET_STS_UNEXP_ERROR',
172: x_msg_count,
173: x_msg_data,
174: '_PUB');
175: WHEN OTHERS THEN
172: x_msg_count,
173: x_msg_data,
174: '_PUB');
175: WHEN OTHERS THEN
176: x_return_status := OKC_API.HANDLE_EXCEPTIONS
177: (SUBSTR(l_api_name,1,26),
178: G_PKG_NAME,
179: 'OTHERS',
180: x_msg_count,
204: x_usage OUT NOCOPY VARCHAR2,
205: x_activeyn OUT NOCOPY VARCHAR2) IS
206: l_api_name CONSTANT VARCHAR2(30) := 'populate_active_process';
207: l_api_version CONSTANT NUMBER := 1;
208: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
209: BEGIN
210: l_return_status := OKC_API.START_ACTIVITY(SUBSTR(l_api_name,1,26),
211: G_PKG_NAME,
212: p_init_msg_list,
206: l_api_name CONSTANT VARCHAR2(30) := 'populate_active_process';
207: l_api_version CONSTANT NUMBER := 1;
208: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
209: BEGIN
210: l_return_status := OKC_API.START_ACTIVITY(SUBSTR(l_api_name,1,26),
211: G_PKG_NAME,
212: p_init_msg_list,
213: l_api_version,
214: p_api_version,
213: l_api_version,
214: p_api_version,
215: '_PUB',
216: x_return_status);
217: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
218: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
219: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
220: RAISE OKC_API.G_EXCEPTION_ERROR;
221: END IF;
214: p_api_version,
215: '_PUB',
216: x_return_status);
217: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
218: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
219: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
220: RAISE OKC_API.G_EXCEPTION_ERROR;
221: END IF;
222: --
215: '_PUB',
216: x_return_status);
217: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
218: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
219: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
220: RAISE OKC_API.G_EXCEPTION_ERROR;
221: END IF;
222: --
223: -- Call Before Logic Hook
216: x_return_status);
217: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
218: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
219: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
220: RAISE OKC_API.G_EXCEPTION_ERROR;
221: END IF;
222: --
223: -- Call Before Logic Hook
224: --
222: --
223: -- Call Before Logic Hook
224: --
225: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
226: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
227: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
229: RAISE OKC_API.G_EXCEPTION_ERROR;
230: END IF;
223: -- Call Before Logic Hook
224: --
225: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
226: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
227: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
229: RAISE OKC_API.G_EXCEPTION_ERROR;
230: END IF;
231: OKL_CONTRACT_APPROVAL_PVT.populate_active_process(p_api_version,
224: --
225: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
226: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
227: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
229: RAISE OKC_API.G_EXCEPTION_ERROR;
230: END IF;
231: OKL_CONTRACT_APPROVAL_PVT.populate_active_process(p_api_version,
232: p_init_msg_list,
225: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
226: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
227: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
228: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
229: RAISE OKC_API.G_EXCEPTION_ERROR;
230: END IF;
231: OKL_CONTRACT_APPROVAL_PVT.populate_active_process(p_api_version,
232: p_init_msg_list,
233: x_return_status,
240: x_package_name,
241: x_procedure_name,
242: x_usage,
243: x_activeyn);
244: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
245: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
246: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
247: RAISE OKC_API.G_EXCEPTION_ERROR;
248: END IF;
241: x_procedure_name,
242: x_usage,
243: x_activeyn);
244: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
245: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
246: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
247: RAISE OKC_API.G_EXCEPTION_ERROR;
248: END IF;
249: --
242: x_usage,
243: x_activeyn);
244: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
245: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
246: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
247: RAISE OKC_API.G_EXCEPTION_ERROR;
248: END IF;
249: --
250: -- Call After Logic Hook
243: x_activeyn);
244: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
245: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
246: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
247: RAISE OKC_API.G_EXCEPTION_ERROR;
248: END IF;
249: --
250: -- Call After Logic Hook
251: --
249: --
250: -- Call After Logic Hook
251: --
252: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
253: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
254: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_ERROR;
257: END IF;
250: -- Call After Logic Hook
251: --
252: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
253: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
254: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_ERROR;
257: END IF;
258: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
251: --
252: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
253: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
254: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_ERROR;
257: END IF;
258: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
259: EXCEPTION
252: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
253: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
254: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_ERROR;
257: END IF;
258: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
259: EXCEPTION
260: WHEN OKC_API.G_EXCEPTION_ERROR THEN
254: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
255: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_ERROR;
257: END IF;
258: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
259: EXCEPTION
260: WHEN OKC_API.G_EXCEPTION_ERROR THEN
261: x_return_status := OKC_API.HANDLE_EXCEPTIONS
262: (SUBSTR(l_api_name,1,26),
256: RAISE OKC_API.G_EXCEPTION_ERROR;
257: END IF;
258: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
259: EXCEPTION
260: WHEN OKC_API.G_EXCEPTION_ERROR THEN
261: x_return_status := OKC_API.HANDLE_EXCEPTIONS
262: (SUBSTR(l_api_name,1,26),
263: G_PKG_NAME,
264: 'OKC_API.G_RET_STS_ERROR',
257: END IF;
258: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
259: EXCEPTION
260: WHEN OKC_API.G_EXCEPTION_ERROR THEN
261: x_return_status := OKC_API.HANDLE_EXCEPTIONS
262: (SUBSTR(l_api_name,1,26),
263: G_PKG_NAME,
264: 'OKC_API.G_RET_STS_ERROR',
265: x_msg_count,
260: WHEN OKC_API.G_EXCEPTION_ERROR THEN
261: x_return_status := OKC_API.HANDLE_EXCEPTIONS
262: (SUBSTR(l_api_name,1,26),
263: G_PKG_NAME,
264: 'OKC_API.G_RET_STS_ERROR',
265: x_msg_count,
266: x_msg_data,
267: '_PUB');
268: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
264: 'OKC_API.G_RET_STS_ERROR',
265: x_msg_count,
266: x_msg_data,
267: '_PUB');
268: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
269: x_return_status := OKC_API.HANDLE_EXCEPTIONS
270: (SUBSTR(l_api_name,1,26),
271: G_PKG_NAME,
272: 'OKC_API.G_RET_STS_UNEXP_ERROR',
265: x_msg_count,
266: x_msg_data,
267: '_PUB');
268: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
269: x_return_status := OKC_API.HANDLE_EXCEPTIONS
270: (SUBSTR(l_api_name,1,26),
271: G_PKG_NAME,
272: 'OKC_API.G_RET_STS_UNEXP_ERROR',
273: x_msg_count,
268: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
269: x_return_status := OKC_API.HANDLE_EXCEPTIONS
270: (SUBSTR(l_api_name,1,26),
271: G_PKG_NAME,
272: 'OKC_API.G_RET_STS_UNEXP_ERROR',
273: x_msg_count,
274: x_msg_data,
275: '_PUB');
276: WHEN OTHERS THEN
273: x_msg_count,
274: x_msg_data,
275: '_PUB');
276: WHEN OTHERS THEN
277: x_return_status := OKC_API.HANDLE_EXCEPTIONS
278: (SUBSTR(l_api_name,1,26),
279: G_PKG_NAME,
280: 'OTHERS',
281: x_msg_count,
300: p_pdf_id IN NUMBER) RETURN VARCHAR2 IS
301: url VARCHAR2(300);
302: l_api_name CONSTANT VARCHAR2(30) := 'monitor_process';
303: l_api_version CONSTANT NUMBER := 1;
304: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
305: BEGIN
306: l_return_status := OKC_API.START_ACTIVITY(SUBSTR(l_api_name,1,26),
307: G_PKG_NAME,
308: p_init_msg_list,
302: l_api_name CONSTANT VARCHAR2(30) := 'monitor_process';
303: l_api_version CONSTANT NUMBER := 1;
304: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
305: BEGIN
306: l_return_status := OKC_API.START_ACTIVITY(SUBSTR(l_api_name,1,26),
307: G_PKG_NAME,
308: p_init_msg_list,
309: l_api_version,
310: p_api_version,
309: l_api_version,
310: p_api_version,
311: '_PUB',
312: x_return_status);
313: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
314: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
315: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
316: RAISE OKC_API.G_EXCEPTION_ERROR;
317: END IF;
310: p_api_version,
311: '_PUB',
312: x_return_status);
313: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
314: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
315: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
316: RAISE OKC_API.G_EXCEPTION_ERROR;
317: END IF;
318: --
311: '_PUB',
312: x_return_status);
313: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
314: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
315: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
316: RAISE OKC_API.G_EXCEPTION_ERROR;
317: END IF;
318: --
319: -- Call Before Logic Hook
312: x_return_status);
313: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
314: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
315: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
316: RAISE OKC_API.G_EXCEPTION_ERROR;
317: END IF;
318: --
319: -- Call Before Logic Hook
320: --
318: --
319: -- Call Before Logic Hook
320: --
321: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
322: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
323: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
324: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
325: RAISE OKC_API.G_EXCEPTION_ERROR;
326: END IF;
319: -- Call Before Logic Hook
320: --
321: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
322: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
323: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
324: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
325: RAISE OKC_API.G_EXCEPTION_ERROR;
326: END IF;
327: url := OKL_CONTRACT_APPROVAL_PVT.monitor_process(p_api_version,
320: --
321: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
322: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
323: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
324: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
325: RAISE OKC_API.G_EXCEPTION_ERROR;
326: END IF;
327: url := OKL_CONTRACT_APPROVAL_PVT.monitor_process(p_api_version,
328: p_init_msg_list,
321: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'B');
322: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
323: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
324: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
325: RAISE OKC_API.G_EXCEPTION_ERROR;
326: END IF;
327: url := OKL_CONTRACT_APPROVAL_PVT.monitor_process(p_api_version,
328: p_init_msg_list,
329: x_return_status,
330: x_msg_count,
331: x_msg_data,
332: p_contract_id,
333: p_pdf_id);
334: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
335: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
336: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
337: RAISE OKC_API.G_EXCEPTION_ERROR;
338: END IF;
331: x_msg_data,
332: p_contract_id,
333: p_pdf_id);
334: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
335: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
336: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
337: RAISE OKC_API.G_EXCEPTION_ERROR;
338: END IF;
339: --
332: p_contract_id,
333: p_pdf_id);
334: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
335: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
336: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
337: RAISE OKC_API.G_EXCEPTION_ERROR;
338: END IF;
339: --
340: -- Call After Logic Hook
333: p_pdf_id);
334: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
335: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
336: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
337: RAISE OKC_API.G_EXCEPTION_ERROR;
338: END IF;
339: --
340: -- Call After Logic Hook
341: --
339: --
340: -- Call After Logic Hook
341: --
342: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
343: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
345: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
340: -- Call After Logic Hook
341: --
342: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
343: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
345: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
348: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
341: --
342: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
343: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
345: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
348: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
349: EXCEPTION
342: okc_util.call_user_hook(x_return_status, g_pkg_name, l_api_name, 'A');
343: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
345: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
348: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
349: EXCEPTION
350: WHEN OKC_API.G_EXCEPTION_ERROR THEN
344: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
345: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
348: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
349: EXCEPTION
350: WHEN OKC_API.G_EXCEPTION_ERROR THEN
351: x_return_status := OKC_API.HANDLE_EXCEPTIONS
352: (SUBSTR(l_api_name,1,26),
346: RAISE OKC_API.G_EXCEPTION_ERROR;
347: END IF;
348: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
349: EXCEPTION
350: WHEN OKC_API.G_EXCEPTION_ERROR THEN
351: x_return_status := OKC_API.HANDLE_EXCEPTIONS
352: (SUBSTR(l_api_name,1,26),
353: G_PKG_NAME,
354: 'OKC_API.G_RET_STS_ERROR',
347: END IF;
348: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
349: EXCEPTION
350: WHEN OKC_API.G_EXCEPTION_ERROR THEN
351: x_return_status := OKC_API.HANDLE_EXCEPTIONS
352: (SUBSTR(l_api_name,1,26),
353: G_PKG_NAME,
354: 'OKC_API.G_RET_STS_ERROR',
355: x_msg_count,
350: WHEN OKC_API.G_EXCEPTION_ERROR THEN
351: x_return_status := OKC_API.HANDLE_EXCEPTIONS
352: (SUBSTR(l_api_name,1,26),
353: G_PKG_NAME,
354: 'OKC_API.G_RET_STS_ERROR',
355: x_msg_count,
356: x_msg_data,
357: '_PUB');
358: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
354: 'OKC_API.G_RET_STS_ERROR',
355: x_msg_count,
356: x_msg_data,
357: '_PUB');
358: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
359: x_return_status := OKC_API.HANDLE_EXCEPTIONS
360: (SUBSTR(l_api_name,1,26),
361: G_PKG_NAME,
362: 'OKC_API.G_RET_STS_UNEXP_ERROR',
355: x_msg_count,
356: x_msg_data,
357: '_PUB');
358: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
359: x_return_status := OKC_API.HANDLE_EXCEPTIONS
360: (SUBSTR(l_api_name,1,26),
361: G_PKG_NAME,
362: 'OKC_API.G_RET_STS_UNEXP_ERROR',
363: x_msg_count,
358: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
359: x_return_status := OKC_API.HANDLE_EXCEPTIONS
360: (SUBSTR(l_api_name,1,26),
361: G_PKG_NAME,
362: 'OKC_API.G_RET_STS_UNEXP_ERROR',
363: x_msg_count,
364: x_msg_data,
365: '_PUB');
366: WHEN OTHERS THEN
363: x_msg_count,
364: x_msg_data,
365: '_PUB');
366: WHEN OTHERS THEN
367: x_return_status := OKC_API.HANDLE_EXCEPTIONS
368: (SUBSTR(l_api_name,1,26),
369: G_PKG_NAME,
370: 'OTHERS',
371: x_msg_count,