DBA Data[Home] [Help]

PACKAGE BODY: APPS.CSI_COUNTER_READINGS_PUB_W

Source


1 package body csi_counter_readings_pub_w as
2   /* $Header: csipcrwb.pls 120.10 2008/03/26 09:10:02 ngoutam ship $ */
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   rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6   rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7 
8   -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9   function rosetta_g_miss_date_in_map(d date) return date as
10   begin
11     if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12     if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13     return d;
14   end;
15 
16   function rosetta_g_miss_num_map(n number) return number as
17     a number := fnd_api.g_miss_num;
18     b number := 0-1962.0724;
19   begin
20     if n=a then return b; end if;
21     if n=b then return a; end if;
22     return n;
23   end;
24 
25   procedure capture_counter_reading(p_api_version  NUMBER
26     , p_commit  VARCHAR2
27     , p_init_msg_list  VARCHAR2
28     , p_validation_level  NUMBER
29     , p4_a0 in out nocopy JTF_NUMBER_TABLE
30     , p4_a1 in out nocopy JTF_DATE_TABLE
31     , p4_a2 in out nocopy JTF_DATE_TABLE
32     , p4_a3 in out nocopy JTF_NUMBER_TABLE
33     , p4_a4 in out nocopy JTF_NUMBER_TABLE
34     , p4_a5 in out nocopy JTF_NUMBER_TABLE
35     , p4_a6 in out nocopy JTF_VARCHAR2_TABLE_100
36     , p4_a7 in out nocopy JTF_NUMBER_TABLE
37     , p4_a8 in out nocopy JTF_VARCHAR2_TABLE_100
38     , p4_a9 in out nocopy JTF_NUMBER_TABLE
39     , p4_a10 in out nocopy JTF_VARCHAR2_TABLE_100
40     , p4_a11 in out nocopy JTF_NUMBER_TABLE
41     , p4_a12 in out nocopy JTF_NUMBER_TABLE
42     , p4_a13 in out nocopy JTF_NUMBER_TABLE
43     , p4_a14 in out nocopy JTF_NUMBER_TABLE
44     , p4_a15 in out nocopy JTF_VARCHAR2_TABLE_100
45     , p4_a16 in out nocopy JTF_NUMBER_TABLE
46     , p4_a17 in out nocopy JTF_VARCHAR2_TABLE_100
47     , p4_a18 in out nocopy JTF_VARCHAR2_TABLE_100
48     , p4_a19 in out nocopy JTF_NUMBER_TABLE
49     , p4_a20 in out nocopy JTF_VARCHAR2_TABLE_100
50     , p4_a21 in out nocopy JTF_VARCHAR2_TABLE_200
51     , p4_a22 in out nocopy JTF_VARCHAR2_TABLE_200
52     , p4_a23 in out nocopy JTF_VARCHAR2_TABLE_200
53     , p4_a24 in out nocopy JTF_VARCHAR2_TABLE_200
54     , p4_a25 in out nocopy JTF_VARCHAR2_TABLE_200
55     , p4_a26 in out nocopy JTF_VARCHAR2_TABLE_200
56     , p4_a27 in out nocopy JTF_VARCHAR2_TABLE_200
57     , p4_a28 in out nocopy JTF_VARCHAR2_TABLE_200
58     , p4_a29 in out nocopy JTF_VARCHAR2_TABLE_200
59     , p4_a30 in out nocopy JTF_VARCHAR2_TABLE_200
60     , p4_a31 in out nocopy JTF_VARCHAR2_TABLE_200
61     , p4_a32 in out nocopy JTF_VARCHAR2_TABLE_200
62     , p4_a33 in out nocopy JTF_VARCHAR2_TABLE_200
63     , p4_a34 in out nocopy JTF_VARCHAR2_TABLE_200
64     , p4_a35 in out nocopy JTF_VARCHAR2_TABLE_200
65     , p4_a36 in out nocopy JTF_NUMBER_TABLE
66     , p4_a37 in out nocopy JTF_VARCHAR2_TABLE_100
67     , p4_a38 in out nocopy JTF_DATE_TABLE
68     , p4_a39 in out nocopy JTF_NUMBER_TABLE
69     , p5_a0 in out nocopy JTF_NUMBER_TABLE
70     , p5_a1 in out nocopy JTF_NUMBER_TABLE
71     , p5_a2 in out nocopy JTF_DATE_TABLE
72     , p5_a3 in out nocopy JTF_NUMBER_TABLE
73     , p5_a4 in out nocopy JTF_VARCHAR2_TABLE_100
74     , p5_a5 in out nocopy JTF_VARCHAR2_TABLE_300
75     , p5_a6 in out nocopy JTF_VARCHAR2_TABLE_100
76     , p5_a7 in out nocopy JTF_NUMBER_TABLE
77     , p5_a8 in out nocopy JTF_NUMBER_TABLE
78     , p5_a9 in out nocopy JTF_DATE_TABLE
79     , p5_a10 in out nocopy JTF_NUMBER_TABLE
80     , p5_a11 in out nocopy JTF_DATE_TABLE
81     , p5_a12 in out nocopy JTF_NUMBER_TABLE
82     , p5_a13 in out nocopy JTF_NUMBER_TABLE
83     , p5_a14 in out nocopy JTF_VARCHAR2_TABLE_200
84     , p5_a15 in out nocopy JTF_VARCHAR2_TABLE_200
85     , p5_a16 in out nocopy JTF_VARCHAR2_TABLE_200
86     , p5_a17 in out nocopy JTF_VARCHAR2_TABLE_200
87     , p5_a18 in out nocopy JTF_VARCHAR2_TABLE_200
88     , p5_a19 in out nocopy JTF_VARCHAR2_TABLE_200
89     , p5_a20 in out nocopy JTF_VARCHAR2_TABLE_200
90     , p5_a21 in out nocopy JTF_VARCHAR2_TABLE_200
91     , p5_a22 in out nocopy JTF_VARCHAR2_TABLE_200
92     , p5_a23 in out nocopy JTF_VARCHAR2_TABLE_200
93     , p5_a24 in out nocopy JTF_VARCHAR2_TABLE_200
94     , p5_a25 in out nocopy JTF_VARCHAR2_TABLE_200
95     , p5_a26 in out nocopy JTF_VARCHAR2_TABLE_200
96     , p5_a27 in out nocopy JTF_VARCHAR2_TABLE_200
97     , p5_a28 in out nocopy JTF_VARCHAR2_TABLE_200
98     , p5_a29 in out nocopy JTF_VARCHAR2_TABLE_200
99     , p5_a30 in out nocopy JTF_VARCHAR2_TABLE_200
100     , p5_a31 in out nocopy JTF_VARCHAR2_TABLE_200
101     , p5_a32 in out nocopy JTF_VARCHAR2_TABLE_200
102     , p5_a33 in out nocopy JTF_VARCHAR2_TABLE_200
103     , p5_a34 in out nocopy JTF_VARCHAR2_TABLE_200
104     , p5_a35 in out nocopy JTF_VARCHAR2_TABLE_200
105     , p5_a36 in out nocopy JTF_VARCHAR2_TABLE_200
106     , p5_a37 in out nocopy JTF_VARCHAR2_TABLE_200
107     , p5_a38 in out nocopy JTF_VARCHAR2_TABLE_200
108     , p5_a39 in out nocopy JTF_VARCHAR2_TABLE_200
109     , p5_a40 in out nocopy JTF_VARCHAR2_TABLE_200
110     , p5_a41 in out nocopy JTF_VARCHAR2_TABLE_200
111     , p5_a42 in out nocopy JTF_VARCHAR2_TABLE_200
112     , p5_a43 in out nocopy JTF_VARCHAR2_TABLE_200
113     , p5_a44 in out nocopy JTF_VARCHAR2_TABLE_100
114     , p5_a45 in out nocopy JTF_VARCHAR2_TABLE_100
115     , p5_a46 in out nocopy JTF_VARCHAR2_TABLE_2000
116     , p5_a47 in out nocopy JTF_NUMBER_TABLE
117     , p5_a48 in out nocopy JTF_NUMBER_TABLE
118     , p5_a49 in out nocopy JTF_VARCHAR2_TABLE_100
119     , p5_a50 in out nocopy JTF_VARCHAR2_TABLE_100
120     , p5_a51 in out nocopy JTF_NUMBER_TABLE
121     , p5_a52 in out nocopy JTF_NUMBER_TABLE
122     , p5_a53 in out nocopy JTF_NUMBER_TABLE
123     , p5_a54 in out nocopy JTF_VARCHAR2_TABLE_100
124     , p5_a55 in out nocopy JTF_VARCHAR2_TABLE_100
125     , p5_a56 in out nocopy JTF_NUMBER_TABLE
126     , p5_a57 in out nocopy JTF_NUMBER_TABLE
127     , p5_a58 in out nocopy JTF_NUMBER_TABLE
128     , p5_a59 in out nocopy JTF_VARCHAR2_TABLE_100
129     , p6_a0 in out nocopy JTF_NUMBER_TABLE
130     , p6_a1 in out nocopy JTF_NUMBER_TABLE
131     , p6_a2 in out nocopy JTF_NUMBER_TABLE
132     , p6_a3 in out nocopy JTF_VARCHAR2_TABLE_300
133     , p6_a4 in out nocopy JTF_DATE_TABLE
134     , p6_a5 in out nocopy JTF_NUMBER_TABLE
135     , p6_a6 in out nocopy JTF_DATE_TABLE
136     , p6_a7 in out nocopy JTF_NUMBER_TABLE
137     , p6_a8 in out nocopy JTF_DATE_TABLE
138     , p6_a9 in out nocopy JTF_NUMBER_TABLE
139     , p6_a10 in out nocopy JTF_NUMBER_TABLE
140     , p6_a11 in out nocopy JTF_VARCHAR2_TABLE_200
141     , p6_a12 in out nocopy JTF_VARCHAR2_TABLE_200
142     , p6_a13 in out nocopy JTF_VARCHAR2_TABLE_200
143     , p6_a14 in out nocopy JTF_VARCHAR2_TABLE_200
144     , p6_a15 in out nocopy JTF_VARCHAR2_TABLE_200
145     , p6_a16 in out nocopy JTF_VARCHAR2_TABLE_200
146     , p6_a17 in out nocopy JTF_VARCHAR2_TABLE_200
147     , p6_a18 in out nocopy JTF_VARCHAR2_TABLE_200
148     , p6_a19 in out nocopy JTF_VARCHAR2_TABLE_200
149     , p6_a20 in out nocopy JTF_VARCHAR2_TABLE_200
150     , p6_a21 in out nocopy JTF_VARCHAR2_TABLE_200
151     , p6_a22 in out nocopy JTF_VARCHAR2_TABLE_200
152     , p6_a23 in out nocopy JTF_VARCHAR2_TABLE_200
153     , p6_a24 in out nocopy JTF_VARCHAR2_TABLE_200
154     , p6_a25 in out nocopy JTF_VARCHAR2_TABLE_200
155     , p6_a26 in out nocopy JTF_VARCHAR2_TABLE_100
156     , p6_a27 in out nocopy JTF_VARCHAR2_TABLE_100
157     , p6_a28 in out nocopy JTF_NUMBER_TABLE
158     , p6_a29 in out nocopy JTF_NUMBER_TABLE
159     , x_return_status out nocopy  VARCHAR2
160     , x_msg_count out nocopy  NUMBER
161     , x_msg_data out nocopy  VARCHAR2
162   )
163 
164   as
165     ddp_txn_tbl csi_datastructures_pub.transaction_tbl;
166     ddp_ctr_rdg_tbl csi_ctr_datastructures_pub.counter_readings_tbl;
167     ddp_ctr_prop_rdg_tbl csi_ctr_datastructures_pub.ctr_property_readings_tbl;
168     ddindx binary_integer; indx binary_integer;
169   begin
170 
171     -- copy data to the local IN or IN-OUT args, if any
172 
173 
174 
175 
176     csi_datastructures_pub_w.rosetta_table_copy_in_p27(ddp_txn_tbl, p4_a0
177       , p4_a1
178       , p4_a2
179       , p4_a3
180       , p4_a4
181       , p4_a5
182       , p4_a6
183       , p4_a7
184       , p4_a8
185       , p4_a9
186       , p4_a10
187       , p4_a11
188       , p4_a12
189       , p4_a13
190       , p4_a14
191       , p4_a15
192       , p4_a16
193       , p4_a17
194       , p4_a18
195       , p4_a19
196       , p4_a20
197       , p4_a21
198       , p4_a22
199       , p4_a23
200       , p4_a24
201       , p4_a25
202       , p4_a26
203       , p4_a27
204       , p4_a28
205       , p4_a29
206       , p4_a30
207       , p4_a31
208       , p4_a32
209       , p4_a33
210       , p4_a34
211       , p4_a35
212       , p4_a36
213       , p4_a37
214       , p4_a38
215       , p4_a39
216       );
217 
218     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p24(ddp_ctr_rdg_tbl, p5_a0
219       , p5_a1
220       , p5_a2
221       , p5_a3
222       , p5_a4
223       , p5_a5
224       , p5_a6
225       , p5_a7
226       , p5_a8
227       , p5_a9
228       , p5_a10
229       , p5_a11
230       , p5_a12
231       , p5_a13
232       , p5_a14
233       , p5_a15
234       , p5_a16
235       , p5_a17
236       , p5_a18
237       , p5_a19
238       , p5_a20
239       , p5_a21
240       , p5_a22
241       , p5_a23
242       , p5_a24
243       , p5_a25
244       , p5_a26
245       , p5_a27
246       , p5_a28
247       , p5_a29
248       , p5_a30
249       , p5_a31
250       , p5_a32
251       , p5_a33
252       , p5_a34
253       , p5_a35
254       , p5_a36
255       , p5_a37
256       , p5_a38
257       , p5_a39
258       , p5_a40
259       , p5_a41
260       , p5_a42
261       , p5_a43
262       , p5_a44
263       , p5_a45
264       , p5_a46
265       , p5_a47
266       , p5_a48
267       , p5_a49
268       , p5_a50
269       , p5_a51
270       , p5_a52
271       , p5_a53
272       , p5_a54
273       , p5_a55
274       , p5_a56
275       , p5_a57
276       , p5_a58
277       , p5_a59
278       );
279 
280     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p26(ddp_ctr_prop_rdg_tbl, p6_a0
281       , p6_a1
282       , p6_a2
283       , p6_a3
284       , p6_a4
285       , p6_a5
286       , p6_a6
287       , p6_a7
288       , p6_a8
289       , p6_a9
290       , p6_a10
291       , p6_a11
292       , p6_a12
293       , p6_a13
294       , p6_a14
295       , p6_a15
296       , p6_a16
297       , p6_a17
298       , p6_a18
299       , p6_a19
300       , p6_a20
301       , p6_a21
302       , p6_a22
303       , p6_a23
304       , p6_a24
305       , p6_a25
306       , p6_a26
307       , p6_a27
308       , p6_a28
309       , p6_a29
310       );
311 
312 
313 
314 
315     -- here's the delegated call to the old PL/SQL routine
316     csi_counter_readings_pub.capture_counter_reading(p_api_version,
317       p_commit,
318       p_init_msg_list,
319       p_validation_level,
320       ddp_txn_tbl,
321       ddp_ctr_rdg_tbl,
322       ddp_ctr_prop_rdg_tbl,
323       x_return_status,
324       x_msg_count,
325       x_msg_data);
326 
327     -- copy data back from the local variables to OUT or IN-OUT args, if any
328 
329 
330 
331 
332     csi_datastructures_pub_w.rosetta_table_copy_out_p27(ddp_txn_tbl, p4_a0
333       , p4_a1
334       , p4_a2
335       , p4_a3
336       , p4_a4
337       , p4_a5
338       , p4_a6
339       , p4_a7
340       , p4_a8
341       , p4_a9
342       , p4_a10
343       , p4_a11
344       , p4_a12
345       , p4_a13
346       , p4_a14
347       , p4_a15
348       , p4_a16
349       , p4_a17
350       , p4_a18
351       , p4_a19
352       , p4_a20
353       , p4_a21
354       , p4_a22
355       , p4_a23
356       , p4_a24
357       , p4_a25
358       , p4_a26
359       , p4_a27
360       , p4_a28
361       , p4_a29
362       , p4_a30
363       , p4_a31
364       , p4_a32
365       , p4_a33
366       , p4_a34
367       , p4_a35
368       , p4_a36
369       , p4_a37
370       , p4_a38
371       , p4_a39
372       );
373 
374     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p24(ddp_ctr_rdg_tbl, p5_a0
375       , p5_a1
376       , p5_a2
377       , p5_a3
378       , p5_a4
379       , p5_a5
380       , p5_a6
381       , p5_a7
382       , p5_a8
383       , p5_a9
384       , p5_a10
385       , p5_a11
386       , p5_a12
387       , p5_a13
388       , p5_a14
389       , p5_a15
390       , p5_a16
391       , p5_a17
392       , p5_a18
393       , p5_a19
394       , p5_a20
395       , p5_a21
396       , p5_a22
397       , p5_a23
398       , p5_a24
399       , p5_a25
400       , p5_a26
401       , p5_a27
402       , p5_a28
403       , p5_a29
404       , p5_a30
405       , p5_a31
406       , p5_a32
407       , p5_a33
408       , p5_a34
409       , p5_a35
410       , p5_a36
411       , p5_a37
412       , p5_a38
413       , p5_a39
414       , p5_a40
415       , p5_a41
416       , p5_a42
417       , p5_a43
418       , p5_a44
419       , p5_a45
420       , p5_a46
421       , p5_a47
422       , p5_a48
423       , p5_a49
424       , p5_a50
425       , p5_a51
426       , p5_a52
427       , p5_a53
428       , p5_a54
429       , p5_a55
430       , p5_a56
431       , p5_a57
432       , p5_a58
433       , p5_a59
434       );
435 
436     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p26(ddp_ctr_prop_rdg_tbl, p6_a0
437       , p6_a1
438       , p6_a2
439       , p6_a3
440       , p6_a4
441       , p6_a5
442       , p6_a6
443       , p6_a7
444       , p6_a8
445       , p6_a9
446       , p6_a10
447       , p6_a11
448       , p6_a12
449       , p6_a13
450       , p6_a14
451       , p6_a15
452       , p6_a16
453       , p6_a17
454       , p6_a18
455       , p6_a19
456       , p6_a20
457       , p6_a21
458       , p6_a22
459       , p6_a23
460       , p6_a24
461       , p6_a25
462       , p6_a26
463       , p6_a27
464       , p6_a28
465       , p6_a29
466       );
467 
468 
469 
470   end;
471 
472   procedure update_counter_reading(p_api_version  NUMBER
473     , p_commit  VARCHAR2
474     , p_init_msg_list  VARCHAR2
475     , p_validation_level  NUMBER
476     , p4_a0 in out nocopy JTF_NUMBER_TABLE
477     , p4_a1 in out nocopy JTF_NUMBER_TABLE
478     , p4_a2 in out nocopy JTF_DATE_TABLE
479     , p4_a3 in out nocopy JTF_NUMBER_TABLE
480     , p4_a4 in out nocopy JTF_VARCHAR2_TABLE_100
481     , p4_a5 in out nocopy JTF_VARCHAR2_TABLE_300
482     , p4_a6 in out nocopy JTF_VARCHAR2_TABLE_100
483     , p4_a7 in out nocopy JTF_NUMBER_TABLE
484     , p4_a8 in out nocopy JTF_NUMBER_TABLE
485     , p4_a9 in out nocopy JTF_DATE_TABLE
486     , p4_a10 in out nocopy JTF_NUMBER_TABLE
487     , p4_a11 in out nocopy JTF_DATE_TABLE
488     , p4_a12 in out nocopy JTF_NUMBER_TABLE
489     , p4_a13 in out nocopy JTF_NUMBER_TABLE
490     , p4_a14 in out nocopy JTF_VARCHAR2_TABLE_200
491     , p4_a15 in out nocopy JTF_VARCHAR2_TABLE_200
492     , p4_a16 in out nocopy JTF_VARCHAR2_TABLE_200
493     , p4_a17 in out nocopy JTF_VARCHAR2_TABLE_200
494     , p4_a18 in out nocopy JTF_VARCHAR2_TABLE_200
495     , p4_a19 in out nocopy JTF_VARCHAR2_TABLE_200
496     , p4_a20 in out nocopy JTF_VARCHAR2_TABLE_200
497     , p4_a21 in out nocopy JTF_VARCHAR2_TABLE_200
498     , p4_a22 in out nocopy JTF_VARCHAR2_TABLE_200
499     , p4_a23 in out nocopy JTF_VARCHAR2_TABLE_200
500     , p4_a24 in out nocopy JTF_VARCHAR2_TABLE_200
501     , p4_a25 in out nocopy JTF_VARCHAR2_TABLE_200
502     , p4_a26 in out nocopy JTF_VARCHAR2_TABLE_200
503     , p4_a27 in out nocopy JTF_VARCHAR2_TABLE_200
504     , p4_a28 in out nocopy JTF_VARCHAR2_TABLE_200
505     , p4_a29 in out nocopy JTF_VARCHAR2_TABLE_200
506     , p4_a30 in out nocopy JTF_VARCHAR2_TABLE_200
507     , p4_a31 in out nocopy JTF_VARCHAR2_TABLE_200
508     , p4_a32 in out nocopy JTF_VARCHAR2_TABLE_200
509     , p4_a33 in out nocopy JTF_VARCHAR2_TABLE_200
510     , p4_a34 in out nocopy JTF_VARCHAR2_TABLE_200
511     , p4_a35 in out nocopy JTF_VARCHAR2_TABLE_200
512     , p4_a36 in out nocopy JTF_VARCHAR2_TABLE_200
513     , p4_a37 in out nocopy JTF_VARCHAR2_TABLE_200
514     , p4_a38 in out nocopy JTF_VARCHAR2_TABLE_200
515     , p4_a39 in out nocopy JTF_VARCHAR2_TABLE_200
516     , p4_a40 in out nocopy JTF_VARCHAR2_TABLE_200
517     , p4_a41 in out nocopy JTF_VARCHAR2_TABLE_200
518     , p4_a42 in out nocopy JTF_VARCHAR2_TABLE_200
519     , p4_a43 in out nocopy JTF_VARCHAR2_TABLE_200
520     , p4_a44 in out nocopy JTF_VARCHAR2_TABLE_100
521     , p4_a45 in out nocopy JTF_VARCHAR2_TABLE_100
522     , p4_a46 in out nocopy JTF_VARCHAR2_TABLE_2000
523     , p4_a47 in out nocopy JTF_NUMBER_TABLE
524     , p4_a48 in out nocopy JTF_NUMBER_TABLE
525     , p4_a49 in out nocopy JTF_VARCHAR2_TABLE_100
526     , p4_a50 in out nocopy JTF_VARCHAR2_TABLE_100
527     , p4_a51 in out nocopy JTF_NUMBER_TABLE
528     , p4_a52 in out nocopy JTF_NUMBER_TABLE
529     , p4_a53 in out nocopy JTF_NUMBER_TABLE
530     , p4_a54 in out nocopy JTF_VARCHAR2_TABLE_100
531     , p4_a55 in out nocopy JTF_VARCHAR2_TABLE_100
532     , p4_a56 in out nocopy JTF_NUMBER_TABLE
533     , p4_a57 in out nocopy JTF_NUMBER_TABLE
534     , p4_a58 in out nocopy JTF_NUMBER_TABLE
535     , p4_a59 in out nocopy JTF_VARCHAR2_TABLE_100
536     , x_return_status out nocopy  VARCHAR2
537     , x_msg_count out nocopy  NUMBER
538     , x_msg_data out nocopy  VARCHAR2
539   )
540 
541   as
542     ddp_ctr_rdg_tbl csi_ctr_datastructures_pub.counter_readings_tbl;
543     ddindx binary_integer; indx binary_integer;
544   begin
545 
546     -- copy data to the local IN or IN-OUT args, if any
547 
548 
549 
550 
551     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p24(ddp_ctr_rdg_tbl, p4_a0
552       , p4_a1
553       , p4_a2
554       , p4_a3
555       , p4_a4
556       , p4_a5
557       , p4_a6
558       , p4_a7
559       , p4_a8
560       , p4_a9
561       , p4_a10
562       , p4_a11
563       , p4_a12
564       , p4_a13
565       , p4_a14
566       , p4_a15
567       , p4_a16
568       , p4_a17
569       , p4_a18
570       , p4_a19
571       , p4_a20
572       , p4_a21
573       , p4_a22
574       , p4_a23
575       , p4_a24
576       , p4_a25
577       , p4_a26
578       , p4_a27
579       , p4_a28
580       , p4_a29
581       , p4_a30
582       , p4_a31
583       , p4_a32
584       , p4_a33
585       , p4_a34
586       , p4_a35
587       , p4_a36
588       , p4_a37
589       , p4_a38
590       , p4_a39
591       , p4_a40
592       , p4_a41
593       , p4_a42
594       , p4_a43
595       , p4_a44
596       , p4_a45
597       , p4_a46
598       , p4_a47
599       , p4_a48
600       , p4_a49
601       , p4_a50
602       , p4_a51
603       , p4_a52
604       , p4_a53
605       , p4_a54
606       , p4_a55
607       , p4_a56
608       , p4_a57
609       , p4_a58
610       , p4_a59
611       );
612 
613 
614 
615 
616     -- here's the delegated call to the old PL/SQL routine
617     csi_counter_readings_pub.update_counter_reading(p_api_version,
618       p_commit,
619       p_init_msg_list,
620       p_validation_level,
621       ddp_ctr_rdg_tbl,
622       x_return_status,
623       x_msg_count,
624       x_msg_data);
625 
626     -- copy data back from the local variables to OUT or IN-OUT args, if any
627 
628 
629 
630 
631     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p24(ddp_ctr_rdg_tbl, p4_a0
632       , p4_a1
633       , p4_a2
634       , p4_a3
635       , p4_a4
636       , p4_a5
637       , p4_a6
638       , p4_a7
639       , p4_a8
640       , p4_a9
641       , p4_a10
642       , p4_a11
643       , p4_a12
644       , p4_a13
645       , p4_a14
646       , p4_a15
647       , p4_a16
648       , p4_a17
649       , p4_a18
650       , p4_a19
651       , p4_a20
652       , p4_a21
653       , p4_a22
654       , p4_a23
655       , p4_a24
656       , p4_a25
657       , p4_a26
658       , p4_a27
659       , p4_a28
660       , p4_a29
661       , p4_a30
662       , p4_a31
663       , p4_a32
664       , p4_a33
665       , p4_a34
666       , p4_a35
667       , p4_a36
668       , p4_a37
669       , p4_a38
670       , p4_a39
671       , p4_a40
672       , p4_a41
673       , p4_a42
674       , p4_a43
675       , p4_a44
676       , p4_a45
677       , p4_a46
678       , p4_a47
679       , p4_a48
680       , p4_a49
681       , p4_a50
682       , p4_a51
683       , p4_a52
684       , p4_a53
685       , p4_a54
686       , p4_a55
687       , p4_a56
688       , p4_a57
689       , p4_a58
690       , p4_a59
691       );
692 
693 
694 
695   end;
696 
697 end csi_counter_readings_pub_w;