DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKC_CONTRACT_SEQ_PUB

Source


1 package body okc_contract_seq_pub as
2 /* $Header: OKCPKSQB.pls 120.0 2005/05/25 19:25:25 appldev noship $ */
3 	l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
4 
5   PROCEDURE create_seq_header(
6     p_api_version                  IN NUMBER,
7     p_init_msg_list                IN VARCHAR2 ,
8     x_return_status                OUT NOCOPY VARCHAR2,
9     x_msg_count                    OUT NOCOPY NUMBER,
10     x_msg_data                     OUT NOCOPY VARCHAR2,
11     p_ksqv_rec                     IN ksqv_rec_type,
12     x_ksqv_rec                     OUT NOCOPY ksqv_rec_type) IS
13   BEGIN
14     okc_contract_seq_pvt.create_seq_header(
15 	    p_api_version,
16 	    p_init_msg_list,
17 	    x_return_status,
18 	    x_msg_count,
19 	    x_msg_data,
20 	    p_ksqv_rec,
21 	    x_ksqv_rec);
22   END create_seq_header;
23 
24   PROCEDURE create_seq_header(
25     p_api_version                  IN NUMBER,
26     p_init_msg_list                IN VARCHAR2 ,
27     x_return_status                OUT NOCOPY VARCHAR2,
28     x_msg_count                    OUT NOCOPY NUMBER,
29     x_msg_data                     OUT NOCOPY VARCHAR2,
30     p_ksqv_tbl                     IN ksqv_tbl_type,
31     x_ksqv_tbl                     OUT NOCOPY ksqv_tbl_type) IS
32   BEGIN
33     okc_contract_seq_pvt.create_seq_header(
34 	    p_api_version,
35 	    p_init_msg_list,
36 	    x_return_status,
37 	    x_msg_count,
38 	    x_msg_data,
39 	    p_ksqv_tbl,
40 	    x_ksqv_tbl);
41   END create_seq_header;
42 
43   PROCEDURE update_seq_header(
44     p_api_version                  IN NUMBER,
45     p_init_msg_list                IN VARCHAR2 ,
46     x_return_status                OUT NOCOPY VARCHAR2,
47     x_msg_count                    OUT NOCOPY NUMBER,
48     x_msg_data                     OUT NOCOPY VARCHAR2,
49     p_ksqv_rec                     IN ksqv_rec_type,
50     x_ksqv_rec                     OUT NOCOPY ksqv_rec_type) IS
51   BEGIN
52     okc_contract_seq_pvt.update_seq_header(
53 	    p_api_version,
54 	    p_init_msg_list,
55 	    x_return_status,
56 	    x_msg_count,
57 	    x_msg_data,
58 	    p_ksqv_rec,
59 	    x_ksqv_rec);
60   END update_seq_header;
61 
62   PROCEDURE update_seq_header(
63     p_api_version                  IN NUMBER,
64     p_init_msg_list                IN VARCHAR2 ,
65     x_return_status                OUT NOCOPY VARCHAR2,
66     x_msg_count                    OUT NOCOPY NUMBER,
67     x_msg_data                     OUT NOCOPY VARCHAR2,
68     p_ksqv_tbl                     IN ksqv_tbl_type,
69     x_ksqv_tbl                     OUT NOCOPY ksqv_tbl_type) IS
70   BEGIN
71     okc_contract_seq_pvt.update_seq_header(
72 	    p_api_version,
73 	    p_init_msg_list,
74 	    x_return_status,
75 	    x_msg_count,
76 	    x_msg_data,
77 	    p_ksqv_tbl,
78 	    x_ksqv_tbl);
79   END update_seq_header;
80 
81   PROCEDURE delete_seq_header(
82     p_api_version                  IN NUMBER,
83     p_init_msg_list                IN VARCHAR2 ,
84     x_return_status                OUT NOCOPY VARCHAR2,
85     x_msg_count                    OUT NOCOPY NUMBER,
86     x_msg_data                     OUT NOCOPY VARCHAR2,
87     p_ksqv_rec                     IN ksqv_rec_type) IS
88   BEGIN
89     okc_contract_seq_pvt.delete_seq_header(
90 	    p_api_version,
91 	    p_init_msg_list,
92 	    x_return_status,
93 	    x_msg_count,
94 	    x_msg_data,
95 	    p_ksqv_rec);
96   END delete_seq_header;
97 
98   PROCEDURE delete_seq_header(
99     p_api_version                  IN NUMBER,
100     p_init_msg_list                IN VARCHAR2 ,
101     x_return_status                OUT NOCOPY VARCHAR2,
102     x_msg_count                    OUT NOCOPY NUMBER,
103     x_msg_data                     OUT NOCOPY VARCHAR2,
104     p_ksqv_tbl                     IN ksqv_tbl_type) IS
105   BEGIN
106     okc_contract_seq_pvt.delete_seq_header(
107 	    p_api_version,
108 	    p_init_msg_list,
109 	    x_return_status,
110 	    x_msg_count,
111 	    x_msg_data,
112 	    p_ksqv_tbl);
113   END delete_seq_header;
114 
115   PROCEDURE lock_seq_header(
116     p_api_version                  IN NUMBER,
117     p_init_msg_list                IN VARCHAR2 ,
118     x_return_status                OUT NOCOPY VARCHAR2,
119     x_msg_count                    OUT NOCOPY NUMBER,
120     x_msg_data                     OUT NOCOPY VARCHAR2,
121     p_ksqv_rec                     IN ksqv_rec_type) IS
122   BEGIN
123     okc_contract_seq_pvt.lock_seq_header(
124 	    p_api_version,
125 	    p_init_msg_list,
126 	    x_return_status,
127 	    x_msg_count,
128 	    x_msg_data,
129 	    p_ksqv_rec);
130   END lock_seq_header;
131 
132   PROCEDURE lock_seq_header(
133     p_api_version                  IN NUMBER,
134     p_init_msg_list                IN VARCHAR2 ,
135     x_return_status                OUT NOCOPY VARCHAR2,
136     x_msg_count                    OUT NOCOPY NUMBER,
137     x_msg_data                     OUT NOCOPY VARCHAR2,
138     p_ksqv_tbl                     IN ksqv_tbl_type) IS
139   BEGIN
140     okc_contract_seq_pvt.lock_seq_header(
141 	    p_api_version,
142 	    p_init_msg_list,
143 	    x_return_status,
144 	    x_msg_count,
145 	    x_msg_data,
146 	    p_ksqv_tbl);
147   END lock_seq_header;
148 
149   PROCEDURE validate_seq_header(
150     p_api_version                  IN NUMBER,
151     p_init_msg_list                IN VARCHAR2 ,
152     x_return_status                OUT NOCOPY VARCHAR2,
153     x_msg_count                    OUT NOCOPY NUMBER,
154     x_msg_data                     OUT NOCOPY VARCHAR2,
155     p_ksqv_rec                     IN ksqv_rec_type) IS
156   BEGIN
157     okc_contract_seq_pvt.validate_seq_header(
158 	    p_api_version,
159 	    p_init_msg_list,
160 	    x_return_status,
161 	    x_msg_count,
162 	    x_msg_data,
163 	    p_ksqv_rec);
164   END validate_seq_header;
165 
166   PROCEDURE validate_seq_header(
167     p_api_version                  IN NUMBER,
168     p_init_msg_list                IN VARCHAR2 ,
169     x_return_status                OUT NOCOPY VARCHAR2,
170     x_msg_count                    OUT NOCOPY NUMBER,
171     x_msg_data                     OUT NOCOPY VARCHAR2,
172     p_ksqv_tbl                     IN ksqv_tbl_type) IS
173   BEGIN
174     okc_contract_seq_pvt.validate_seq_header(
175 	    p_api_version,
176 	    p_init_msg_list,
177 	    x_return_status,
178 	    x_msg_count,
179 	    x_msg_data,
180 	    p_ksqv_tbl);
181   END validate_seq_header;
182 
183   PROCEDURE create_seq_lines(
184     p_api_version                  IN NUMBER,
185     p_init_msg_list                IN VARCHAR2 ,
186     x_return_status                OUT NOCOPY VARCHAR2,
187     x_msg_count                    OUT NOCOPY NUMBER,
188     x_msg_data                     OUT NOCOPY VARCHAR2,
189     p_lsqv_rec                     IN lsqv_rec_type,
190     x_lsqv_rec                     OUT NOCOPY lsqv_rec_type) IS
191   BEGIN
192     okc_contract_seq_pvt.create_seq_lines(
193 	    p_api_version,
194 	    p_init_msg_list,
195 	    x_return_status,
196 	    x_msg_count,
197 	    x_msg_data,
198 	    p_lsqv_rec,
199 	    x_lsqv_rec);
200   END create_seq_lines;
201 
202   PROCEDURE create_seq_lines(
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_lsqv_tbl                     IN lsqv_tbl_type,
209     x_lsqv_tbl                     OUT NOCOPY lsqv_tbl_type) IS
210   BEGIN
211     okc_contract_seq_pvt.create_seq_lines(
212 	    p_api_version,
213 	    p_init_msg_list,
214 	    x_return_status,
215 	    x_msg_count,
216 	    x_msg_data,
217 	    p_lsqv_tbl,
218 	    x_lsqv_tbl);
219   END create_seq_lines;
220 
221   PROCEDURE update_seq_lines(
222     p_api_version                  IN NUMBER,
223     p_init_msg_list                IN VARCHAR2 ,
224     x_return_status                OUT NOCOPY VARCHAR2,
225     x_msg_count                    OUT NOCOPY NUMBER,
226     x_msg_data                     OUT NOCOPY VARCHAR2,
227     p_lsqv_rec                     IN lsqv_rec_type,
228     x_lsqv_rec                     OUT NOCOPY lsqv_rec_type) IS
229   BEGIN
230     okc_contract_seq_pvt.update_seq_lines(
231 	    p_api_version,
232 	    p_init_msg_list,
233 	    x_return_status,
234 	    x_msg_count,
235 	    x_msg_data,
236 	    p_lsqv_rec,
237 	    x_lsqv_rec);
238   END update_seq_lines;
239 
240   PROCEDURE update_seq_lines(
241     p_api_version                  IN NUMBER,
242     p_init_msg_list                IN VARCHAR2 ,
243     x_return_status                OUT NOCOPY VARCHAR2,
244     x_msg_count                    OUT NOCOPY NUMBER,
245     x_msg_data                     OUT NOCOPY VARCHAR2,
246     p_lsqv_tbl                     IN lsqv_tbl_type,
247     x_lsqv_tbl                     OUT NOCOPY lsqv_tbl_type) IS
248   BEGIN
249     okc_contract_seq_pvt.update_seq_lines(
250 	    p_api_version,
251 	    p_init_msg_list,
252 	    x_return_status,
253 	    x_msg_count,
254 	    x_msg_data,
255 	    p_lsqv_tbl,
256 	    x_lsqv_tbl);
257   END update_seq_lines;
258 
259   PROCEDURE delete_seq_lines(
260     p_api_version                  IN NUMBER,
261     p_init_msg_list                IN VARCHAR2 ,
262     x_return_status                OUT NOCOPY VARCHAR2,
263     x_msg_count                    OUT NOCOPY NUMBER,
264     x_msg_data                     OUT NOCOPY VARCHAR2,
265     p_lsqv_rec                     IN lsqv_rec_type) IS
266   BEGIN
267     okc_contract_seq_pvt.delete_seq_lines(
268 	    p_api_version,
269 	    p_init_msg_list,
270 	    x_return_status,
271 	    x_msg_count,
272 	    x_msg_data,
273 	    p_lsqv_rec);
274   END delete_seq_lines;
275 
276   PROCEDURE delete_seq_lines(
277     p_api_version                  IN NUMBER,
278     p_init_msg_list                IN VARCHAR2 ,
279     x_return_status                OUT NOCOPY VARCHAR2,
280     x_msg_count                    OUT NOCOPY NUMBER,
281     x_msg_data                     OUT NOCOPY VARCHAR2,
282     p_lsqv_tbl                     IN lsqv_tbl_type) IS
283   BEGIN
284     okc_contract_seq_pvt.delete_seq_lines(
285 	    p_api_version,
286 	    p_init_msg_list,
287 	    x_return_status,
288 	    x_msg_count,
289 	    x_msg_data,
290 	    p_lsqv_tbl);
291   END delete_seq_lines;
292 
293   PROCEDURE lock_seq_lines(
294     p_api_version                  IN NUMBER,
295     p_init_msg_list                IN VARCHAR2 ,
296     x_return_status                OUT NOCOPY VARCHAR2,
297     x_msg_count                    OUT NOCOPY NUMBER,
298     x_msg_data                     OUT NOCOPY VARCHAR2,
299     p_lsqv_rec                     IN lsqv_rec_type) IS
300   BEGIN
301     okc_contract_seq_pvt.lock_seq_lines(
302 	    p_api_version,
303 	    p_init_msg_list,
304 	    x_return_status,
305 	    x_msg_count,
306 	    x_msg_data,
307 	    p_lsqv_rec);
308   END lock_seq_lines;
309 
310   PROCEDURE lock_seq_lines(
311     p_api_version                  IN NUMBER,
312     p_init_msg_list                IN VARCHAR2 ,
313     x_return_status                OUT NOCOPY VARCHAR2,
314     x_msg_count                    OUT NOCOPY NUMBER,
315     x_msg_data                     OUT NOCOPY VARCHAR2,
316     p_lsqv_tbl                     IN lsqv_tbl_type) IS
317   BEGIN
318     okc_contract_seq_pvt.lock_seq_lines(
319 	    p_api_version,
320 	    p_init_msg_list,
321 	    x_return_status,
322 	    x_msg_count,
323 	    x_msg_data,
324 	    p_lsqv_tbl);
325   END lock_seq_lines;
326 
327   PROCEDURE validate_seq_lines(
328     p_api_version                  IN NUMBER,
329     p_init_msg_list                IN VARCHAR2 ,
330     x_return_status                OUT NOCOPY VARCHAR2,
331     x_msg_count                    OUT NOCOPY NUMBER,
332     x_msg_data                     OUT NOCOPY VARCHAR2,
333     p_lsqv_rec                     IN lsqv_rec_type) IS
334   BEGIN
335     okc_contract_seq_pvt.validate_seq_lines(
336 	    p_api_version,
337 	    p_init_msg_list,
338 	    x_return_status,
339 	    x_msg_count,
340 	    x_msg_data,
341 	    p_lsqv_rec);
342   END validate_seq_lines;
343 
344   PROCEDURE validate_seq_lines(
345     p_api_version                  IN NUMBER,
346     p_init_msg_list                IN VARCHAR2 ,
347     x_return_status                OUT NOCOPY VARCHAR2,
348     x_msg_count                    OUT NOCOPY NUMBER,
349     x_msg_data                     OUT NOCOPY VARCHAR2,
350     p_lsqv_tbl                     IN lsqv_tbl_type) IS
351   BEGIN
352     okc_contract_seq_pvt.validate_seq_lines(
353 	    p_api_version,
354 	    p_init_msg_list,
355 	    x_return_status,
356 	    x_msg_count,
357 	    x_msg_data,
358 	    p_lsqv_tbl);
359   END validate_seq_lines;
360 
361   PROCEDURE Is_K_Autogenerated(
362     p_scs_code Varchar2,
363     x_return_status OUT NOCOPY Varchar2) IS
364   BEGIN
365     okc_contract_seq_pvt.Is_K_Autogenerated(
366             p_scs_code,
367             x_return_status);
368   END Is_K_Autogenerated;
369 
370   PROCEDURE Get_K_Number(
371     p_scs_code                     IN VARCHAR2,
372     p_contract_number_modifier     IN VARCHAR2,
373     x_contract_number              OUT NOCOPY VARCHAR2,
374     x_return_status                OUT NOCOPY VARCHAR2) IS
375   BEGIN
376     okc_contract_seq_pvt.Get_K_Number(
377             p_scs_code,
378             p_contract_number_modifier,
379             x_contract_number,
380             x_return_status);
381   END Get_K_Number;
382 
383 END okc_contract_seq_pub;