eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.OKL_SETUPPSTYPES_PUB_W

Source


1 package body okl_setuppstypes_pub_w as
2   /* $Header: OKLUSPSB.pls 120.1 2005/07/19 07:31:33 asawanka noship $ */
3   rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4   rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5 
6   -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7   function rosetta_g_miss_date_in_map(d date) return date as
8   begin
9     if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10     return d;
11   end;
12 
13   function rosetta_g_miss_num_map(n number) return number as
14     a number := fnd_api.g_miss_num;
15     b number := 0-1962.0724;
16   begin
17     if n=a then return b; end if;
18     if n=b then return a; end if;
19     return n;
20   end;
21 
22   procedure get_rec(x_return_status out nocopy  VARCHAR2
23     , x_msg_data out nocopy  VARCHAR2
24     , x_no_data_found out nocopy  number
25     , p4_a0 out nocopy  NUMBER
26     , p4_a1 out nocopy  DATE
27     , p4_a2 out nocopy  DATE
28     , p4_a3 out nocopy  NUMBER
29     , p4_a4 out nocopy  VARCHAR2
30     , p4_a5 out nocopy  NUMBER
31     , p4_a6 out nocopy  NUMBER
32     , p4_a7 out nocopy  NUMBER
33     , p4_a8 out nocopy  DATE
34     , p4_a9 out nocopy  DATE
35     , p4_a10 out nocopy  NUMBER
36     , p4_a11 out nocopy  NUMBER
37     , p0_a0  NUMBER := 0-1962.0724
38     , p0_a1  DATE := fnd_api.g_miss_date
39     , p0_a2  DATE := fnd_api.g_miss_date
40     , p0_a3  NUMBER := 0-1962.0724
41     , p0_a4  VARCHAR2 := fnd_api.g_miss_char
42     , p0_a5  NUMBER := 0-1962.0724
43     , p0_a6  NUMBER := 0-1962.0724
44     , p0_a7  NUMBER := 0-1962.0724
45     , p0_a8  DATE := fnd_api.g_miss_date
46     , p0_a9  DATE := fnd_api.g_miss_date
47     , p0_a10  NUMBER := 0-1962.0724
48     , p0_a11  NUMBER := 0-1962.0724
49   )
50 
51   as
52     ddp_psyv_rec okl_setuppstypes_pub.psyv_rec_type;
53     ddx_no_data_found boolean;
54     ddx_psyv_rec okl_setuppstypes_pub.psyv_rec_type;
55     ddindx binary_integer; indx binary_integer;
56   begin
57 
58     -- copy data to the local IN or IN-OUT args, if any
59     ddp_psyv_rec.id := rosetta_g_miss_num_map(p0_a0);
60     ddp_psyv_rec.from_date := rosetta_g_miss_date_in_map(p0_a1);
61     ddp_psyv_rec.to_date := rosetta_g_miss_date_in_map(p0_a2);
62     ddp_psyv_rec.object_version_number := rosetta_g_miss_num_map(p0_a3);
63     ddp_psyv_rec.accrual_yn := p0_a4;
64     ddp_psyv_rec.sty_id := rosetta_g_miss_num_map(p0_a5);
65     ddp_psyv_rec.pdt_id := rosetta_g_miss_num_map(p0_a6);
66     ddp_psyv_rec.created_by := rosetta_g_miss_num_map(p0_a7);
67     ddp_psyv_rec.creation_date := rosetta_g_miss_date_in_map(p0_a8);
68     ddp_psyv_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a9);
69     ddp_psyv_rec.last_updated_by := rosetta_g_miss_num_map(p0_a10);
70     ddp_psyv_rec.last_update_login := rosetta_g_miss_num_map(p0_a11);
71 
72 
73 
74 
75 
76     -- here's the delegated call to the old PL/SQL routine
77     okl_setuppstypes_pub.get_rec(ddp_psyv_rec,
78       x_return_status,
79       x_msg_data,
80       ddx_no_data_found,
81       ddx_psyv_rec);
82 
83     -- copy data back from the local variables to OUT or IN-OUT args, if any
84 
85 
86 
87   if ddx_no_data_found is null
88     then x_no_data_found := null;
89   elsif ddx_no_data_found
90     then x_no_data_found := 1;
91   else x_no_data_found := 0;
92   end if;
93 
94     p4_a0 := rosetta_g_miss_num_map(ddx_psyv_rec.id);
95     p4_a1 := ddx_psyv_rec.from_date;
96     p4_a2 := ddx_psyv_rec.to_date;
97     p4_a3 := rosetta_g_miss_num_map(ddx_psyv_rec.object_version_number);
98     p4_a4 := ddx_psyv_rec.accrual_yn;
99     p4_a5 := rosetta_g_miss_num_map(ddx_psyv_rec.sty_id);
100     p4_a6 := rosetta_g_miss_num_map(ddx_psyv_rec.pdt_id);
101     p4_a7 := rosetta_g_miss_num_map(ddx_psyv_rec.created_by);
102     p4_a8 := ddx_psyv_rec.creation_date;
103     p4_a9 := ddx_psyv_rec.last_update_date;
104     p4_a10 := rosetta_g_miss_num_map(ddx_psyv_rec.last_updated_by);
105     p4_a11 := rosetta_g_miss_num_map(ddx_psyv_rec.last_update_login);
106   end;
107 
108   procedure insert_pstypes(p_api_version  NUMBER
109     , p_init_msg_list  VARCHAR2
110     , x_return_status out nocopy  VARCHAR2
111     , x_msg_count out nocopy  NUMBER
112     , x_msg_data out nocopy  VARCHAR2
113     , p7_a0 out nocopy  NUMBER
114     , p7_a1 out nocopy  DATE
115     , p7_a2 out nocopy  DATE
116     , p7_a3 out nocopy  NUMBER
117     , p7_a4 out nocopy  VARCHAR2
118     , p7_a5 out nocopy  NUMBER
119     , p7_a6 out nocopy  NUMBER
120     , p7_a7 out nocopy  NUMBER
121     , p7_a8 out nocopy  DATE
122     , p7_a9 out nocopy  DATE
123     , p7_a10 out nocopy  NUMBER
124     , p7_a11 out nocopy  NUMBER
125     , p5_a0  NUMBER := 0-1962.0724
126     , p5_a1  NUMBER := 0-1962.0724
127     , p5_a2  NUMBER := 0-1962.0724
128     , p5_a3  NUMBER := 0-1962.0724
129     , p5_a4  VARCHAR2 := fnd_api.g_miss_char
130     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
131     , p5_a6  NUMBER := 0-1962.0724
132     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
133     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
134     , p5_a9  DATE := fnd_api.g_miss_date
135     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
136     , p5_a11  DATE := fnd_api.g_miss_date
137     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
138     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
139     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
140     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
141     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
142     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
143     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
144     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
145     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
146     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
147     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
148     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
149     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
150     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
151     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
152     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
153     , p5_a28  NUMBER := 0-1962.0724
154     , p5_a29  DATE := fnd_api.g_miss_date
155     , p5_a30  NUMBER := 0-1962.0724
156     , p5_a31  DATE := fnd_api.g_miss_date
157     , p5_a32  NUMBER := 0-1962.0724
158     , p6_a0  NUMBER := 0-1962.0724
159     , p6_a1  DATE := fnd_api.g_miss_date
160     , p6_a2  DATE := fnd_api.g_miss_date
161     , p6_a3  NUMBER := 0-1962.0724
162     , p6_a4  VARCHAR2 := fnd_api.g_miss_char
163     , p6_a5  NUMBER := 0-1962.0724
164     , p6_a6  NUMBER := 0-1962.0724
165     , p6_a7  NUMBER := 0-1962.0724
166     , p6_a8  DATE := fnd_api.g_miss_date
167     , p6_a9  DATE := fnd_api.g_miss_date
168     , p6_a10  NUMBER := 0-1962.0724
169     , p6_a11  NUMBER := 0-1962.0724
170   )
171 
172   as
173     ddp_pdtv_rec okl_setuppstypes_pub.pdtv_rec_type;
174     ddp_psyv_rec okl_setuppstypes_pub.psyv_rec_type;
175     ddx_psyv_rec okl_setuppstypes_pub.psyv_rec_type;
176     ddindx binary_integer; indx binary_integer;
177   begin
178 
179     -- copy data to the local IN or IN-OUT args, if any
180 
181 
182 
183 
184 
185     ddp_pdtv_rec.id := rosetta_g_miss_num_map(p5_a0);
186     ddp_pdtv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
187     ddp_pdtv_rec.aes_id := rosetta_g_miss_num_map(p5_a2);
188     ddp_pdtv_rec.ptl_id := rosetta_g_miss_num_map(p5_a3);
189     ddp_pdtv_rec.name := p5_a4;
190     ddp_pdtv_rec.description := p5_a5;
191     ddp_pdtv_rec.reporting_pdt_id := rosetta_g_miss_num_map(p5_a6);
192     ddp_pdtv_rec.product_status_code := p5_a7;
193     ddp_pdtv_rec.legacy_product_yn := p5_a8;
194     ddp_pdtv_rec.from_date := rosetta_g_miss_date_in_map(p5_a9);
195     ddp_pdtv_rec.version := p5_a10;
196     ddp_pdtv_rec.to_date := rosetta_g_miss_date_in_map(p5_a11);
197     ddp_pdtv_rec.attribute_category := p5_a12;
198     ddp_pdtv_rec.attribute1 := p5_a13;
199     ddp_pdtv_rec.attribute2 := p5_a14;
200     ddp_pdtv_rec.attribute3 := p5_a15;
201     ddp_pdtv_rec.attribute4 := p5_a16;
202     ddp_pdtv_rec.attribute5 := p5_a17;
203     ddp_pdtv_rec.attribute6 := p5_a18;
204     ddp_pdtv_rec.attribute7 := p5_a19;
205     ddp_pdtv_rec.attribute8 := p5_a20;
206     ddp_pdtv_rec.attribute9 := p5_a21;
207     ddp_pdtv_rec.attribute10 := p5_a22;
208     ddp_pdtv_rec.attribute11 := p5_a23;
209     ddp_pdtv_rec.attribute12 := p5_a24;
210     ddp_pdtv_rec.attribute13 := p5_a25;
211     ddp_pdtv_rec.attribute14 := p5_a26;
212     ddp_pdtv_rec.attribute15 := p5_a27;
213     ddp_pdtv_rec.created_by := rosetta_g_miss_num_map(p5_a28);
214     ddp_pdtv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a29);
215     ddp_pdtv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a30);
216     ddp_pdtv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a31);
217     ddp_pdtv_rec.last_update_login := rosetta_g_miss_num_map(p5_a32);
218 
219     ddp_psyv_rec.id := rosetta_g_miss_num_map(p6_a0);
220     ddp_psyv_rec.from_date := rosetta_g_miss_date_in_map(p6_a1);
221     ddp_psyv_rec.to_date := rosetta_g_miss_date_in_map(p6_a2);
222     ddp_psyv_rec.object_version_number := rosetta_g_miss_num_map(p6_a3);
223     ddp_psyv_rec.accrual_yn := p6_a4;
224     ddp_psyv_rec.sty_id := rosetta_g_miss_num_map(p6_a5);
225     ddp_psyv_rec.pdt_id := rosetta_g_miss_num_map(p6_a6);
226     ddp_psyv_rec.created_by := rosetta_g_miss_num_map(p6_a7);
227     ddp_psyv_rec.creation_date := rosetta_g_miss_date_in_map(p6_a8);
228     ddp_psyv_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a9);
229     ddp_psyv_rec.last_updated_by := rosetta_g_miss_num_map(p6_a10);
230     ddp_psyv_rec.last_update_login := rosetta_g_miss_num_map(p6_a11);
231 
232 
233     -- here's the delegated call to the old PL/SQL routine
234     okl_setuppstypes_pub.insert_pstypes(p_api_version,
235       p_init_msg_list,
236       x_return_status,
237       x_msg_count,
238       x_msg_data,
239       ddp_pdtv_rec,
240       ddp_psyv_rec,
241       ddx_psyv_rec);
242 
243     -- copy data back from the local variables to OUT or IN-OUT args, if any
244 
245 
246 
247 
248 
249 
250 
251     p7_a0 := rosetta_g_miss_num_map(ddx_psyv_rec.id);
252     p7_a1 := ddx_psyv_rec.from_date;
253     p7_a2 := ddx_psyv_rec.to_date;
254     p7_a3 := rosetta_g_miss_num_map(ddx_psyv_rec.object_version_number);
255     p7_a4 := ddx_psyv_rec.accrual_yn;
256     p7_a5 := rosetta_g_miss_num_map(ddx_psyv_rec.sty_id);
257     p7_a6 := rosetta_g_miss_num_map(ddx_psyv_rec.pdt_id);
258     p7_a7 := rosetta_g_miss_num_map(ddx_psyv_rec.created_by);
259     p7_a8 := ddx_psyv_rec.creation_date;
260     p7_a9 := ddx_psyv_rec.last_update_date;
261     p7_a10 := rosetta_g_miss_num_map(ddx_psyv_rec.last_updated_by);
262     p7_a11 := rosetta_g_miss_num_map(ddx_psyv_rec.last_update_login);
263   end;
264 
265   procedure update_pstypes(p_api_version  NUMBER
266     , p_init_msg_list  VARCHAR2
267     , x_return_status out nocopy  VARCHAR2
268     , x_msg_count out nocopy  NUMBER
269     , x_msg_data out nocopy  VARCHAR2
270     , p7_a0 out nocopy  NUMBER
271     , p7_a1 out nocopy  DATE
272     , p7_a2 out nocopy  DATE
273     , p7_a3 out nocopy  NUMBER
274     , p7_a4 out nocopy  VARCHAR2
275     , p7_a5 out nocopy  NUMBER
276     , p7_a6 out nocopy  NUMBER
277     , p7_a7 out nocopy  NUMBER
278     , p7_a8 out nocopy  DATE
279     , p7_a9 out nocopy  DATE
280     , p7_a10 out nocopy  NUMBER
281     , p7_a11 out nocopy  NUMBER
282     , p5_a0  NUMBER := 0-1962.0724
283     , p5_a1  NUMBER := 0-1962.0724
284     , p5_a2  NUMBER := 0-1962.0724
285     , p5_a3  NUMBER := 0-1962.0724
286     , p5_a4  VARCHAR2 := fnd_api.g_miss_char
287     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
288     , p5_a6  NUMBER := 0-1962.0724
289     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
290     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
291     , p5_a9  DATE := fnd_api.g_miss_date
292     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
293     , p5_a11  DATE := fnd_api.g_miss_date
294     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
295     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
296     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
297     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
298     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
299     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
300     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
301     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
302     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
303     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
304     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
305     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
306     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
307     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
308     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
309     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
310     , p5_a28  NUMBER := 0-1962.0724
311     , p5_a29  DATE := fnd_api.g_miss_date
312     , p5_a30  NUMBER := 0-1962.0724
313     , p5_a31  DATE := fnd_api.g_miss_date
314     , p5_a32  NUMBER := 0-1962.0724
315     , p6_a0  NUMBER := 0-1962.0724
316     , p6_a1  DATE := fnd_api.g_miss_date
317     , p6_a2  DATE := fnd_api.g_miss_date
318     , p6_a3  NUMBER := 0-1962.0724
319     , p6_a4  VARCHAR2 := fnd_api.g_miss_char
320     , p6_a5  NUMBER := 0-1962.0724
321     , p6_a6  NUMBER := 0-1962.0724
322     , p6_a7  NUMBER := 0-1962.0724
323     , p6_a8  DATE := fnd_api.g_miss_date
324     , p6_a9  DATE := fnd_api.g_miss_date
325     , p6_a10  NUMBER := 0-1962.0724
326     , p6_a11  NUMBER := 0-1962.0724
327   )
328 
329   as
330     ddp_pdtv_rec okl_setuppstypes_pub.pdtv_rec_type;
331     ddp_psyv_rec okl_setuppstypes_pub.psyv_rec_type;
332     ddx_psyv_rec okl_setuppstypes_pub.psyv_rec_type;
333     ddindx binary_integer; indx binary_integer;
334   begin
335 
336     -- copy data to the local IN or IN-OUT args, if any
337 
338 
339 
340 
341 
342     ddp_pdtv_rec.id := rosetta_g_miss_num_map(p5_a0);
343     ddp_pdtv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
344     ddp_pdtv_rec.aes_id := rosetta_g_miss_num_map(p5_a2);
345     ddp_pdtv_rec.ptl_id := rosetta_g_miss_num_map(p5_a3);
346     ddp_pdtv_rec.name := p5_a4;
347     ddp_pdtv_rec.description := p5_a5;
348     ddp_pdtv_rec.reporting_pdt_id := rosetta_g_miss_num_map(p5_a6);
349     ddp_pdtv_rec.product_status_code := p5_a7;
350     ddp_pdtv_rec.legacy_product_yn := p5_a8;
351     ddp_pdtv_rec.from_date := rosetta_g_miss_date_in_map(p5_a9);
352     ddp_pdtv_rec.version := p5_a10;
353     ddp_pdtv_rec.to_date := rosetta_g_miss_date_in_map(p5_a11);
354     ddp_pdtv_rec.attribute_category := p5_a12;
355     ddp_pdtv_rec.attribute1 := p5_a13;
356     ddp_pdtv_rec.attribute2 := p5_a14;
357     ddp_pdtv_rec.attribute3 := p5_a15;
358     ddp_pdtv_rec.attribute4 := p5_a16;
359     ddp_pdtv_rec.attribute5 := p5_a17;
360     ddp_pdtv_rec.attribute6 := p5_a18;
361     ddp_pdtv_rec.attribute7 := p5_a19;
362     ddp_pdtv_rec.attribute8 := p5_a20;
363     ddp_pdtv_rec.attribute9 := p5_a21;
364     ddp_pdtv_rec.attribute10 := p5_a22;
365     ddp_pdtv_rec.attribute11 := p5_a23;
366     ddp_pdtv_rec.attribute12 := p5_a24;
367     ddp_pdtv_rec.attribute13 := p5_a25;
368     ddp_pdtv_rec.attribute14 := p5_a26;
369     ddp_pdtv_rec.attribute15 := p5_a27;
370     ddp_pdtv_rec.created_by := rosetta_g_miss_num_map(p5_a28);
371     ddp_pdtv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a29);
372     ddp_pdtv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a30);
373     ddp_pdtv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a31);
374     ddp_pdtv_rec.last_update_login := rosetta_g_miss_num_map(p5_a32);
375 
376     ddp_psyv_rec.id := rosetta_g_miss_num_map(p6_a0);
377     ddp_psyv_rec.from_date := rosetta_g_miss_date_in_map(p6_a1);
378     ddp_psyv_rec.to_date := rosetta_g_miss_date_in_map(p6_a2);
379     ddp_psyv_rec.object_version_number := rosetta_g_miss_num_map(p6_a3);
380     ddp_psyv_rec.accrual_yn := p6_a4;
381     ddp_psyv_rec.sty_id := rosetta_g_miss_num_map(p6_a5);
382     ddp_psyv_rec.pdt_id := rosetta_g_miss_num_map(p6_a6);
383     ddp_psyv_rec.created_by := rosetta_g_miss_num_map(p6_a7);
384     ddp_psyv_rec.creation_date := rosetta_g_miss_date_in_map(p6_a8);
385     ddp_psyv_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a9);
386     ddp_psyv_rec.last_updated_by := rosetta_g_miss_num_map(p6_a10);
387     ddp_psyv_rec.last_update_login := rosetta_g_miss_num_map(p6_a11);
388 
389 
390     -- here's the delegated call to the old PL/SQL routine
391     okl_setuppstypes_pub.update_pstypes(p_api_version,
392       p_init_msg_list,
393       x_return_status,
394       x_msg_count,
395       x_msg_data,
396       ddp_pdtv_rec,
397       ddp_psyv_rec,
398       ddx_psyv_rec);
399 
400     -- copy data back from the local variables to OUT or IN-OUT args, if any
401 
402 
403 
404 
405 
406 
407 
408     p7_a0 := rosetta_g_miss_num_map(ddx_psyv_rec.id);
409     p7_a1 := ddx_psyv_rec.from_date;
410     p7_a2 := ddx_psyv_rec.to_date;
411     p7_a3 := rosetta_g_miss_num_map(ddx_psyv_rec.object_version_number);
412     p7_a4 := ddx_psyv_rec.accrual_yn;
413     p7_a5 := rosetta_g_miss_num_map(ddx_psyv_rec.sty_id);
414     p7_a6 := rosetta_g_miss_num_map(ddx_psyv_rec.pdt_id);
415     p7_a7 := rosetta_g_miss_num_map(ddx_psyv_rec.created_by);
416     p7_a8 := ddx_psyv_rec.creation_date;
417     p7_a9 := ddx_psyv_rec.last_update_date;
418     p7_a10 := rosetta_g_miss_num_map(ddx_psyv_rec.last_updated_by);
419     p7_a11 := rosetta_g_miss_num_map(ddx_psyv_rec.last_update_login);
420   end;
421 
422 end okl_setuppstypes_pub_w;