[Home] [Help]
PACKAGE BODY: APPS.OKC_ASSENT_PVT
Source
1 Package Body OKC_ASSENT_PVT AS
2 /* $Header: OKCCASTB.pls 120.0 2005/05/25 19:27:07 appldev noship $ */
3
4 l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
5
6 PROCEDURE add_language IS
7 BEGIN
8 okc_sts_pvt.add_language;
9 END;
10
11 --------------------------------------
12 --PROCEDURE create_assent
13 --------------------------------------
14 PROCEDURE create_assent(
15 p_api_version IN NUMBER,
16 p_init_msg_list IN VARCHAR2 ,
17 x_return_status OUT NOCOPY VARCHAR2,
18 x_msg_count OUT NOCOPY NUMBER,
19 x_msg_data OUT NOCOPY VARCHAR2,
20 p_astv_rec IN astv_rec_type,
21 x_astv_rec OUT NOCOPY astv_rec_type) IS
22 BEGIN
23 OKC_AST_PVT.Insert_row(
24 p_api_version,
25 p_init_msg_list,
26 x_return_status,
27 x_msg_count,
28 x_msg_data,
29 p_astv_rec,
30 x_astv_rec);
31 END create_assent;
32
33 --------------------------------------
34 --PROCEDURE create_assent
35 --------------------------------------
36 PROCEDURE create_assent(
37 p_api_version IN NUMBER,
38 p_init_msg_list IN VARCHAR2 ,
39 x_return_status OUT NOCOPY VARCHAR2,
40 x_msg_count OUT NOCOPY NUMBER,
41 x_msg_data OUT NOCOPY VARCHAR2,
42 p_astv_tbl IN astv_tbl_type,
43 x_astv_tbl OUT NOCOPY astv_tbl_type) IS
44 BEGIN
45 OKC_AST_PVT.Insert_row(
46 p_api_version,
47 p_init_msg_list,
48 x_return_status,
49 x_msg_count,
50 x_msg_data,
51 p_astv_tbl,
52 x_astv_tbl);
53 END create_assent;
54
55 --------------------------------------
56 --PROCEDURE update_assent
57 --------------------------------------
58 PROCEDURE update_assent(
59 p_api_version IN NUMBER,
60 p_init_msg_list IN VARCHAR2 ,
61 x_return_status OUT NOCOPY VARCHAR2,
62 x_msg_count OUT NOCOPY NUMBER,
63 x_msg_data OUT NOCOPY VARCHAR2,
64 p_astv_rec IN astv_rec_type,
65 x_astv_rec OUT NOCOPY astv_rec_type) IS
66 BEGIN
67 OKC_AST_PVT.update_row(
68 p_api_version,
69 p_init_msg_list,
70 x_return_status,
71 x_msg_count,
72 x_msg_data,
73 p_astv_rec,
74 x_astv_rec);
75 END update_assent;
76
77 --------------------------------------
78 --PROCEDURE update_assent
79 --------------------------------------
80 PROCEDURE update_assent(
81 p_api_version IN NUMBER,
82 p_init_msg_list IN VARCHAR2 ,
83 x_return_status OUT NOCOPY VARCHAR2,
84 x_msg_count OUT NOCOPY NUMBER,
85 x_msg_data OUT NOCOPY VARCHAR2,
86 p_astv_tbl IN astv_tbl_type,
87 x_astv_tbl OUT NOCOPY astv_tbl_type) IS
88 BEGIN
89 OKC_AST_PVT.update_row(
90 p_api_version,
91 p_init_msg_list,
92 x_return_status,
93 x_msg_count,
94 x_msg_data,
95 p_astv_tbl,
96 x_astv_tbl);
97 END update_assent;
98
99 --------------------------------------
100 --PROCEDURE delete_assent
101 --------------------------------------
102 PROCEDURE delete_assent(
103 p_api_version IN NUMBER,
104 p_init_msg_list IN VARCHAR2 ,
105 x_return_status OUT NOCOPY VARCHAR2,
106 x_msg_count OUT NOCOPY NUMBER,
107 x_msg_data OUT NOCOPY VARCHAR2,
108 p_astv_rec IN astv_rec_type) IS
109 BEGIN
110 OKC_AST_PVT.delete_row(
111 p_api_version,
112 p_init_msg_list,
113 x_return_status,
114 x_msg_count,
115 x_msg_data,
116 p_astv_rec);
117 END delete_assent;
118
119 --------------------------------------
120 --PROCEDURE delete_assent
121 --------------------------------------
122 PROCEDURE delete_assent(
123 p_api_version IN NUMBER,
124 p_init_msg_list IN VARCHAR2 ,
125 x_return_status OUT NOCOPY VARCHAR2,
126 x_msg_count OUT NOCOPY NUMBER,
127 x_msg_data OUT NOCOPY VARCHAR2,
128 p_astv_tbl IN astv_tbl_type) IS
129 BEGIN
130 OKC_AST_PVT.delete_row(
131 p_api_version,
132 p_init_msg_list,
133 x_return_status,
134 x_msg_count,
135 x_msg_data,
136 p_astv_tbl);
137 END delete_assent;
138
139 --------------------------------------
140 --PROCEDURE validate_assent
141 --------------------------------------
142 PROCEDURE validate_assent(
143 p_api_version IN NUMBER,
144 p_init_msg_list IN VARCHAR2 ,
145 x_return_status OUT NOCOPY VARCHAR2,
146 x_msg_count OUT NOCOPY NUMBER,
147 x_msg_data OUT NOCOPY VARCHAR2,
148 p_astv_rec IN astv_rec_type) IS
149 BEGIN
150 OKC_AST_PVT.validate_row(
151 p_api_version,
152 p_init_msg_list,
153 x_return_status,
154 x_msg_count,
155 x_msg_data,
156 p_astv_rec);
157 END validate_assent;
158
159 --------------------------------------
160 --PROCEDURE validate_assent
161 --------------------------------------
162 PROCEDURE validate_assent(
163 p_api_version IN NUMBER,
164 p_init_msg_list IN VARCHAR2 ,
165 x_return_status OUT NOCOPY VARCHAR2,
166 x_msg_count OUT NOCOPY NUMBER,
167 x_msg_data OUT NOCOPY VARCHAR2,
168 p_astv_tbl IN astv_tbl_type) IS
169 BEGIN
170 OKC_AST_PVT.validate_row(
171 p_api_version,
172 p_init_msg_list,
173 x_return_status,
174 x_msg_count,
175 x_msg_data,
176 p_astv_tbl);
177 END validate_assent;
178
179 --------------------------------------
180 --PROCEDURE lock_assent
181 --------------------------------------
182 PROCEDURE lock_assent(
183 p_api_version IN NUMBER,
184 p_init_msg_list IN VARCHAR2 ,
185 x_return_status OUT NOCOPY VARCHAR2,
186 x_msg_count OUT NOCOPY NUMBER,
187 x_msg_data OUT NOCOPY VARCHAR2,
188 p_astv_rec IN astv_rec_type) IS
189 BEGIN
190 OKC_AST_PVT.lock_row(
191 p_api_version,
192 p_init_msg_list,
193 x_return_status,
194 x_msg_count,
195 x_msg_data,
196 p_astv_rec);
197 END lock_assent;
198
199 --------------------------------------
200 --PROCEDURE lock_assent
201 --------------------------------------
202 PROCEDURE lock_assent(
203 p_api_version IN NUMBER,
204 p_init_msg_list IN VARCHAR2 ,
205 x_return_status OUT NOCOPY VARCHAR2,
206 x_msg_count OUT NOCOPY NUMBER,
207 x_msg_data OUT NOCOPY VARCHAR2,
208 p_astv_tbl IN astv_tbl_type) IS
209 BEGIN
210 OKC_AST_PVT.lock_row(
211 p_api_version,
212 p_init_msg_list,
213 x_return_status,
214 x_msg_count,
215 x_msg_data,
216 p_astv_tbl);
217 END lock_assent;
218
219 --------------------------------------
220 -- FUNCTION header_operation_allowed
221 --------------------------------------
222 FUNCTION header_operation_allowed(
223 p_header_id IN NUMBER,
224 p_opn_code IN VARCHAR2,
225 p_crt_id IN NUMBER) return varchar2 IS
226 l_return_status VARCHAR2(1);
227 BEGIN
228 l_return_status := OKC_AST_PVT.header_operation_allowed(
229 p_header_id,
230 p_opn_code,
231 p_crt_id);
232 Return(l_return_status);
233 END header_operation_allowed;
234
235 --------------------------------------
236 -- FUNCTION line_operation_allowed
237 --------------------------------------
238 FUNCTION line_operation_allowed(
239 p_line_id IN NUMBER,
240 p_opn_code IN VARCHAR2) return varchar2 IS
241 l_return_status VARCHAR2(1);
242 BEGIN
243 l_return_status := OKC_AST_PVT.line_operation_allowed(
244 p_line_id,
245 p_opn_code);
246 Return(l_return_status);
247 END line_operation_allowed;
248
249 --------------------------------------
250 --PROCEDURE create_status
251 --------------------------------------
252 PROCEDURE create_status(
253 p_api_version IN NUMBER,
254 p_init_msg_list IN VARCHAR2 ,
255 x_return_status OUT NOCOPY VARCHAR2,
256 x_msg_count OUT NOCOPY NUMBER,
257 x_msg_data OUT NOCOPY VARCHAR2,
258 p_stsv_rec IN stsv_rec_type,
259 x_stsv_rec OUT NOCOPY stsv_rec_type) IS
260 BEGIN
261 OKC_STS_PVT.Insert_row(
262 p_api_version,
263 p_init_msg_list,
264 x_return_status,
265 x_msg_count,
266 x_msg_data,
267 p_stsv_rec,
268 x_stsv_rec);
269 END create_status;
270
271 --------------------------------------
272 --PROCEDURE create_status
273 --------------------------------------
274 PROCEDURE create_status(
275 p_api_version IN NUMBER,
276 p_init_msg_list IN VARCHAR2 ,
277 x_return_status OUT NOCOPY VARCHAR2,
278 x_msg_count OUT NOCOPY NUMBER,
279 x_msg_data OUT NOCOPY VARCHAR2,
280 p_stsv_tbl IN stsv_tbl_type,
281 x_stsv_tbl OUT NOCOPY stsv_tbl_type) IS
282 BEGIN
283 OKC_STS_PVT.Insert_row(
284 p_api_version,
285 p_init_msg_list,
286 x_return_status,
287 x_msg_count,
288 x_msg_data,
289 p_stsv_tbl,
290 x_stsv_tbl);
291 END create_status;
292
293 --------------------------------------
294 --PROCEDURE update_status
295 --------------------------------------
296 PROCEDURE update_status(
297 p_api_version IN NUMBER,
298 p_init_msg_list IN VARCHAR2 ,
299 x_return_status OUT NOCOPY VARCHAR2,
300 x_msg_count OUT NOCOPY NUMBER,
301 x_msg_data OUT NOCOPY VARCHAR2,
302 p_stsv_rec IN stsv_rec_type,
303 x_stsv_rec OUT NOCOPY stsv_rec_type) IS
304 BEGIN
305 OKC_STS_PVT.update_row(
306 p_api_version,
307 p_init_msg_list,
308 x_return_status,
309 x_msg_count,
310 x_msg_data,
311 p_stsv_rec,
312 x_stsv_rec);
313 END update_status;
314
315 --------------------------------------
316 --PROCEDURE update_status
317 --------------------------------------
318 PROCEDURE update_status(
319 p_api_version IN NUMBER,
320 p_init_msg_list IN VARCHAR2 ,
321 x_return_status OUT NOCOPY VARCHAR2,
322 x_msg_count OUT NOCOPY NUMBER,
323 x_msg_data OUT NOCOPY VARCHAR2,
324 p_stsv_tbl IN stsv_tbl_type,
325 x_stsv_tbl OUT NOCOPY stsv_tbl_type) IS
326 BEGIN
327 OKC_STS_PVT.update_row(
328 p_api_version,
329 p_init_msg_list,
330 x_return_status,
331 x_msg_count,
332 x_msg_data,
333 p_stsv_tbl,
334 x_stsv_tbl);
335 END update_status;
336
337 --------------------------------------
338 --PROCEDURE delete_status
339 --------------------------------------
340 PROCEDURE delete_status(
341 p_api_version IN NUMBER,
342 p_init_msg_list IN VARCHAR2 ,
343 x_return_status OUT NOCOPY VARCHAR2,
344 x_msg_count OUT NOCOPY NUMBER,
345 x_msg_data OUT NOCOPY VARCHAR2,
346 p_stsv_rec IN stsv_rec_type) IS
347 BEGIN
348 OKC_STS_PVT.delete_row(
349 p_api_version,
350 p_init_msg_list,
351 x_return_status,
352 x_msg_count,
353 x_msg_data,
354 p_stsv_rec);
355 END delete_status;
356
357 --------------------------------------
358 --PROCEDURE delete_status
359 --------------------------------------
360 PROCEDURE delete_status(
361 p_api_version IN NUMBER,
362 p_init_msg_list IN VARCHAR2 ,
363 x_return_status OUT NOCOPY VARCHAR2,
364 x_msg_count OUT NOCOPY NUMBER,
365 x_msg_data OUT NOCOPY VARCHAR2,
366 p_stsv_tbl IN stsv_tbl_type) IS
367 BEGIN
368 OKC_STS_PVT.delete_row(
369 p_api_version,
370 p_init_msg_list,
371 x_return_status,
372 x_msg_count,
373 x_msg_data,
374 p_stsv_tbl);
375 END delete_status;
376
377 --------------------------------------
378 --PROCEDURE lock_status
379 --------------------------------------
380 PROCEDURE lock_status(
381 p_api_version IN NUMBER,
382 p_init_msg_list IN VARCHAR2 ,
383 x_return_status OUT NOCOPY VARCHAR2,
384 x_msg_count OUT NOCOPY NUMBER,
385 x_msg_data OUT NOCOPY VARCHAR2,
386 p_stsv_rec IN stsv_rec_type) IS
387 BEGIN
388 OKC_STS_PVT.lock_row(
389 p_api_version,
390 p_init_msg_list,
391 x_return_status,
392 x_msg_count,
393 x_msg_data,
394 p_stsv_rec);
395 END lock_status;
396
397 --------------------------------------
398 --PROCEDURE lock_status
399 --------------------------------------
400 PROCEDURE lock_status(
401 p_api_version IN NUMBER,
402 p_init_msg_list IN VARCHAR2 ,
403 x_return_status OUT NOCOPY VARCHAR2,
404 x_msg_count OUT NOCOPY NUMBER,
405 x_msg_data OUT NOCOPY VARCHAR2,
406 p_stsv_tbl IN stsv_tbl_type) IS
407 BEGIN
408 OKC_STS_PVT.lock_row(
409 p_api_version,
410 p_init_msg_list,
411 x_return_status,
412 x_msg_count,
413 x_msg_data,
414 p_stsv_tbl);
415 END lock_status;
416
417 --------------------------------------
418 --PROCEDURE validate_status
419 --------------------------------------
420 PROCEDURE validate_status(
421 p_api_version IN NUMBER,
422 p_init_msg_list IN VARCHAR2 ,
423 x_return_status OUT NOCOPY VARCHAR2,
424 x_msg_count OUT NOCOPY NUMBER,
425 x_msg_data OUT NOCOPY VARCHAR2,
426 p_stsv_rec IN stsv_rec_type) IS
427 BEGIN
428 OKC_STS_PVT.validate_row(
429 p_api_version,
430 p_init_msg_list,
431 x_return_status,
432 x_msg_count,
433 x_msg_data,
434 p_stsv_rec);
435 END validate_status;
436
437 --------------------------------------
438 --PROCEDURE validate_status
439 --------------------------------------
440 PROCEDURE validate_status(
441 p_api_version IN NUMBER,
442 p_init_msg_list IN VARCHAR2 ,
443 x_return_status OUT NOCOPY VARCHAR2,
444 x_msg_count OUT NOCOPY NUMBER,
445 x_msg_data OUT NOCOPY VARCHAR2,
446 p_stsv_tbl IN stsv_tbl_type) IS
447 BEGIN
448 OKC_STS_PVT.validate_row(
449 p_api_version,
450 p_init_msg_list,
451 x_return_status,
452 x_msg_count,
453 x_msg_data,
454 p_stsv_tbl);
455 END validate_status;
456
457 PROCEDURE get_default_status(
458 x_return_status OUT NOCOPY VARCHAR2,
459 p_status_type IN VARCHAR2,
460 x_status_code OUT NOCOPY VARCHAR2) IS
461 BEGIN
462 OKC_STS_PVT.get_default_status(
463 x_return_status,
464 p_status_type,
465 x_status_code);
466 END get_default_status;
467
468 PROCEDURE validate_unique_code(
469 p_stsv_rec IN stsv_rec_type,
470 x_return_status OUT NOCOPY VARCHAR2) IS
471 BEGIN
472 OKC_STS_PVT.validate_unique_code(
473 p_stsv_rec,
474 x_return_status);
475 END validate_unique_code;
476
477 PROCEDURE validate_unique_meaning(
478 p_stsv_rec IN stsv_rec_type,
479 x_return_status OUT NOCOPY VARCHAR2) IS
480 BEGIN
481 OKC_STS_PVT.validate_unique_meaning(
482 p_stsv_rec,
483 x_return_status);
484 END validate_unique_meaning;
485
486 END okc_assent_pvt;
487