[Home] [Help]
PACKAGE BODY: APPS.OKC_SECTIONS_PVT
Source
1 PACKAGE BODY OKC_SECTIONS_PVT AS
2 /* $Header: OKCCSCNB.pls 120.0 2005/05/25 23:02:01 appldev noship $ */
3
4 l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
5
6 ---------------------------------------------------------------------------
7 -- GLOBAL VARIABLES
8 ---------------------------------------------------------------------------
9 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
10 G_NO_PARENT_RECORD CONSTANT VARCHAR2(200) := 'OKC_NO_PARENT_RECORD';
11 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXPECTED_ERROR';
12 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
13 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
14 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
15 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
16 G_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
17 G_EXCEPTION_HALT_VALIDATION exception;
18 NO_CONTRACT_FOUND exception;
19 G_NO_UPDATE_ALLOWED_EXCEPTION exception;
20 G_NO_UPDATE_ALLOWED CONSTANT VARCHAR2(200) := 'OKC_NO_UPDATE_ALLOWED';
21 G_EXCEPTION_HALT_PROCESS exception;
22 ---------------------------------------------------------------------------
23
24 FUNCTION Update_Minor_Version(p_chr_id IN NUMBER) RETURN VARCHAR2 Is
25 l_api_version NUMBER := 1;
26 l_init_msg_list VARCHAR2(1) := 'F';
27 x_return_status VARCHAR2(1);
28 x_msg_count NUMBER;
29 x_msg_data VARCHAR2(2000);
30 x_out_rec OKC_CVM_PVT.cvmv_rec_type;
31 l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
32 BEGIN
33
34 -- initialize return status
35 x_return_status := OKC_API.G_RET_STS_SUCCESS;
36
37 -- assign/populate contract header id
38 l_cvmv_rec.chr_id := p_chr_id;
39
40 OKC_CVM_PVT.update_contract_version(
41 p_api_version => l_api_version,
42 p_init_msg_list => l_init_msg_list,
43 x_return_status => x_return_status,
44 x_msg_count => x_msg_count,
45 x_msg_data => x_msg_data,
46 p_cvmv_rec => l_cvmv_rec,
47 x_cvmv_rec => x_out_rec);
48
49 -- Error handling....
50 -- calls OTHERS exception
51 return (x_return_status);
52 EXCEPTION
53 when OTHERS then
54 -- notify caller of an error
55 x_return_status := OKC_API.G_RET_STS_ERROR;
56
57 -- store SQL error message on message stack
58 OKC_API.SET_MESSAGE(p_app_name => g_app_name,
59 p_msg_name => g_unexpected_error,
60 p_token1 => g_sqlcode_token,
61 p_token1_value => sqlcode,
62 p_token2 => g_sqlerrm_token,
63 p_token2_value => sqlerrm);
64
65 return (x_return_status);
66 END;
67 PROCEDURE create_section(
68 p_api_version IN NUMBER,
69 p_init_msg_list IN VARCHAR2 ,
70 x_return_status OUT NOCOPY VARCHAR2,
71 x_msg_count OUT NOCOPY NUMBER,
72 x_msg_data OUT NOCOPY VARCHAR2,
73 p_scnv_rec IN OKC_SCN_PVT.scnv_rec_type,
74 x_scnv_rec OUT NOCOPY OKC_SCN_PVT.scnv_rec_type) IS
75
76 l_scnv_rec OKC_SCN_PVT.scnv_rec_type := p_scnv_rec;
77 BEGIN
78 -- initialize return status
79 x_return_status := OKC_API.G_RET_STS_SUCCESS;
80
81 OKC_SCN_PVT.Insert_Row(
82 p_api_version => p_api_version,
83 p_init_msg_list => p_init_msg_list,
84 x_return_status => x_return_status,
85 x_msg_count => x_msg_count,
86 x_msg_data => x_msg_data,
87 p_scnv_rec => l_scnv_rec,
88 x_scnv_rec => x_scnv_rec);
89
90 -- Update minor version
91 If (x_return_status = OKC_API.G_RET_STS_SUCCESS AND
92 p_scnv_rec.chr_id > 0)
93 Then
94 x_return_status := Update_Minor_Version(p_scnv_rec.chr_id);
95 End If;
96
97 END create_section;
98
99 PROCEDURE create_section(
100 p_api_version IN NUMBER,
101 p_init_msg_list IN VARCHAR2 ,
102 x_return_status OUT NOCOPY VARCHAR2,
103 x_msg_count OUT NOCOPY NUMBER,
104 x_msg_data OUT NOCOPY VARCHAR2,
105 p_scnv_tbl IN OKC_SCN_PVT.scnv_tbl_type,
106 x_scnv_tbl OUT NOCOPY OKC_SCN_PVT.scnv_tbl_type) IS
107
108 BEGIN
109 OKC_SCN_PVT.Insert_Row(
110 p_api_version => p_api_version,
111 p_init_msg_list => p_init_msg_list,
112 x_return_status => x_return_status,
113 x_msg_count => x_msg_count,
114 x_msg_data => x_msg_data,
115 p_scnv_tbl => p_scnv_tbl,
116 x_scnv_tbl => x_scnv_tbl);
117 END create_section;
118
119 PROCEDURE update_section(
120 p_api_version IN NUMBER,
121 p_init_msg_list IN VARCHAR2 ,
122 x_return_status OUT NOCOPY VARCHAR2,
123 x_msg_count OUT NOCOPY NUMBER,
124 x_msg_data OUT NOCOPY VARCHAR2,
125 p_scnv_rec IN OKC_SCN_PVT.scnv_rec_type,
126 x_scnv_rec OUT NOCOPY OKC_SCN_PVT.scnv_rec_type) IS
127
128 BEGIN
129
130 OKC_SCN_PVT.Update_Row(
131 p_api_version => p_api_version,
132 p_init_msg_list => p_init_msg_list,
133 x_return_status => x_return_status,
134 x_msg_count => x_msg_count,
135 x_msg_data => x_msg_data,
136 p_scnv_rec => p_scnv_rec,
137 x_scnv_rec => x_scnv_rec);
138
139 -- Update minor version
140 If (x_return_status = OKC_API.G_RET_STS_SUCCESS AND
141 p_scnv_rec.chr_id > 0)
142 Then
143 x_return_status := Update_Minor_Version(p_scnv_rec.chr_id);
144 End If;
145 exception
146 when OTHERS then
147 -- store SQL error message on message stack
148 OKC_API.SET_MESSAGE(p_app_name => g_app_name,
149 p_msg_name => g_unexpected_error,
150 p_token1 => g_sqlcode_token,
151 p_token1_value => sqlcode,
152 p_token2 => g_sqlerrm_token,
153 p_token2_value => sqlerrm);
154
155 -- notify caller of an UNEXPETED error
156 x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
157 END update_section;
158
159 PROCEDURE update_section(
160 p_api_version IN NUMBER,
161 p_init_msg_list IN VARCHAR2 ,
162 x_return_status OUT NOCOPY VARCHAR2,
163 x_msg_count OUT NOCOPY NUMBER,
164 x_msg_data OUT NOCOPY VARCHAR2,
165 p_scnv_tbl IN OKC_SCN_PVT.scnv_tbl_type,
166 x_scnv_tbl OUT NOCOPY OKC_SCN_PVT.scnv_tbl_type) IS
167
168 BEGIN
169 OKC_SCN_PVT.Update_Row(
170 p_api_version => p_api_version,
171 p_init_msg_list => p_init_msg_list,
172 x_return_status => x_return_status,
173 x_msg_count => x_msg_count,
174 x_msg_data => x_msg_data,
175 p_scnv_tbl => p_scnv_tbl,
176 x_scnv_tbl => x_scnv_tbl);
177 END update_section;
178
179 PROCEDURE delete_section(
180 p_api_version IN NUMBER,
181 p_init_msg_list IN VARCHAR2 ,
182 x_return_status OUT NOCOPY VARCHAR2,
183 x_msg_count OUT NOCOPY NUMBER,
184 x_msg_data OUT NOCOPY VARCHAR2,
185 p_scnv_rec IN OKC_SCN_PVT.scnv_rec_type) IS
186
187 l_chr_id NUMBER;
188 Cursor l_scn_csr IS
189 SELECT chr_id
190 FROM okc_sections_b
191 WHERE id = p_scnv_rec.ID;
192 BEGIN
193
194 open l_scn_csr;
195 fetch l_scn_csr into l_chr_id;
196 close l_scn_csr;
197
198 OKC_SCN_PVT.Delete_Row(
199 p_api_version => p_api_version,
200 p_init_msg_list => p_init_msg_list,
201 x_return_status => x_return_status,
202 x_msg_count => x_msg_count,
203 x_msg_data => x_msg_data,
204 p_scnv_rec => p_scnv_rec);
205
206 -- Update minor version
207 If (x_return_status = OKC_API.G_RET_STS_SUCCESS AND
208 l_chr_id > 0)
209 Then
210 x_return_status := Update_Minor_Version(l_chr_id);
211 End If;
212
213 exception
214 when OTHERS then
215 -- store SQL error message on message stack
216 OKC_API.SET_MESSAGE(p_app_name => g_app_name,
217 p_msg_name => g_unexpected_error,
218 p_token1 => g_sqlcode_token,
219 p_token1_value => sqlcode,
220 p_token2 => g_sqlerrm_token,
221 p_token2_value => sqlerrm);
222
223 -- notify caller of an UNEXPETED error
224 x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
225 END delete_section;
226
227 PROCEDURE delete_section(
228 p_api_version IN NUMBER,
229 p_init_msg_list IN VARCHAR2 ,
230 x_return_status OUT NOCOPY VARCHAR2,
231 x_msg_count OUT NOCOPY NUMBER,
232 x_msg_data OUT NOCOPY VARCHAR2,
233 p_scnv_tbl IN OKC_SCN_PVT.scnv_tbl_type) IS
234
235 BEGIN
236 OKC_SCN_PVT.Delete_Row(
237 p_api_version => p_api_version,
238 p_init_msg_list => p_init_msg_list,
239 x_return_status => x_return_status,
240 x_msg_count => x_msg_count,
241 x_msg_data => x_msg_data,
242 p_scnv_tbl => p_scnv_tbl);
243 END delete_section;
244
245 PROCEDURE lock_section(
246 p_api_version IN NUMBER,
247 p_init_msg_list IN VARCHAR2 ,
248 x_return_status OUT NOCOPY VARCHAR2,
249 x_msg_count OUT NOCOPY NUMBER,
250 x_msg_data OUT NOCOPY VARCHAR2,
251 p_scnv_rec IN OKC_SCN_PVT.scnv_rec_type) IS
252
253 BEGIN
254 OKC_SCN_PVT.Lock_Row(
255 p_api_version => p_api_version,
256 p_init_msg_list => p_init_msg_list,
257 x_return_status => x_return_status,
258 x_msg_count => x_msg_count,
259 x_msg_data => x_msg_data,
260 p_scnv_rec => p_scnv_rec);
261 END lock_section;
262
263 PROCEDURE lock_section(
264 p_api_version IN NUMBER,
265 p_init_msg_list IN VARCHAR2 ,
266 x_return_status OUT NOCOPY VARCHAR2,
267 x_msg_count OUT NOCOPY NUMBER,
268 x_msg_data OUT NOCOPY VARCHAR2,
269 p_scnv_tbl IN OKC_SCN_PVT.scnv_tbl_type) IS
270
271 BEGIN
272 OKC_SCN_PVT.Lock_Row(
273 p_api_version => p_api_version,
274 p_init_msg_list => p_init_msg_list,
275 x_return_status => x_return_status,
276 x_msg_count => x_msg_count,
277 x_msg_data => x_msg_data,
278 p_scnv_tbl => p_scnv_tbl);
279 END lock_section;
280
281 PROCEDURE validate_section(
282 p_api_version IN NUMBER,
283 p_init_msg_list IN VARCHAR2 ,
284 x_return_status OUT NOCOPY VARCHAR2,
285 x_msg_count OUT NOCOPY NUMBER,
286 x_msg_data OUT NOCOPY VARCHAR2,
287 p_scnv_rec IN OKC_SCN_PVT.scnv_rec_type) IS
288
289 BEGIN
290 OKC_SCN_PVT.Validate_Row(
291 p_api_version => p_api_version,
292 p_init_msg_list => p_init_msg_list,
293 x_return_status => x_return_status,
294 x_msg_count => x_msg_count,
295 x_msg_data => x_msg_data,
296 p_scnv_rec => p_scnv_rec);
297 END validate_section;
298
299 PROCEDURE validate_section(
300 p_api_version IN NUMBER,
301 p_init_msg_list IN VARCHAR2 ,
302 x_return_status OUT NOCOPY VARCHAR2,
303 x_msg_count OUT NOCOPY NUMBER,
304 x_msg_data OUT NOCOPY VARCHAR2,
305 p_scnv_tbl IN OKC_SCN_PVT.scnv_tbl_type) IS
306
307 BEGIN
308 OKC_SCN_PVT.Validate_Row(
309 p_api_version => p_api_version,
310 p_init_msg_list => p_init_msg_list,
311 x_return_status => x_return_status,
312 x_msg_count => x_msg_count,
313 x_msg_data => x_msg_data,
314 p_scnv_tbl => p_scnv_tbl);
315 END validate_section;
316
317 FUNCTION Get_CHR_ID_For_Section(p_scn_id NUMBER) RETURN NUMBER IS
318 Cursor l_scn_csr Is
319 SELECT chr_id
320 FROM okc_sections_b
321 WHERE id = p_scn_id;
322
323 l_chr_id NUMBER := -1;
324 BEGIN
325 open l_scn_csr;
326 fetch l_scn_csr into l_chr_id;
327 close l_scn_csr;
328 return l_chr_id;
329 EXCEPTION
330 when OTHERS then
331 return l_chr_id;
332 END Get_CHR_ID_For_Section;
333
334 PROCEDURE create_section_content(
335 p_api_version IN NUMBER,
336 p_init_msg_list IN VARCHAR2 ,
337 x_return_status OUT NOCOPY VARCHAR2,
338 x_msg_count OUT NOCOPY NUMBER,
339 x_msg_data OUT NOCOPY VARCHAR2,
340 p_sccv_rec IN OKC_SCC_PVT.sccv_rec_type,
341 x_sccv_rec OUT NOCOPY OKC_SCC_PVT.sccv_rec_type) IS
342
343 l_sccv_rec OKC_SCC_PVT.sccv_rec_type := p_sccv_rec;
344 l_chr_id NUMBER;
345 BEGIN
346 -- initialize return status
347 x_return_status := OKC_API.G_RET_STS_SUCCESS;
348
349 OKC_SCC_PVT.Insert_Row(
350 p_api_version => p_api_version,
351 p_init_msg_list => p_init_msg_list,
352 x_return_status => x_return_status,
353 x_msg_count => x_msg_count,
354 x_msg_data => x_msg_data,
355 p_sccv_rec => l_sccv_rec,
356 x_sccv_rec => x_sccv_rec);
357
358
359 -- Update minor version
360 If (x_return_status = OKC_API.G_RET_STS_SUCCESS) Then
361 l_chr_id := Get_CHR_ID_For_Section(p_sccv_rec.SCN_ID);
362 If (l_chr_id > 0) Then
363 x_return_status := Update_Minor_Version(l_chr_id);
364 End If;
365 End If;
366 END create_section_content;
367
368 PROCEDURE create_section_content(
369 p_api_version IN NUMBER,
370 p_init_msg_list IN VARCHAR2 ,
371 x_return_status OUT NOCOPY VARCHAR2,
372 x_msg_count OUT NOCOPY NUMBER,
373 x_msg_data OUT NOCOPY VARCHAR2,
374 p_sccv_tbl IN OKC_SCC_PVT.sccv_tbl_type,
375 x_sccv_tbl OUT NOCOPY OKC_SCC_PVT.sccv_tbl_type) IS
376
377 BEGIN
378 OKC_SCC_PVT.Insert_Row(
379 p_api_version => p_api_version,
380 p_init_msg_list => p_init_msg_list,
381 x_return_status => x_return_status,
382 x_msg_count => x_msg_count,
383 x_msg_data => x_msg_data,
384 p_sccv_tbl => p_sccv_tbl,
385 x_sccv_tbl => x_sccv_tbl);
386 END create_section_content;
387
388 PROCEDURE update_section_content(
389 p_api_version IN NUMBER,
390 p_init_msg_list IN VARCHAR2 ,
391 x_return_status OUT NOCOPY VARCHAR2,
392 x_msg_count OUT NOCOPY NUMBER,
393 x_msg_data OUT NOCOPY VARCHAR2,
394 p_sccv_rec IN OKC_SCC_PVT.sccv_rec_type,
395 x_sccv_rec OUT NOCOPY OKC_SCC_PVT.sccv_rec_type) IS
396
397 l_chr_id NUMBER := -1;
398 BEGIN
399
400 OKC_SCC_PVT.Update_Row(
401 p_api_version => p_api_version,
402 p_init_msg_list => p_init_msg_list,
403 x_return_status => x_return_status,
404 x_msg_count => x_msg_count,
405 x_msg_data => x_msg_data,
406 p_sccv_rec => p_sccv_rec,
407 x_sccv_rec => x_sccv_rec);
408
409 -- Update minor version
410 If (x_return_status = OKC_API.G_RET_STS_SUCCESS) Then
411 l_chr_id := Get_CHR_ID_For_Section(p_sccv_rec.SCN_ID);
412 If (l_chr_id > 0) Then
413 x_return_status := Update_Minor_Version(l_chr_id);
414 End If;
415 End If;
416 exception
417 when OTHERS then
418 -- store SQL error message on message stack
419 OKC_API.SET_MESSAGE(p_app_name => g_app_name,
420 p_msg_name => g_unexpected_error,
421 p_token1 => g_sqlcode_token,
422 p_token1_value => sqlcode,
423 p_token2 => g_sqlerrm_token,
424 p_token2_value => sqlerrm);
425
426 -- notify caller of an UNEXPETED error
427 x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
428 END update_section_content;
429
430 PROCEDURE update_section_content(
431 p_api_version IN NUMBER,
432 p_init_msg_list IN VARCHAR2 ,
433 x_return_status OUT NOCOPY VARCHAR2,
434 x_msg_count OUT NOCOPY NUMBER,
435 x_msg_data OUT NOCOPY VARCHAR2,
436 p_sccv_tbl IN OKC_SCC_PVT.sccv_tbl_type,
437 x_sccv_tbl OUT NOCOPY OKC_SCC_PVT.sccv_tbl_type) IS
438
439 BEGIN
440 OKC_SCC_PVT.Update_Row(
441 p_api_version => p_api_version,
442 p_init_msg_list => p_init_msg_list,
443 x_return_status => x_return_status,
444 x_msg_count => x_msg_count,
445 x_msg_data => x_msg_data,
446 p_sccv_tbl => p_sccv_tbl,
447 x_sccv_tbl => x_sccv_tbl);
448 END update_section_content;
449
450 PROCEDURE delete_section_content(
451 p_api_version IN NUMBER,
452 p_init_msg_list IN VARCHAR2 ,
453 x_return_status OUT NOCOPY VARCHAR2,
454 x_msg_count OUT NOCOPY NUMBER,
455 x_msg_data OUT NOCOPY VARCHAR2,
456 p_sccv_rec IN OKC_SCC_PVT.sccv_rec_type) IS
457
458 l_chr_id NUMBER;
459 BEGIN
460
461 OKC_SCC_PVT.Delete_Row(
462 p_api_version => p_api_version,
463 p_init_msg_list => p_init_msg_list,
464 x_return_status => x_return_status,
465 x_msg_count => x_msg_count,
466 x_msg_data => x_msg_data,
467 p_sccv_rec => p_sccv_rec);
468
469 -- Update minor version
470 If (x_return_status = OKC_API.G_RET_STS_SUCCESS) Then
471 l_chr_id := Get_CHR_ID_For_Section(p_sccv_rec.SCN_ID);
472 If (l_chr_id > 0) Then
473 x_return_status := Update_Minor_Version(l_chr_id);
474 End If;
475 End If;
476 exception
477 when OTHERS then
478 -- store SQL error message on message stack
479 OKC_API.SET_MESSAGE(p_app_name => g_app_name,
480 p_msg_name => g_unexpected_error,
481 p_token1 => g_sqlcode_token,
482 p_token1_value => sqlcode,
483 p_token2 => g_sqlerrm_token,
484 p_token2_value => sqlerrm);
485
486 -- notify caller of an UNEXPETED error
487 x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
488 END delete_section_content;
489
490 PROCEDURE delete_section_content(
491 p_api_version IN NUMBER,
492 p_init_msg_list IN VARCHAR2 ,
493 x_return_status OUT NOCOPY VARCHAR2,
494 x_msg_count OUT NOCOPY NUMBER,
495 x_msg_data OUT NOCOPY VARCHAR2,
496 p_sccv_tbl IN OKC_SCC_PVT.sccv_tbl_type) IS
497
498 BEGIN
499 OKC_SCC_PVT.Delete_Row(
500 p_api_version => p_api_version,
501 p_init_msg_list => p_init_msg_list,
502 x_return_status => x_return_status,
503 x_msg_count => x_msg_count,
504 x_msg_data => x_msg_data,
505 p_sccv_tbl => p_sccv_tbl);
506 END delete_section_content;
507
508 PROCEDURE lock_section_content(
509 p_api_version IN NUMBER,
510 p_init_msg_list IN VARCHAR2 ,
511 x_return_status OUT NOCOPY VARCHAR2,
512 x_msg_count OUT NOCOPY NUMBER,
513 x_msg_data OUT NOCOPY VARCHAR2,
514 p_sccv_rec IN OKC_SCC_PVT.sccv_rec_type) IS
515
516 BEGIN
517 OKC_SCC_PVT.Lock_Row(
518 p_api_version => p_api_version,
519 p_init_msg_list => p_init_msg_list,
520 x_return_status => x_return_status,
521 x_msg_count => x_msg_count,
522 x_msg_data => x_msg_data,
523 p_sccv_rec => p_sccv_rec);
524 END lock_section_content;
525
526 PROCEDURE lock_section_content(
527 p_api_version IN NUMBER,
528 p_init_msg_list IN VARCHAR2 ,
529 x_return_status OUT NOCOPY VARCHAR2,
530 x_msg_count OUT NOCOPY NUMBER,
531 x_msg_data OUT NOCOPY VARCHAR2,
532 p_sccv_tbl IN OKC_SCC_PVT.sccv_tbl_type) IS
533
534 BEGIN
535 OKC_SCC_PVT.Lock_Row(
536 p_api_version => p_api_version,
537 p_init_msg_list => p_init_msg_list,
538 x_return_status => x_return_status,
539 x_msg_count => x_msg_count,
540 x_msg_data => x_msg_data,
541 p_sccv_tbl => p_sccv_tbl);
542 END lock_section_content;
543
544 PROCEDURE validate_section_content(
545 p_api_version IN NUMBER,
546 p_init_msg_list IN VARCHAR2 ,
547 x_return_status OUT NOCOPY VARCHAR2,
548 x_msg_count OUT NOCOPY NUMBER,
549 x_msg_data OUT NOCOPY VARCHAR2,
550 p_sccv_rec IN OKC_SCC_PVT.sccv_rec_type) IS
551
552 BEGIN
553 OKC_SCC_PVT.Validate_Row(
554 p_api_version => p_api_version,
555 p_init_msg_list => p_init_msg_list,
556 x_return_status => x_return_status,
557 x_msg_count => x_msg_count,
558 x_msg_data => x_msg_data,
559 p_sccv_rec => p_sccv_rec);
560 END validate_section_content;
561
562 PROCEDURE validate_section_content(
563 p_api_version IN NUMBER,
564 p_init_msg_list IN VARCHAR2 ,
565 x_return_status OUT NOCOPY VARCHAR2,
566 x_msg_count OUT NOCOPY NUMBER,
567 x_msg_data OUT NOCOPY VARCHAR2,
568 p_sccv_tbl IN OKC_SCC_PVT.sccv_tbl_type) IS
569
570 BEGIN
571 OKC_SCC_PVT.Validate_Row(
572 p_api_version => p_api_version,
573 p_init_msg_list => p_init_msg_list,
574 x_return_status => x_return_status,
575 x_msg_count => x_msg_count,
576 x_msg_data => x_msg_data,
577 p_sccv_tbl => p_sccv_tbl);
578 END validate_section_content;
579
580 PROCEDURE add_language IS
581 BEGIN
582 OKC_SCN_PVT.add_language;
583 END add_language;
584
585 END OKC_SECTIONS_PVT;