[Home] [Help]
PACKAGE BODY: APPS.OKL_STRM_GEN_TEMPLATE_PUB
Source
1 Package Body okl_strm_gen_template_pub as
2 /* $Header: OKLPTSGB.pls 120.4 2005/11/15 11:53:23 rgooty noship $ */
3 ---------------------------------------------------------------------------
4 -- PROCEDURE create_strm_gen_template
5 ---------------------------------------------------------------------------
6 -- Start of comments
7 --
8 -- Procedure Name : create_strm_gen_template
9 -- Description : Creates a Stream Generation Template
10 -- Business Rules :
11 -- Parameters :
12 -- Version : 1.0
13 -- End of comments
14 ---------------------------------------------------------------------------
15
16 Procedure create_strm_gen_template(
17 p_api_version IN NUMBER
18 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
19 ,x_return_status OUT NOCOPY VARCHAR2
20 ,x_msg_count OUT NOCOPY NUMBER
21 ,x_msg_data OUT NOCOPY VARCHAR2
22 ,p_gtsv_rec IN gtsv_rec_type
23 ,p_gttv_rec IN gttv_rec_type
24 ,p_gtpv_tbl IN gtpv_tbl_type
25 ,p_gtlv_tbl IN gtlv_tbl_type
26 ,x_gttv_rec OUT NOCOPY gttv_rec_type -- Return the Template Info
27 ) IS
28 l_api_name VARCHAR2(30):= 'create_strm_gen_template';
29 l_api_version NUMBER := 1.0;
30 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
31 BEGIN
32 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
33 p_pkg_name => G_PKG_NAME,
34 p_init_msg_list => p_init_msg_list,
35 l_api_version => l_api_version,
36 p_api_version => p_api_version,
37 p_api_type => '_PUB',
38 x_return_status => l_return_status);
39 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
40 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
41 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
42 RAISE G_EXCEPTION_ERROR;
43 END IF;
44
45 OKL_STRM_GEN_TEMPLATE_PVT.create_strm_gen_template(
46 p_api_version => l_api_version
47 ,p_init_msg_list => p_init_msg_list
48 ,x_return_status => l_return_status
49 ,x_msg_count => x_msg_count
50 ,x_msg_data => x_msg_data
51 ,p_gtsv_rec => p_gtsv_rec
52 ,p_gttv_rec => p_gttv_rec
53 ,p_gtpv_tbl => p_gtpv_tbl
54 ,p_gtlv_tbl => p_gtlv_tbl
55 ,x_gttv_rec => x_gttv_rec
56 );
57
58 IF l_return_status = G_RET_STS_ERROR THEN
59 RAISE G_EXCEPTION_ERROR;
60 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
61 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
62 END IF;
63
64 OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
65 x_msg_data => x_msg_data);
66 x_return_status := l_return_status;
67 EXCEPTION
68 WHEN G_EXCEPTION_ERROR THEN
69 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
70 p_pkg_name => G_PKG_NAME,
71 p_exc_name => G_EXC_NAME_ERROR,
72 x_msg_count => x_msg_count,
73 x_msg_data => x_msg_data,
74 p_api_type => '_PUB');
75 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
76 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
77 p_pkg_name => G_PKG_NAME,
78 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
79 x_msg_count => x_msg_count,
80 x_msg_data => x_msg_data,
81 p_api_type => '_PUB');
82 WHEN OTHERS THEN
83 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
84 p_pkg_name => G_PKG_NAME,
85 p_exc_name => G_EXC_NAME_OTHERS,
86 x_msg_count => x_msg_count,
87 x_msg_data => x_msg_data,
88 p_api_type => '_PUB');
89 END;
90
91 ---------------------------------------------------------------------------
92 -- PROCEDURE update_strm_gen_template
93 ---------------------------------------------------------------------------
94 -- Start of comments
95 --
96 -- Procedure Name : update_strm_gen_template
97 -- Description : Update a Stream Generation Template
98 -- Business Rules :
99 -- Parameters :
100 -- Version : 1.0
101 -- End of comments
102 ---------------------------------------------------------------------------
103
104 Procedure update_strm_gen_template(
105 p_api_version IN NUMBER
106 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
107 ,x_return_status OUT NOCOPY VARCHAR2
108 ,x_msg_count OUT NOCOPY NUMBER
109 ,x_msg_data OUT NOCOPY VARCHAR2
110 ,p_gtsv_rec IN gtsv_rec_type
111 ,p_gttv_rec IN gttv_rec_type
112 ,p_gtpv_tbl IN gtpv_tbl_type
113 ,p_gtlv_tbl IN gtlv_tbl_type
114 ,x_gttv_rec OUT NOCOPY gttv_rec_type -- Return the Template Info
115 )IS
116 l_api_name VARCHAR2(30):= 'update_strm_gen_template';
117 l_api_version NUMBER := 1.0;
118 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
119 BEGIN
120 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
121 p_pkg_name => G_PKG_NAME,
122 p_init_msg_list => p_init_msg_list,
123 l_api_version => l_api_version,
124 p_api_version => p_api_version,
125 p_api_type => '_PUB',
126 x_return_status => l_return_status);
127 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
128 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
129 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
130 RAISE G_EXCEPTION_ERROR;
131 END IF;
132
133 OKL_STRM_GEN_TEMPLATE_PVT.update_strm_gen_template(
134 p_api_version => l_api_version
135 ,p_init_msg_list => p_init_msg_list
136 ,x_return_status => l_return_status
137 ,x_msg_count => x_msg_count
138 ,x_msg_data => x_msg_data
139 ,p_gtsv_rec => p_gtsv_rec
140 ,p_gttv_rec => p_gttv_rec
141 ,p_gtpv_tbl => p_gtpv_tbl
142 ,p_gtlv_tbl => p_gtlv_tbl
143 ,x_gttv_rec => x_gttv_rec
144 );
145 IF l_return_status = G_RET_STS_ERROR THEN
146 RAISE G_EXCEPTION_ERROR;
147 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
148 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
149 END IF;
150
151 OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
152 x_msg_data => x_msg_data);
153 x_return_status := l_return_status;
154 EXCEPTION
155 WHEN G_EXCEPTION_ERROR THEN
156 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
157 p_pkg_name => G_PKG_NAME,
158 p_exc_name => G_EXC_NAME_ERROR,
159 x_msg_count => x_msg_count,
160 x_msg_data => x_msg_data,
161 p_api_type => '_PUB');
162 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
163 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
164 p_pkg_name => G_PKG_NAME,
165 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
166 x_msg_count => x_msg_count,
167 x_msg_data => x_msg_data,
168 p_api_type => '_PUB');
169 WHEN OTHERS THEN
170 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
171 p_pkg_name => G_PKG_NAME,
172 p_exc_name => G_EXC_NAME_OTHERS,
173 x_msg_count => x_msg_count,
174 x_msg_data => x_msg_data,
175 p_api_type => '_PUB');
176 END;
177
178 ---------------------------------------------------------------------------
179 -- PROCEDURE update_dep_strms
180 ---------------------------------------------------------------------------
181 -- Start of comments
182 --
183 -- Procedure Name : update_dep_strms
184 -- Description : Update Dependent Streams of a Template
185 -- Business Rules :
186 -- Parameters :
187 -- Version : 1.0
188 -- End of comments
189 ---------------------------------------------------------------------------
190
191 Procedure update_dep_strms(
192 p_api_version IN NUMBER
193 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
194 ,x_return_status OUT NOCOPY VARCHAR2
195 ,x_msg_count OUT NOCOPY NUMBER
196 ,x_msg_data OUT NOCOPY VARCHAR2
197 ,p_gtt_id IN OKL_ST_GEN_TEMPLATES.ID%type
198 ,p_pri_sty_id IN OKL_ST_GEN_TMPT_LNS.PRIMARY_STY_ID%TYPE
199 ,p_gtlv_tbl IN gtlv_tbl_type
200 ,x_missing_deps OUT NOCOPY VARCHAR2
201 ,x_show_warn_flag OUT NOCOPY VARCHAR2
202 )IS
203 l_api_name VARCHAR2(30):= 'update_dep_strms';
204 l_api_version NUMBER := 1.0;
205 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
206 BEGIN
207 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
208 p_pkg_name => G_PKG_NAME,
209 p_init_msg_list => p_init_msg_list,
210 l_api_version => l_api_version,
211 p_api_version => p_api_version,
212 p_api_type => '_PUB',
213 x_return_status => l_return_status);
214 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
215 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
216 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
217 RAISE G_EXCEPTION_ERROR;
218 END IF;
219 OKL_STRM_GEN_TEMPLATE_PVT.update_dep_strms(
220 p_api_version => l_api_version
221 ,p_init_msg_list => p_init_msg_list
222 ,x_return_status => l_return_status
223 ,x_msg_count => x_msg_count
224 ,x_msg_data => x_msg_data
225 ,p_gtt_id => p_gtt_id
226 ,p_pri_sty_id => p_pri_sty_id
227 ,p_gtlv_tbl => p_gtlv_tbl
228 ,x_missing_deps => x_missing_deps
229 ,x_show_warn_flag => x_show_warn_flag
230 );
231
232 IF l_return_status = G_RET_STS_ERROR THEN
233 RAISE G_EXCEPTION_ERROR;
234 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
235 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
236 END IF;
237
238 OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
239 x_msg_data => x_msg_data);
240 x_return_status := l_return_status;
241 EXCEPTION
242 WHEN G_EXCEPTION_ERROR THEN
243 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
244 p_pkg_name => G_PKG_NAME,
245 p_exc_name => G_EXC_NAME_ERROR,
246 x_msg_count => x_msg_count,
247 x_msg_data => x_msg_data,
248 p_api_type => '_PUB');
249 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
250 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
251 p_pkg_name => G_PKG_NAME,
252 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
253 x_msg_count => x_msg_count,
254 x_msg_data => x_msg_data,
255 p_api_type => '_PUB');
256 WHEN OTHERS THEN
257 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
258 p_pkg_name => G_PKG_NAME,
259 p_exc_name => G_EXC_NAME_OTHERS,
260 x_msg_count => x_msg_count,
261 x_msg_data => x_msg_data,
262 p_api_type => '_PUB');
263 END;
264
265 ---------------------------------------------------------------------------
266 -- PROCEDURE create_version_duplicate
267 ---------------------------------------------------------------------------
268 -- Start of comments
269 --
270 -- Procedure Name : create_version_duplicate
271 -- Description : Create a duplicate of a Stream Generation Template
272 -- or a new version of a Template
273 -- Business Rules :
274 -- Parameters :
275 -- Version : 1.0
276 -- End of comments
277 ---------------------------------------------------------------------------
278
279 Procedure create_version_duplicate(
280 p_api_version IN NUMBER
281 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
282 ,x_return_status OUT NOCOPY VARCHAR2
283 ,x_msg_count OUT NOCOPY NUMBER
284 ,x_msg_data OUT NOCOPY VARCHAR2
285 ,p_gtt_id IN okl_st_gen_templates.id%type
286 ,p_mode IN VARCHAR2 DEFAULT G_DEFAULT_MODE
287 ,x_gttv_rec OUT NOCOPY gttv_rec_type -- Return the Template Info
288 ) IS
289 l_api_name VARCHAR2(30):= 'create_version_duplicate';
290 l_api_version NUMBER := 1.0;
291 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
292 BEGIN
293 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
294 p_pkg_name => G_PKG_NAME,
295 p_init_msg_list => p_init_msg_list,
296 l_api_version => l_api_version,
297 p_api_version => p_api_version,
298 p_api_type => '_PUB',
299 x_return_status => l_return_status);
300 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
301 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
302 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
303 RAISE G_EXCEPTION_ERROR;
304 END IF;
305
306 OKL_STRM_GEN_TEMPLATE_PVT.create_version_duplicate(
307 p_api_version => l_api_version
308 ,p_init_msg_list => p_init_msg_list
309 ,x_return_status => l_return_status
310 ,x_msg_count => x_msg_count
311 ,x_msg_data => x_msg_data
312 ,p_gtt_id => p_gtt_id
313 ,p_mode => p_mode
314 ,x_gttv_rec => x_gttv_rec
315 );
316
317 IF l_return_status = G_RET_STS_ERROR THEN
318 RAISE G_EXCEPTION_ERROR;
319 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
320 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
321 END IF;
322
323 OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
324 x_msg_data => x_msg_data);
325 x_return_status := l_return_status;
326 EXCEPTION
327 WHEN G_EXCEPTION_ERROR THEN
328 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
329 p_pkg_name => G_PKG_NAME,
330 p_exc_name => G_EXC_NAME_ERROR,
331 x_msg_count => x_msg_count,
332 x_msg_data => x_msg_data,
333 p_api_type => '_PUB');
334 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
335 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
336 p_pkg_name => G_PKG_NAME,
337 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
338 x_msg_count => x_msg_count,
339 x_msg_data => x_msg_data,
340 p_api_type => '_PUB');
341 WHEN OTHERS THEN
342 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
343 p_pkg_name => G_PKG_NAME,
344 p_exc_name => G_EXC_NAME_OTHERS,
345 x_msg_count => x_msg_count,
346 x_msg_data => x_msg_data,
347 p_api_type => '_PUB');
348 END;
349
350
351 ---------------------------------------------------------------------------
352 -- PROCEDURE delete_tmpt_prc_params
353 ---------------------------------------------------------------------------
354 -- Start of comments
355 --
356 -- Procedure Name : delete_tmpt_prc_params
357 -- Description : Delete Pricing Parameters of a Template
358 -- Business Rules :
359 -- Parameters :
360 -- Version : 1.0
361 -- End of comments
362 ---------------------------------------------------------------------------
363
364 Procedure delete_tmpt_prc_params(
365 p_api_version IN NUMBER
366 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
367 ,x_return_status OUT NOCOPY VARCHAR2
368 ,x_msg_count OUT NOCOPY NUMBER
369 ,x_msg_data OUT NOCOPY VARCHAR2
370 ,p_gtpv_tbl IN gtpv_tbl_type
371 ) IS
372 l_api_name VARCHAR2(30):= 'delete_tmpt_prc_params';
373 l_api_version NUMBER := 1.0;
374 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
375 BEGIN
376 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
377 p_pkg_name => G_PKG_NAME,
378 p_init_msg_list => p_init_msg_list,
379 l_api_version => l_api_version,
380 p_api_version => p_api_version,
381 p_api_type => '_PUB',
382 x_return_status => l_return_status);
383 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
384 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
385 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
386 RAISE G_EXCEPTION_ERROR;
387 END IF;
388
389 OKL_STRM_GEN_TEMPLATE_PVT.delete_tmpt_prc_params(
390 p_api_version => l_api_version
391 ,p_init_msg_list => p_init_msg_list
392 ,x_return_status => x_return_status
393 ,x_msg_count => x_msg_count
394 ,x_msg_data => x_msg_data
395 ,p_gtpv_tbl => p_gtpv_tbl
396 );
397
398 IF l_return_status = G_RET_STS_ERROR THEN
399 RAISE G_EXCEPTION_ERROR;
400 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
401 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
402 END IF;
403
404 OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
405 x_msg_data => x_msg_data);
406 x_return_status := l_return_status;
407 EXCEPTION
408 WHEN G_EXCEPTION_ERROR THEN
409 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
410 p_pkg_name => G_PKG_NAME,
411 p_exc_name => G_EXC_NAME_ERROR,
412 x_msg_count => x_msg_count,
413 x_msg_data => x_msg_data,
414 p_api_type => '_PUB');
415 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
416 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
417 p_pkg_name => G_PKG_NAME,
418 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
419 x_msg_count => x_msg_count,
420 x_msg_data => x_msg_data,
421 p_api_type => '_PUB');
422 WHEN OTHERS THEN
423 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
424 p_pkg_name => G_PKG_NAME,
425 p_exc_name => G_EXC_NAME_OTHERS,
426 x_msg_count => x_msg_count,
427 x_msg_data => x_msg_data,
428 p_api_type => '_PUB');
429 END;
430
431 ---------------------------------------------------------------------------
432 -- PROCEDURE delete_pri_tmpt_lns
433 ---------------------------------------------------------------------------
434 -- Start of comments
435 --
436 -- Procedure Name : delete_pri_tmpt_lns
437 -- Description : Delete Primary Lines of a Template
438 -- Business Rules :
439 -- Parameters :
440 -- Version : 1.0
441 -- End of comments
442 ---------------------------------------------------------------------------
443
444 Procedure delete_pri_tmpt_lns(
445 p_api_version IN NUMBER
446 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
447 ,x_return_status OUT NOCOPY VARCHAR2
448 ,x_msg_count OUT NOCOPY NUMBER
449 ,x_msg_data OUT NOCOPY VARCHAR2
450 ,p_gtlv_tbl IN gtlv_tbl_type
451 )IS
452 l_api_name VARCHAR2(30):= 'delete_pri_tmpt_lns';
453 l_api_version NUMBER := 1.0;
454 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
455 BEGIN
456
457 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
458 p_pkg_name => G_PKG_NAME,
459 p_init_msg_list => p_init_msg_list,
460 l_api_version => l_api_version,
461 p_api_version => p_api_version,
462 p_api_type => '_PUB',
463 x_return_status => l_return_status);
464 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
465 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
466 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
467 RAISE G_EXCEPTION_ERROR;
468 END IF;
469
470 OKL_STRM_GEN_TEMPLATE_PVT.delete_pri_tmpt_lns(
471 p_api_version => l_api_version
472 ,p_init_msg_list => p_init_msg_list
473 ,x_return_status => x_return_status
474 ,x_msg_count => x_msg_count
475 ,x_msg_data => x_msg_data
476 ,p_gtlv_tbl => p_gtlv_tbl
477 );
478
479 IF l_return_status = G_RET_STS_ERROR THEN
480 RAISE G_EXCEPTION_ERROR;
481 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
482 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
483 END IF;
484
485 OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
486 x_msg_data => x_msg_data);
487 x_return_status := l_return_status;
488 EXCEPTION
489 WHEN G_EXCEPTION_ERROR THEN
490 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
491 p_pkg_name => G_PKG_NAME,
492 p_exc_name => G_EXC_NAME_ERROR,
493 x_msg_count => x_msg_count,
494 x_msg_data => x_msg_data,
495 p_api_type => '_PUB');
496 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
497 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
498 p_pkg_name => G_PKG_NAME,
499 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
500 x_msg_count => x_msg_count,
501 x_msg_data => x_msg_data,
502 p_api_type => '_PUB');
503 WHEN OTHERS THEN
504 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
505 p_pkg_name => G_PKG_NAME,
506 p_exc_name => G_EXC_NAME_OTHERS,
507 x_msg_count => x_msg_count,
508 x_msg_data => x_msg_data,
509 p_api_type => '_PUB');
510 END;
511
512 ---------------------------------------------------------------------------
513 -- PROCEDURE delete_dep_tmpt_lns
514 ---------------------------------------------------------------------------
515 -- Start of comments
516 --
517 -- Procedure Name : delete_dep_tmpt_lns
518 -- Description : Delete dependent Template Lines of a Template
519 -- Business Rules :
520 -- Parameters :
521 -- Version : 1.0
522 -- End of comments
523 ---------------------------------------------------------------------------
524
525 Procedure delete_dep_tmpt_lns(
526 p_api_version IN NUMBER
527 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
528 ,x_return_status OUT NOCOPY VARCHAR2
529 ,x_msg_count OUT NOCOPY NUMBER
530 ,x_msg_data OUT NOCOPY VARCHAR2
531 ,p_gtlv_tbl IN gtlv_tbl_type
532 )IS
533 l_api_name VARCHAR2(30):= 'delete_dep_tmpt_lns';
534 l_api_version NUMBER := 1.0;
535 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
536 BEGIN
537
538 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
539 p_pkg_name => G_PKG_NAME,
540 p_init_msg_list => p_init_msg_list,
541 l_api_version => l_api_version,
542 p_api_version => p_api_version,
543 p_api_type => '_PUB',
544 x_return_status => l_return_status);
545 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
546 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
547 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
548 RAISE G_EXCEPTION_ERROR;
549 END IF;
550
551 OKL_STRM_GEN_TEMPLATE_PVT.delete_dep_tmpt_lns(
552 p_api_version => l_api_version
553 ,p_init_msg_list => p_init_msg_list
554 ,x_return_status => x_return_status
555 ,x_msg_count => x_msg_count
556 ,x_msg_data => x_msg_data
557 ,p_gtlv_tbl => p_gtlv_tbl
558 );
559
560 IF l_return_status = G_RET_STS_ERROR THEN
561 RAISE G_EXCEPTION_ERROR;
562 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
563 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
564 END IF;
565
566 OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
567 x_msg_data => x_msg_data);
568 x_return_status := l_return_status;
569 EXCEPTION
570 WHEN G_EXCEPTION_ERROR THEN
571 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
572 p_pkg_name => G_PKG_NAME,
573 p_exc_name => G_EXC_NAME_ERROR,
574 x_msg_count => x_msg_count,
575 x_msg_data => x_msg_data,
576 p_api_type => '_PUB');
577 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
578 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
579 p_pkg_name => G_PKG_NAME,
580 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
581 x_msg_count => x_msg_count,
582 x_msg_data => x_msg_data,
583 p_api_type => '_PUB');
584 WHEN OTHERS THEN
585 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
586 p_pkg_name => G_PKG_NAME,
587 p_exc_name => G_EXC_NAME_OTHERS,
588 x_msg_count => x_msg_count,
589 x_msg_data => x_msg_data,
590 p_api_type => '_PUB');
591 END;
592
593
594 ---------------------------------------------------------------------------
595 -- PROCEDURE validate_template
596 ---------------------------------------------------------------------------
597 -- Start of comments
598 --
599 -- Procedure Name : validate_template
600 -- Description : Validate a Stream Generation Template
601 -- Business Rules :
602 -- Parameters :
603 -- Version : 1.0
604 -- End of comments
605 ---------------------------------------------------------------------------
606
607 Procedure validate_template(
608 p_api_version IN NUMBER
609 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
610 ,x_return_status OUT NOCOPY VARCHAR2
611 ,x_msg_count OUT NOCOPY NUMBER
612 ,x_msg_data OUT NOCOPY VARCHAR2
613 ,p_gtt_id IN okl_st_gen_templates.id%type
614 ,x_error_msgs_tbl OUT NOCOPY error_msgs_tbl_type
615 ,x_return_tmpt_status OUT NOCOPY VARCHAR2
616 ,p_during_upd_flag IN VARCHAR2
617 )IS
618 l_api_name VARCHAR2(30):= 'validate_template';
619 l_api_version NUMBER := 1.0;
620 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
621 BEGIN
622 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
623 p_pkg_name => G_PKG_NAME,
624 p_init_msg_list => p_init_msg_list,
625 l_api_version => l_api_version,
626 p_api_version => p_api_version,
627 p_api_type => '_PUB',
628 x_return_status => l_return_status);
629 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
630 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
631 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
632 RAISE G_EXCEPTION_ERROR;
633 END IF;
634
635 OKL_STRM_GEN_TEMPLATE_PVT.validate_template(
636 p_api_version => l_api_version
637 ,p_init_msg_list => p_init_msg_list
638 ,x_return_status => x_return_status
639 ,x_msg_count => x_msg_count
640 ,x_msg_data => x_msg_data
641 ,p_gtt_id => p_gtt_id
642 ,x_error_msgs_tbl => x_error_msgs_tbl
643 ,x_return_tmpt_status => x_return_tmpt_status
644 ,p_during_upd_flag => p_during_upd_flag
645 );
646
647 IF l_return_status = G_RET_STS_ERROR THEN
648 RAISE G_EXCEPTION_ERROR;
649 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
650 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
651 END IF;
652
653 OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
654 x_msg_data => x_msg_data);
655 x_return_status := l_return_status;
656 EXCEPTION
657 WHEN G_EXCEPTION_ERROR THEN
658 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
659 p_pkg_name => G_PKG_NAME,
660 p_exc_name => G_EXC_NAME_ERROR,
661 x_msg_count => x_msg_count,
662 x_msg_data => x_msg_data,
663 p_api_type => '_PUB');
664 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
665 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
666 p_pkg_name => G_PKG_NAME,
667 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
668 x_msg_count => x_msg_count,
669 x_msg_data => x_msg_data,
670 p_api_type => '_PUB');
671 WHEN OTHERS THEN
672 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
673 p_pkg_name => G_PKG_NAME,
674 p_exc_name => G_EXC_NAME_OTHERS,
675 x_msg_count => x_msg_count,
676 x_msg_data => x_msg_data,
677 p_api_type => '_PUB');
678 END;
679
680 ---------------------------------------------------------------------------
681 -- PROCEDURE activate_template
682 ---------------------------------------------------------------------------
683 -- Start of comments
684 --
685 -- Procedure Name : activate_template
686 -- Description : Activate a Stream Generation Template
687 -- Business Rules :
688 -- Parameters :
689 -- Version : 1.0
690 -- End of comments
691 ---------------------------------------------------------------------------
692
693 Procedure activate_template(
694 p_api_version IN NUMBER
695 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
696 ,x_return_status OUT NOCOPY VARCHAR2
697 ,x_msg_count OUT NOCOPY NUMBER
698 ,x_msg_data OUT NOCOPY VARCHAR2
699 ,p_gtt_id IN okl_st_gen_templates.id%type
700 ) IS
701 l_api_name VARCHAR2(30):= 'activate_template';
702 l_api_version NUMBER := 1.0;
703 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
704 BEGIN
705 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
706 p_pkg_name => G_PKG_NAME,
707 p_init_msg_list => p_init_msg_list,
708 l_api_version => l_api_version,
709 p_api_version => p_api_version,
710 p_api_type => '_PUB',
711 x_return_status => l_return_status);
712 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
713 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
714 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
715 RAISE G_EXCEPTION_ERROR;
716 END IF;
717
718 OKL_STRM_GEN_TEMPLATE_PVT.activate_template(
719 p_api_version => l_api_version
720 ,p_init_msg_list => p_init_msg_list
721 ,x_return_status => x_return_status
722 ,x_msg_count => x_msg_count
723 ,x_msg_data => x_msg_data
724 ,p_gtt_id => p_gtt_id
725 );
726
727 IF l_return_status = G_RET_STS_ERROR THEN
728 RAISE G_EXCEPTION_ERROR;
729 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
730 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
731 END IF;
732
733 OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
734 x_msg_data => x_msg_data);
735 x_return_status := l_return_status;
736 EXCEPTION
737 WHEN G_EXCEPTION_ERROR THEN
738 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
739 p_pkg_name => G_PKG_NAME,
740 p_exc_name => G_EXC_NAME_ERROR,
741 x_msg_count => x_msg_count,
742 x_msg_data => x_msg_data,
743 p_api_type => '_PUB');
744 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
745 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
746 p_pkg_name => G_PKG_NAME,
747 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
748 x_msg_count => x_msg_count,
749 x_msg_data => x_msg_data,
750 p_api_type => '_PUB');
751 WHEN OTHERS THEN
752 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
753 p_pkg_name => G_PKG_NAME,
754 p_exc_name => G_EXC_NAME_OTHERS,
755 x_msg_count => x_msg_count,
756 x_msg_data => x_msg_data,
757 p_api_type => '_PUB');
758 END;
759
760 ---------------------------------------------------------------------------
761 -- PROCEDURE validate_for_warnings
762 ---------------------------------------------------------------------------
763 -- Start of comments
764 --
765 -- Procedure Name : validate_for_warnings
766 -- Description : Validate the SGT for any warnings to be shown
767 -- Business Rules :
768 -- Parameters :
769 -- Version : 1.0
770 -- End of comments
771 ---------------------------------------------------------------------------
772
773 Procedure validate_for_warnings(
774 p_api_version IN NUMBER
775 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
776 ,x_return_status OUT NOCOPY VARCHAR2
777 ,x_msg_count OUT NOCOPY NUMBER
778 ,x_msg_data OUT NOCOPY VARCHAR2
779 ,p_gtt_id IN okl_st_gen_templates.id%type
780 ,x_wrn_msgs_tbl OUT NOCOPY error_msgs_tbl_type
781 ,p_during_upd_flag IN VARCHAR
782 ,x_pri_purpose_list OUT NOCOPY VARCHAR
783 ) IS
784 l_api_name VARCHAR2(30):= 'validate_for_warnings';
785 l_api_version NUMBER := 1.0;
786 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
787 BEGIN
788 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
789 p_pkg_name => G_PKG_NAME,
790 p_init_msg_list => p_init_msg_list,
791 l_api_version => l_api_version,
792 p_api_version => p_api_version,
793 p_api_type => '_PUB',
794 x_return_status => l_return_status);
795 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
796 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
797 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
798 RAISE G_EXCEPTION_ERROR;
799 END IF;
800
801 OKL_STRM_GEN_TEMPLATE_PVT.validate_for_warnings(
802 p_api_version => p_api_version
803 ,p_init_msg_list => p_init_msg_list
804 ,x_return_status => l_return_status
805 ,x_msg_count => x_msg_count
806 ,x_msg_data => x_msg_data
807 ,p_gtt_id => p_gtt_id
808 ,x_wrn_msgs_tbl => x_wrn_msgs_tbl
809 ,p_during_upd_flag => p_during_upd_flag
810 ,x_pri_purpose_list => x_pri_purpose_list
811 );
812
813 IF l_return_status = G_RET_STS_ERROR THEN
814 RAISE G_EXCEPTION_ERROR;
815 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
816 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
817 END IF;
818
819 OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
820 x_msg_data => x_msg_data);
821 x_return_status := l_return_status;
822 EXCEPTION
823 WHEN G_EXCEPTION_ERROR THEN
824 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
825 p_pkg_name => G_PKG_NAME,
826 p_exc_name => G_EXC_NAME_ERROR,
827 x_msg_count => x_msg_count,
828 x_msg_data => x_msg_data,
829 p_api_type => '_PUB');
830 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
831 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
832 p_pkg_name => G_PKG_NAME,
833 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
834 x_msg_count => x_msg_count,
835 x_msg_data => x_msg_data,
836 p_api_type => '_PUB');
837 WHEN OTHERS THEN
838 x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name,
839 p_pkg_name => G_PKG_NAME,
840 p_exc_name => G_EXC_NAME_OTHERS,
841 x_msg_count => x_msg_count,
842 x_msg_data => x_msg_data,
843 p_api_type => '_PUB');
844 END;
845
846
847 PROCEDURE update_pri_dep_of_sgt(
848 p_api_version IN NUMBER
849 ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
850 ,x_return_status OUT NOCOPY VARCHAR2
851 ,x_msg_count OUT NOCOPY NUMBER
852 ,x_msg_data OUT NOCOPY VARCHAR2
853 ,p_gtsv_rec IN gtsv_rec_type
854 ,p_gttv_rec IN gttv_rec_type
855 ,p_gtpv_tbl IN gtpv_tbl_type
856 ,p_pri_gtlv_tbl IN gtlv_tbl_type
857 ,p_del_dep_gtlv_tbl IN gtlv_tbl_type
858 ,p_ins_dep_gtlv_tbl IN gtlv_tbl_type
859 ,x_gttv_rec OUT NOCOPY gttv_rec_type
860 ,x_pri_purpose_list OUT NOCOPY VARCHAR2)
861 IS
862 l_api_name VARCHAR2(30):= 'update_pri_dep_of_sgt';
863 l_api_version NUMBER := 1.0;
864 l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
865 BEGIN
866 l_return_status := OKL_API.START_ACTIVITY(p_api_name => l_api_name,
867 p_pkg_name => G_PKG_NAME,
868 p_init_msg_list => p_init_msg_list,
869 l_api_version => l_api_version,
870 p_api_version => p_api_version,
871 p_api_type => '_PUB',
872 x_return_status => l_return_status);
873 IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
874 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
875 ELSIF (l_return_status = G_RET_STS_ERROR) THEN
876 RAISE G_EXCEPTION_ERROR;
877 END IF;
878 okl_strm_gen_template_pvt.update_pri_dep_of_sgt(
879 p_api_version => p_api_version,
880 p_init_msg_list => p_init_msg_list,
881 x_return_status => l_return_status,
882 x_msg_count => x_msg_count,
883 x_msg_data => x_msg_data,
884 p_gtsv_rec => p_gtsv_rec,
885 p_gttv_rec => p_gttv_rec,
886 p_gtpv_tbl => p_gtpv_tbl,
887 p_pri_gtlv_tbl => p_pri_gtlv_tbl,
888 p_del_dep_gtlv_tbl => p_del_dep_gtlv_tbl,
889 p_ins_dep_gtlv_tbl => p_ins_dep_gtlv_tbl ,
890 x_gttv_rec => x_gttv_rec,
891 x_pri_purpose_list => x_pri_purpose_list );
892 IF l_return_status = G_RET_STS_ERROR
893 THEN
894 RAISE G_EXCEPTION_ERROR;
895 ELSIF l_return_status = G_RET_STS_UNEXP_ERROR
896 THEN
897 RAISE G_EXCEPTION_UNEXPECTED_ERROR;
898 END IF;
899 OKL_API.END_ACTIVITY(
900 x_msg_count => x_msg_count,
901 x_msg_data => x_msg_data);
902 x_return_status := l_return_status;
903 EXCEPTION
904 WHEN G_EXCEPTION_ERROR THEN
905 x_return_status := OKL_API.HANDLE_EXCEPTIONS(
906 p_api_name => l_api_name,
907 p_pkg_name => G_PKG_NAME,
908 p_exc_name => G_EXC_NAME_ERROR,
909 x_msg_count => x_msg_count,
910 x_msg_data => x_msg_data,
911 p_api_type => '_PUB');
912 WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
913 x_return_status := OKL_API.HANDLE_EXCEPTIONS(
914 p_api_name => l_api_name,
915 p_pkg_name => G_PKG_NAME,
916 p_exc_name => G_EXC_NAME_UNEXP_ERROR,
917 x_msg_count => x_msg_count,
918 x_msg_data => x_msg_data,
919 p_api_type => '_PUB');
920 WHEN OTHERS THEN
921 x_return_status := OKL_API.HANDLE_EXCEPTIONS(
922 p_api_name => l_api_name,
923 p_pkg_name => G_PKG_NAME,
924 p_exc_name => G_EXC_NAME_OTHERS,
925 x_msg_count => x_msg_count,
926 x_msg_data => x_msg_data,
927 p_api_type => '_PUB');
928 END update_pri_dep_of_sgt;
929
930 End okl_strm_gen_template_pub;