15:
16: l_scnv_rec scnv_rec_type;
17: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_SECTION';
18: l_api_version CONSTANT NUMBER := 1.0;
19: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
20: BEGIN
21: -- call START_ACTIVITY to create savepoint, check compatibility
22: -- and initialize message list
23: l_return_status := OKC_API.START_ACTIVITY(
19: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
20: BEGIN
21: -- call START_ACTIVITY to create savepoint, check compatibility
22: -- and initialize message list
23: l_return_status := OKC_API.START_ACTIVITY(
24: p_api_name => l_api_name,
25: p_pkg_name => g_pkg_name,
26: p_init_msg_list => p_init_msg_list,
27: l_api_version => l_api_version,
29: p_api_type => g_api_type,
30: x_return_status => x_return_status);
31:
32: -- check if activity started successfully
33: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
34: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
35: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
36: raise OKC_API.G_EXCEPTION_ERROR;
37: End If;
30: x_return_status => x_return_status);
31:
32: -- check if activity started successfully
33: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
34: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
35: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
36: raise OKC_API.G_EXCEPTION_ERROR;
37: End If;
38:
31:
32: -- check if activity started successfully
33: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
34: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
35: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
36: raise OKC_API.G_EXCEPTION_ERROR;
37: End If;
38:
39: -- call BEFORE user hook
32: -- check if activity started successfully
33: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
34: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
35: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
36: raise OKC_API.G_EXCEPTION_ERROR;
37: End If;
38:
39: -- call BEFORE user hook
40: l_scnv_rec := p_scnv_rec;
45: p_procedure_name => l_api_name,
46: p_before_after => 'B');
47:
48: -- check return status of user hook call
49: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
50: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
51: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
52: raise OKC_API.G_EXCEPTION_ERROR;
53: End If;
46: p_before_after => 'B');
47:
48: -- check return status of user hook call
49: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
50: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
51: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
52: raise OKC_API.G_EXCEPTION_ERROR;
53: End If;
54:
47:
48: -- check return status of user hook call
49: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
50: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
51: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
52: raise OKC_API.G_EXCEPTION_ERROR;
53: End If;
54:
55: -- get values back from user hook call
48: -- check return status of user hook call
49: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
50: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
51: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
52: raise OKC_API.G_EXCEPTION_ERROR;
53: End If;
54:
55: -- get values back from user hook call
56: l_scnv_rec := g_scnv_rec;
67: p_scnv_rec => l_scnv_rec,
68: x_scnv_rec => x_scnv_rec);
69:
70: -- check return status
71: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
72: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
73: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
74: raise OKC_API.G_EXCEPTION_ERROR;
75: End If;
68: x_scnv_rec => x_scnv_rec);
69:
70: -- check return status
71: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
72: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
73: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
74: raise OKC_API.G_EXCEPTION_ERROR;
75: End If;
76:
69:
70: -- check return status
71: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
72: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
73: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
74: raise OKC_API.G_EXCEPTION_ERROR;
75: End If;
76:
77: -- call AFTER user hook
70: -- check return status
71: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
72: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
73: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
74: raise OKC_API.G_EXCEPTION_ERROR;
75: End If;
76:
77: -- call AFTER user hook
78: g_scnv_rec := x_scnv_rec;
82: p_procedure_name => l_api_name,
83: p_before_after => 'A');
84:
85: -- check return status of the user hook call
86: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
87: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
88: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
89: raise OKC_API.G_EXCEPTION_ERROR;
90: End If;
83: p_before_after => 'A');
84:
85: -- check return status of the user hook call
86: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
87: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
88: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
89: raise OKC_API.G_EXCEPTION_ERROR;
90: End If;
91:
84:
85: -- check return status of the user hook call
86: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
87: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
88: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
89: raise OKC_API.G_EXCEPTION_ERROR;
90: End If;
91:
92: -- end activity
85: -- check return status of the user hook call
86: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
87: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
88: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
89: raise OKC_API.G_EXCEPTION_ERROR;
90: End If;
91:
92: -- end activity
93: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
89: raise OKC_API.G_EXCEPTION_ERROR;
90: End If;
91:
92: -- end activity
93: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
94: x_msg_data => x_msg_data);
95: EXCEPTION
96: when OKC_API.G_EXCEPTION_ERROR then
97: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
92: -- end activity
93: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
94: x_msg_data => x_msg_data);
95: EXCEPTION
96: when OKC_API.G_EXCEPTION_ERROR then
97: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
98: p_api_name => l_api_name,
99: p_pkg_name => g_pkg_name,
100: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
93: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
94: x_msg_data => x_msg_data);
95: EXCEPTION
96: when OKC_API.G_EXCEPTION_ERROR then
97: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
98: p_api_name => l_api_name,
99: p_pkg_name => g_pkg_name,
100: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
101: x_msg_count => x_msg_count,
96: when OKC_API.G_EXCEPTION_ERROR then
97: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
98: p_api_name => l_api_name,
99: p_pkg_name => g_pkg_name,
100: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
101: x_msg_count => x_msg_count,
102: x_msg_data => x_msg_data,
103: p_api_type => g_api_type);
104:
101: x_msg_count => x_msg_count,
102: x_msg_data => x_msg_data,
103: p_api_type => g_api_type);
104:
105: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
106: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
107: p_api_name => l_api_name,
108: p_pkg_name => g_pkg_name,
109: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
102: x_msg_data => x_msg_data,
103: p_api_type => g_api_type);
104:
105: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
106: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
107: p_api_name => l_api_name,
108: p_pkg_name => g_pkg_name,
109: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
110: x_msg_count => x_msg_count,
105: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
106: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
107: p_api_name => l_api_name,
108: p_pkg_name => g_pkg_name,
109: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
110: x_msg_count => x_msg_count,
111: x_msg_data => x_msg_data,
112: p_api_type => g_api_type);
113:
111: x_msg_data => x_msg_data,
112: p_api_type => g_api_type);
113:
114: when OTHERS then
115: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
116: p_api_name => l_api_name,
117: p_pkg_name => g_pkg_name,
118: p_exc_name => 'OTHERS',
119: x_msg_count => x_msg_count,
132: x_scnv_tbl OUT NOCOPY scnv_tbl_type) IS
133:
134: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_SECTION';
135: l_api_version CONSTANT NUMBER := 1.0;
136: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
137: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
138: i NUMBER;
139: BEGIN
140: -- call START_ACTIVITY to create savepoint, check compatibility
133:
134: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_SECTION';
135: l_api_version CONSTANT NUMBER := 1.0;
136: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
137: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
138: i NUMBER;
139: BEGIN
140: -- call START_ACTIVITY to create savepoint, check compatibility
141: -- and initialize message list
138: i NUMBER;
139: BEGIN
140: -- call START_ACTIVITY to create savepoint, check compatibility
141: -- and initialize message list
142: l_return_status := OKC_API.START_ACTIVITY(
143: p_api_name => l_api_name,
144: p_pkg_name => g_pkg_name,
145: p_init_msg_list => p_init_msg_list,
146: l_api_version => l_api_version,
148: p_api_type => g_api_type,
149: x_return_status => x_return_status);
150:
151: -- check if activity started successfully
152: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
153: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
154: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
155: raise OKC_API.G_EXCEPTION_ERROR;
156: End If;
149: x_return_status => x_return_status);
150:
151: -- check if activity started successfully
152: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
153: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
154: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
155: raise OKC_API.G_EXCEPTION_ERROR;
156: End If;
157:
150:
151: -- check if activity started successfully
152: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
153: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
154: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
155: raise OKC_API.G_EXCEPTION_ERROR;
156: End If;
157:
158: If (p_scnv_tbl.COUNT > 0) Then
151: -- check if activity started successfully
152: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
153: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
154: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
155: raise OKC_API.G_EXCEPTION_ERROR;
156: End If;
157:
158: If (p_scnv_tbl.COUNT > 0) Then
159: i := p_scnv_tbl.FIRST;
168: p_scnv_rec => p_scnv_tbl(i),
169: x_scnv_rec => x_scnv_tbl(i));
170:
171: -- store the highest degree of error
172: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
173: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
174: l_overall_status := x_return_status;
175: End If;
176: End If;
169: x_scnv_rec => x_scnv_tbl(i));
170:
171: -- store the highest degree of error
172: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
173: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
174: l_overall_status := x_return_status;
175: End If;
176: End If;
177: EXIT WHEN (i = p_scnv_tbl.LAST);
180: -- return overall status
181: x_return_status := l_overall_status;
182: End If;
183:
184: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
185: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
186: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
187: raise OKC_API.G_EXCEPTION_ERROR;
188: End If;
181: x_return_status := l_overall_status;
182: End If;
183:
184: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
185: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
186: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
187: raise OKC_API.G_EXCEPTION_ERROR;
188: End If;
189:
182: End If;
183:
184: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
185: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
186: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
187: raise OKC_API.G_EXCEPTION_ERROR;
188: End If;
189:
190: -- end activity
183:
184: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
185: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
186: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
187: raise OKC_API.G_EXCEPTION_ERROR;
188: End If;
189:
190: -- end activity
191: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
187: raise OKC_API.G_EXCEPTION_ERROR;
188: End If;
189:
190: -- end activity
191: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
192: x_msg_data => x_msg_data);
193: EXCEPTION
194: when OKC_API.G_EXCEPTION_ERROR then
195: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
190: -- end activity
191: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
192: x_msg_data => x_msg_data);
193: EXCEPTION
194: when OKC_API.G_EXCEPTION_ERROR then
195: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
196: p_api_name => l_api_name,
197: p_pkg_name => g_pkg_name,
198: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
191: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
192: x_msg_data => x_msg_data);
193: EXCEPTION
194: when OKC_API.G_EXCEPTION_ERROR then
195: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
196: p_api_name => l_api_name,
197: p_pkg_name => g_pkg_name,
198: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
199: x_msg_count => x_msg_count,
194: when OKC_API.G_EXCEPTION_ERROR then
195: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
196: p_api_name => l_api_name,
197: p_pkg_name => g_pkg_name,
198: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
199: x_msg_count => x_msg_count,
200: x_msg_data => x_msg_data,
201: p_api_type => g_api_type);
202:
199: x_msg_count => x_msg_count,
200: x_msg_data => x_msg_data,
201: p_api_type => g_api_type);
202:
203: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
204: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
205: p_api_name => l_api_name,
206: p_pkg_name => g_pkg_name,
207: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
200: x_msg_data => x_msg_data,
201: p_api_type => g_api_type);
202:
203: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
204: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
205: p_api_name => l_api_name,
206: p_pkg_name => g_pkg_name,
207: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
208: x_msg_count => x_msg_count,
203: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
204: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
205: p_api_name => l_api_name,
206: p_pkg_name => g_pkg_name,
207: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
208: x_msg_count => x_msg_count,
209: x_msg_data => x_msg_data,
210: p_api_type => g_api_type);
211:
209: x_msg_data => x_msg_data,
210: p_api_type => g_api_type);
211:
212: when OTHERS then
213: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
214: p_api_name => l_api_name,
215: p_pkg_name => g_pkg_name,
216: p_exc_name => 'OTHERS',
217: x_msg_count => x_msg_count,
231:
232: l_scnv_rec scnv_rec_type;
233: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SECTION';
234: l_api_version CONSTANT NUMBER := 1.0;
235: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
236: BEGIN
237: -- call START_ACTIVITY to create savepoint, check compatibility
238: -- and initialize message list
239: l_return_status := OKC_API.START_ACTIVITY(
235: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
236: BEGIN
237: -- call START_ACTIVITY to create savepoint, check compatibility
238: -- and initialize message list
239: l_return_status := OKC_API.START_ACTIVITY(
240: p_api_name => l_api_name,
241: p_pkg_name => g_pkg_name,
242: p_init_msg_list => p_init_msg_list,
243: l_api_version => l_api_version,
245: p_api_type => g_api_type,
246: x_return_status => x_return_status);
247:
248: -- check if activity started successfully
249: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
250: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
251: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
252: raise OKC_API.G_EXCEPTION_ERROR;
253: End If;
246: x_return_status => x_return_status);
247:
248: -- check if activity started successfully
249: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
250: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
251: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
252: raise OKC_API.G_EXCEPTION_ERROR;
253: End If;
254:
247:
248: -- check if activity started successfully
249: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
250: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
251: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
252: raise OKC_API.G_EXCEPTION_ERROR;
253: End If;
254:
255: -- call BEFORE user hook
248: -- check if activity started successfully
249: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
250: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
251: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
252: raise OKC_API.G_EXCEPTION_ERROR;
253: End If;
254:
255: -- call BEFORE user hook
256: l_scnv_rec := p_scnv_rec;
261: p_procedure_name => l_api_name,
262: p_before_after => 'B');
263:
264: -- check return status of user hook call
265: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
266: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
267: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
268: raise OKC_API.G_EXCEPTION_ERROR;
269: End If;
262: p_before_after => 'B');
263:
264: -- check return status of user hook call
265: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
266: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
267: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
268: raise OKC_API.G_EXCEPTION_ERROR;
269: End If;
270:
263:
264: -- check return status of user hook call
265: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
266: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
267: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
268: raise OKC_API.G_EXCEPTION_ERROR;
269: End If;
270:
271: -- get values back from user hook call
264: -- check return status of user hook call
265: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
266: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
267: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
268: raise OKC_API.G_EXCEPTION_ERROR;
269: End If;
270:
271: -- get values back from user hook call
272: l_scnv_rec := g_scnv_rec;
283: p_scnv_rec => l_scnv_rec,
284: x_scnv_rec => x_scnv_rec);
285:
286: -- check return status
287: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
288: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
289: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
290: raise OKC_API.G_EXCEPTION_ERROR;
291: End If;
284: x_scnv_rec => x_scnv_rec);
285:
286: -- check return status
287: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
288: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
289: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
290: raise OKC_API.G_EXCEPTION_ERROR;
291: End If;
292:
285:
286: -- check return status
287: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
288: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
289: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
290: raise OKC_API.G_EXCEPTION_ERROR;
291: End If;
292:
293: -- call AFTER user hook
286: -- check return status
287: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
288: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
289: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
290: raise OKC_API.G_EXCEPTION_ERROR;
291: End If;
292:
293: -- call AFTER user hook
294: g_scnv_rec := x_scnv_rec;
298: p_procedure_name => l_api_name,
299: p_before_after => 'A');
300:
301: -- check return status of the user hook call
302: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
303: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
304: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
305: raise OKC_API.G_EXCEPTION_ERROR;
306: End If;
299: p_before_after => 'A');
300:
301: -- check return status of the user hook call
302: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
303: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
304: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
305: raise OKC_API.G_EXCEPTION_ERROR;
306: End If;
307:
300:
301: -- check return status of the user hook call
302: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
303: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
304: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
305: raise OKC_API.G_EXCEPTION_ERROR;
306: End If;
307:
308: -- end activity
301: -- check return status of the user hook call
302: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
303: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
304: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
305: raise OKC_API.G_EXCEPTION_ERROR;
306: End If;
307:
308: -- end activity
309: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
305: raise OKC_API.G_EXCEPTION_ERROR;
306: End If;
307:
308: -- end activity
309: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
310: x_msg_data => x_msg_data);
311: EXCEPTION
312: when OKC_API.G_EXCEPTION_ERROR then
313: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
308: -- end activity
309: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
310: x_msg_data => x_msg_data);
311: EXCEPTION
312: when OKC_API.G_EXCEPTION_ERROR then
313: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
314: p_api_name => l_api_name,
315: p_pkg_name => g_pkg_name,
316: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
309: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
310: x_msg_data => x_msg_data);
311: EXCEPTION
312: when OKC_API.G_EXCEPTION_ERROR then
313: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
314: p_api_name => l_api_name,
315: p_pkg_name => g_pkg_name,
316: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
317: x_msg_count => x_msg_count,
312: when OKC_API.G_EXCEPTION_ERROR then
313: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
314: p_api_name => l_api_name,
315: p_pkg_name => g_pkg_name,
316: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
317: x_msg_count => x_msg_count,
318: x_msg_data => x_msg_data,
319: p_api_type => g_api_type);
320:
317: x_msg_count => x_msg_count,
318: x_msg_data => x_msg_data,
319: p_api_type => g_api_type);
320:
321: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
322: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
323: p_api_name => l_api_name,
324: p_pkg_name => g_pkg_name,
325: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
318: x_msg_data => x_msg_data,
319: p_api_type => g_api_type);
320:
321: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
322: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
323: p_api_name => l_api_name,
324: p_pkg_name => g_pkg_name,
325: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
326: x_msg_count => x_msg_count,
321: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
322: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
323: p_api_name => l_api_name,
324: p_pkg_name => g_pkg_name,
325: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
326: x_msg_count => x_msg_count,
327: x_msg_data => x_msg_data,
328: p_api_type => g_api_type);
329:
327: x_msg_data => x_msg_data,
328: p_api_type => g_api_type);
329:
330: when OTHERS then
331: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
332: p_api_name => l_api_name,
333: p_pkg_name => g_pkg_name,
334: p_exc_name => 'OTHERS',
335: x_msg_count => x_msg_count,
348: x_scnv_tbl OUT NOCOPY scnv_tbl_type) IS
349:
350: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SECTION';
351: l_api_version CONSTANT NUMBER := 1.0;
352: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
353: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
354: i NUMBER;
355: BEGIN
356: -- call START_ACTIVITY to create savepoint, check compatibility
349:
350: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SECTION';
351: l_api_version CONSTANT NUMBER := 1.0;
352: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
353: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
354: i NUMBER;
355: BEGIN
356: -- call START_ACTIVITY to create savepoint, check compatibility
357: -- and initialize message list
354: i NUMBER;
355: BEGIN
356: -- call START_ACTIVITY to create savepoint, check compatibility
357: -- and initialize message list
358: l_return_status := OKC_API.START_ACTIVITY(
359: p_api_name => l_api_name,
360: p_pkg_name => g_pkg_name,
361: p_init_msg_list => p_init_msg_list,
362: l_api_version => l_api_version,
364: p_api_type => g_api_type,
365: x_return_status => x_return_status);
366:
367: -- check if activity started successfully
368: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
369: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
370: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
371: raise OKC_API.G_EXCEPTION_ERROR;
372: End If;
365: x_return_status => x_return_status);
366:
367: -- check if activity started successfully
368: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
369: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
370: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
371: raise OKC_API.G_EXCEPTION_ERROR;
372: End If;
373:
366:
367: -- check if activity started successfully
368: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
369: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
370: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
371: raise OKC_API.G_EXCEPTION_ERROR;
372: End If;
373:
374: If (p_scnv_tbl.COUNT > 0) Then
367: -- check if activity started successfully
368: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
369: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
370: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
371: raise OKC_API.G_EXCEPTION_ERROR;
372: End If;
373:
374: If (p_scnv_tbl.COUNT > 0) Then
375: i := p_scnv_tbl.FIRST;
384: p_scnv_rec => p_scnv_tbl(i),
385: x_scnv_rec => x_scnv_tbl(i));
386:
387: -- store the highest degree of error
388: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
389: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
390: l_overall_status := x_return_status;
391: End If;
392: End If;
385: x_scnv_rec => x_scnv_tbl(i));
386:
387: -- store the highest degree of error
388: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
389: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
390: l_overall_status := x_return_status;
391: End If;
392: End If;
393: EXIT WHEN (i = p_scnv_tbl.LAST);
396: -- return overall status
397: x_return_status := l_overall_status;
398: End If;
399:
400: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
401: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
402: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
403: raise OKC_API.G_EXCEPTION_ERROR;
404: End If;
397: x_return_status := l_overall_status;
398: End If;
399:
400: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
401: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
402: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
403: raise OKC_API.G_EXCEPTION_ERROR;
404: End If;
405:
398: End If;
399:
400: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
401: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
402: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
403: raise OKC_API.G_EXCEPTION_ERROR;
404: End If;
405:
406: -- end activity
399:
400: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
401: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
402: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
403: raise OKC_API.G_EXCEPTION_ERROR;
404: End If;
405:
406: -- end activity
407: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
403: raise OKC_API.G_EXCEPTION_ERROR;
404: End If;
405:
406: -- end activity
407: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
408: x_msg_data => x_msg_data);
409: EXCEPTION
410: when OKC_API.G_EXCEPTION_ERROR then
411: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
406: -- end activity
407: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
408: x_msg_data => x_msg_data);
409: EXCEPTION
410: when OKC_API.G_EXCEPTION_ERROR then
411: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
412: p_api_name => l_api_name,
413: p_pkg_name => g_pkg_name,
414: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
407: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
408: x_msg_data => x_msg_data);
409: EXCEPTION
410: when OKC_API.G_EXCEPTION_ERROR then
411: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
412: p_api_name => l_api_name,
413: p_pkg_name => g_pkg_name,
414: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
415: x_msg_count => x_msg_count,
410: when OKC_API.G_EXCEPTION_ERROR then
411: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
412: p_api_name => l_api_name,
413: p_pkg_name => g_pkg_name,
414: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
415: x_msg_count => x_msg_count,
416: x_msg_data => x_msg_data,
417: p_api_type => g_api_type);
418:
415: x_msg_count => x_msg_count,
416: x_msg_data => x_msg_data,
417: p_api_type => g_api_type);
418:
419: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
420: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
421: p_api_name => l_api_name,
422: p_pkg_name => g_pkg_name,
423: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
416: x_msg_data => x_msg_data,
417: p_api_type => g_api_type);
418:
419: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
420: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
421: p_api_name => l_api_name,
422: p_pkg_name => g_pkg_name,
423: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
424: x_msg_count => x_msg_count,
419: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
420: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
421: p_api_name => l_api_name,
422: p_pkg_name => g_pkg_name,
423: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
424: x_msg_count => x_msg_count,
425: x_msg_data => x_msg_data,
426: p_api_type => g_api_type);
427:
425: x_msg_data => x_msg_data,
426: p_api_type => g_api_type);
427:
428: when OTHERS then
429: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
430: p_api_name => l_api_name,
431: p_pkg_name => g_pkg_name,
432: p_exc_name => 'OTHERS',
433: x_msg_count => x_msg_count,
446:
447: l_scnv_rec scnv_rec_type;
448: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SECTION';
449: l_api_version CONSTANT NUMBER := 1.0;
450: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
451: BEGIN
452: -- call START_ACTIVITY to create savepoint, check compatibility
453: -- and initialize message list
454: l_return_status := OKC_API.START_ACTIVITY(
450: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
451: BEGIN
452: -- call START_ACTIVITY to create savepoint, check compatibility
453: -- and initialize message list
454: l_return_status := OKC_API.START_ACTIVITY(
455: p_api_name => l_api_name,
456: p_pkg_name => g_pkg_name,
457: p_init_msg_list => p_init_msg_list,
458: l_api_version => l_api_version,
460: p_api_type => g_api_type,
461: x_return_status => x_return_status);
462:
463: -- check if activity started successfully
464: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
465: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
466: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
467: raise OKC_API.G_EXCEPTION_ERROR;
468: End If;
461: x_return_status => x_return_status);
462:
463: -- check if activity started successfully
464: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
465: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
466: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
467: raise OKC_API.G_EXCEPTION_ERROR;
468: End If;
469:
462:
463: -- check if activity started successfully
464: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
465: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
466: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
467: raise OKC_API.G_EXCEPTION_ERROR;
468: End If;
469:
470: -- call BEFORE user hook
463: -- check if activity started successfully
464: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
465: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
466: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
467: raise OKC_API.G_EXCEPTION_ERROR;
468: End If;
469:
470: -- call BEFORE user hook
471: l_scnv_rec := p_scnv_rec;
476: p_procedure_name => l_api_name,
477: p_before_after => 'B');
478:
479: -- check return status of user hook call
480: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
482: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
483: raise OKC_API.G_EXCEPTION_ERROR;
484: End If;
477: p_before_after => 'B');
478:
479: -- check return status of user hook call
480: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
482: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
483: raise OKC_API.G_EXCEPTION_ERROR;
484: End If;
485:
478:
479: -- check return status of user hook call
480: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
482: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
483: raise OKC_API.G_EXCEPTION_ERROR;
484: End If;
485:
486: -- get values back from user hook call
479: -- check return status of user hook call
480: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
482: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
483: raise OKC_API.G_EXCEPTION_ERROR;
484: End If;
485:
486: -- get values back from user hook call
487: l_scnv_rec := g_scnv_rec;
497: x_msg_data => x_msg_data,
498: p_scnv_rec => l_scnv_rec);
499:
500: -- check return status
501: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
502: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
503: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
504: raise OKC_API.G_EXCEPTION_ERROR;
505: End If;
498: p_scnv_rec => l_scnv_rec);
499:
500: -- check return status
501: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
502: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
503: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
504: raise OKC_API.G_EXCEPTION_ERROR;
505: End If;
506:
499:
500: -- check return status
501: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
502: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
503: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
504: raise OKC_API.G_EXCEPTION_ERROR;
505: End If;
506:
507: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
500: -- check return status
501: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
502: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
503: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
504: raise OKC_API.G_EXCEPTION_ERROR;
505: End If;
506:
507: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
508: p_package_name => g_pkg_name,
509: p_procedure_name => l_api_name,
510: p_before_after => 'A');
511:
512: -- check return status of the user hook call
513: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
514: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
515: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
516: raise OKC_API.G_EXCEPTION_ERROR;
517: End If;
510: p_before_after => 'A');
511:
512: -- check return status of the user hook call
513: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
514: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
515: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
516: raise OKC_API.G_EXCEPTION_ERROR;
517: End If;
518:
511:
512: -- check return status of the user hook call
513: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
514: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
515: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
516: raise OKC_API.G_EXCEPTION_ERROR;
517: End If;
518:
519: -- end activity
512: -- check return status of the user hook call
513: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
514: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
515: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
516: raise OKC_API.G_EXCEPTION_ERROR;
517: End If;
518:
519: -- end activity
520: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
516: raise OKC_API.G_EXCEPTION_ERROR;
517: End If;
518:
519: -- end activity
520: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
521: x_msg_data => x_msg_data);
522: EXCEPTION
523: when OKC_API.G_EXCEPTION_ERROR then
524: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
519: -- end activity
520: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
521: x_msg_data => x_msg_data);
522: EXCEPTION
523: when OKC_API.G_EXCEPTION_ERROR then
524: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
525: p_api_name => l_api_name,
526: p_pkg_name => g_pkg_name,
527: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
520: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
521: x_msg_data => x_msg_data);
522: EXCEPTION
523: when OKC_API.G_EXCEPTION_ERROR then
524: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
525: p_api_name => l_api_name,
526: p_pkg_name => g_pkg_name,
527: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
528: x_msg_count => x_msg_count,
523: when OKC_API.G_EXCEPTION_ERROR then
524: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
525: p_api_name => l_api_name,
526: p_pkg_name => g_pkg_name,
527: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
528: x_msg_count => x_msg_count,
529: x_msg_data => x_msg_data,
530: p_api_type => g_api_type);
531:
528: x_msg_count => x_msg_count,
529: x_msg_data => x_msg_data,
530: p_api_type => g_api_type);
531:
532: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
533: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
534: p_api_name => l_api_name,
535: p_pkg_name => g_pkg_name,
536: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
529: x_msg_data => x_msg_data,
530: p_api_type => g_api_type);
531:
532: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
533: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
534: p_api_name => l_api_name,
535: p_pkg_name => g_pkg_name,
536: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
537: x_msg_count => x_msg_count,
532: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
533: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
534: p_api_name => l_api_name,
535: p_pkg_name => g_pkg_name,
536: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
537: x_msg_count => x_msg_count,
538: x_msg_data => x_msg_data,
539: p_api_type => g_api_type);
540:
538: x_msg_data => x_msg_data,
539: p_api_type => g_api_type);
540:
541: when OTHERS then
542: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
543: p_api_name => l_api_name,
544: p_pkg_name => g_pkg_name,
545: p_exc_name => 'OTHERS',
546: x_msg_count => x_msg_count,
558: p_scnv_tbl IN scnv_tbl_type) IS
559:
560: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SECTION';
561: l_api_version CONSTANT NUMBER := 1.0;
562: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
563: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
564: i NUMBER;
565: BEGIN
566: -- call START_ACTIVITY to create savepoint, check compatibility
559:
560: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SECTION';
561: l_api_version CONSTANT NUMBER := 1.0;
562: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
563: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
564: i NUMBER;
565: BEGIN
566: -- call START_ACTIVITY to create savepoint, check compatibility
567: -- and initialize message list
564: i NUMBER;
565: BEGIN
566: -- call START_ACTIVITY to create savepoint, check compatibility
567: -- and initialize message list
568: l_return_status := OKC_API.START_ACTIVITY(
569: p_api_name => l_api_name,
570: p_pkg_name => g_pkg_name,
571: p_init_msg_list => p_init_msg_list,
572: l_api_version => l_api_version,
574: p_api_type => g_api_type,
575: x_return_status => x_return_status);
576:
577: -- check if activity started successfully
578: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
579: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
580: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
581: raise OKC_API.G_EXCEPTION_ERROR;
582: End If;
575: x_return_status => x_return_status);
576:
577: -- check if activity started successfully
578: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
579: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
580: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
581: raise OKC_API.G_EXCEPTION_ERROR;
582: End If;
583:
576:
577: -- check if activity started successfully
578: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
579: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
580: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
581: raise OKC_API.G_EXCEPTION_ERROR;
582: End If;
583:
584: If (p_scnv_tbl.COUNT > 0) Then
577: -- check if activity started successfully
578: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
579: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
580: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
581: raise OKC_API.G_EXCEPTION_ERROR;
582: End If;
583:
584: If (p_scnv_tbl.COUNT > 0) Then
585: i := p_scnv_tbl.FIRST;
593: x_msg_data => x_msg_data,
594: p_scnv_rec => p_scnv_tbl(i));
595:
596: -- store the highest degree of error
597: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
598: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
599: l_overall_status := x_return_status;
600: End If;
601: End If;
594: p_scnv_rec => p_scnv_tbl(i));
595:
596: -- store the highest degree of error
597: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
598: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
599: l_overall_status := x_return_status;
600: End If;
601: End If;
602: EXIT WHEN (i = p_scnv_tbl.LAST);
605: -- return overall status
606: x_return_status := l_overall_status;
607: End If;
608:
609: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
610: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
611: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
612: raise OKC_API.G_EXCEPTION_ERROR;
613: End If;
606: x_return_status := l_overall_status;
607: End If;
608:
609: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
610: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
611: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
612: raise OKC_API.G_EXCEPTION_ERROR;
613: End If;
614:
607: End If;
608:
609: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
610: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
611: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
612: raise OKC_API.G_EXCEPTION_ERROR;
613: End If;
614:
615: -- end activity
608:
609: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
610: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
611: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
612: raise OKC_API.G_EXCEPTION_ERROR;
613: End If;
614:
615: -- end activity
616: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
612: raise OKC_API.G_EXCEPTION_ERROR;
613: End If;
614:
615: -- end activity
616: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
617: x_msg_data => x_msg_data);
618: EXCEPTION
619: when OKC_API.G_EXCEPTION_ERROR then
620: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
615: -- end activity
616: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
617: x_msg_data => x_msg_data);
618: EXCEPTION
619: when OKC_API.G_EXCEPTION_ERROR then
620: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
621: p_api_name => l_api_name,
622: p_pkg_name => g_pkg_name,
623: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
616: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
617: x_msg_data => x_msg_data);
618: EXCEPTION
619: when OKC_API.G_EXCEPTION_ERROR then
620: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
621: p_api_name => l_api_name,
622: p_pkg_name => g_pkg_name,
623: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
624: x_msg_count => x_msg_count,
619: when OKC_API.G_EXCEPTION_ERROR then
620: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
621: p_api_name => l_api_name,
622: p_pkg_name => g_pkg_name,
623: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
624: x_msg_count => x_msg_count,
625: x_msg_data => x_msg_data,
626: p_api_type => g_api_type);
627:
624: x_msg_count => x_msg_count,
625: x_msg_data => x_msg_data,
626: p_api_type => g_api_type);
627:
628: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
629: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
630: p_api_name => l_api_name,
631: p_pkg_name => g_pkg_name,
632: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
625: x_msg_data => x_msg_data,
626: p_api_type => g_api_type);
627:
628: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
629: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
630: p_api_name => l_api_name,
631: p_pkg_name => g_pkg_name,
632: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
633: x_msg_count => x_msg_count,
628: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
629: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
630: p_api_name => l_api_name,
631: p_pkg_name => g_pkg_name,
632: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
633: x_msg_count => x_msg_count,
634: x_msg_data => x_msg_data,
635: p_api_type => g_api_type);
636:
634: x_msg_data => x_msg_data,
635: p_api_type => g_api_type);
636:
637: when OTHERS then
638: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
639: p_api_name => l_api_name,
640: p_pkg_name => g_pkg_name,
641: p_exc_name => 'OTHERS',
642: x_msg_count => x_msg_count,
655:
656: l_scnv_rec scnv_rec_type;
657: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_SECTION';
658: l_api_version CONSTANT NUMBER := 1.0;
659: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
660: BEGIN
661: -- call START_ACTIVITY to create savepoint, check compatibility
662: -- and initialize message list
663: l_return_status := OKC_API.START_ACTIVITY(
659: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
660: BEGIN
661: -- call START_ACTIVITY to create savepoint, check compatibility
662: -- and initialize message list
663: l_return_status := OKC_API.START_ACTIVITY(
664: p_api_name => l_api_name,
665: p_pkg_name => g_pkg_name,
666: p_init_msg_list => p_init_msg_list,
667: l_api_version => l_api_version,
669: p_api_type => g_api_type,
670: x_return_status => x_return_status);
671:
672: -- check if activity started successfully
673: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
674: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
675: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
676: raise OKC_API.G_EXCEPTION_ERROR;
677: End If;
670: x_return_status => x_return_status);
671:
672: -- check if activity started successfully
673: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
674: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
675: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
676: raise OKC_API.G_EXCEPTION_ERROR;
677: End If;
678:
671:
672: -- check if activity started successfully
673: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
674: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
675: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
676: raise OKC_API.G_EXCEPTION_ERROR;
677: End If;
678:
679: -- call BEFORE user hook
672: -- check if activity started successfully
673: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
674: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
675: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
676: raise OKC_API.G_EXCEPTION_ERROR;
677: End If;
678:
679: -- call BEFORE user hook
680: l_scnv_rec := p_scnv_rec;
685: p_procedure_name => l_api_name,
686: p_before_after => 'B');
687:
688: -- check return status of user hook call
689: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
690: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
691: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
692: raise OKC_API.G_EXCEPTION_ERROR;
693: End If;
686: p_before_after => 'B');
687:
688: -- check return status of user hook call
689: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
690: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
691: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
692: raise OKC_API.G_EXCEPTION_ERROR;
693: End If;
694:
687:
688: -- check return status of user hook call
689: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
690: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
691: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
692: raise OKC_API.G_EXCEPTION_ERROR;
693: End If;
694:
695: -- get values back from user hook call
688: -- check return status of user hook call
689: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
690: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
691: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
692: raise OKC_API.G_EXCEPTION_ERROR;
693: End If;
694:
695: -- get values back from user hook call
696: l_scnv_rec := g_scnv_rec;
706: x_msg_data => x_msg_data,
707: p_scnv_rec => l_scnv_rec);
708:
709: -- check return status
710: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
711: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
712: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
713: raise OKC_API.G_EXCEPTION_ERROR;
714: End If;
707: p_scnv_rec => l_scnv_rec);
708:
709: -- check return status
710: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
711: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
712: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
713: raise OKC_API.G_EXCEPTION_ERROR;
714: End If;
715:
708:
709: -- check return status
710: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
711: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
712: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
713: raise OKC_API.G_EXCEPTION_ERROR;
714: End If;
715:
716: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
709: -- check return status
710: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
711: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
712: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
713: raise OKC_API.G_EXCEPTION_ERROR;
714: End If;
715:
716: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
717: p_package_name => g_pkg_name,
718: p_procedure_name => l_api_name,
719: p_before_after => 'A');
720:
721: -- check return status of the user hook call
722: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
723: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
724: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
725: raise OKC_API.G_EXCEPTION_ERROR;
726: End If;
719: p_before_after => 'A');
720:
721: -- check return status of the user hook call
722: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
723: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
724: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
725: raise OKC_API.G_EXCEPTION_ERROR;
726: End If;
727:
720:
721: -- check return status of the user hook call
722: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
723: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
724: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
725: raise OKC_API.G_EXCEPTION_ERROR;
726: End If;
727:
728: -- end activity
721: -- check return status of the user hook call
722: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
723: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
724: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
725: raise OKC_API.G_EXCEPTION_ERROR;
726: End If;
727:
728: -- end activity
729: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
725: raise OKC_API.G_EXCEPTION_ERROR;
726: End If;
727:
728: -- end activity
729: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
730: x_msg_data => x_msg_data);
731: EXCEPTION
732: when OKC_API.G_EXCEPTION_ERROR then
733: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
728: -- end activity
729: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
730: x_msg_data => x_msg_data);
731: EXCEPTION
732: when OKC_API.G_EXCEPTION_ERROR then
733: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
734: p_api_name => l_api_name,
735: p_pkg_name => g_pkg_name,
736: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
729: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
730: x_msg_data => x_msg_data);
731: EXCEPTION
732: when OKC_API.G_EXCEPTION_ERROR then
733: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
734: p_api_name => l_api_name,
735: p_pkg_name => g_pkg_name,
736: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
737: x_msg_count => x_msg_count,
732: when OKC_API.G_EXCEPTION_ERROR then
733: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
734: p_api_name => l_api_name,
735: p_pkg_name => g_pkg_name,
736: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
737: x_msg_count => x_msg_count,
738: x_msg_data => x_msg_data,
739: p_api_type => g_api_type);
740:
737: x_msg_count => x_msg_count,
738: x_msg_data => x_msg_data,
739: p_api_type => g_api_type);
740:
741: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
742: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
743: p_api_name => l_api_name,
744: p_pkg_name => g_pkg_name,
745: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
738: x_msg_data => x_msg_data,
739: p_api_type => g_api_type);
740:
741: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
742: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
743: p_api_name => l_api_name,
744: p_pkg_name => g_pkg_name,
745: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
746: x_msg_count => x_msg_count,
741: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
742: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
743: p_api_name => l_api_name,
744: p_pkg_name => g_pkg_name,
745: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
746: x_msg_count => x_msg_count,
747: x_msg_data => x_msg_data,
748: p_api_type => g_api_type);
749:
747: x_msg_data => x_msg_data,
748: p_api_type => g_api_type);
749:
750: when OTHERS then
751: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
752: p_api_name => l_api_name,
753: p_pkg_name => g_pkg_name,
754: p_exc_name => 'OTHERS',
755: x_msg_count => x_msg_count,
767: p_scnv_tbl IN scnv_tbl_type) IS
768:
769: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_SECTION';
770: l_api_version CONSTANT NUMBER := 1.0;
771: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
772: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
773: i NUMBER;
774: BEGIN
775: -- call START_ACTIVITY to create savepoint, check compatibility
768:
769: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_SECTION';
770: l_api_version CONSTANT NUMBER := 1.0;
771: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
772: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
773: i NUMBER;
774: BEGIN
775: -- call START_ACTIVITY to create savepoint, check compatibility
776: -- and initialize message list
773: i NUMBER;
774: BEGIN
775: -- call START_ACTIVITY to create savepoint, check compatibility
776: -- and initialize message list
777: l_return_status := OKC_API.START_ACTIVITY(
778: p_api_name => l_api_name,
779: p_pkg_name => g_pkg_name,
780: p_init_msg_list => p_init_msg_list,
781: l_api_version => l_api_version,
783: p_api_type => g_api_type,
784: x_return_status => x_return_status);
785:
786: -- check if activity started successfully
787: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
788: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
789: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
790: raise OKC_API.G_EXCEPTION_ERROR;
791: End If;
784: x_return_status => x_return_status);
785:
786: -- check if activity started successfully
787: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
788: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
789: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
790: raise OKC_API.G_EXCEPTION_ERROR;
791: End If;
792:
785:
786: -- check if activity started successfully
787: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
788: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
789: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
790: raise OKC_API.G_EXCEPTION_ERROR;
791: End If;
792:
793: If (p_scnv_tbl.COUNT > 0) Then
786: -- check if activity started successfully
787: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
788: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
789: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
790: raise OKC_API.G_EXCEPTION_ERROR;
791: End If;
792:
793: If (p_scnv_tbl.COUNT > 0) Then
794: i := p_scnv_tbl.FIRST;
802: x_msg_data => x_msg_data,
803: p_scnv_rec => p_scnv_tbl(i));
804:
805: -- store the highest degree of error
806: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
807: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
808: l_overall_status := x_return_status;
809: End If;
810: End If;
803: p_scnv_rec => p_scnv_tbl(i));
804:
805: -- store the highest degree of error
806: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
807: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
808: l_overall_status := x_return_status;
809: End If;
810: End If;
811: EXIT WHEN (i = p_scnv_tbl.LAST);
814: -- return overall status
815: x_return_status := l_overall_status;
816: End If;
817:
818: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
819: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
820: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
821: raise OKC_API.G_EXCEPTION_ERROR;
822: End If;
815: x_return_status := l_overall_status;
816: End If;
817:
818: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
819: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
820: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
821: raise OKC_API.G_EXCEPTION_ERROR;
822: End If;
823:
816: End If;
817:
818: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
819: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
820: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
821: raise OKC_API.G_EXCEPTION_ERROR;
822: End If;
823:
824: -- end activity
817:
818: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
819: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
820: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
821: raise OKC_API.G_EXCEPTION_ERROR;
822: End If;
823:
824: -- end activity
825: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
821: raise OKC_API.G_EXCEPTION_ERROR;
822: End If;
823:
824: -- end activity
825: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
826: x_msg_data => x_msg_data);
827: EXCEPTION
828: when OKC_API.G_EXCEPTION_ERROR then
829: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
824: -- end activity
825: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
826: x_msg_data => x_msg_data);
827: EXCEPTION
828: when OKC_API.G_EXCEPTION_ERROR then
829: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
830: p_api_name => l_api_name,
831: p_pkg_name => g_pkg_name,
832: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
825: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
826: x_msg_data => x_msg_data);
827: EXCEPTION
828: when OKC_API.G_EXCEPTION_ERROR then
829: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
830: p_api_name => l_api_name,
831: p_pkg_name => g_pkg_name,
832: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
833: x_msg_count => x_msg_count,
828: when OKC_API.G_EXCEPTION_ERROR then
829: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
830: p_api_name => l_api_name,
831: p_pkg_name => g_pkg_name,
832: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
833: x_msg_count => x_msg_count,
834: x_msg_data => x_msg_data,
835: p_api_type => g_api_type);
836:
833: x_msg_count => x_msg_count,
834: x_msg_data => x_msg_data,
835: p_api_type => g_api_type);
836:
837: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
838: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
839: p_api_name => l_api_name,
840: p_pkg_name => g_pkg_name,
841: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
834: x_msg_data => x_msg_data,
835: p_api_type => g_api_type);
836:
837: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
838: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
839: p_api_name => l_api_name,
840: p_pkg_name => g_pkg_name,
841: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
842: x_msg_count => x_msg_count,
837: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
838: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
839: p_api_name => l_api_name,
840: p_pkg_name => g_pkg_name,
841: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
842: x_msg_count => x_msg_count,
843: x_msg_data => x_msg_data,
844: p_api_type => g_api_type);
845:
843: x_msg_data => x_msg_data,
844: p_api_type => g_api_type);
845:
846: when OTHERS then
847: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
848: p_api_name => l_api_name,
849: p_pkg_name => g_pkg_name,
850: p_exc_name => 'OTHERS',
851: x_msg_count => x_msg_count,
864:
865: l_scnv_rec scnv_rec_type;
866: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_SECTION';
867: l_api_version CONSTANT NUMBER := 1.0;
868: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
869: BEGIN
870: -- call START_ACTIVITY to create savepoint, check compatibility
871: -- and initialize message list
872: l_return_status := OKC_API.START_ACTIVITY(
868: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
869: BEGIN
870: -- call START_ACTIVITY to create savepoint, check compatibility
871: -- and initialize message list
872: l_return_status := OKC_API.START_ACTIVITY(
873: p_api_name => l_api_name,
874: p_pkg_name => g_pkg_name,
875: p_init_msg_list => p_init_msg_list,
876: l_api_version => l_api_version,
878: p_api_type => g_api_type,
879: x_return_status => x_return_status);
880:
881: -- check if activity started successfully
882: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
883: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
884: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
885: raise OKC_API.G_EXCEPTION_ERROR;
886: End If;
879: x_return_status => x_return_status);
880:
881: -- check if activity started successfully
882: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
883: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
884: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
885: raise OKC_API.G_EXCEPTION_ERROR;
886: End If;
887:
880:
881: -- check if activity started successfully
882: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
883: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
884: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
885: raise OKC_API.G_EXCEPTION_ERROR;
886: End If;
887:
888: -- call BEFORE user hook
881: -- check if activity started successfully
882: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
883: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
884: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
885: raise OKC_API.G_EXCEPTION_ERROR;
886: End If;
887:
888: -- call BEFORE user hook
889: l_scnv_rec := p_scnv_rec;
894: p_procedure_name => l_api_name,
895: p_before_after => 'B');
896:
897: -- check return status of user hook call
898: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
899: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
901: raise OKC_API.G_EXCEPTION_ERROR;
902: End If;
895: p_before_after => 'B');
896:
897: -- check return status of user hook call
898: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
899: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
901: raise OKC_API.G_EXCEPTION_ERROR;
902: End If;
903:
896:
897: -- check return status of user hook call
898: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
899: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
901: raise OKC_API.G_EXCEPTION_ERROR;
902: End If;
903:
904: -- get values back from user hook call
897: -- check return status of user hook call
898: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
899: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
901: raise OKC_API.G_EXCEPTION_ERROR;
902: End If;
903:
904: -- get values back from user hook call
905: l_scnv_rec := g_scnv_rec;
915: x_msg_data => x_msg_data,
916: p_scnv_rec => l_scnv_rec);
917:
918: -- check return status
919: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
920: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
921: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
922: raise OKC_API.G_EXCEPTION_ERROR;
923: End If;
916: p_scnv_rec => l_scnv_rec);
917:
918: -- check return status
919: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
920: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
921: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
922: raise OKC_API.G_EXCEPTION_ERROR;
923: End If;
924:
917:
918: -- check return status
919: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
920: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
921: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
922: raise OKC_API.G_EXCEPTION_ERROR;
923: End If;
924:
925: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
918: -- check return status
919: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
920: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
921: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
922: raise OKC_API.G_EXCEPTION_ERROR;
923: End If;
924:
925: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
926: p_package_name => g_pkg_name,
927: p_procedure_name => l_api_name,
928: p_before_after => 'A');
929:
930: -- check return status of the user hook call
931: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
932: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
933: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
934: raise OKC_API.G_EXCEPTION_ERROR;
935: End If;
928: p_before_after => 'A');
929:
930: -- check return status of the user hook call
931: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
932: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
933: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
934: raise OKC_API.G_EXCEPTION_ERROR;
935: End If;
936:
929:
930: -- check return status of the user hook call
931: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
932: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
933: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
934: raise OKC_API.G_EXCEPTION_ERROR;
935: End If;
936:
937: -- end activity
930: -- check return status of the user hook call
931: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
932: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
933: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
934: raise OKC_API.G_EXCEPTION_ERROR;
935: End If;
936:
937: -- end activity
938: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
934: raise OKC_API.G_EXCEPTION_ERROR;
935: End If;
936:
937: -- end activity
938: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
939: x_msg_data => x_msg_data);
940: EXCEPTION
941: when OKC_API.G_EXCEPTION_ERROR then
942: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
937: -- end activity
938: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
939: x_msg_data => x_msg_data);
940: EXCEPTION
941: when OKC_API.G_EXCEPTION_ERROR then
942: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
943: p_api_name => l_api_name,
944: p_pkg_name => g_pkg_name,
945: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
938: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
939: x_msg_data => x_msg_data);
940: EXCEPTION
941: when OKC_API.G_EXCEPTION_ERROR then
942: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
943: p_api_name => l_api_name,
944: p_pkg_name => g_pkg_name,
945: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
946: x_msg_count => x_msg_count,
941: when OKC_API.G_EXCEPTION_ERROR then
942: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
943: p_api_name => l_api_name,
944: p_pkg_name => g_pkg_name,
945: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
946: x_msg_count => x_msg_count,
947: x_msg_data => x_msg_data,
948: p_api_type => g_api_type);
949:
946: x_msg_count => x_msg_count,
947: x_msg_data => x_msg_data,
948: p_api_type => g_api_type);
949:
950: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
951: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
952: p_api_name => l_api_name,
953: p_pkg_name => g_pkg_name,
954: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
947: x_msg_data => x_msg_data,
948: p_api_type => g_api_type);
949:
950: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
951: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
952: p_api_name => l_api_name,
953: p_pkg_name => g_pkg_name,
954: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
955: x_msg_count => x_msg_count,
950: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
951: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
952: p_api_name => l_api_name,
953: p_pkg_name => g_pkg_name,
954: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
955: x_msg_count => x_msg_count,
956: x_msg_data => x_msg_data,
957: p_api_type => g_api_type);
958:
956: x_msg_data => x_msg_data,
957: p_api_type => g_api_type);
958:
959: when OTHERS then
960: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
961: p_api_name => l_api_name,
962: p_pkg_name => g_pkg_name,
963: p_exc_name => 'OTHERS',
964: x_msg_count => x_msg_count,
976: p_scnv_tbl IN scnv_tbl_type) IS
977:
978: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_SECTION';
979: l_api_version CONSTANT NUMBER := 1.0;
980: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
981: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
982: i NUMBER;
983: BEGIN
984: -- call START_ACTIVITY to create savepoint, check compatibility
977:
978: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_SECTION';
979: l_api_version CONSTANT NUMBER := 1.0;
980: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
981: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
982: i NUMBER;
983: BEGIN
984: -- call START_ACTIVITY to create savepoint, check compatibility
985: -- and initialize message list
982: i NUMBER;
983: BEGIN
984: -- call START_ACTIVITY to create savepoint, check compatibility
985: -- and initialize message list
986: l_return_status := OKC_API.START_ACTIVITY(
987: p_api_name => l_api_name,
988: p_pkg_name => g_pkg_name,
989: p_init_msg_list => p_init_msg_list,
990: l_api_version => l_api_version,
992: p_api_type => g_api_type,
993: x_return_status => x_return_status);
994:
995: -- check if activity started successfully
996: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
997: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
998: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
999: raise OKC_API.G_EXCEPTION_ERROR;
1000: End If;
993: x_return_status => x_return_status);
994:
995: -- check if activity started successfully
996: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
997: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
998: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
999: raise OKC_API.G_EXCEPTION_ERROR;
1000: End If;
1001:
994:
995: -- check if activity started successfully
996: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
997: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
998: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
999: raise OKC_API.G_EXCEPTION_ERROR;
1000: End If;
1001:
1002: If (p_scnv_tbl.COUNT > 0) Then
995: -- check if activity started successfully
996: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
997: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
998: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
999: raise OKC_API.G_EXCEPTION_ERROR;
1000: End If;
1001:
1002: If (p_scnv_tbl.COUNT > 0) Then
1003: i := p_scnv_tbl.FIRST;
1011: x_msg_data => x_msg_data,
1012: p_scnv_rec => p_scnv_tbl(i));
1013:
1014: -- store the highest degree of error
1015: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1016: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1017: l_overall_status := x_return_status;
1018: End If;
1019: End If;
1012: p_scnv_rec => p_scnv_tbl(i));
1013:
1014: -- store the highest degree of error
1015: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1016: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1017: l_overall_status := x_return_status;
1018: End If;
1019: End If;
1020: EXIT WHEN (i = p_scnv_tbl.LAST);
1023: -- return overall status
1024: x_return_status := l_overall_status;
1025: End If;
1026:
1027: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1028: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1029: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1030: raise OKC_API.G_EXCEPTION_ERROR;
1031: End If;
1024: x_return_status := l_overall_status;
1025: End If;
1026:
1027: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1028: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1029: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1030: raise OKC_API.G_EXCEPTION_ERROR;
1031: End If;
1032:
1025: End If;
1026:
1027: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1028: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1029: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1030: raise OKC_API.G_EXCEPTION_ERROR;
1031: End If;
1032:
1033: -- end activity
1026:
1027: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1028: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1029: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1030: raise OKC_API.G_EXCEPTION_ERROR;
1031: End If;
1032:
1033: -- end activity
1034: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1030: raise OKC_API.G_EXCEPTION_ERROR;
1031: End If;
1032:
1033: -- end activity
1034: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1035: x_msg_data => x_msg_data);
1036: EXCEPTION
1037: when OKC_API.G_EXCEPTION_ERROR then
1038: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1033: -- end activity
1034: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1035: x_msg_data => x_msg_data);
1036: EXCEPTION
1037: when OKC_API.G_EXCEPTION_ERROR then
1038: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1039: p_api_name => l_api_name,
1040: p_pkg_name => g_pkg_name,
1041: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1034: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1035: x_msg_data => x_msg_data);
1036: EXCEPTION
1037: when OKC_API.G_EXCEPTION_ERROR then
1038: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1039: p_api_name => l_api_name,
1040: p_pkg_name => g_pkg_name,
1041: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1042: x_msg_count => x_msg_count,
1037: when OKC_API.G_EXCEPTION_ERROR then
1038: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1039: p_api_name => l_api_name,
1040: p_pkg_name => g_pkg_name,
1041: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1042: x_msg_count => x_msg_count,
1043: x_msg_data => x_msg_data,
1044: p_api_type => g_api_type);
1045:
1042: x_msg_count => x_msg_count,
1043: x_msg_data => x_msg_data,
1044: p_api_type => g_api_type);
1045:
1046: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1047: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1048: p_api_name => l_api_name,
1049: p_pkg_name => g_pkg_name,
1050: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1043: x_msg_data => x_msg_data,
1044: p_api_type => g_api_type);
1045:
1046: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1047: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1048: p_api_name => l_api_name,
1049: p_pkg_name => g_pkg_name,
1050: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1051: x_msg_count => x_msg_count,
1046: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1047: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1048: p_api_name => l_api_name,
1049: p_pkg_name => g_pkg_name,
1050: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1051: x_msg_count => x_msg_count,
1052: x_msg_data => x_msg_data,
1053: p_api_type => g_api_type);
1054:
1052: x_msg_data => x_msg_data,
1053: p_api_type => g_api_type);
1054:
1055: when OTHERS then
1056: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1057: p_api_name => l_api_name,
1058: p_pkg_name => g_pkg_name,
1059: p_exc_name => 'OTHERS',
1060: x_msg_count => x_msg_count,
1074:
1075: l_sccv_rec sccv_rec_type;
1076: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_SECTION_CONTENT';
1077: l_api_version CONSTANT NUMBER := 1.0;
1078: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1079: BEGIN
1080: -- call START_ACTIVITY to create savepoint, check compatibility
1081: -- and initialize message list
1082: l_return_status := OKC_API.START_ACTIVITY(
1078: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1079: BEGIN
1080: -- call START_ACTIVITY to create savepoint, check compatibility
1081: -- and initialize message list
1082: l_return_status := OKC_API.START_ACTIVITY(
1083: p_api_name => l_api_name,
1084: p_pkg_name => g_pkg_name,
1085: p_init_msg_list => p_init_msg_list,
1086: l_api_version => l_api_version,
1088: p_api_type => g_api_type,
1089: x_return_status => x_return_status);
1090:
1091: -- check if activity started successfully
1092: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1093: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1094: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1095: raise OKC_API.G_EXCEPTION_ERROR;
1096: End If;
1089: x_return_status => x_return_status);
1090:
1091: -- check if activity started successfully
1092: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1093: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1094: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1095: raise OKC_API.G_EXCEPTION_ERROR;
1096: End If;
1097:
1090:
1091: -- check if activity started successfully
1092: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1093: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1094: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1095: raise OKC_API.G_EXCEPTION_ERROR;
1096: End If;
1097:
1098: -- call BEFORE user hook
1091: -- check if activity started successfully
1092: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1093: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1094: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1095: raise OKC_API.G_EXCEPTION_ERROR;
1096: End If;
1097:
1098: -- call BEFORE user hook
1099: l_sccv_rec := p_sccv_rec;
1104: p_procedure_name => l_api_name,
1105: p_before_after => 'B');
1106:
1107: -- check return status of user hook call
1108: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1109: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1110: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1111: raise OKC_API.G_EXCEPTION_ERROR;
1112: End If;
1105: p_before_after => 'B');
1106:
1107: -- check return status of user hook call
1108: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1109: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1110: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1111: raise OKC_API.G_EXCEPTION_ERROR;
1112: End If;
1113:
1106:
1107: -- check return status of user hook call
1108: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1109: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1110: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1111: raise OKC_API.G_EXCEPTION_ERROR;
1112: End If;
1113:
1114: -- get values back from user hook call
1107: -- check return status of user hook call
1108: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1109: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1110: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1111: raise OKC_API.G_EXCEPTION_ERROR;
1112: End If;
1113:
1114: -- get values back from user hook call
1115: l_sccv_rec := g_sccv_rec;
1126: p_sccv_rec => l_sccv_rec,
1127: x_sccv_rec => x_sccv_rec);
1128:
1129: -- check return status
1130: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1131: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1132: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1133: raise OKC_API.G_EXCEPTION_ERROR;
1134: End If;
1127: x_sccv_rec => x_sccv_rec);
1128:
1129: -- check return status
1130: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1131: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1132: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1133: raise OKC_API.G_EXCEPTION_ERROR;
1134: End If;
1135:
1128:
1129: -- check return status
1130: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1131: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1132: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1133: raise OKC_API.G_EXCEPTION_ERROR;
1134: End If;
1135:
1136: -- call AFTER user hook
1129: -- check return status
1130: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1131: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1132: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1133: raise OKC_API.G_EXCEPTION_ERROR;
1134: End If;
1135:
1136: -- call AFTER user hook
1137: g_sccv_rec := x_sccv_rec;
1141: p_procedure_name => l_api_name,
1142: p_before_after => 'A');
1143:
1144: -- check return status of the user hook call
1145: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1148: raise OKC_API.G_EXCEPTION_ERROR;
1149: End If;
1142: p_before_after => 'A');
1143:
1144: -- check return status of the user hook call
1145: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1148: raise OKC_API.G_EXCEPTION_ERROR;
1149: End If;
1150:
1143:
1144: -- check return status of the user hook call
1145: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1148: raise OKC_API.G_EXCEPTION_ERROR;
1149: End If;
1150:
1151: -- end activity
1144: -- check return status of the user hook call
1145: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1148: raise OKC_API.G_EXCEPTION_ERROR;
1149: End If;
1150:
1151: -- end activity
1152: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1148: raise OKC_API.G_EXCEPTION_ERROR;
1149: End If;
1150:
1151: -- end activity
1152: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1153: x_msg_data => x_msg_data);
1154: EXCEPTION
1155: when OKC_API.G_EXCEPTION_ERROR then
1156: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1151: -- end activity
1152: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1153: x_msg_data => x_msg_data);
1154: EXCEPTION
1155: when OKC_API.G_EXCEPTION_ERROR then
1156: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1157: p_api_name => l_api_name,
1158: p_pkg_name => g_pkg_name,
1159: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1152: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1153: x_msg_data => x_msg_data);
1154: EXCEPTION
1155: when OKC_API.G_EXCEPTION_ERROR then
1156: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1157: p_api_name => l_api_name,
1158: p_pkg_name => g_pkg_name,
1159: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1160: x_msg_count => x_msg_count,
1155: when OKC_API.G_EXCEPTION_ERROR then
1156: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1157: p_api_name => l_api_name,
1158: p_pkg_name => g_pkg_name,
1159: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1160: x_msg_count => x_msg_count,
1161: x_msg_data => x_msg_data,
1162: p_api_type => g_api_type);
1163:
1160: x_msg_count => x_msg_count,
1161: x_msg_data => x_msg_data,
1162: p_api_type => g_api_type);
1163:
1164: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1165: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1166: p_api_name => l_api_name,
1167: p_pkg_name => g_pkg_name,
1168: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1161: x_msg_data => x_msg_data,
1162: p_api_type => g_api_type);
1163:
1164: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1165: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1166: p_api_name => l_api_name,
1167: p_pkg_name => g_pkg_name,
1168: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1169: x_msg_count => x_msg_count,
1164: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1165: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1166: p_api_name => l_api_name,
1167: p_pkg_name => g_pkg_name,
1168: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1169: x_msg_count => x_msg_count,
1170: x_msg_data => x_msg_data,
1171: p_api_type => g_api_type);
1172:
1170: x_msg_data => x_msg_data,
1171: p_api_type => g_api_type);
1172:
1173: when OTHERS then
1174: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1175: p_api_name => l_api_name,
1176: p_pkg_name => g_pkg_name,
1177: p_exc_name => 'OTHERS',
1178: x_msg_count => x_msg_count,
1191: x_sccv_tbl OUT NOCOPY sccv_tbl_type) IS
1192:
1193: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_SECTION_CONTENT';
1194: l_api_version CONSTANT NUMBER := 1.0;
1195: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1196: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1197: i NUMBER;
1198: BEGIN
1199: -- call START_ACTIVITY to create savepoint, check compatibility
1192:
1193: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_SECTION_CONTENT';
1194: l_api_version CONSTANT NUMBER := 1.0;
1195: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1196: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1197: i NUMBER;
1198: BEGIN
1199: -- call START_ACTIVITY to create savepoint, check compatibility
1200: -- and initialize message list
1197: i NUMBER;
1198: BEGIN
1199: -- call START_ACTIVITY to create savepoint, check compatibility
1200: -- and initialize message list
1201: l_return_status := OKC_API.START_ACTIVITY(
1202: p_api_name => l_api_name,
1203: p_pkg_name => g_pkg_name,
1204: p_init_msg_list => p_init_msg_list,
1205: l_api_version => l_api_version,
1207: p_api_type => g_api_type,
1208: x_return_status => x_return_status);
1209:
1210: -- check if activity started successfully
1211: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1212: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1213: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1214: raise OKC_API.G_EXCEPTION_ERROR;
1215: End If;
1208: x_return_status => x_return_status);
1209:
1210: -- check if activity started successfully
1211: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1212: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1213: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1214: raise OKC_API.G_EXCEPTION_ERROR;
1215: End If;
1216:
1209:
1210: -- check if activity started successfully
1211: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1212: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1213: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1214: raise OKC_API.G_EXCEPTION_ERROR;
1215: End If;
1216:
1217: If (p_sccv_tbl.COUNT > 0) Then
1210: -- check if activity started successfully
1211: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1212: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1213: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1214: raise OKC_API.G_EXCEPTION_ERROR;
1215: End If;
1216:
1217: If (p_sccv_tbl.COUNT > 0) Then
1218: i := p_sccv_tbl.FIRST;
1227: p_sccv_rec => p_sccv_tbl(i),
1228: x_sccv_rec => x_sccv_tbl(i));
1229:
1230: -- store the highest degree of error
1231: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1232: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1233: l_overall_status := x_return_status;
1234: End If;
1235: End If;
1228: x_sccv_rec => x_sccv_tbl(i));
1229:
1230: -- store the highest degree of error
1231: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1232: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1233: l_overall_status := x_return_status;
1234: End If;
1235: End If;
1236: EXIT WHEN (i = p_sccv_tbl.LAST);
1239: -- return overall status
1240: x_return_status := l_overall_status;
1241: End If;
1242:
1243: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1244: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1245: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1246: raise OKC_API.G_EXCEPTION_ERROR;
1247: End If;
1240: x_return_status := l_overall_status;
1241: End If;
1242:
1243: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1244: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1245: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1246: raise OKC_API.G_EXCEPTION_ERROR;
1247: End If;
1248:
1241: End If;
1242:
1243: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1244: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1245: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1246: raise OKC_API.G_EXCEPTION_ERROR;
1247: End If;
1248:
1249: -- end activity
1242:
1243: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1244: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1245: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1246: raise OKC_API.G_EXCEPTION_ERROR;
1247: End If;
1248:
1249: -- end activity
1250: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1246: raise OKC_API.G_EXCEPTION_ERROR;
1247: End If;
1248:
1249: -- end activity
1250: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1251: x_msg_data => x_msg_data);
1252: EXCEPTION
1253: when OKC_API.G_EXCEPTION_ERROR then
1254: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1249: -- end activity
1250: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1251: x_msg_data => x_msg_data);
1252: EXCEPTION
1253: when OKC_API.G_EXCEPTION_ERROR then
1254: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1255: p_api_name => l_api_name,
1256: p_pkg_name => g_pkg_name,
1257: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1250: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1251: x_msg_data => x_msg_data);
1252: EXCEPTION
1253: when OKC_API.G_EXCEPTION_ERROR then
1254: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1255: p_api_name => l_api_name,
1256: p_pkg_name => g_pkg_name,
1257: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1258: x_msg_count => x_msg_count,
1253: when OKC_API.G_EXCEPTION_ERROR then
1254: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1255: p_api_name => l_api_name,
1256: p_pkg_name => g_pkg_name,
1257: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1258: x_msg_count => x_msg_count,
1259: x_msg_data => x_msg_data,
1260: p_api_type => g_api_type);
1261:
1258: x_msg_count => x_msg_count,
1259: x_msg_data => x_msg_data,
1260: p_api_type => g_api_type);
1261:
1262: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1263: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1264: p_api_name => l_api_name,
1265: p_pkg_name => g_pkg_name,
1266: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1259: x_msg_data => x_msg_data,
1260: p_api_type => g_api_type);
1261:
1262: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1263: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1264: p_api_name => l_api_name,
1265: p_pkg_name => g_pkg_name,
1266: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1267: x_msg_count => x_msg_count,
1262: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1263: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1264: p_api_name => l_api_name,
1265: p_pkg_name => g_pkg_name,
1266: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1267: x_msg_count => x_msg_count,
1268: x_msg_data => x_msg_data,
1269: p_api_type => g_api_type);
1270:
1268: x_msg_data => x_msg_data,
1269: p_api_type => g_api_type);
1270:
1271: when OTHERS then
1272: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1273: p_api_name => l_api_name,
1274: p_pkg_name => g_pkg_name,
1275: p_exc_name => 'OTHERS',
1276: x_msg_count => x_msg_count,
1290:
1291: l_sccv_rec sccv_rec_type;
1292: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SECTION_CONTENT';
1293: l_api_version CONSTANT NUMBER := 1.0;
1294: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1295: BEGIN
1296: -- call START_ACTIVITY to create savepoint, check compatibility
1297: -- and initialize message list
1298: l_return_status := OKC_API.START_ACTIVITY(
1294: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1295: BEGIN
1296: -- call START_ACTIVITY to create savepoint, check compatibility
1297: -- and initialize message list
1298: l_return_status := OKC_API.START_ACTIVITY(
1299: p_api_name => l_api_name,
1300: p_pkg_name => g_pkg_name,
1301: p_init_msg_list => p_init_msg_list,
1302: l_api_version => l_api_version,
1304: p_api_type => g_api_type,
1305: x_return_status => x_return_status);
1306:
1307: -- check if activity started successfully
1308: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1309: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1310: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1311: raise OKC_API.G_EXCEPTION_ERROR;
1312: End If;
1305: x_return_status => x_return_status);
1306:
1307: -- check if activity started successfully
1308: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1309: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1310: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1311: raise OKC_API.G_EXCEPTION_ERROR;
1312: End If;
1313:
1306:
1307: -- check if activity started successfully
1308: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1309: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1310: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1311: raise OKC_API.G_EXCEPTION_ERROR;
1312: End If;
1313:
1314: -- call BEFORE user hook
1307: -- check if activity started successfully
1308: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1309: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1310: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1311: raise OKC_API.G_EXCEPTION_ERROR;
1312: End If;
1313:
1314: -- call BEFORE user hook
1315: l_sccv_rec := p_sccv_rec;
1320: p_procedure_name => l_api_name,
1321: p_before_after => 'B');
1322:
1323: -- check return status of user hook call
1324: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1325: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1326: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1327: raise OKC_API.G_EXCEPTION_ERROR;
1328: End If;
1321: p_before_after => 'B');
1322:
1323: -- check return status of user hook call
1324: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1325: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1326: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1327: raise OKC_API.G_EXCEPTION_ERROR;
1328: End If;
1329:
1322:
1323: -- check return status of user hook call
1324: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1325: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1326: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1327: raise OKC_API.G_EXCEPTION_ERROR;
1328: End If;
1329:
1330: -- get values back from user hook call
1323: -- check return status of user hook call
1324: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1325: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1326: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1327: raise OKC_API.G_EXCEPTION_ERROR;
1328: End If;
1329:
1330: -- get values back from user hook call
1331: l_sccv_rec := g_sccv_rec;
1342: p_sccv_rec => l_sccv_rec,
1343: x_sccv_rec => x_sccv_rec);
1344:
1345: -- check return status
1346: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1347: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1348: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1349: raise OKC_API.G_EXCEPTION_ERROR;
1350: End If;
1343: x_sccv_rec => x_sccv_rec);
1344:
1345: -- check return status
1346: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1347: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1348: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1349: raise OKC_API.G_EXCEPTION_ERROR;
1350: End If;
1351:
1344:
1345: -- check return status
1346: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1347: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1348: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1349: raise OKC_API.G_EXCEPTION_ERROR;
1350: End If;
1351:
1352: -- call AFTER user hook
1345: -- check return status
1346: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1347: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1348: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1349: raise OKC_API.G_EXCEPTION_ERROR;
1350: End If;
1351:
1352: -- call AFTER user hook
1353: g_sccv_rec := x_sccv_rec;
1357: p_procedure_name => l_api_name,
1358: p_before_after => 'A');
1359:
1360: -- check return status of the user hook call
1361: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1362: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1363: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1364: raise OKC_API.G_EXCEPTION_ERROR;
1365: End If;
1358: p_before_after => 'A');
1359:
1360: -- check return status of the user hook call
1361: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1362: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1363: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1364: raise OKC_API.G_EXCEPTION_ERROR;
1365: End If;
1366:
1359:
1360: -- check return status of the user hook call
1361: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1362: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1363: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1364: raise OKC_API.G_EXCEPTION_ERROR;
1365: End If;
1366:
1367: -- end activity
1360: -- check return status of the user hook call
1361: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1362: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1363: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1364: raise OKC_API.G_EXCEPTION_ERROR;
1365: End If;
1366:
1367: -- end activity
1368: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1364: raise OKC_API.G_EXCEPTION_ERROR;
1365: End If;
1366:
1367: -- end activity
1368: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1369: x_msg_data => x_msg_data);
1370: EXCEPTION
1371: when OKC_API.G_EXCEPTION_ERROR then
1372: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1367: -- end activity
1368: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1369: x_msg_data => x_msg_data);
1370: EXCEPTION
1371: when OKC_API.G_EXCEPTION_ERROR then
1372: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1373: p_api_name => l_api_name,
1374: p_pkg_name => g_pkg_name,
1375: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1368: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1369: x_msg_data => x_msg_data);
1370: EXCEPTION
1371: when OKC_API.G_EXCEPTION_ERROR then
1372: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1373: p_api_name => l_api_name,
1374: p_pkg_name => g_pkg_name,
1375: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1376: x_msg_count => x_msg_count,
1371: when OKC_API.G_EXCEPTION_ERROR then
1372: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1373: p_api_name => l_api_name,
1374: p_pkg_name => g_pkg_name,
1375: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1376: x_msg_count => x_msg_count,
1377: x_msg_data => x_msg_data,
1378: p_api_type => g_api_type);
1379:
1376: x_msg_count => x_msg_count,
1377: x_msg_data => x_msg_data,
1378: p_api_type => g_api_type);
1379:
1380: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1381: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1382: p_api_name => l_api_name,
1383: p_pkg_name => g_pkg_name,
1384: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1377: x_msg_data => x_msg_data,
1378: p_api_type => g_api_type);
1379:
1380: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1381: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1382: p_api_name => l_api_name,
1383: p_pkg_name => g_pkg_name,
1384: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1385: x_msg_count => x_msg_count,
1380: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1381: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1382: p_api_name => l_api_name,
1383: p_pkg_name => g_pkg_name,
1384: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1385: x_msg_count => x_msg_count,
1386: x_msg_data => x_msg_data,
1387: p_api_type => g_api_type);
1388:
1386: x_msg_data => x_msg_data,
1387: p_api_type => g_api_type);
1388:
1389: when OTHERS then
1390: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1391: p_api_name => l_api_name,
1392: p_pkg_name => g_pkg_name,
1393: p_exc_name => 'OTHERS',
1394: x_msg_count => x_msg_count,
1407: x_sccv_tbl OUT NOCOPY sccv_tbl_type) IS
1408:
1409: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SECTION_CONTENT';
1410: l_api_version CONSTANT NUMBER := 1.0;
1411: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1412: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1413: i NUMBER;
1414: BEGIN
1415: -- call START_ACTIVITY to create savepoint, check compatibility
1408:
1409: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SECTION_CONTENT';
1410: l_api_version CONSTANT NUMBER := 1.0;
1411: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1412: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1413: i NUMBER;
1414: BEGIN
1415: -- call START_ACTIVITY to create savepoint, check compatibility
1416: -- and initialize message list
1413: i NUMBER;
1414: BEGIN
1415: -- call START_ACTIVITY to create savepoint, check compatibility
1416: -- and initialize message list
1417: l_return_status := OKC_API.START_ACTIVITY(
1418: p_api_name => l_api_name,
1419: p_pkg_name => g_pkg_name,
1420: p_init_msg_list => p_init_msg_list,
1421: l_api_version => l_api_version,
1423: p_api_type => g_api_type,
1424: x_return_status => x_return_status);
1425:
1426: -- check if activity started successfully
1427: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1428: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1429: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1430: raise OKC_API.G_EXCEPTION_ERROR;
1431: End If;
1424: x_return_status => x_return_status);
1425:
1426: -- check if activity started successfully
1427: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1428: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1429: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1430: raise OKC_API.G_EXCEPTION_ERROR;
1431: End If;
1432:
1425:
1426: -- check if activity started successfully
1427: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1428: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1429: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1430: raise OKC_API.G_EXCEPTION_ERROR;
1431: End If;
1432:
1433: If (p_sccv_tbl.COUNT > 0) Then
1426: -- check if activity started successfully
1427: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1428: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1429: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1430: raise OKC_API.G_EXCEPTION_ERROR;
1431: End If;
1432:
1433: If (p_sccv_tbl.COUNT > 0) Then
1434: i := p_sccv_tbl.FIRST;
1443: p_sccv_rec => p_sccv_tbl(i),
1444: x_sccv_rec => x_sccv_tbl(i));
1445:
1446: -- store the highest degree of error
1447: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1448: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1449: l_overall_status := x_return_status;
1450: End If;
1451: End If;
1444: x_sccv_rec => x_sccv_tbl(i));
1445:
1446: -- store the highest degree of error
1447: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1448: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1449: l_overall_status := x_return_status;
1450: End If;
1451: End If;
1452: EXIT WHEN (i = p_sccv_tbl.LAST);
1455: -- return overall status
1456: x_return_status := l_overall_status;
1457: End If;
1458:
1459: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1460: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1461: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1462: raise OKC_API.G_EXCEPTION_ERROR;
1463: End If;
1456: x_return_status := l_overall_status;
1457: End If;
1458:
1459: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1460: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1461: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1462: raise OKC_API.G_EXCEPTION_ERROR;
1463: End If;
1464:
1457: End If;
1458:
1459: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1460: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1461: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1462: raise OKC_API.G_EXCEPTION_ERROR;
1463: End If;
1464:
1465: -- end activity
1458:
1459: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1460: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1461: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1462: raise OKC_API.G_EXCEPTION_ERROR;
1463: End If;
1464:
1465: -- end activity
1466: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1462: raise OKC_API.G_EXCEPTION_ERROR;
1463: End If;
1464:
1465: -- end activity
1466: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1467: x_msg_data => x_msg_data);
1468: EXCEPTION
1469: when OKC_API.G_EXCEPTION_ERROR then
1470: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1465: -- end activity
1466: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1467: x_msg_data => x_msg_data);
1468: EXCEPTION
1469: when OKC_API.G_EXCEPTION_ERROR then
1470: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1471: p_api_name => l_api_name,
1472: p_pkg_name => g_pkg_name,
1473: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1466: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1467: x_msg_data => x_msg_data);
1468: EXCEPTION
1469: when OKC_API.G_EXCEPTION_ERROR then
1470: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1471: p_api_name => l_api_name,
1472: p_pkg_name => g_pkg_name,
1473: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1474: x_msg_count => x_msg_count,
1469: when OKC_API.G_EXCEPTION_ERROR then
1470: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1471: p_api_name => l_api_name,
1472: p_pkg_name => g_pkg_name,
1473: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1474: x_msg_count => x_msg_count,
1475: x_msg_data => x_msg_data,
1476: p_api_type => g_api_type);
1477:
1474: x_msg_count => x_msg_count,
1475: x_msg_data => x_msg_data,
1476: p_api_type => g_api_type);
1477:
1478: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1479: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1480: p_api_name => l_api_name,
1481: p_pkg_name => g_pkg_name,
1482: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1475: x_msg_data => x_msg_data,
1476: p_api_type => g_api_type);
1477:
1478: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1479: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1480: p_api_name => l_api_name,
1481: p_pkg_name => g_pkg_name,
1482: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1483: x_msg_count => x_msg_count,
1478: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1479: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1480: p_api_name => l_api_name,
1481: p_pkg_name => g_pkg_name,
1482: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1483: x_msg_count => x_msg_count,
1484: x_msg_data => x_msg_data,
1485: p_api_type => g_api_type);
1486:
1484: x_msg_data => x_msg_data,
1485: p_api_type => g_api_type);
1486:
1487: when OTHERS then
1488: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1489: p_api_name => l_api_name,
1490: p_pkg_name => g_pkg_name,
1491: p_exc_name => 'OTHERS',
1492: x_msg_count => x_msg_count,
1505:
1506: l_sccv_rec sccv_rec_type;
1507: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SECTION_CONTENT';
1508: l_api_version CONSTANT NUMBER := 1.0;
1509: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1510: BEGIN
1511: -- call START_ACTIVITY to create savepoint, check compatibility
1512: -- and initialize message list
1513: l_return_status := OKC_API.START_ACTIVITY(
1509: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1510: BEGIN
1511: -- call START_ACTIVITY to create savepoint, check compatibility
1512: -- and initialize message list
1513: l_return_status := OKC_API.START_ACTIVITY(
1514: p_api_name => l_api_name,
1515: p_pkg_name => g_pkg_name,
1516: p_init_msg_list => p_init_msg_list,
1517: l_api_version => l_api_version,
1519: p_api_type => g_api_type,
1520: x_return_status => x_return_status);
1521:
1522: -- check if activity started successfully
1523: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1524: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1525: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1526: raise OKC_API.G_EXCEPTION_ERROR;
1527: End If;
1520: x_return_status => x_return_status);
1521:
1522: -- check if activity started successfully
1523: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1524: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1525: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1526: raise OKC_API.G_EXCEPTION_ERROR;
1527: End If;
1528:
1521:
1522: -- check if activity started successfully
1523: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1524: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1525: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1526: raise OKC_API.G_EXCEPTION_ERROR;
1527: End If;
1528:
1529: -- call BEFORE user hook
1522: -- check if activity started successfully
1523: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1524: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1525: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1526: raise OKC_API.G_EXCEPTION_ERROR;
1527: End If;
1528:
1529: -- call BEFORE user hook
1530: l_sccv_rec := p_sccv_rec;
1535: p_procedure_name => l_api_name,
1536: p_before_after => 'B');
1537:
1538: -- check return status of user hook call
1539: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1540: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1541: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1542: raise OKC_API.G_EXCEPTION_ERROR;
1543: End If;
1536: p_before_after => 'B');
1537:
1538: -- check return status of user hook call
1539: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1540: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1541: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1542: raise OKC_API.G_EXCEPTION_ERROR;
1543: End If;
1544:
1537:
1538: -- check return status of user hook call
1539: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1540: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1541: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1542: raise OKC_API.G_EXCEPTION_ERROR;
1543: End If;
1544:
1545: -- get values back from user hook call
1538: -- check return status of user hook call
1539: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1540: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1541: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1542: raise OKC_API.G_EXCEPTION_ERROR;
1543: End If;
1544:
1545: -- get values back from user hook call
1546: l_sccv_rec := g_sccv_rec;
1556: x_msg_data => x_msg_data,
1557: p_sccv_rec => l_sccv_rec);
1558:
1559: -- check return status
1560: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1561: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1562: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1563: raise OKC_API.G_EXCEPTION_ERROR;
1564: End If;
1557: p_sccv_rec => l_sccv_rec);
1558:
1559: -- check return status
1560: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1561: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1562: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1563: raise OKC_API.G_EXCEPTION_ERROR;
1564: End If;
1565:
1558:
1559: -- check return status
1560: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1561: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1562: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1563: raise OKC_API.G_EXCEPTION_ERROR;
1564: End If;
1565:
1566: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
1559: -- check return status
1560: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1561: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1562: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1563: raise OKC_API.G_EXCEPTION_ERROR;
1564: End If;
1565:
1566: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
1567: p_package_name => g_pkg_name,
1568: p_procedure_name => l_api_name,
1569: p_before_after => 'A');
1570:
1571: -- check return status of the user hook call
1572: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1573: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1574: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1575: raise OKC_API.G_EXCEPTION_ERROR;
1576: End If;
1569: p_before_after => 'A');
1570:
1571: -- check return status of the user hook call
1572: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1573: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1574: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1575: raise OKC_API.G_EXCEPTION_ERROR;
1576: End If;
1577:
1570:
1571: -- check return status of the user hook call
1572: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1573: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1574: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1575: raise OKC_API.G_EXCEPTION_ERROR;
1576: End If;
1577:
1578: -- end activity
1571: -- check return status of the user hook call
1572: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1573: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1574: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1575: raise OKC_API.G_EXCEPTION_ERROR;
1576: End If;
1577:
1578: -- end activity
1579: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1575: raise OKC_API.G_EXCEPTION_ERROR;
1576: End If;
1577:
1578: -- end activity
1579: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1580: x_msg_data => x_msg_data);
1581: EXCEPTION
1582: when OKC_API.G_EXCEPTION_ERROR then
1583: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1578: -- end activity
1579: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1580: x_msg_data => x_msg_data);
1581: EXCEPTION
1582: when OKC_API.G_EXCEPTION_ERROR then
1583: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1584: p_api_name => l_api_name,
1585: p_pkg_name => g_pkg_name,
1586: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1579: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1580: x_msg_data => x_msg_data);
1581: EXCEPTION
1582: when OKC_API.G_EXCEPTION_ERROR then
1583: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1584: p_api_name => l_api_name,
1585: p_pkg_name => g_pkg_name,
1586: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1587: x_msg_count => x_msg_count,
1582: when OKC_API.G_EXCEPTION_ERROR then
1583: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1584: p_api_name => l_api_name,
1585: p_pkg_name => g_pkg_name,
1586: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1587: x_msg_count => x_msg_count,
1588: x_msg_data => x_msg_data,
1589: p_api_type => g_api_type);
1590:
1587: x_msg_count => x_msg_count,
1588: x_msg_data => x_msg_data,
1589: p_api_type => g_api_type);
1590:
1591: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1592: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1593: p_api_name => l_api_name,
1594: p_pkg_name => g_pkg_name,
1595: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1588: x_msg_data => x_msg_data,
1589: p_api_type => g_api_type);
1590:
1591: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1592: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1593: p_api_name => l_api_name,
1594: p_pkg_name => g_pkg_name,
1595: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1596: x_msg_count => x_msg_count,
1591: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1592: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1593: p_api_name => l_api_name,
1594: p_pkg_name => g_pkg_name,
1595: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1596: x_msg_count => x_msg_count,
1597: x_msg_data => x_msg_data,
1598: p_api_type => g_api_type);
1599:
1597: x_msg_data => x_msg_data,
1598: p_api_type => g_api_type);
1599:
1600: when OTHERS then
1601: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1602: p_api_name => l_api_name,
1603: p_pkg_name => g_pkg_name,
1604: p_exc_name => 'OTHERS',
1605: x_msg_count => x_msg_count,
1617: p_sccv_tbl IN sccv_tbl_type) IS
1618:
1619: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SECTION_CONTENT';
1620: l_api_version CONSTANT NUMBER := 1.0;
1621: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1622: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1623: i NUMBER;
1624: BEGIN
1625: -- call START_ACTIVITY to create savepoint, check compatibility
1618:
1619: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SECTION_CONTENT';
1620: l_api_version CONSTANT NUMBER := 1.0;
1621: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1622: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1623: i NUMBER;
1624: BEGIN
1625: -- call START_ACTIVITY to create savepoint, check compatibility
1626: -- and initialize message list
1623: i NUMBER;
1624: BEGIN
1625: -- call START_ACTIVITY to create savepoint, check compatibility
1626: -- and initialize message list
1627: l_return_status := OKC_API.START_ACTIVITY(
1628: p_api_name => l_api_name,
1629: p_pkg_name => g_pkg_name,
1630: p_init_msg_list => p_init_msg_list,
1631: l_api_version => l_api_version,
1633: p_api_type => g_api_type,
1634: x_return_status => x_return_status);
1635:
1636: -- check if activity started successfully
1637: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1638: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1640: raise OKC_API.G_EXCEPTION_ERROR;
1641: End If;
1634: x_return_status => x_return_status);
1635:
1636: -- check if activity started successfully
1637: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1638: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1640: raise OKC_API.G_EXCEPTION_ERROR;
1641: End If;
1642:
1635:
1636: -- check if activity started successfully
1637: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1638: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1640: raise OKC_API.G_EXCEPTION_ERROR;
1641: End If;
1642:
1643: If (p_sccv_tbl.COUNT > 0) Then
1636: -- check if activity started successfully
1637: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1638: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1640: raise OKC_API.G_EXCEPTION_ERROR;
1641: End If;
1642:
1643: If (p_sccv_tbl.COUNT > 0) Then
1644: i := p_sccv_tbl.FIRST;
1652: x_msg_data => x_msg_data,
1653: p_sccv_rec => p_sccv_tbl(i));
1654:
1655: -- store the highest degree of error
1656: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1657: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1658: l_overall_status := x_return_status;
1659: End If;
1660: End If;
1653: p_sccv_rec => p_sccv_tbl(i));
1654:
1655: -- store the highest degree of error
1656: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1657: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1658: l_overall_status := x_return_status;
1659: End If;
1660: End If;
1661: EXIT WHEN (i = p_sccv_tbl.LAST);
1664: -- return overall status
1665: x_return_status := l_overall_status;
1666: End If;
1667:
1668: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1669: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1670: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1671: raise OKC_API.G_EXCEPTION_ERROR;
1672: End If;
1665: x_return_status := l_overall_status;
1666: End If;
1667:
1668: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1669: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1670: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1671: raise OKC_API.G_EXCEPTION_ERROR;
1672: End If;
1673:
1666: End If;
1667:
1668: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1669: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1670: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1671: raise OKC_API.G_EXCEPTION_ERROR;
1672: End If;
1673:
1674: -- end activity
1667:
1668: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1669: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1670: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1671: raise OKC_API.G_EXCEPTION_ERROR;
1672: End If;
1673:
1674: -- end activity
1675: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1671: raise OKC_API.G_EXCEPTION_ERROR;
1672: End If;
1673:
1674: -- end activity
1675: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1676: x_msg_data => x_msg_data);
1677: EXCEPTION
1678: when OKC_API.G_EXCEPTION_ERROR then
1679: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1674: -- end activity
1675: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1676: x_msg_data => x_msg_data);
1677: EXCEPTION
1678: when OKC_API.G_EXCEPTION_ERROR then
1679: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1680: p_api_name => l_api_name,
1681: p_pkg_name => g_pkg_name,
1682: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1675: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1676: x_msg_data => x_msg_data);
1677: EXCEPTION
1678: when OKC_API.G_EXCEPTION_ERROR then
1679: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1680: p_api_name => l_api_name,
1681: p_pkg_name => g_pkg_name,
1682: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1683: x_msg_count => x_msg_count,
1678: when OKC_API.G_EXCEPTION_ERROR then
1679: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1680: p_api_name => l_api_name,
1681: p_pkg_name => g_pkg_name,
1682: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1683: x_msg_count => x_msg_count,
1684: x_msg_data => x_msg_data,
1685: p_api_type => g_api_type);
1686:
1683: x_msg_count => x_msg_count,
1684: x_msg_data => x_msg_data,
1685: p_api_type => g_api_type);
1686:
1687: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1688: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1689: p_api_name => l_api_name,
1690: p_pkg_name => g_pkg_name,
1691: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1684: x_msg_data => x_msg_data,
1685: p_api_type => g_api_type);
1686:
1687: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1688: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1689: p_api_name => l_api_name,
1690: p_pkg_name => g_pkg_name,
1691: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1692: x_msg_count => x_msg_count,
1687: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1688: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1689: p_api_name => l_api_name,
1690: p_pkg_name => g_pkg_name,
1691: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1692: x_msg_count => x_msg_count,
1693: x_msg_data => x_msg_data,
1694: p_api_type => g_api_type);
1695:
1693: x_msg_data => x_msg_data,
1694: p_api_type => g_api_type);
1695:
1696: when OTHERS then
1697: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1698: p_api_name => l_api_name,
1699: p_pkg_name => g_pkg_name,
1700: p_exc_name => 'OTHERS',
1701: x_msg_count => x_msg_count,
1714:
1715: l_sccv_rec sccv_rec_type;
1716: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_SECTION_CONTENT';
1717: l_api_version CONSTANT NUMBER := 1.0;
1718: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1719: BEGIN
1720: -- call START_ACTIVITY to create savepoint, check compatibility
1721: -- and initialize message list
1722: l_return_status := OKC_API.START_ACTIVITY(
1718: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1719: BEGIN
1720: -- call START_ACTIVITY to create savepoint, check compatibility
1721: -- and initialize message list
1722: l_return_status := OKC_API.START_ACTIVITY(
1723: p_api_name => l_api_name,
1724: p_pkg_name => g_pkg_name,
1725: p_init_msg_list => p_init_msg_list,
1726: l_api_version => l_api_version,
1728: p_api_type => g_api_type,
1729: x_return_status => x_return_status);
1730:
1731: -- check if activity started successfully
1732: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1733: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1734: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1735: raise OKC_API.G_EXCEPTION_ERROR;
1736: End If;
1729: x_return_status => x_return_status);
1730:
1731: -- check if activity started successfully
1732: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1733: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1734: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1735: raise OKC_API.G_EXCEPTION_ERROR;
1736: End If;
1737:
1730:
1731: -- check if activity started successfully
1732: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1733: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1734: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1735: raise OKC_API.G_EXCEPTION_ERROR;
1736: End If;
1737:
1738: -- call BEFORE user hook
1731: -- check if activity started successfully
1732: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1733: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1734: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1735: raise OKC_API.G_EXCEPTION_ERROR;
1736: End If;
1737:
1738: -- call BEFORE user hook
1739: l_sccv_rec := p_sccv_rec;
1744: p_procedure_name => l_api_name,
1745: p_before_after => 'B');
1746:
1747: -- check return status of user hook call
1748: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1749: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1750: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1751: raise OKC_API.G_EXCEPTION_ERROR;
1752: End If;
1745: p_before_after => 'B');
1746:
1747: -- check return status of user hook call
1748: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1749: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1750: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1751: raise OKC_API.G_EXCEPTION_ERROR;
1752: End If;
1753:
1746:
1747: -- check return status of user hook call
1748: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1749: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1750: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1751: raise OKC_API.G_EXCEPTION_ERROR;
1752: End If;
1753:
1754: -- get values back from user hook call
1747: -- check return status of user hook call
1748: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1749: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1750: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1751: raise OKC_API.G_EXCEPTION_ERROR;
1752: End If;
1753:
1754: -- get values back from user hook call
1755: l_sccv_rec := g_sccv_rec;
1765: x_msg_data => x_msg_data,
1766: p_sccv_rec => l_sccv_rec);
1767:
1768: -- check return status
1769: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1770: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1771: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1772: raise OKC_API.G_EXCEPTION_ERROR;
1773: End If;
1766: p_sccv_rec => l_sccv_rec);
1767:
1768: -- check return status
1769: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1770: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1771: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1772: raise OKC_API.G_EXCEPTION_ERROR;
1773: End If;
1774:
1767:
1768: -- check return status
1769: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1770: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1771: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1772: raise OKC_API.G_EXCEPTION_ERROR;
1773: End If;
1774:
1775: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
1768: -- check return status
1769: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1770: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1771: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1772: raise OKC_API.G_EXCEPTION_ERROR;
1773: End If;
1774:
1775: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
1776: p_package_name => g_pkg_name,
1777: p_procedure_name => l_api_name,
1778: p_before_after => 'A');
1779:
1780: -- check return status of the user hook call
1781: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1782: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1783: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1784: raise OKC_API.G_EXCEPTION_ERROR;
1785: End If;
1778: p_before_after => 'A');
1779:
1780: -- check return status of the user hook call
1781: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1782: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1783: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1784: raise OKC_API.G_EXCEPTION_ERROR;
1785: End If;
1786:
1779:
1780: -- check return status of the user hook call
1781: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1782: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1783: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1784: raise OKC_API.G_EXCEPTION_ERROR;
1785: End If;
1786:
1787: -- end activity
1780: -- check return status of the user hook call
1781: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1782: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1783: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1784: raise OKC_API.G_EXCEPTION_ERROR;
1785: End If;
1786:
1787: -- end activity
1788: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1784: raise OKC_API.G_EXCEPTION_ERROR;
1785: End If;
1786:
1787: -- end activity
1788: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1789: x_msg_data => x_msg_data);
1790: EXCEPTION
1791: when OKC_API.G_EXCEPTION_ERROR then
1792: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1787: -- end activity
1788: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1789: x_msg_data => x_msg_data);
1790: EXCEPTION
1791: when OKC_API.G_EXCEPTION_ERROR then
1792: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1793: p_api_name => l_api_name,
1794: p_pkg_name => g_pkg_name,
1795: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1788: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1789: x_msg_data => x_msg_data);
1790: EXCEPTION
1791: when OKC_API.G_EXCEPTION_ERROR then
1792: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1793: p_api_name => l_api_name,
1794: p_pkg_name => g_pkg_name,
1795: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1796: x_msg_count => x_msg_count,
1791: when OKC_API.G_EXCEPTION_ERROR then
1792: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1793: p_api_name => l_api_name,
1794: p_pkg_name => g_pkg_name,
1795: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1796: x_msg_count => x_msg_count,
1797: x_msg_data => x_msg_data,
1798: p_api_type => g_api_type);
1799:
1796: x_msg_count => x_msg_count,
1797: x_msg_data => x_msg_data,
1798: p_api_type => g_api_type);
1799:
1800: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1801: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1802: p_api_name => l_api_name,
1803: p_pkg_name => g_pkg_name,
1804: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1797: x_msg_data => x_msg_data,
1798: p_api_type => g_api_type);
1799:
1800: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1801: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1802: p_api_name => l_api_name,
1803: p_pkg_name => g_pkg_name,
1804: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1805: x_msg_count => x_msg_count,
1800: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1801: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1802: p_api_name => l_api_name,
1803: p_pkg_name => g_pkg_name,
1804: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1805: x_msg_count => x_msg_count,
1806: x_msg_data => x_msg_data,
1807: p_api_type => g_api_type);
1808:
1806: x_msg_data => x_msg_data,
1807: p_api_type => g_api_type);
1808:
1809: when OTHERS then
1810: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1811: p_api_name => l_api_name,
1812: p_pkg_name => g_pkg_name,
1813: p_exc_name => 'OTHERS',
1814: x_msg_count => x_msg_count,
1826: p_sccv_tbl IN sccv_tbl_type) IS
1827:
1828: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_SECTION_CONTENT';
1829: l_api_version CONSTANT NUMBER := 1.0;
1830: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1831: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1832: i NUMBER;
1833: BEGIN
1834: -- call START_ACTIVITY to create savepoint, check compatibility
1827:
1828: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_SECTION_CONTENT';
1829: l_api_version CONSTANT NUMBER := 1.0;
1830: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1831: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1832: i NUMBER;
1833: BEGIN
1834: -- call START_ACTIVITY to create savepoint, check compatibility
1835: -- and initialize message list
1832: i NUMBER;
1833: BEGIN
1834: -- call START_ACTIVITY to create savepoint, check compatibility
1835: -- and initialize message list
1836: l_return_status := OKC_API.START_ACTIVITY(
1837: p_api_name => l_api_name,
1838: p_pkg_name => g_pkg_name,
1839: p_init_msg_list => p_init_msg_list,
1840: l_api_version => l_api_version,
1842: p_api_type => g_api_type,
1843: x_return_status => x_return_status);
1844:
1845: -- check if activity started successfully
1846: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1847: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1848: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1849: raise OKC_API.G_EXCEPTION_ERROR;
1850: End If;
1843: x_return_status => x_return_status);
1844:
1845: -- check if activity started successfully
1846: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1847: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1848: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1849: raise OKC_API.G_EXCEPTION_ERROR;
1850: End If;
1851:
1844:
1845: -- check if activity started successfully
1846: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1847: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1848: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1849: raise OKC_API.G_EXCEPTION_ERROR;
1850: End If;
1851:
1852: If (p_sccv_tbl.COUNT > 0) Then
1845: -- check if activity started successfully
1846: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1847: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1848: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1849: raise OKC_API.G_EXCEPTION_ERROR;
1850: End If;
1851:
1852: If (p_sccv_tbl.COUNT > 0) Then
1853: i := p_sccv_tbl.FIRST;
1861: x_msg_data => x_msg_data,
1862: p_sccv_rec => p_sccv_tbl(i));
1863:
1864: -- store the highest degree of error
1865: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1866: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1867: l_overall_status := x_return_status;
1868: End If;
1869: End If;
1862: p_sccv_rec => p_sccv_tbl(i));
1863:
1864: -- store the highest degree of error
1865: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1866: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
1867: l_overall_status := x_return_status;
1868: End If;
1869: End If;
1870: EXIT WHEN (i = p_sccv_tbl.LAST);
1873: -- return overall status
1874: x_return_status := l_overall_status;
1875: End If;
1876:
1877: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1878: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1879: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1880: raise OKC_API.G_EXCEPTION_ERROR;
1881: End If;
1874: x_return_status := l_overall_status;
1875: End If;
1876:
1877: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1878: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1879: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1880: raise OKC_API.G_EXCEPTION_ERROR;
1881: End If;
1882:
1875: End If;
1876:
1877: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1878: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1879: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1880: raise OKC_API.G_EXCEPTION_ERROR;
1881: End If;
1882:
1883: -- end activity
1876:
1877: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1878: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1879: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1880: raise OKC_API.G_EXCEPTION_ERROR;
1881: End If;
1882:
1883: -- end activity
1884: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1880: raise OKC_API.G_EXCEPTION_ERROR;
1881: End If;
1882:
1883: -- end activity
1884: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1885: x_msg_data => x_msg_data);
1886: EXCEPTION
1887: when OKC_API.G_EXCEPTION_ERROR then
1888: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1883: -- end activity
1884: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1885: x_msg_data => x_msg_data);
1886: EXCEPTION
1887: when OKC_API.G_EXCEPTION_ERROR then
1888: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1889: p_api_name => l_api_name,
1890: p_pkg_name => g_pkg_name,
1891: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1884: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1885: x_msg_data => x_msg_data);
1886: EXCEPTION
1887: when OKC_API.G_EXCEPTION_ERROR then
1888: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1889: p_api_name => l_api_name,
1890: p_pkg_name => g_pkg_name,
1891: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1892: x_msg_count => x_msg_count,
1887: when OKC_API.G_EXCEPTION_ERROR then
1888: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1889: p_api_name => l_api_name,
1890: p_pkg_name => g_pkg_name,
1891: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1892: x_msg_count => x_msg_count,
1893: x_msg_data => x_msg_data,
1894: p_api_type => g_api_type);
1895:
1892: x_msg_count => x_msg_count,
1893: x_msg_data => x_msg_data,
1894: p_api_type => g_api_type);
1895:
1896: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1897: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1898: p_api_name => l_api_name,
1899: p_pkg_name => g_pkg_name,
1900: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1893: x_msg_data => x_msg_data,
1894: p_api_type => g_api_type);
1895:
1896: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1897: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1898: p_api_name => l_api_name,
1899: p_pkg_name => g_pkg_name,
1900: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1901: x_msg_count => x_msg_count,
1896: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1897: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1898: p_api_name => l_api_name,
1899: p_pkg_name => g_pkg_name,
1900: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1901: x_msg_count => x_msg_count,
1902: x_msg_data => x_msg_data,
1903: p_api_type => g_api_type);
1904:
1902: x_msg_data => x_msg_data,
1903: p_api_type => g_api_type);
1904:
1905: when OTHERS then
1906: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1907: p_api_name => l_api_name,
1908: p_pkg_name => g_pkg_name,
1909: p_exc_name => 'OTHERS',
1910: x_msg_count => x_msg_count,
1923:
1924: l_sccv_rec sccv_rec_type;
1925: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_SECTION_CONTENT';
1926: l_api_version CONSTANT NUMBER := 1.0;
1927: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1928: BEGIN
1929: -- call START_ACTIVITY to create savepoint, check compatibility
1930: -- and initialize message list
1931: l_return_status := OKC_API.START_ACTIVITY(
1927: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1928: BEGIN
1929: -- call START_ACTIVITY to create savepoint, check compatibility
1930: -- and initialize message list
1931: l_return_status := OKC_API.START_ACTIVITY(
1932: p_api_name => l_api_name,
1933: p_pkg_name => g_pkg_name,
1934: p_init_msg_list => p_init_msg_list,
1935: l_api_version => l_api_version,
1937: p_api_type => g_api_type,
1938: x_return_status => x_return_status);
1939:
1940: -- check if activity started successfully
1941: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1942: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1943: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1944: raise OKC_API.G_EXCEPTION_ERROR;
1945: End If;
1938: x_return_status => x_return_status);
1939:
1940: -- check if activity started successfully
1941: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1942: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1943: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1944: raise OKC_API.G_EXCEPTION_ERROR;
1945: End If;
1946:
1939:
1940: -- check if activity started successfully
1941: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1942: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1943: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1944: raise OKC_API.G_EXCEPTION_ERROR;
1945: End If;
1946:
1947: -- call BEFORE user hook
1940: -- check if activity started successfully
1941: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1942: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1943: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1944: raise OKC_API.G_EXCEPTION_ERROR;
1945: End If;
1946:
1947: -- call BEFORE user hook
1948: l_sccv_rec := p_sccv_rec;
1953: p_procedure_name => l_api_name,
1954: p_before_after => 'B');
1955:
1956: -- check return status of user hook call
1957: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1958: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1959: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1960: raise OKC_API.G_EXCEPTION_ERROR;
1961: End If;
1954: p_before_after => 'B');
1955:
1956: -- check return status of user hook call
1957: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1958: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1959: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1960: raise OKC_API.G_EXCEPTION_ERROR;
1961: End If;
1962:
1955:
1956: -- check return status of user hook call
1957: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1958: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1959: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1960: raise OKC_API.G_EXCEPTION_ERROR;
1961: End If;
1962:
1963: -- get values back from user hook call
1956: -- check return status of user hook call
1957: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1958: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1959: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1960: raise OKC_API.G_EXCEPTION_ERROR;
1961: End If;
1962:
1963: -- get values back from user hook call
1964: l_sccv_rec := g_sccv_rec;
1974: x_msg_data => x_msg_data,
1975: p_sccv_rec => l_sccv_rec);
1976:
1977: -- check return status
1978: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1979: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1980: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1981: raise OKC_API.G_EXCEPTION_ERROR;
1982: End If;
1975: p_sccv_rec => l_sccv_rec);
1976:
1977: -- check return status
1978: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1979: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1980: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1981: raise OKC_API.G_EXCEPTION_ERROR;
1982: End If;
1983:
1976:
1977: -- check return status
1978: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1979: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1980: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1981: raise OKC_API.G_EXCEPTION_ERROR;
1982: End If;
1983:
1984: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
1977: -- check return status
1978: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1979: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1980: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1981: raise OKC_API.G_EXCEPTION_ERROR;
1982: End If;
1983:
1984: OKC_UTIL.call_user_hook(x_return_status => x_return_status,
1985: p_package_name => g_pkg_name,
1986: p_procedure_name => l_api_name,
1987: p_before_after => 'A');
1988:
1989: -- check return status of the user hook call
1990: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1991: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1992: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1993: raise OKC_API.G_EXCEPTION_ERROR;
1994: End If;
1987: p_before_after => 'A');
1988:
1989: -- check return status of the user hook call
1990: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1991: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1992: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1993: raise OKC_API.G_EXCEPTION_ERROR;
1994: End If;
1995:
1988:
1989: -- check return status of the user hook call
1990: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1991: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1992: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1993: raise OKC_API.G_EXCEPTION_ERROR;
1994: End If;
1995:
1996: -- end activity
1989: -- check return status of the user hook call
1990: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1991: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1992: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1993: raise OKC_API.G_EXCEPTION_ERROR;
1994: End If;
1995:
1996: -- end activity
1997: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1993: raise OKC_API.G_EXCEPTION_ERROR;
1994: End If;
1995:
1996: -- end activity
1997: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1998: x_msg_data => x_msg_data);
1999: EXCEPTION
2000: when OKC_API.G_EXCEPTION_ERROR then
2001: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1996: -- end activity
1997: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1998: x_msg_data => x_msg_data);
1999: EXCEPTION
2000: when OKC_API.G_EXCEPTION_ERROR then
2001: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2002: p_api_name => l_api_name,
2003: p_pkg_name => g_pkg_name,
2004: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1997: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1998: x_msg_data => x_msg_data);
1999: EXCEPTION
2000: when OKC_API.G_EXCEPTION_ERROR then
2001: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2002: p_api_name => l_api_name,
2003: p_pkg_name => g_pkg_name,
2004: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2005: x_msg_count => x_msg_count,
2000: when OKC_API.G_EXCEPTION_ERROR then
2001: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2002: p_api_name => l_api_name,
2003: p_pkg_name => g_pkg_name,
2004: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2005: x_msg_count => x_msg_count,
2006: x_msg_data => x_msg_data,
2007: p_api_type => g_api_type);
2008:
2005: x_msg_count => x_msg_count,
2006: x_msg_data => x_msg_data,
2007: p_api_type => g_api_type);
2008:
2009: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2010: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2011: p_api_name => l_api_name,
2012: p_pkg_name => g_pkg_name,
2013: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2006: x_msg_data => x_msg_data,
2007: p_api_type => g_api_type);
2008:
2009: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2010: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2011: p_api_name => l_api_name,
2012: p_pkg_name => g_pkg_name,
2013: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2014: x_msg_count => x_msg_count,
2009: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2010: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2011: p_api_name => l_api_name,
2012: p_pkg_name => g_pkg_name,
2013: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2014: x_msg_count => x_msg_count,
2015: x_msg_data => x_msg_data,
2016: p_api_type => g_api_type);
2017:
2015: x_msg_data => x_msg_data,
2016: p_api_type => g_api_type);
2017:
2018: when OTHERS then
2019: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2020: p_api_name => l_api_name,
2021: p_pkg_name => g_pkg_name,
2022: p_exc_name => 'OTHERS',
2023: x_msg_count => x_msg_count,
2035: p_sccv_tbl IN sccv_tbl_type) IS
2036:
2037: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_SECTION_CONTENT';
2038: l_api_version CONSTANT NUMBER := 1.0;
2039: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2040: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2041: i NUMBER;
2042: BEGIN
2043: -- call START_ACTIVITY to create savepoint, check compatibility
2036:
2037: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_SECTION_CONTENT';
2038: l_api_version CONSTANT NUMBER := 1.0;
2039: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2040: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2041: i NUMBER;
2042: BEGIN
2043: -- call START_ACTIVITY to create savepoint, check compatibility
2044: -- and initialize message list
2041: i NUMBER;
2042: BEGIN
2043: -- call START_ACTIVITY to create savepoint, check compatibility
2044: -- and initialize message list
2045: l_return_status := OKC_API.START_ACTIVITY(
2046: p_api_name => l_api_name,
2047: p_pkg_name => g_pkg_name,
2048: p_init_msg_list => p_init_msg_list,
2049: l_api_version => l_api_version,
2051: p_api_type => g_api_type,
2052: x_return_status => x_return_status);
2053:
2054: -- check if activity started successfully
2055: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2056: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2057: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
2058: raise OKC_API.G_EXCEPTION_ERROR;
2059: End If;
2052: x_return_status => x_return_status);
2053:
2054: -- check if activity started successfully
2055: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2056: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2057: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
2058: raise OKC_API.G_EXCEPTION_ERROR;
2059: End If;
2060:
2053:
2054: -- check if activity started successfully
2055: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2056: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2057: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
2058: raise OKC_API.G_EXCEPTION_ERROR;
2059: End If;
2060:
2061: If (p_sccv_tbl.COUNT > 0) Then
2054: -- check if activity started successfully
2055: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
2056: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2057: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
2058: raise OKC_API.G_EXCEPTION_ERROR;
2059: End If;
2060:
2061: If (p_sccv_tbl.COUNT > 0) Then
2062: i := p_sccv_tbl.FIRST;
2070: x_msg_data => x_msg_data,
2071: p_sccv_rec => p_sccv_tbl(i));
2072:
2073: -- store the highest degree of error
2074: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2075: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
2076: l_overall_status := x_return_status;
2077: End If;
2078: End If;
2071: p_sccv_rec => p_sccv_tbl(i));
2072:
2073: -- store the highest degree of error
2074: If x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2075: If l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR Then
2076: l_overall_status := x_return_status;
2077: End If;
2078: End If;
2079: EXIT WHEN (i = p_sccv_tbl.LAST);
2082: -- return overall status
2083: x_return_status := l_overall_status;
2084: End If;
2085:
2086: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2087: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2088: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2089: raise OKC_API.G_EXCEPTION_ERROR;
2090: End If;
2083: x_return_status := l_overall_status;
2084: End If;
2085:
2086: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2087: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2088: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2089: raise OKC_API.G_EXCEPTION_ERROR;
2090: End If;
2091:
2084: End If;
2085:
2086: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2087: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2088: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2089: raise OKC_API.G_EXCEPTION_ERROR;
2090: End If;
2091:
2092: -- end activity
2085:
2086: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
2087: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2088: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
2089: raise OKC_API.G_EXCEPTION_ERROR;
2090: End If;
2091:
2092: -- end activity
2093: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
2089: raise OKC_API.G_EXCEPTION_ERROR;
2090: End If;
2091:
2092: -- end activity
2093: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
2094: x_msg_data => x_msg_data);
2095: EXCEPTION
2096: when OKC_API.G_EXCEPTION_ERROR then
2097: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2092: -- end activity
2093: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
2094: x_msg_data => x_msg_data);
2095: EXCEPTION
2096: when OKC_API.G_EXCEPTION_ERROR then
2097: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2098: p_api_name => l_api_name,
2099: p_pkg_name => g_pkg_name,
2100: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2093: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
2094: x_msg_data => x_msg_data);
2095: EXCEPTION
2096: when OKC_API.G_EXCEPTION_ERROR then
2097: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2098: p_api_name => l_api_name,
2099: p_pkg_name => g_pkg_name,
2100: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2101: x_msg_count => x_msg_count,
2096: when OKC_API.G_EXCEPTION_ERROR then
2097: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2098: p_api_name => l_api_name,
2099: p_pkg_name => g_pkg_name,
2100: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
2101: x_msg_count => x_msg_count,
2102: x_msg_data => x_msg_data,
2103: p_api_type => g_api_type);
2104:
2101: x_msg_count => x_msg_count,
2102: x_msg_data => x_msg_data,
2103: p_api_type => g_api_type);
2104:
2105: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2106: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2107: p_api_name => l_api_name,
2108: p_pkg_name => g_pkg_name,
2109: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2102: x_msg_data => x_msg_data,
2103: p_api_type => g_api_type);
2104:
2105: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2106: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2107: p_api_name => l_api_name,
2108: p_pkg_name => g_pkg_name,
2109: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2110: x_msg_count => x_msg_count,
2105: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
2106: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2107: p_api_name => l_api_name,
2108: p_pkg_name => g_pkg_name,
2109: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
2110: x_msg_count => x_msg_count,
2111: x_msg_data => x_msg_data,
2112: p_api_type => g_api_type);
2113:
2111: x_msg_data => x_msg_data,
2112: p_api_type => g_api_type);
2113:
2114: when OTHERS then
2115: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
2116: p_api_name => l_api_name,
2117: p_pkg_name => g_pkg_name,
2118: p_exc_name => 'OTHERS',
2119: x_msg_count => x_msg_count,
2124:
2125: PROCEDURE add_language IS
2126: l_api_name CONSTANT VARCHAR2(30) := 'ADD_LANGUAGE';
2127: l_api_version CONSTANT NUMBER := 1.0;
2128: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2129: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2130: BEGIN
2131:
2132: -- call procedure in complex API
2125: PROCEDURE add_language IS
2126: l_api_name CONSTANT VARCHAR2(30) := 'ADD_LANGUAGE';
2127: l_api_version CONSTANT NUMBER := 1.0;
2128: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2129: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2130: BEGIN
2131:
2132: -- call procedure in complex API
2133: OKC_SECTIONS_PVT.add_language;