DBA Data[Home] [Help]

PACKAGE BODY: APPS.CSI_COUNTER_PUB_W

Source


1 package body csi_counter_pub_w as
2   /* $Header: csipciwb.pls 120.10 2008/03/26 09:09:16 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 create_counter(p_api_version  NUMBER
26     , p_init_msg_list  VARCHAR2
27     , p_commit  VARCHAR2
28     , p_validation_level  NUMBER
29     , p4_a0 in out nocopy  NUMBER
30     , p4_a1 in out nocopy  NUMBER
31     , p4_a2 in out nocopy  VARCHAR2
32     , p4_a3 in out nocopy  NUMBER
33     , p4_a4 in out nocopy  DATE
34     , p4_a5 in out nocopy  NUMBER
35     , p4_a6 in out nocopy  NUMBER
36     , p4_a7 in out nocopy  NUMBER
37     , p4_a8 in out nocopy  VARCHAR2
38     , p4_a9 in out nocopy  NUMBER
39     , p4_a10 in out nocopy  VARCHAR2
40     , p4_a11 in out nocopy  NUMBER
41     , p4_a12 in out nocopy  VARCHAR2
42     , p4_a13 in out nocopy  VARCHAR2
43     , p4_a14 in out nocopy  VARCHAR2
44     , p4_a15 in out nocopy  NUMBER
45     , p4_a16 in out nocopy  NUMBER
46     , p4_a17 in out nocopy  NUMBER
47     , p4_a18 in out nocopy  NUMBER
48     , p4_a19 in out nocopy  DATE
49     , p4_a20 in out nocopy  DATE
50     , p4_a21 in out nocopy  NUMBER
51     , p4_a22 in out nocopy  DATE
52     , p4_a23 in out nocopy  NUMBER
53     , p4_a24 in out nocopy  DATE
54     , p4_a25 in out nocopy  NUMBER
55     , p4_a26 in out nocopy  NUMBER
56     , p4_a27 in out nocopy  VARCHAR2
57     , p4_a28 in out nocopy  VARCHAR2
58     , p4_a29 in out nocopy  VARCHAR2
59     , p4_a30 in out nocopy  VARCHAR2
60     , p4_a31 in out nocopy  VARCHAR2
61     , p4_a32 in out nocopy  VARCHAR2
62     , p4_a33 in out nocopy  VARCHAR2
63     , p4_a34 in out nocopy  VARCHAR2
64     , p4_a35 in out nocopy  VARCHAR2
65     , p4_a36 in out nocopy  VARCHAR2
66     , p4_a37 in out nocopy  VARCHAR2
67     , p4_a38 in out nocopy  VARCHAR2
68     , p4_a39 in out nocopy  VARCHAR2
69     , p4_a40 in out nocopy  VARCHAR2
70     , p4_a41 in out nocopy  VARCHAR2
71     , p4_a42 in out nocopy  VARCHAR2
72     , p4_a43 in out nocopy  VARCHAR2
73     , p4_a44 in out nocopy  VARCHAR2
74     , p4_a45 in out nocopy  VARCHAR2
75     , p4_a46 in out nocopy  VARCHAR2
76     , p4_a47 in out nocopy  VARCHAR2
77     , p4_a48 in out nocopy  VARCHAR2
78     , p4_a49 in out nocopy  VARCHAR2
79     , p4_a50 in out nocopy  VARCHAR2
80     , p4_a51 in out nocopy  VARCHAR2
81     , p4_a52 in out nocopy  VARCHAR2
82     , p4_a53 in out nocopy  VARCHAR2
83     , p4_a54 in out nocopy  VARCHAR2
84     , p4_a55 in out nocopy  VARCHAR2
85     , p4_a56 in out nocopy  VARCHAR2
86     , p4_a57 in out nocopy  VARCHAR2
87     , p4_a58 in out nocopy  VARCHAR2
88     , p4_a59 in out nocopy  VARCHAR2
89     , p4_a60 in out nocopy  VARCHAR2
90     , p4_a61 in out nocopy  VARCHAR2
91     , p4_a62 in out nocopy  NUMBER
92     , p4_a63 in out nocopy  VARCHAR2
93     , p4_a64 in out nocopy  NUMBER
94     , p4_a65 in out nocopy  NUMBER
95     , p4_a66 in out nocopy  VARCHAR2
96     , p4_a67 in out nocopy  NUMBER
97     , p4_a68 in out nocopy  NUMBER
98     , p4_a69 in out nocopy  VARCHAR2
99     , p4_a70 in out nocopy  NUMBER
100     , p4_a71 in out nocopy  NUMBER
101     , p4_a72 in out nocopy  VARCHAR2
102     , p4_a73 in out nocopy  VARCHAR2
103     , p4_a74 in out nocopy  VARCHAR2
104     , p4_a75 in out nocopy  NUMBER
105     , p4_a76 in out nocopy  VARCHAR2
106     , p4_a77 in out nocopy  VARCHAR2
107     , p5_a0 in out nocopy JTF_NUMBER_TABLE
108     , p5_a1 in out nocopy JTF_NUMBER_TABLE
109     , p5_a2 in out nocopy JTF_VARCHAR2_TABLE_100
110     , p5_a3 in out nocopy JTF_VARCHAR2_TABLE_100
111     , p5_a4 in out nocopy JTF_VARCHAR2_TABLE_300
112     , p5_a5 in out nocopy JTF_VARCHAR2_TABLE_300
113     , p5_a6 in out nocopy JTF_VARCHAR2_TABLE_300
114     , p5_a7 in out nocopy JTF_VARCHAR2_TABLE_100
115     , p5_a8 in out nocopy JTF_DATE_TABLE
116     , p5_a9 in out nocopy JTF_DATE_TABLE
117     , p5_a10 in out nocopy JTF_NUMBER_TABLE
118     , p5_a11 in out nocopy JTF_DATE_TABLE
119     , p5_a12 in out nocopy JTF_NUMBER_TABLE
120     , p5_a13 in out nocopy JTF_DATE_TABLE
121     , p5_a14 in out nocopy JTF_NUMBER_TABLE
122     , p5_a15 in out nocopy JTF_NUMBER_TABLE
123     , p5_a16 in out nocopy JTF_VARCHAR2_TABLE_200
124     , p5_a17 in out nocopy JTF_VARCHAR2_TABLE_200
125     , p5_a18 in out nocopy JTF_VARCHAR2_TABLE_200
126     , p5_a19 in out nocopy JTF_VARCHAR2_TABLE_200
127     , p5_a20 in out nocopy JTF_VARCHAR2_TABLE_200
128     , p5_a21 in out nocopy JTF_VARCHAR2_TABLE_200
129     , p5_a22 in out nocopy JTF_VARCHAR2_TABLE_200
130     , p5_a23 in out nocopy JTF_VARCHAR2_TABLE_200
131     , p5_a24 in out nocopy JTF_VARCHAR2_TABLE_200
132     , p5_a25 in out nocopy JTF_VARCHAR2_TABLE_200
133     , p5_a26 in out nocopy JTF_VARCHAR2_TABLE_200
134     , p5_a27 in out nocopy JTF_VARCHAR2_TABLE_200
135     , p5_a28 in out nocopy JTF_VARCHAR2_TABLE_200
136     , p5_a29 in out nocopy JTF_VARCHAR2_TABLE_200
137     , p5_a30 in out nocopy JTF_VARCHAR2_TABLE_200
138     , p5_a31 in out nocopy JTF_VARCHAR2_TABLE_100
139     , p5_a32 in out nocopy JTF_VARCHAR2_TABLE_100
140     , p5_a33 in out nocopy JTF_VARCHAR2_TABLE_100
141     , p5_a34 in out nocopy JTF_NUMBER_TABLE
142     , p5_a35 in out nocopy JTF_NUMBER_TABLE
143     , p5_a36 in out nocopy JTF_VARCHAR2_TABLE_100
144     , p5_a37 in out nocopy JTF_VARCHAR2_TABLE_300
145     , p6_a0 in out nocopy JTF_NUMBER_TABLE
146     , p6_a1 in out nocopy JTF_NUMBER_TABLE
147     , p6_a2 in out nocopy JTF_VARCHAR2_TABLE_100
148     , p6_a3 in out nocopy JTF_NUMBER_TABLE
149     , p6_a4 in out nocopy JTF_NUMBER_TABLE
150     , p6_a5 in out nocopy JTF_DATE_TABLE
151     , p6_a6 in out nocopy JTF_DATE_TABLE
152     , p6_a7 in out nocopy JTF_NUMBER_TABLE
153     , p6_a8 in out nocopy JTF_DATE_TABLE
154     , p6_a9 in out nocopy JTF_NUMBER_TABLE
155     , p6_a10 in out nocopy JTF_DATE_TABLE
156     , p6_a11 in out nocopy JTF_NUMBER_TABLE
157     , p6_a12 in out nocopy JTF_NUMBER_TABLE
158     , p6_a13 in out nocopy JTF_VARCHAR2_TABLE_100
159     , p6_a14 in out nocopy JTF_VARCHAR2_TABLE_200
160     , p6_a15 in out nocopy JTF_VARCHAR2_TABLE_200
161     , p6_a16 in out nocopy JTF_VARCHAR2_TABLE_200
162     , p6_a17 in out nocopy JTF_VARCHAR2_TABLE_200
163     , p6_a18 in out nocopy JTF_VARCHAR2_TABLE_200
164     , p6_a19 in out nocopy JTF_VARCHAR2_TABLE_200
165     , p6_a20 in out nocopy JTF_VARCHAR2_TABLE_200
166     , p6_a21 in out nocopy JTF_VARCHAR2_TABLE_200
167     , p6_a22 in out nocopy JTF_VARCHAR2_TABLE_200
168     , p6_a23 in out nocopy JTF_VARCHAR2_TABLE_200
169     , p6_a24 in out nocopy JTF_VARCHAR2_TABLE_200
170     , p6_a25 in out nocopy JTF_VARCHAR2_TABLE_200
171     , p6_a26 in out nocopy JTF_VARCHAR2_TABLE_200
172     , p6_a27 in out nocopy JTF_VARCHAR2_TABLE_200
173     , p6_a28 in out nocopy JTF_VARCHAR2_TABLE_200
174     , p6_a29 in out nocopy JTF_NUMBER_TABLE
175     , p6_a30 in out nocopy JTF_VARCHAR2_TABLE_100
176     , p6_a31 in out nocopy JTF_VARCHAR2_TABLE_100
177     , p6_a32 in out nocopy JTF_NUMBER_TABLE
178     , p7_a0 in out nocopy JTF_NUMBER_TABLE
179     , p7_a1 in out nocopy JTF_NUMBER_TABLE
180     , p7_a2 in out nocopy JTF_NUMBER_TABLE
181     , p7_a3 in out nocopy JTF_VARCHAR2_TABLE_100
182     , p7_a4 in out nocopy JTF_NUMBER_TABLE
183     , p7_a5 in out nocopy JTF_VARCHAR2_TABLE_100
184     , p7_a6 in out nocopy JTF_VARCHAR2_TABLE_300
185     , p7_a7 in out nocopy JTF_VARCHAR2_TABLE_100
186     , p7_a8 in out nocopy JTF_VARCHAR2_TABLE_100
187     , p7_a9 in out nocopy JTF_DATE_TABLE
188     , p7_a10 in out nocopy JTF_DATE_TABLE
189     , p7_a11 in out nocopy JTF_NUMBER_TABLE
190     , p7_a12 in out nocopy JTF_DATE_TABLE
191     , p7_a13 in out nocopy JTF_NUMBER_TABLE
192     , p7_a14 in out nocopy JTF_DATE_TABLE
193     , p7_a15 in out nocopy JTF_NUMBER_TABLE
194     , p7_a16 in out nocopy JTF_NUMBER_TABLE
195     , p7_a17 in out nocopy JTF_VARCHAR2_TABLE_200
196     , p7_a18 in out nocopy JTF_VARCHAR2_TABLE_200
197     , p7_a19 in out nocopy JTF_VARCHAR2_TABLE_200
198     , p7_a20 in out nocopy JTF_VARCHAR2_TABLE_200
199     , p7_a21 in out nocopy JTF_VARCHAR2_TABLE_200
200     , p7_a22 in out nocopy JTF_VARCHAR2_TABLE_200
201     , p7_a23 in out nocopy JTF_VARCHAR2_TABLE_200
202     , p7_a24 in out nocopy JTF_VARCHAR2_TABLE_200
203     , p7_a25 in out nocopy JTF_VARCHAR2_TABLE_200
204     , p7_a26 in out nocopy JTF_VARCHAR2_TABLE_200
205     , p7_a27 in out nocopy JTF_VARCHAR2_TABLE_200
206     , p7_a28 in out nocopy JTF_VARCHAR2_TABLE_200
207     , p7_a29 in out nocopy JTF_VARCHAR2_TABLE_200
208     , p7_a30 in out nocopy JTF_VARCHAR2_TABLE_200
209     , p7_a31 in out nocopy JTF_VARCHAR2_TABLE_200
210     , p7_a32 in out nocopy JTF_VARCHAR2_TABLE_100
211     , p7_a33 in out nocopy JTF_NUMBER_TABLE
212     , p7_a34 in out nocopy JTF_VARCHAR2_TABLE_100
213     , p8_a0 in out nocopy JTF_NUMBER_TABLE
214     , p8_a1 in out nocopy JTF_VARCHAR2_TABLE_100
215     , p8_a2 in out nocopy JTF_NUMBER_TABLE
216     , p8_a3 in out nocopy JTF_NUMBER_TABLE
217     , p8_a4 in out nocopy JTF_DATE_TABLE
218     , p8_a5 in out nocopy JTF_NUMBER_TABLE
219     , p8_a6 in out nocopy JTF_NUMBER_TABLE
220     , p8_a7 in out nocopy JTF_DATE_TABLE
221     , p8_a8 in out nocopy JTF_NUMBER_TABLE
222     , p8_a9 in out nocopy JTF_VARCHAR2_TABLE_200
223     , p8_a10 in out nocopy JTF_VARCHAR2_TABLE_200
224     , p8_a11 in out nocopy JTF_VARCHAR2_TABLE_200
225     , p8_a12 in out nocopy JTF_VARCHAR2_TABLE_200
226     , p8_a13 in out nocopy JTF_VARCHAR2_TABLE_200
227     , p8_a14 in out nocopy JTF_VARCHAR2_TABLE_200
228     , p8_a15 in out nocopy JTF_VARCHAR2_TABLE_200
229     , p8_a16 in out nocopy JTF_VARCHAR2_TABLE_200
230     , p8_a17 in out nocopy JTF_VARCHAR2_TABLE_200
231     , p8_a18 in out nocopy JTF_VARCHAR2_TABLE_200
232     , p8_a19 in out nocopy JTF_VARCHAR2_TABLE_200
233     , p8_a20 in out nocopy JTF_VARCHAR2_TABLE_200
234     , p8_a21 in out nocopy JTF_VARCHAR2_TABLE_200
235     , p8_a22 in out nocopy JTF_VARCHAR2_TABLE_200
236     , p8_a23 in out nocopy JTF_VARCHAR2_TABLE_200
237     , p8_a24 in out nocopy JTF_VARCHAR2_TABLE_100
238     , p8_a25 in out nocopy JTF_NUMBER_TABLE
239     , p8_a26 in out nocopy JTF_VARCHAR2_TABLE_100
240     , p8_a27 in out nocopy JTF_NUMBER_TABLE
241     , p8_a28 in out nocopy JTF_DATE_TABLE
242     , p8_a29 in out nocopy JTF_DATE_TABLE
243     , p8_a30 in out nocopy JTF_NUMBER_TABLE
244     , p8_a31 in out nocopy JTF_VARCHAR2_TABLE_100
245     , x_return_status out nocopy  VARCHAR2
246     , x_msg_count out nocopy  NUMBER
247     , x_msg_data out nocopy  VARCHAR2
248     , x_ctr_id out nocopy  NUMBER
249   )
250 
251   as
252     ddp_counter_instance_rec csi_ctr_datastructures_pub.counter_instance_rec;
253     ddp_ctr_properties_tbl csi_ctr_datastructures_pub.ctr_properties_tbl;
254     ddp_counter_relationships_tbl csi_ctr_datastructures_pub.counter_relationships_tbl;
255     ddp_ctr_derived_filters_tbl csi_ctr_datastructures_pub.ctr_derived_filters_tbl;
256     ddp_counter_associations_tbl csi_ctr_datastructures_pub.counter_associations_tbl;
257     ddindx binary_integer; indx binary_integer;
258   begin
259 
260     -- copy data to the local IN or IN-OUT args, if any
261 
262 
263 
264 
265     ddp_counter_instance_rec.counter_id := rosetta_g_miss_num_map(p4_a0);
266     ddp_counter_instance_rec.group_id := rosetta_g_miss_num_map(p4_a1);
267     ddp_counter_instance_rec.counter_type := p4_a2;
268     ddp_counter_instance_rec.initial_reading := rosetta_g_miss_num_map(p4_a3);
269     ddp_counter_instance_rec.initial_reading_date := rosetta_g_miss_date_in_map(p4_a4);
270     ddp_counter_instance_rec.created_from_counter_tmpl_id := rosetta_g_miss_num_map(p4_a5);
271     ddp_counter_instance_rec.tolerance_plus := rosetta_g_miss_num_map(p4_a6);
272     ddp_counter_instance_rec.tolerance_minus := rosetta_g_miss_num_map(p4_a7);
273     ddp_counter_instance_rec.uom_code := p4_a8;
274     ddp_counter_instance_rec.derive_counter_id := rosetta_g_miss_num_map(p4_a9);
275     ddp_counter_instance_rec.derive_function := p4_a10;
276     ddp_counter_instance_rec.derive_property_id := rosetta_g_miss_num_map(p4_a11);
277     ddp_counter_instance_rec.valid_flag := p4_a12;
278     ddp_counter_instance_rec.formula_incomplete_flag := p4_a13;
279     ddp_counter_instance_rec.formula_text := p4_a14;
280     ddp_counter_instance_rec.rollover_last_reading := rosetta_g_miss_num_map(p4_a15);
281     ddp_counter_instance_rec.rollover_first_reading := rosetta_g_miss_num_map(p4_a16);
282     ddp_counter_instance_rec.usage_item_id := rosetta_g_miss_num_map(p4_a17);
283     ddp_counter_instance_rec.ctr_val_max_seq_no := rosetta_g_miss_num_map(p4_a18);
284     ddp_counter_instance_rec.start_date_active := rosetta_g_miss_date_in_map(p4_a19);
285     ddp_counter_instance_rec.end_date_active := rosetta_g_miss_date_in_map(p4_a20);
286     ddp_counter_instance_rec.object_version_number := rosetta_g_miss_num_map(p4_a21);
287     ddp_counter_instance_rec.last_update_date := rosetta_g_miss_date_in_map(p4_a22);
288     ddp_counter_instance_rec.last_updated_by := rosetta_g_miss_num_map(p4_a23);
289     ddp_counter_instance_rec.creation_date := rosetta_g_miss_date_in_map(p4_a24);
290     ddp_counter_instance_rec.created_by := rosetta_g_miss_num_map(p4_a25);
291     ddp_counter_instance_rec.last_update_login := rosetta_g_miss_num_map(p4_a26);
292     ddp_counter_instance_rec.attribute1 := p4_a27;
293     ddp_counter_instance_rec.attribute2 := p4_a28;
294     ddp_counter_instance_rec.attribute3 := p4_a29;
295     ddp_counter_instance_rec.attribute4 := p4_a30;
296     ddp_counter_instance_rec.attribute5 := p4_a31;
297     ddp_counter_instance_rec.attribute6 := p4_a32;
298     ddp_counter_instance_rec.attribute7 := p4_a33;
299     ddp_counter_instance_rec.attribute8 := p4_a34;
300     ddp_counter_instance_rec.attribute9 := p4_a35;
301     ddp_counter_instance_rec.attribute10 := p4_a36;
302     ddp_counter_instance_rec.attribute11 := p4_a37;
303     ddp_counter_instance_rec.attribute12 := p4_a38;
304     ddp_counter_instance_rec.attribute13 := p4_a39;
305     ddp_counter_instance_rec.attribute14 := p4_a40;
306     ddp_counter_instance_rec.attribute15 := p4_a41;
307     ddp_counter_instance_rec.attribute16 := p4_a42;
308     ddp_counter_instance_rec.attribute17 := p4_a43;
309     ddp_counter_instance_rec.attribute18 := p4_a44;
310     ddp_counter_instance_rec.attribute19 := p4_a45;
311     ddp_counter_instance_rec.attribute20 := p4_a46;
312     ddp_counter_instance_rec.attribute21 := p4_a47;
313     ddp_counter_instance_rec.attribute22 := p4_a48;
314     ddp_counter_instance_rec.attribute23 := p4_a49;
315     ddp_counter_instance_rec.attribute24 := p4_a50;
316     ddp_counter_instance_rec.attribute25 := p4_a51;
317     ddp_counter_instance_rec.attribute26 := p4_a52;
318     ddp_counter_instance_rec.attribute27 := p4_a53;
319     ddp_counter_instance_rec.attribute28 := p4_a54;
320     ddp_counter_instance_rec.attribute29 := p4_a55;
321     ddp_counter_instance_rec.attribute30 := p4_a56;
322     ddp_counter_instance_rec.attribute_category := p4_a57;
323     ddp_counter_instance_rec.migrated_flag := p4_a58;
324     ddp_counter_instance_rec.customer_view := p4_a59;
325     ddp_counter_instance_rec.direction := p4_a60;
326     ddp_counter_instance_rec.filter_type := p4_a61;
327     ddp_counter_instance_rec.filter_reading_count := rosetta_g_miss_num_map(p4_a62);
328     ddp_counter_instance_rec.filter_time_uom := p4_a63;
329     ddp_counter_instance_rec.estimation_id := rosetta_g_miss_num_map(p4_a64);
330     ddp_counter_instance_rec.reading_type := rosetta_g_miss_num_map(p4_a65);
331     ddp_counter_instance_rec.automatic_rollover := p4_a66;
332     ddp_counter_instance_rec.default_usage_rate := rosetta_g_miss_num_map(p4_a67);
333     ddp_counter_instance_rec.use_past_reading := rosetta_g_miss_num_map(p4_a68);
334     ddp_counter_instance_rec.used_in_scheduling := p4_a69;
335     ddp_counter_instance_rec.defaulted_group_id := rosetta_g_miss_num_map(p4_a70);
336     ddp_counter_instance_rec.security_group_id := rosetta_g_miss_num_map(p4_a71);
337     ddp_counter_instance_rec.name := p4_a72;
338     ddp_counter_instance_rec.description := p4_a73;
339     ddp_counter_instance_rec.comments := p4_a74;
340     ddp_counter_instance_rec.step_value := rosetta_g_miss_num_map(p4_a75);
341     ddp_counter_instance_rec.time_based_manual_entry := p4_a76;
342     ddp_counter_instance_rec.eam_required_flag := p4_a77;
343 
344     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p20(ddp_ctr_properties_tbl, p5_a0
345       , p5_a1
346       , p5_a2
347       , p5_a3
348       , p5_a4
349       , p5_a5
350       , p5_a6
351       , p5_a7
352       , p5_a8
353       , p5_a9
354       , p5_a10
355       , p5_a11
356       , p5_a12
357       , p5_a13
358       , p5_a14
359       , p5_a15
360       , p5_a16
361       , p5_a17
362       , p5_a18
363       , p5_a19
364       , p5_a20
365       , p5_a21
366       , p5_a22
367       , p5_a23
368       , p5_a24
369       , p5_a25
370       , p5_a26
371       , p5_a27
372       , p5_a28
373       , p5_a29
374       , p5_a30
375       , p5_a31
376       , p5_a32
377       , p5_a33
378       , p5_a34
379       , p5_a35
380       , p5_a36
381       , p5_a37
382       );
383 
384     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p10(ddp_counter_relationships_tbl, p6_a0
385       , p6_a1
386       , p6_a2
387       , p6_a3
388       , p6_a4
389       , p6_a5
390       , p6_a6
391       , p6_a7
392       , p6_a8
393       , p6_a9
394       , p6_a10
395       , p6_a11
396       , p6_a12
397       , p6_a13
398       , p6_a14
399       , p6_a15
400       , p6_a16
401       , p6_a17
402       , p6_a18
403       , p6_a19
404       , p6_a20
405       , p6_a21
406       , p6_a22
407       , p6_a23
408       , p6_a24
409       , p6_a25
410       , p6_a26
411       , p6_a27
412       , p6_a28
413       , p6_a29
414       , p6_a30
415       , p6_a31
416       , p6_a32
417       );
418 
419     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p16(ddp_ctr_derived_filters_tbl, p7_a0
420       , p7_a1
421       , p7_a2
422       , p7_a3
423       , p7_a4
424       , p7_a5
425       , p7_a6
426       , p7_a7
427       , p7_a8
428       , p7_a9
429       , p7_a10
430       , p7_a11
431       , p7_a12
432       , p7_a13
433       , p7_a14
434       , p7_a15
435       , p7_a16
436       , p7_a17
437       , p7_a18
438       , p7_a19
439       , p7_a20
440       , p7_a21
441       , p7_a22
442       , p7_a23
443       , p7_a24
444       , p7_a25
445       , p7_a26
446       , p7_a27
447       , p7_a28
448       , p7_a29
449       , p7_a30
450       , p7_a31
451       , p7_a32
452       , p7_a33
453       , p7_a34
454       );
455 
456     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p22(ddp_counter_associations_tbl, p8_a0
457       , p8_a1
458       , p8_a2
459       , p8_a3
460       , p8_a4
461       , p8_a5
462       , p8_a6
463       , p8_a7
464       , p8_a8
465       , p8_a9
466       , p8_a10
467       , p8_a11
468       , p8_a12
469       , p8_a13
470       , p8_a14
471       , p8_a15
472       , p8_a16
473       , p8_a17
474       , p8_a18
475       , p8_a19
476       , p8_a20
477       , p8_a21
478       , p8_a22
479       , p8_a23
480       , p8_a24
481       , p8_a25
482       , p8_a26
483       , p8_a27
484       , p8_a28
485       , p8_a29
486       , p8_a30
487       , p8_a31
488       );
489 
490 
491 
492 
493 
494     -- here's the delegated call to the old PL/SQL routine
495     csi_counter_pub.create_counter(p_api_version,
496       p_init_msg_list,
497       p_commit,
498       p_validation_level,
499       ddp_counter_instance_rec,
500       ddp_ctr_properties_tbl,
501       ddp_counter_relationships_tbl,
502       ddp_ctr_derived_filters_tbl,
503       ddp_counter_associations_tbl,
504       x_return_status,
505       x_msg_count,
506       x_msg_data,
507       x_ctr_id);
508 
509     -- copy data back from the local variables to OUT or IN-OUT args, if any
510 
511 
512 
513 
514     p4_a0 := rosetta_g_miss_num_map(ddp_counter_instance_rec.counter_id);
515     p4_a1 := rosetta_g_miss_num_map(ddp_counter_instance_rec.group_id);
516     p4_a2 := ddp_counter_instance_rec.counter_type;
517     p4_a3 := rosetta_g_miss_num_map(ddp_counter_instance_rec.initial_reading);
518     p4_a4 := ddp_counter_instance_rec.initial_reading_date;
519     p4_a5 := rosetta_g_miss_num_map(ddp_counter_instance_rec.created_from_counter_tmpl_id);
520     p4_a6 := rosetta_g_miss_num_map(ddp_counter_instance_rec.tolerance_plus);
521     p4_a7 := rosetta_g_miss_num_map(ddp_counter_instance_rec.tolerance_minus);
522     p4_a8 := ddp_counter_instance_rec.uom_code;
523     p4_a9 := rosetta_g_miss_num_map(ddp_counter_instance_rec.derive_counter_id);
524     p4_a10 := ddp_counter_instance_rec.derive_function;
525     p4_a11 := rosetta_g_miss_num_map(ddp_counter_instance_rec.derive_property_id);
526     p4_a12 := ddp_counter_instance_rec.valid_flag;
527     p4_a13 := ddp_counter_instance_rec.formula_incomplete_flag;
528     p4_a14 := ddp_counter_instance_rec.formula_text;
529     p4_a15 := rosetta_g_miss_num_map(ddp_counter_instance_rec.rollover_last_reading);
530     p4_a16 := rosetta_g_miss_num_map(ddp_counter_instance_rec.rollover_first_reading);
531     p4_a17 := rosetta_g_miss_num_map(ddp_counter_instance_rec.usage_item_id);
532     p4_a18 := rosetta_g_miss_num_map(ddp_counter_instance_rec.ctr_val_max_seq_no);
533     p4_a19 := ddp_counter_instance_rec.start_date_active;
534     p4_a20 := ddp_counter_instance_rec.end_date_active;
535     p4_a21 := rosetta_g_miss_num_map(ddp_counter_instance_rec.object_version_number);
536     p4_a22 := ddp_counter_instance_rec.last_update_date;
537     p4_a23 := rosetta_g_miss_num_map(ddp_counter_instance_rec.last_updated_by);
538     p4_a24 := ddp_counter_instance_rec.creation_date;
539     p4_a25 := rosetta_g_miss_num_map(ddp_counter_instance_rec.created_by);
540     p4_a26 := rosetta_g_miss_num_map(ddp_counter_instance_rec.last_update_login);
541     p4_a27 := ddp_counter_instance_rec.attribute1;
542     p4_a28 := ddp_counter_instance_rec.attribute2;
543     p4_a29 := ddp_counter_instance_rec.attribute3;
544     p4_a30 := ddp_counter_instance_rec.attribute4;
545     p4_a31 := ddp_counter_instance_rec.attribute5;
546     p4_a32 := ddp_counter_instance_rec.attribute6;
547     p4_a33 := ddp_counter_instance_rec.attribute7;
548     p4_a34 := ddp_counter_instance_rec.attribute8;
549     p4_a35 := ddp_counter_instance_rec.attribute9;
550     p4_a36 := ddp_counter_instance_rec.attribute10;
551     p4_a37 := ddp_counter_instance_rec.attribute11;
552     p4_a38 := ddp_counter_instance_rec.attribute12;
553     p4_a39 := ddp_counter_instance_rec.attribute13;
554     p4_a40 := ddp_counter_instance_rec.attribute14;
555     p4_a41 := ddp_counter_instance_rec.attribute15;
556     p4_a42 := ddp_counter_instance_rec.attribute16;
557     p4_a43 := ddp_counter_instance_rec.attribute17;
558     p4_a44 := ddp_counter_instance_rec.attribute18;
559     p4_a45 := ddp_counter_instance_rec.attribute19;
560     p4_a46 := ddp_counter_instance_rec.attribute20;
561     p4_a47 := ddp_counter_instance_rec.attribute21;
562     p4_a48 := ddp_counter_instance_rec.attribute22;
563     p4_a49 := ddp_counter_instance_rec.attribute23;
564     p4_a50 := ddp_counter_instance_rec.attribute24;
565     p4_a51 := ddp_counter_instance_rec.attribute25;
566     p4_a52 := ddp_counter_instance_rec.attribute26;
567     p4_a53 := ddp_counter_instance_rec.attribute27;
568     p4_a54 := ddp_counter_instance_rec.attribute28;
569     p4_a55 := ddp_counter_instance_rec.attribute29;
570     p4_a56 := ddp_counter_instance_rec.attribute30;
571     p4_a57 := ddp_counter_instance_rec.attribute_category;
572     p4_a58 := ddp_counter_instance_rec.migrated_flag;
573     p4_a59 := ddp_counter_instance_rec.customer_view;
574     p4_a60 := ddp_counter_instance_rec.direction;
575     p4_a61 := ddp_counter_instance_rec.filter_type;
576     p4_a62 := rosetta_g_miss_num_map(ddp_counter_instance_rec.filter_reading_count);
577     p4_a63 := ddp_counter_instance_rec.filter_time_uom;
578     p4_a64 := rosetta_g_miss_num_map(ddp_counter_instance_rec.estimation_id);
579     p4_a65 := rosetta_g_miss_num_map(ddp_counter_instance_rec.reading_type);
580     p4_a66 := ddp_counter_instance_rec.automatic_rollover;
581     p4_a67 := rosetta_g_miss_num_map(ddp_counter_instance_rec.default_usage_rate);
582     p4_a68 := rosetta_g_miss_num_map(ddp_counter_instance_rec.use_past_reading);
583     p4_a69 := ddp_counter_instance_rec.used_in_scheduling;
584     p4_a70 := rosetta_g_miss_num_map(ddp_counter_instance_rec.defaulted_group_id);
585     p4_a71 := rosetta_g_miss_num_map(ddp_counter_instance_rec.security_group_id);
586     p4_a72 := ddp_counter_instance_rec.name;
587     p4_a73 := ddp_counter_instance_rec.description;
588     p4_a74 := ddp_counter_instance_rec.comments;
589     p4_a75 := rosetta_g_miss_num_map(ddp_counter_instance_rec.step_value);
590     p4_a76 := ddp_counter_instance_rec.time_based_manual_entry;
591     p4_a77 := ddp_counter_instance_rec.eam_required_flag;
592 
593     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p20(ddp_ctr_properties_tbl, p5_a0
594       , p5_a1
595       , p5_a2
596       , p5_a3
597       , p5_a4
598       , p5_a5
599       , p5_a6
600       , p5_a7
601       , p5_a8
602       , p5_a9
603       , p5_a10
604       , p5_a11
605       , p5_a12
606       , p5_a13
607       , p5_a14
608       , p5_a15
609       , p5_a16
610       , p5_a17
611       , p5_a18
612       , p5_a19
613       , p5_a20
614       , p5_a21
615       , p5_a22
616       , p5_a23
617       , p5_a24
618       , p5_a25
619       , p5_a26
620       , p5_a27
621       , p5_a28
622       , p5_a29
623       , p5_a30
624       , p5_a31
625       , p5_a32
626       , p5_a33
627       , p5_a34
628       , p5_a35
629       , p5_a36
630       , p5_a37
631       );
632 
633     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p10(ddp_counter_relationships_tbl, p6_a0
634       , p6_a1
635       , p6_a2
636       , p6_a3
637       , p6_a4
638       , p6_a5
639       , p6_a6
640       , p6_a7
641       , p6_a8
642       , p6_a9
643       , p6_a10
644       , p6_a11
645       , p6_a12
646       , p6_a13
647       , p6_a14
648       , p6_a15
649       , p6_a16
650       , p6_a17
651       , p6_a18
652       , p6_a19
653       , p6_a20
654       , p6_a21
655       , p6_a22
656       , p6_a23
657       , p6_a24
658       , p6_a25
659       , p6_a26
660       , p6_a27
661       , p6_a28
662       , p6_a29
663       , p6_a30
664       , p6_a31
665       , p6_a32
666       );
667 
668     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p16(ddp_ctr_derived_filters_tbl, p7_a0
669       , p7_a1
670       , p7_a2
671       , p7_a3
672       , p7_a4
673       , p7_a5
674       , p7_a6
675       , p7_a7
676       , p7_a8
677       , p7_a9
678       , p7_a10
679       , p7_a11
680       , p7_a12
681       , p7_a13
682       , p7_a14
683       , p7_a15
684       , p7_a16
685       , p7_a17
686       , p7_a18
687       , p7_a19
688       , p7_a20
689       , p7_a21
690       , p7_a22
691       , p7_a23
692       , p7_a24
693       , p7_a25
694       , p7_a26
695       , p7_a27
696       , p7_a28
697       , p7_a29
698       , p7_a30
699       , p7_a31
700       , p7_a32
701       , p7_a33
702       , p7_a34
703       );
704 
705     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p22(ddp_counter_associations_tbl, p8_a0
706       , p8_a1
707       , p8_a2
708       , p8_a3
709       , p8_a4
710       , p8_a5
711       , p8_a6
712       , p8_a7
713       , p8_a8
714       , p8_a9
715       , p8_a10
716       , p8_a11
717       , p8_a12
718       , p8_a13
719       , p8_a14
720       , p8_a15
721       , p8_a16
722       , p8_a17
723       , p8_a18
724       , p8_a19
725       , p8_a20
726       , p8_a21
727       , p8_a22
728       , p8_a23
729       , p8_a24
730       , p8_a25
731       , p8_a26
732       , p8_a27
733       , p8_a28
734       , p8_a29
735       , p8_a30
736       , p8_a31
737       );
738 
739 
740 
741 
742   end;
743 
744   procedure create_ctr_property(p_api_version  NUMBER
745     , p_commit  VARCHAR2
746     , p_init_msg_list  VARCHAR2
747     , p_validation_level  NUMBER
748     , p4_a0 in out nocopy JTF_NUMBER_TABLE
749     , p4_a1 in out nocopy JTF_NUMBER_TABLE
750     , p4_a2 in out nocopy JTF_VARCHAR2_TABLE_100
751     , p4_a3 in out nocopy JTF_VARCHAR2_TABLE_100
752     , p4_a4 in out nocopy JTF_VARCHAR2_TABLE_300
753     , p4_a5 in out nocopy JTF_VARCHAR2_TABLE_300
754     , p4_a6 in out nocopy JTF_VARCHAR2_TABLE_300
755     , p4_a7 in out nocopy JTF_VARCHAR2_TABLE_100
756     , p4_a8 in out nocopy JTF_DATE_TABLE
757     , p4_a9 in out nocopy JTF_DATE_TABLE
758     , p4_a10 in out nocopy JTF_NUMBER_TABLE
759     , p4_a11 in out nocopy JTF_DATE_TABLE
760     , p4_a12 in out nocopy JTF_NUMBER_TABLE
761     , p4_a13 in out nocopy JTF_DATE_TABLE
762     , p4_a14 in out nocopy JTF_NUMBER_TABLE
763     , p4_a15 in out nocopy JTF_NUMBER_TABLE
764     , p4_a16 in out nocopy JTF_VARCHAR2_TABLE_200
765     , p4_a17 in out nocopy JTF_VARCHAR2_TABLE_200
766     , p4_a18 in out nocopy JTF_VARCHAR2_TABLE_200
767     , p4_a19 in out nocopy JTF_VARCHAR2_TABLE_200
768     , p4_a20 in out nocopy JTF_VARCHAR2_TABLE_200
769     , p4_a21 in out nocopy JTF_VARCHAR2_TABLE_200
770     , p4_a22 in out nocopy JTF_VARCHAR2_TABLE_200
771     , p4_a23 in out nocopy JTF_VARCHAR2_TABLE_200
772     , p4_a24 in out nocopy JTF_VARCHAR2_TABLE_200
773     , p4_a25 in out nocopy JTF_VARCHAR2_TABLE_200
774     , p4_a26 in out nocopy JTF_VARCHAR2_TABLE_200
775     , p4_a27 in out nocopy JTF_VARCHAR2_TABLE_200
776     , p4_a28 in out nocopy JTF_VARCHAR2_TABLE_200
777     , p4_a29 in out nocopy JTF_VARCHAR2_TABLE_200
778     , p4_a30 in out nocopy JTF_VARCHAR2_TABLE_200
779     , p4_a31 in out nocopy JTF_VARCHAR2_TABLE_100
780     , p4_a32 in out nocopy JTF_VARCHAR2_TABLE_100
781     , p4_a33 in out nocopy JTF_VARCHAR2_TABLE_100
782     , p4_a34 in out nocopy JTF_NUMBER_TABLE
783     , p4_a35 in out nocopy JTF_NUMBER_TABLE
784     , p4_a36 in out nocopy JTF_VARCHAR2_TABLE_100
785     , p4_a37 in out nocopy JTF_VARCHAR2_TABLE_300
786     , x_return_status out nocopy  VARCHAR2
787     , x_msg_count out nocopy  NUMBER
788     , x_msg_data out nocopy  VARCHAR2
789     , x_ctr_property_id out nocopy  NUMBER
790   )
791 
792   as
793     ddp_ctr_properties_tbl csi_ctr_datastructures_pub.ctr_properties_tbl;
794     ddindx binary_integer; indx binary_integer;
795   begin
796 
797     -- copy data to the local IN or IN-OUT args, if any
798 
799 
800 
801 
802     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p20(ddp_ctr_properties_tbl, p4_a0
803       , p4_a1
804       , p4_a2
805       , p4_a3
806       , p4_a4
807       , p4_a5
808       , p4_a6
809       , p4_a7
810       , p4_a8
811       , p4_a9
812       , p4_a10
813       , p4_a11
814       , p4_a12
815       , p4_a13
816       , p4_a14
817       , p4_a15
818       , p4_a16
819       , p4_a17
820       , p4_a18
821       , p4_a19
822       , p4_a20
823       , p4_a21
824       , p4_a22
825       , p4_a23
826       , p4_a24
827       , p4_a25
828       , p4_a26
829       , p4_a27
830       , p4_a28
831       , p4_a29
832       , p4_a30
833       , p4_a31
834       , p4_a32
835       , p4_a33
836       , p4_a34
837       , p4_a35
838       , p4_a36
839       , p4_a37
840       );
841 
842 
843 
844 
845 
846     -- here's the delegated call to the old PL/SQL routine
847     csi_counter_pub.create_ctr_property(p_api_version,
848       p_commit,
849       p_init_msg_list,
850       p_validation_level,
851       ddp_ctr_properties_tbl,
852       x_return_status,
853       x_msg_count,
854       x_msg_data,
855       x_ctr_property_id);
856 
857     -- copy data back from the local variables to OUT or IN-OUT args, if any
858 
859 
860 
861 
862     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p20(ddp_ctr_properties_tbl, p4_a0
863       , p4_a1
864       , p4_a2
865       , p4_a3
866       , p4_a4
867       , p4_a5
868       , p4_a6
869       , p4_a7
870       , p4_a8
871       , p4_a9
872       , p4_a10
873       , p4_a11
874       , p4_a12
875       , p4_a13
876       , p4_a14
877       , p4_a15
878       , p4_a16
879       , p4_a17
880       , p4_a18
881       , p4_a19
882       , p4_a20
883       , p4_a21
884       , p4_a22
885       , p4_a23
886       , p4_a24
887       , p4_a25
888       , p4_a26
889       , p4_a27
890       , p4_a28
891       , p4_a29
892       , p4_a30
893       , p4_a31
894       , p4_a32
895       , p4_a33
896       , p4_a34
897       , p4_a35
898       , p4_a36
899       , p4_a37
900       );
901 
902 
903 
904 
905   end;
906 
907   procedure create_ctr_associations(p_api_version  NUMBER
908     , p_commit  VARCHAR2
909     , p_init_msg_list  VARCHAR2
910     , p_validation_level  NUMBER
911     , p4_a0 in out nocopy JTF_NUMBER_TABLE
912     , p4_a1 in out nocopy JTF_VARCHAR2_TABLE_100
913     , p4_a2 in out nocopy JTF_NUMBER_TABLE
914     , p4_a3 in out nocopy JTF_NUMBER_TABLE
915     , p4_a4 in out nocopy JTF_DATE_TABLE
916     , p4_a5 in out nocopy JTF_NUMBER_TABLE
917     , p4_a6 in out nocopy JTF_NUMBER_TABLE
918     , p4_a7 in out nocopy JTF_DATE_TABLE
919     , p4_a8 in out nocopy JTF_NUMBER_TABLE
920     , p4_a9 in out nocopy JTF_VARCHAR2_TABLE_200
921     , p4_a10 in out nocopy JTF_VARCHAR2_TABLE_200
922     , p4_a11 in out nocopy JTF_VARCHAR2_TABLE_200
923     , p4_a12 in out nocopy JTF_VARCHAR2_TABLE_200
924     , p4_a13 in out nocopy JTF_VARCHAR2_TABLE_200
925     , p4_a14 in out nocopy JTF_VARCHAR2_TABLE_200
926     , p4_a15 in out nocopy JTF_VARCHAR2_TABLE_200
927     , p4_a16 in out nocopy JTF_VARCHAR2_TABLE_200
928     , p4_a17 in out nocopy JTF_VARCHAR2_TABLE_200
929     , p4_a18 in out nocopy JTF_VARCHAR2_TABLE_200
930     , p4_a19 in out nocopy JTF_VARCHAR2_TABLE_200
931     , p4_a20 in out nocopy JTF_VARCHAR2_TABLE_200
932     , p4_a21 in out nocopy JTF_VARCHAR2_TABLE_200
933     , p4_a22 in out nocopy JTF_VARCHAR2_TABLE_200
934     , p4_a23 in out nocopy JTF_VARCHAR2_TABLE_200
935     , p4_a24 in out nocopy JTF_VARCHAR2_TABLE_100
936     , p4_a25 in out nocopy JTF_NUMBER_TABLE
937     , p4_a26 in out nocopy JTF_VARCHAR2_TABLE_100
938     , p4_a27 in out nocopy JTF_NUMBER_TABLE
939     , p4_a28 in out nocopy JTF_DATE_TABLE
940     , p4_a29 in out nocopy JTF_DATE_TABLE
941     , p4_a30 in out nocopy JTF_NUMBER_TABLE
942     , p4_a31 in out nocopy JTF_VARCHAR2_TABLE_100
943     , x_return_status out nocopy  VARCHAR2
944     , x_msg_count out nocopy  NUMBER
945     , x_msg_data out nocopy  VARCHAR2
946     , x_instance_association_id out nocopy  NUMBER
947   )
948 
949   as
950     ddp_counter_associations_tbl csi_ctr_datastructures_pub.counter_associations_tbl;
951     ddindx binary_integer; indx binary_integer;
952   begin
953 
954     -- copy data to the local IN or IN-OUT args, if any
955 
956 
957 
958 
959     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p22(ddp_counter_associations_tbl, p4_a0
960       , p4_a1
961       , p4_a2
962       , p4_a3
963       , p4_a4
964       , p4_a5
965       , p4_a6
966       , p4_a7
967       , p4_a8
968       , p4_a9
969       , p4_a10
970       , p4_a11
971       , p4_a12
972       , p4_a13
973       , p4_a14
974       , p4_a15
975       , p4_a16
976       , p4_a17
977       , p4_a18
978       , p4_a19
979       , p4_a20
980       , p4_a21
981       , p4_a22
982       , p4_a23
983       , p4_a24
984       , p4_a25
985       , p4_a26
986       , p4_a27
987       , p4_a28
988       , p4_a29
989       , p4_a30
990       , p4_a31
991       );
992 
993 
994 
995 
996 
997     -- here's the delegated call to the old PL/SQL routine
998     csi_counter_pub.create_ctr_associations(p_api_version,
999       p_commit,
1000       p_init_msg_list,
1001       p_validation_level,
1002       ddp_counter_associations_tbl,
1003       x_return_status,
1004       x_msg_count,
1005       x_msg_data,
1006       x_instance_association_id);
1007 
1008     -- copy data back from the local variables to OUT or IN-OUT args, if any
1009 
1010 
1011 
1012 
1013     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p22(ddp_counter_associations_tbl, p4_a0
1014       , p4_a1
1015       , p4_a2
1016       , p4_a3
1017       , p4_a4
1018       , p4_a5
1019       , p4_a6
1020       , p4_a7
1021       , p4_a8
1022       , p4_a9
1023       , p4_a10
1024       , p4_a11
1025       , p4_a12
1026       , p4_a13
1027       , p4_a14
1028       , p4_a15
1029       , p4_a16
1030       , p4_a17
1031       , p4_a18
1032       , p4_a19
1033       , p4_a20
1034       , p4_a21
1035       , p4_a22
1036       , p4_a23
1037       , p4_a24
1038       , p4_a25
1039       , p4_a26
1040       , p4_a27
1041       , p4_a28
1042       , p4_a29
1043       , p4_a30
1044       , p4_a31
1045       );
1046 
1047 
1048 
1049 
1050   end;
1051 
1052   procedure create_reading_lock(p_api_version  NUMBER
1053     , p_commit  VARCHAR2
1054     , p_init_msg_list  VARCHAR2
1055     , p_validation_level  NUMBER
1056     , p4_a0 in out nocopy  NUMBER
1057     , p4_a1 in out nocopy  NUMBER
1058     , p4_a2 in out nocopy  DATE
1059     , p4_a3 in out nocopy  DATE
1060     , p4_a4 in out nocopy  DATE
1061     , p4_a5 in out nocopy  NUMBER
1062     , p4_a6 in out nocopy  DATE
1063     , p4_a7 in out nocopy  NUMBER
1064     , p4_a8 in out nocopy  DATE
1065     , p4_a9 in out nocopy  NUMBER
1066     , p4_a10 in out nocopy  NUMBER
1067     , p4_a11 in out nocopy  NUMBER
1068     , p4_a12 in out nocopy  VARCHAR2
1069     , p4_a13 in out nocopy  NUMBER
1070     , p4_a14 in out nocopy  VARCHAR2
1071     , p4_a15 in out nocopy  NUMBER
1072     , p4_a16 in out nocopy  VARCHAR2
1073     , p4_a17 in out nocopy  NUMBER
1074     , p4_a18 in out nocopy  NUMBER
1075     , x_return_status out nocopy  VARCHAR2
1076     , x_msg_count out nocopy  NUMBER
1077     , x_msg_data out nocopy  VARCHAR2
1078     , x_reading_lock_id out nocopy  NUMBER
1079   )
1080 
1081   as
1082     ddp_ctr_reading_lock_rec csi_ctr_datastructures_pub.ctr_reading_lock_rec;
1083     ddindx binary_integer; indx binary_integer;
1084   begin
1085 
1086     -- copy data to the local IN or IN-OUT args, if any
1087 
1088 
1089 
1090 
1091     ddp_ctr_reading_lock_rec.reading_lock_id := rosetta_g_miss_num_map(p4_a0);
1092     ddp_ctr_reading_lock_rec.counter_id := rosetta_g_miss_num_map(p4_a1);
1093     ddp_ctr_reading_lock_rec.reading_lock_date := rosetta_g_miss_date_in_map(p4_a2);
1094     ddp_ctr_reading_lock_rec.active_start_date := rosetta_g_miss_date_in_map(p4_a3);
1095     ddp_ctr_reading_lock_rec.active_end_date := rosetta_g_miss_date_in_map(p4_a4);
1096     ddp_ctr_reading_lock_rec.object_version_number := rosetta_g_miss_num_map(p4_a5);
1097     ddp_ctr_reading_lock_rec.last_update_date := rosetta_g_miss_date_in_map(p4_a6);
1098     ddp_ctr_reading_lock_rec.last_updated_by := rosetta_g_miss_num_map(p4_a7);
1099     ddp_ctr_reading_lock_rec.creation_date := rosetta_g_miss_date_in_map(p4_a8);
1100     ddp_ctr_reading_lock_rec.created_by := rosetta_g_miss_num_map(p4_a9);
1101     ddp_ctr_reading_lock_rec.last_update_login := rosetta_g_miss_num_map(p4_a10);
1102     ddp_ctr_reading_lock_rec.source_group_ref_id := rosetta_g_miss_num_map(p4_a11);
1103     ddp_ctr_reading_lock_rec.source_group_ref := p4_a12;
1104     ddp_ctr_reading_lock_rec.source_header_ref_id := rosetta_g_miss_num_map(p4_a13);
1105     ddp_ctr_reading_lock_rec.source_header_ref := p4_a14;
1106     ddp_ctr_reading_lock_rec.source_line_ref_id := rosetta_g_miss_num_map(p4_a15);
1107     ddp_ctr_reading_lock_rec.source_line_ref := p4_a16;
1108     ddp_ctr_reading_lock_rec.source_dist_ref_id1 := rosetta_g_miss_num_map(p4_a17);
1109     ddp_ctr_reading_lock_rec.source_dist_ref_id2 := rosetta_g_miss_num_map(p4_a18);
1110 
1111 
1112 
1113 
1114 
1115     -- here's the delegated call to the old PL/SQL routine
1116     csi_counter_pub.create_reading_lock(p_api_version,
1117       p_commit,
1118       p_init_msg_list,
1119       p_validation_level,
1120       ddp_ctr_reading_lock_rec,
1121       x_return_status,
1122       x_msg_count,
1123       x_msg_data,
1124       x_reading_lock_id);
1125 
1126     -- copy data back from the local variables to OUT or IN-OUT args, if any
1127 
1128 
1129 
1130 
1131     p4_a0 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.reading_lock_id);
1132     p4_a1 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.counter_id);
1133     p4_a2 := ddp_ctr_reading_lock_rec.reading_lock_date;
1134     p4_a3 := ddp_ctr_reading_lock_rec.active_start_date;
1135     p4_a4 := ddp_ctr_reading_lock_rec.active_end_date;
1136     p4_a5 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.object_version_number);
1137     p4_a6 := ddp_ctr_reading_lock_rec.last_update_date;
1138     p4_a7 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.last_updated_by);
1139     p4_a8 := ddp_ctr_reading_lock_rec.creation_date;
1140     p4_a9 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.created_by);
1141     p4_a10 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.last_update_login);
1142     p4_a11 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.source_group_ref_id);
1143     p4_a12 := ddp_ctr_reading_lock_rec.source_group_ref;
1144     p4_a13 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.source_header_ref_id);
1145     p4_a14 := ddp_ctr_reading_lock_rec.source_header_ref;
1146     p4_a15 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.source_line_ref_id);
1147     p4_a16 := ddp_ctr_reading_lock_rec.source_line_ref;
1148     p4_a17 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.source_dist_ref_id1);
1149     p4_a18 := rosetta_g_miss_num_map(ddp_ctr_reading_lock_rec.source_dist_ref_id2);
1150 
1151 
1152 
1153 
1154   end;
1155 
1156   procedure create_daily_usage(p_api_version  NUMBER
1157     , p_commit  VARCHAR2
1158     , p_init_msg_list  VARCHAR2
1159     , p_validation_level  NUMBER
1160     , p4_a0 in out nocopy  NUMBER
1161     , p4_a1 in out nocopy  NUMBER
1162     , p4_a2 in out nocopy  NUMBER
1163     , p4_a3 in out nocopy  NUMBER
1164     , p4_a4 in out nocopy  DATE
1165     , p4_a5 in out nocopy  DATE
1166     , p4_a6 in out nocopy  NUMBER
1167     , p4_a7 in out nocopy  DATE
1168     , p4_a8 in out nocopy  NUMBER
1169     , p4_a9 in out nocopy  DATE
1170     , p4_a10 in out nocopy  NUMBER
1171     , p4_a11 in out nocopy  NUMBER
1172     , x_return_status out nocopy  VARCHAR2
1173     , x_msg_count out nocopy  NUMBER
1174     , x_msg_data out nocopy  VARCHAR2
1175     , x_instance_forecast_id out nocopy  NUMBER
1176   )
1177 
1178   as
1179     ddp_ctr_usage_forecast_rec csi_ctr_datastructures_pub.ctr_usage_forecast_rec;
1180     ddindx binary_integer; indx binary_integer;
1181   begin
1182 
1183     -- copy data to the local IN or IN-OUT args, if any
1184 
1185 
1186 
1187 
1188     ddp_ctr_usage_forecast_rec.instance_forecast_id := rosetta_g_miss_num_map(p4_a0);
1189     ddp_ctr_usage_forecast_rec.counter_id := rosetta_g_miss_num_map(p4_a1);
1190     ddp_ctr_usage_forecast_rec.usage_rate := rosetta_g_miss_num_map(p4_a2);
1191     ddp_ctr_usage_forecast_rec.use_past_reading := rosetta_g_miss_num_map(p4_a3);
1192     ddp_ctr_usage_forecast_rec.active_start_date := rosetta_g_miss_date_in_map(p4_a4);
1193     ddp_ctr_usage_forecast_rec.active_end_date := rosetta_g_miss_date_in_map(p4_a5);
1194     ddp_ctr_usage_forecast_rec.object_version_number := rosetta_g_miss_num_map(p4_a6);
1195     ddp_ctr_usage_forecast_rec.last_update_date := rosetta_g_miss_date_in_map(p4_a7);
1196     ddp_ctr_usage_forecast_rec.last_updated_by := rosetta_g_miss_num_map(p4_a8);
1197     ddp_ctr_usage_forecast_rec.creation_date := rosetta_g_miss_date_in_map(p4_a9);
1198     ddp_ctr_usage_forecast_rec.created_by := rosetta_g_miss_num_map(p4_a10);
1199     ddp_ctr_usage_forecast_rec.last_update_login := rosetta_g_miss_num_map(p4_a11);
1200 
1201 
1202 
1203 
1204 
1205     -- here's the delegated call to the old PL/SQL routine
1206     csi_counter_pub.create_daily_usage(p_api_version,
1207       p_commit,
1208       p_init_msg_list,
1209       p_validation_level,
1210       ddp_ctr_usage_forecast_rec,
1211       x_return_status,
1212       x_msg_count,
1213       x_msg_data,
1214       x_instance_forecast_id);
1215 
1216     -- copy data back from the local variables to OUT or IN-OUT args, if any
1217 
1218 
1219 
1220 
1221     p4_a0 := rosetta_g_miss_num_map(ddp_ctr_usage_forecast_rec.instance_forecast_id);
1222     p4_a1 := rosetta_g_miss_num_map(ddp_ctr_usage_forecast_rec.counter_id);
1223     p4_a2 := rosetta_g_miss_num_map(ddp_ctr_usage_forecast_rec.usage_rate);
1224     p4_a3 := rosetta_g_miss_num_map(ddp_ctr_usage_forecast_rec.use_past_reading);
1225     p4_a4 := ddp_ctr_usage_forecast_rec.active_start_date;
1226     p4_a5 := ddp_ctr_usage_forecast_rec.active_end_date;
1227     p4_a6 := rosetta_g_miss_num_map(ddp_ctr_usage_forecast_rec.object_version_number);
1228     p4_a7 := ddp_ctr_usage_forecast_rec.last_update_date;
1229     p4_a8 := rosetta_g_miss_num_map(ddp_ctr_usage_forecast_rec.last_updated_by);
1230     p4_a9 := ddp_ctr_usage_forecast_rec.creation_date;
1231     p4_a10 := rosetta_g_miss_num_map(ddp_ctr_usage_forecast_rec.created_by);
1232     p4_a11 := rosetta_g_miss_num_map(ddp_ctr_usage_forecast_rec.last_update_login);
1233 
1234 
1235 
1236 
1237   end;
1238 
1239   procedure update_counter(p_api_version  NUMBER
1240     , p_init_msg_list  VARCHAR2
1241     , p_commit  VARCHAR2
1242     , p_validation_level  NUMBER
1243     , p4_a0 in out nocopy  NUMBER
1244     , p4_a1 in out nocopy  NUMBER
1245     , p4_a2 in out nocopy  VARCHAR2
1246     , p4_a3 in out nocopy  NUMBER
1247     , p4_a4 in out nocopy  DATE
1248     , p4_a5 in out nocopy  NUMBER
1249     , p4_a6 in out nocopy  NUMBER
1250     , p4_a7 in out nocopy  NUMBER
1251     , p4_a8 in out nocopy  VARCHAR2
1252     , p4_a9 in out nocopy  NUMBER
1253     , p4_a10 in out nocopy  VARCHAR2
1254     , p4_a11 in out nocopy  NUMBER
1255     , p4_a12 in out nocopy  VARCHAR2
1256     , p4_a13 in out nocopy  VARCHAR2
1257     , p4_a14 in out nocopy  VARCHAR2
1258     , p4_a15 in out nocopy  NUMBER
1259     , p4_a16 in out nocopy  NUMBER
1260     , p4_a17 in out nocopy  NUMBER
1261     , p4_a18 in out nocopy  NUMBER
1262     , p4_a19 in out nocopy  DATE
1263     , p4_a20 in out nocopy  DATE
1264     , p4_a21 in out nocopy  NUMBER
1265     , p4_a22 in out nocopy  DATE
1266     , p4_a23 in out nocopy  NUMBER
1267     , p4_a24 in out nocopy  DATE
1268     , p4_a25 in out nocopy  NUMBER
1269     , p4_a26 in out nocopy  NUMBER
1270     , p4_a27 in out nocopy  VARCHAR2
1271     , p4_a28 in out nocopy  VARCHAR2
1272     , p4_a29 in out nocopy  VARCHAR2
1273     , p4_a30 in out nocopy  VARCHAR2
1274     , p4_a31 in out nocopy  VARCHAR2
1275     , p4_a32 in out nocopy  VARCHAR2
1276     , p4_a33 in out nocopy  VARCHAR2
1277     , p4_a34 in out nocopy  VARCHAR2
1278     , p4_a35 in out nocopy  VARCHAR2
1279     , p4_a36 in out nocopy  VARCHAR2
1280     , p4_a37 in out nocopy  VARCHAR2
1281     , p4_a38 in out nocopy  VARCHAR2
1282     , p4_a39 in out nocopy  VARCHAR2
1283     , p4_a40 in out nocopy  VARCHAR2
1284     , p4_a41 in out nocopy  VARCHAR2
1285     , p4_a42 in out nocopy  VARCHAR2
1286     , p4_a43 in out nocopy  VARCHAR2
1287     , p4_a44 in out nocopy  VARCHAR2
1288     , p4_a45 in out nocopy  VARCHAR2
1289     , p4_a46 in out nocopy  VARCHAR2
1290     , p4_a47 in out nocopy  VARCHAR2
1291     , p4_a48 in out nocopy  VARCHAR2
1292     , p4_a49 in out nocopy  VARCHAR2
1293     , p4_a50 in out nocopy  VARCHAR2
1294     , p4_a51 in out nocopy  VARCHAR2
1295     , p4_a52 in out nocopy  VARCHAR2
1296     , p4_a53 in out nocopy  VARCHAR2
1297     , p4_a54 in out nocopy  VARCHAR2
1298     , p4_a55 in out nocopy  VARCHAR2
1299     , p4_a56 in out nocopy  VARCHAR2
1300     , p4_a57 in out nocopy  VARCHAR2
1301     , p4_a58 in out nocopy  VARCHAR2
1302     , p4_a59 in out nocopy  VARCHAR2
1303     , p4_a60 in out nocopy  VARCHAR2
1304     , p4_a61 in out nocopy  VARCHAR2
1305     , p4_a62 in out nocopy  NUMBER
1306     , p4_a63 in out nocopy  VARCHAR2
1307     , p4_a64 in out nocopy  NUMBER
1308     , p4_a65 in out nocopy  NUMBER
1309     , p4_a66 in out nocopy  VARCHAR2
1310     , p4_a67 in out nocopy  NUMBER
1311     , p4_a68 in out nocopy  NUMBER
1312     , p4_a69 in out nocopy  VARCHAR2
1313     , p4_a70 in out nocopy  NUMBER
1314     , p4_a71 in out nocopy  NUMBER
1315     , p4_a72 in out nocopy  VARCHAR2
1316     , p4_a73 in out nocopy  VARCHAR2
1317     , p4_a74 in out nocopy  VARCHAR2
1318     , p4_a75 in out nocopy  NUMBER
1319     , p4_a76 in out nocopy  VARCHAR2
1320     , p4_a77 in out nocopy  VARCHAR2
1321     , p5_a0 in out nocopy JTF_NUMBER_TABLE
1322     , p5_a1 in out nocopy JTF_NUMBER_TABLE
1323     , p5_a2 in out nocopy JTF_VARCHAR2_TABLE_100
1324     , p5_a3 in out nocopy JTF_VARCHAR2_TABLE_100
1325     , p5_a4 in out nocopy JTF_VARCHAR2_TABLE_300
1326     , p5_a5 in out nocopy JTF_VARCHAR2_TABLE_300
1327     , p5_a6 in out nocopy JTF_VARCHAR2_TABLE_300
1328     , p5_a7 in out nocopy JTF_VARCHAR2_TABLE_100
1329     , p5_a8 in out nocopy JTF_DATE_TABLE
1330     , p5_a9 in out nocopy JTF_DATE_TABLE
1331     , p5_a10 in out nocopy JTF_NUMBER_TABLE
1332     , p5_a11 in out nocopy JTF_DATE_TABLE
1333     , p5_a12 in out nocopy JTF_NUMBER_TABLE
1334     , p5_a13 in out nocopy JTF_DATE_TABLE
1335     , p5_a14 in out nocopy JTF_NUMBER_TABLE
1336     , p5_a15 in out nocopy JTF_NUMBER_TABLE
1337     , p5_a16 in out nocopy JTF_VARCHAR2_TABLE_200
1338     , p5_a17 in out nocopy JTF_VARCHAR2_TABLE_200
1339     , p5_a18 in out nocopy JTF_VARCHAR2_TABLE_200
1340     , p5_a19 in out nocopy JTF_VARCHAR2_TABLE_200
1341     , p5_a20 in out nocopy JTF_VARCHAR2_TABLE_200
1342     , p5_a21 in out nocopy JTF_VARCHAR2_TABLE_200
1343     , p5_a22 in out nocopy JTF_VARCHAR2_TABLE_200
1344     , p5_a23 in out nocopy JTF_VARCHAR2_TABLE_200
1345     , p5_a24 in out nocopy JTF_VARCHAR2_TABLE_200
1346     , p5_a25 in out nocopy JTF_VARCHAR2_TABLE_200
1347     , p5_a26 in out nocopy JTF_VARCHAR2_TABLE_200
1348     , p5_a27 in out nocopy JTF_VARCHAR2_TABLE_200
1349     , p5_a28 in out nocopy JTF_VARCHAR2_TABLE_200
1350     , p5_a29 in out nocopy JTF_VARCHAR2_TABLE_200
1351     , p5_a30 in out nocopy JTF_VARCHAR2_TABLE_200
1352     , p5_a31 in out nocopy JTF_VARCHAR2_TABLE_100
1353     , p5_a32 in out nocopy JTF_VARCHAR2_TABLE_100
1354     , p5_a33 in out nocopy JTF_VARCHAR2_TABLE_100
1355     , p5_a34 in out nocopy JTF_NUMBER_TABLE
1356     , p5_a35 in out nocopy JTF_NUMBER_TABLE
1357     , p5_a36 in out nocopy JTF_VARCHAR2_TABLE_100
1358     , p5_a37 in out nocopy JTF_VARCHAR2_TABLE_300
1359     , p6_a0 in out nocopy JTF_NUMBER_TABLE
1360     , p6_a1 in out nocopy JTF_NUMBER_TABLE
1361     , p6_a2 in out nocopy JTF_VARCHAR2_TABLE_100
1362     , p6_a3 in out nocopy JTF_NUMBER_TABLE
1363     , p6_a4 in out nocopy JTF_NUMBER_TABLE
1364     , p6_a5 in out nocopy JTF_DATE_TABLE
1365     , p6_a6 in out nocopy JTF_DATE_TABLE
1366     , p6_a7 in out nocopy JTF_NUMBER_TABLE
1367     , p6_a8 in out nocopy JTF_DATE_TABLE
1368     , p6_a9 in out nocopy JTF_NUMBER_TABLE
1369     , p6_a10 in out nocopy JTF_DATE_TABLE
1370     , p6_a11 in out nocopy JTF_NUMBER_TABLE
1371     , p6_a12 in out nocopy JTF_NUMBER_TABLE
1372     , p6_a13 in out nocopy JTF_VARCHAR2_TABLE_100
1373     , p6_a14 in out nocopy JTF_VARCHAR2_TABLE_200
1374     , p6_a15 in out nocopy JTF_VARCHAR2_TABLE_200
1375     , p6_a16 in out nocopy JTF_VARCHAR2_TABLE_200
1376     , p6_a17 in out nocopy JTF_VARCHAR2_TABLE_200
1377     , p6_a18 in out nocopy JTF_VARCHAR2_TABLE_200
1378     , p6_a19 in out nocopy JTF_VARCHAR2_TABLE_200
1379     , p6_a20 in out nocopy JTF_VARCHAR2_TABLE_200
1380     , p6_a21 in out nocopy JTF_VARCHAR2_TABLE_200
1381     , p6_a22 in out nocopy JTF_VARCHAR2_TABLE_200
1382     , p6_a23 in out nocopy JTF_VARCHAR2_TABLE_200
1383     , p6_a24 in out nocopy JTF_VARCHAR2_TABLE_200
1384     , p6_a25 in out nocopy JTF_VARCHAR2_TABLE_200
1385     , p6_a26 in out nocopy JTF_VARCHAR2_TABLE_200
1386     , p6_a27 in out nocopy JTF_VARCHAR2_TABLE_200
1387     , p6_a28 in out nocopy JTF_VARCHAR2_TABLE_200
1388     , p6_a29 in out nocopy JTF_NUMBER_TABLE
1389     , p6_a30 in out nocopy JTF_VARCHAR2_TABLE_100
1390     , p6_a31 in out nocopy JTF_VARCHAR2_TABLE_100
1391     , p6_a32 in out nocopy JTF_NUMBER_TABLE
1392     , p7_a0 in out nocopy JTF_NUMBER_TABLE
1393     , p7_a1 in out nocopy JTF_NUMBER_TABLE
1394     , p7_a2 in out nocopy JTF_NUMBER_TABLE
1395     , p7_a3 in out nocopy JTF_VARCHAR2_TABLE_100
1396     , p7_a4 in out nocopy JTF_NUMBER_TABLE
1397     , p7_a5 in out nocopy JTF_VARCHAR2_TABLE_100
1398     , p7_a6 in out nocopy JTF_VARCHAR2_TABLE_300
1399     , p7_a7 in out nocopy JTF_VARCHAR2_TABLE_100
1400     , p7_a8 in out nocopy JTF_VARCHAR2_TABLE_100
1401     , p7_a9 in out nocopy JTF_DATE_TABLE
1402     , p7_a10 in out nocopy JTF_DATE_TABLE
1403     , p7_a11 in out nocopy JTF_NUMBER_TABLE
1404     , p7_a12 in out nocopy JTF_DATE_TABLE
1405     , p7_a13 in out nocopy JTF_NUMBER_TABLE
1406     , p7_a14 in out nocopy JTF_DATE_TABLE
1407     , p7_a15 in out nocopy JTF_NUMBER_TABLE
1408     , p7_a16 in out nocopy JTF_NUMBER_TABLE
1409     , p7_a17 in out nocopy JTF_VARCHAR2_TABLE_200
1410     , p7_a18 in out nocopy JTF_VARCHAR2_TABLE_200
1411     , p7_a19 in out nocopy JTF_VARCHAR2_TABLE_200
1412     , p7_a20 in out nocopy JTF_VARCHAR2_TABLE_200
1413     , p7_a21 in out nocopy JTF_VARCHAR2_TABLE_200
1414     , p7_a22 in out nocopy JTF_VARCHAR2_TABLE_200
1415     , p7_a23 in out nocopy JTF_VARCHAR2_TABLE_200
1416     , p7_a24 in out nocopy JTF_VARCHAR2_TABLE_200
1417     , p7_a25 in out nocopy JTF_VARCHAR2_TABLE_200
1418     , p7_a26 in out nocopy JTF_VARCHAR2_TABLE_200
1419     , p7_a27 in out nocopy JTF_VARCHAR2_TABLE_200
1420     , p7_a28 in out nocopy JTF_VARCHAR2_TABLE_200
1421     , p7_a29 in out nocopy JTF_VARCHAR2_TABLE_200
1422     , p7_a30 in out nocopy JTF_VARCHAR2_TABLE_200
1423     , p7_a31 in out nocopy JTF_VARCHAR2_TABLE_200
1424     , p7_a32 in out nocopy JTF_VARCHAR2_TABLE_100
1425     , p7_a33 in out nocopy JTF_NUMBER_TABLE
1426     , p7_a34 in out nocopy JTF_VARCHAR2_TABLE_100
1427     , p8_a0 in out nocopy JTF_NUMBER_TABLE
1428     , p8_a1 in out nocopy JTF_VARCHAR2_TABLE_100
1429     , p8_a2 in out nocopy JTF_NUMBER_TABLE
1430     , p8_a3 in out nocopy JTF_NUMBER_TABLE
1431     , p8_a4 in out nocopy JTF_DATE_TABLE
1432     , p8_a5 in out nocopy JTF_NUMBER_TABLE
1433     , p8_a6 in out nocopy JTF_NUMBER_TABLE
1434     , p8_a7 in out nocopy JTF_DATE_TABLE
1435     , p8_a8 in out nocopy JTF_NUMBER_TABLE
1436     , p8_a9 in out nocopy JTF_VARCHAR2_TABLE_200
1437     , p8_a10 in out nocopy JTF_VARCHAR2_TABLE_200
1438     , p8_a11 in out nocopy JTF_VARCHAR2_TABLE_200
1439     , p8_a12 in out nocopy JTF_VARCHAR2_TABLE_200
1440     , p8_a13 in out nocopy JTF_VARCHAR2_TABLE_200
1441     , p8_a14 in out nocopy JTF_VARCHAR2_TABLE_200
1442     , p8_a15 in out nocopy JTF_VARCHAR2_TABLE_200
1443     , p8_a16 in out nocopy JTF_VARCHAR2_TABLE_200
1444     , p8_a17 in out nocopy JTF_VARCHAR2_TABLE_200
1445     , p8_a18 in out nocopy JTF_VARCHAR2_TABLE_200
1446     , p8_a19 in out nocopy JTF_VARCHAR2_TABLE_200
1447     , p8_a20 in out nocopy JTF_VARCHAR2_TABLE_200
1448     , p8_a21 in out nocopy JTF_VARCHAR2_TABLE_200
1449     , p8_a22 in out nocopy JTF_VARCHAR2_TABLE_200
1450     , p8_a23 in out nocopy JTF_VARCHAR2_TABLE_200
1451     , p8_a24 in out nocopy JTF_VARCHAR2_TABLE_100
1452     , p8_a25 in out nocopy JTF_NUMBER_TABLE
1453     , p8_a26 in out nocopy JTF_VARCHAR2_TABLE_100
1454     , p8_a27 in out nocopy JTF_NUMBER_TABLE
1455     , p8_a28 in out nocopy JTF_DATE_TABLE
1456     , p8_a29 in out nocopy JTF_DATE_TABLE
1457     , p8_a30 in out nocopy JTF_NUMBER_TABLE
1458     , p8_a31 in out nocopy JTF_VARCHAR2_TABLE_100
1459     , x_return_status out nocopy  VARCHAR2
1460     , x_msg_count out nocopy  NUMBER
1461     , x_msg_data out nocopy  VARCHAR2
1462   )
1463 
1464   as
1465     ddp_counter_instance_rec csi_ctr_datastructures_pub.counter_instance_rec;
1466     ddp_ctr_properties_tbl csi_ctr_datastructures_pub.ctr_properties_tbl;
1467     ddp_counter_relationships_tbl csi_ctr_datastructures_pub.counter_relationships_tbl;
1468     ddp_ctr_derived_filters_tbl csi_ctr_datastructures_pub.ctr_derived_filters_tbl;
1469     ddp_counter_associations_tbl csi_ctr_datastructures_pub.counter_associations_tbl;
1470     ddindx binary_integer; indx binary_integer;
1471   begin
1472 
1473     -- copy data to the local IN or IN-OUT args, if any
1474 
1475 
1476 
1477 
1478     ddp_counter_instance_rec.counter_id := rosetta_g_miss_num_map(p4_a0);
1479     ddp_counter_instance_rec.group_id := rosetta_g_miss_num_map(p4_a1);
1480     ddp_counter_instance_rec.counter_type := p4_a2;
1481     ddp_counter_instance_rec.initial_reading := rosetta_g_miss_num_map(p4_a3);
1482     ddp_counter_instance_rec.initial_reading_date := rosetta_g_miss_date_in_map(p4_a4);
1483     ddp_counter_instance_rec.created_from_counter_tmpl_id := rosetta_g_miss_num_map(p4_a5);
1484     ddp_counter_instance_rec.tolerance_plus := rosetta_g_miss_num_map(p4_a6);
1485     ddp_counter_instance_rec.tolerance_minus := rosetta_g_miss_num_map(p4_a7);
1486     ddp_counter_instance_rec.uom_code := p4_a8;
1487     ddp_counter_instance_rec.derive_counter_id := rosetta_g_miss_num_map(p4_a9);
1488     ddp_counter_instance_rec.derive_function := p4_a10;
1489     ddp_counter_instance_rec.derive_property_id := rosetta_g_miss_num_map(p4_a11);
1490     ddp_counter_instance_rec.valid_flag := p4_a12;
1491     ddp_counter_instance_rec.formula_incomplete_flag := p4_a13;
1492     ddp_counter_instance_rec.formula_text := p4_a14;
1493     ddp_counter_instance_rec.rollover_last_reading := rosetta_g_miss_num_map(p4_a15);
1494     ddp_counter_instance_rec.rollover_first_reading := rosetta_g_miss_num_map(p4_a16);
1495     ddp_counter_instance_rec.usage_item_id := rosetta_g_miss_num_map(p4_a17);
1496     ddp_counter_instance_rec.ctr_val_max_seq_no := rosetta_g_miss_num_map(p4_a18);
1497     ddp_counter_instance_rec.start_date_active := rosetta_g_miss_date_in_map(p4_a19);
1498     ddp_counter_instance_rec.end_date_active := rosetta_g_miss_date_in_map(p4_a20);
1499     ddp_counter_instance_rec.object_version_number := rosetta_g_miss_num_map(p4_a21);
1500     ddp_counter_instance_rec.last_update_date := rosetta_g_miss_date_in_map(p4_a22);
1501     ddp_counter_instance_rec.last_updated_by := rosetta_g_miss_num_map(p4_a23);
1502     ddp_counter_instance_rec.creation_date := rosetta_g_miss_date_in_map(p4_a24);
1503     ddp_counter_instance_rec.created_by := rosetta_g_miss_num_map(p4_a25);
1504     ddp_counter_instance_rec.last_update_login := rosetta_g_miss_num_map(p4_a26);
1505     ddp_counter_instance_rec.attribute1 := p4_a27;
1506     ddp_counter_instance_rec.attribute2 := p4_a28;
1507     ddp_counter_instance_rec.attribute3 := p4_a29;
1508     ddp_counter_instance_rec.attribute4 := p4_a30;
1509     ddp_counter_instance_rec.attribute5 := p4_a31;
1510     ddp_counter_instance_rec.attribute6 := p4_a32;
1511     ddp_counter_instance_rec.attribute7 := p4_a33;
1512     ddp_counter_instance_rec.attribute8 := p4_a34;
1513     ddp_counter_instance_rec.attribute9 := p4_a35;
1514     ddp_counter_instance_rec.attribute10 := p4_a36;
1515     ddp_counter_instance_rec.attribute11 := p4_a37;
1516     ddp_counter_instance_rec.attribute12 := p4_a38;
1517     ddp_counter_instance_rec.attribute13 := p4_a39;
1518     ddp_counter_instance_rec.attribute14 := p4_a40;
1519     ddp_counter_instance_rec.attribute15 := p4_a41;
1520     ddp_counter_instance_rec.attribute16 := p4_a42;
1521     ddp_counter_instance_rec.attribute17 := p4_a43;
1522     ddp_counter_instance_rec.attribute18 := p4_a44;
1523     ddp_counter_instance_rec.attribute19 := p4_a45;
1524     ddp_counter_instance_rec.attribute20 := p4_a46;
1525     ddp_counter_instance_rec.attribute21 := p4_a47;
1526     ddp_counter_instance_rec.attribute22 := p4_a48;
1527     ddp_counter_instance_rec.attribute23 := p4_a49;
1528     ddp_counter_instance_rec.attribute24 := p4_a50;
1529     ddp_counter_instance_rec.attribute25 := p4_a51;
1530     ddp_counter_instance_rec.attribute26 := p4_a52;
1531     ddp_counter_instance_rec.attribute27 := p4_a53;
1532     ddp_counter_instance_rec.attribute28 := p4_a54;
1533     ddp_counter_instance_rec.attribute29 := p4_a55;
1534     ddp_counter_instance_rec.attribute30 := p4_a56;
1535     ddp_counter_instance_rec.attribute_category := p4_a57;
1536     ddp_counter_instance_rec.migrated_flag := p4_a58;
1537     ddp_counter_instance_rec.customer_view := p4_a59;
1538     ddp_counter_instance_rec.direction := p4_a60;
1539     ddp_counter_instance_rec.filter_type := p4_a61;
1540     ddp_counter_instance_rec.filter_reading_count := rosetta_g_miss_num_map(p4_a62);
1541     ddp_counter_instance_rec.filter_time_uom := p4_a63;
1542     ddp_counter_instance_rec.estimation_id := rosetta_g_miss_num_map(p4_a64);
1543     ddp_counter_instance_rec.reading_type := rosetta_g_miss_num_map(p4_a65);
1544     ddp_counter_instance_rec.automatic_rollover := p4_a66;
1545     ddp_counter_instance_rec.default_usage_rate := rosetta_g_miss_num_map(p4_a67);
1546     ddp_counter_instance_rec.use_past_reading := rosetta_g_miss_num_map(p4_a68);
1547     ddp_counter_instance_rec.used_in_scheduling := p4_a69;
1548     ddp_counter_instance_rec.defaulted_group_id := rosetta_g_miss_num_map(p4_a70);
1549     ddp_counter_instance_rec.security_group_id := rosetta_g_miss_num_map(p4_a71);
1550     ddp_counter_instance_rec.name := p4_a72;
1551     ddp_counter_instance_rec.description := p4_a73;
1552     ddp_counter_instance_rec.comments := p4_a74;
1553     ddp_counter_instance_rec.step_value := rosetta_g_miss_num_map(p4_a75);
1554     ddp_counter_instance_rec.time_based_manual_entry := p4_a76;
1555     ddp_counter_instance_rec.eam_required_flag := p4_a77;
1556 
1557     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p20(ddp_ctr_properties_tbl, p5_a0
1558       , p5_a1
1559       , p5_a2
1560       , p5_a3
1561       , p5_a4
1562       , p5_a5
1563       , p5_a6
1564       , p5_a7
1565       , p5_a8
1566       , p5_a9
1567       , p5_a10
1568       , p5_a11
1569       , p5_a12
1570       , p5_a13
1571       , p5_a14
1572       , p5_a15
1573       , p5_a16
1574       , p5_a17
1575       , p5_a18
1576       , p5_a19
1577       , p5_a20
1578       , p5_a21
1579       , p5_a22
1580       , p5_a23
1581       , p5_a24
1582       , p5_a25
1583       , p5_a26
1584       , p5_a27
1585       , p5_a28
1586       , p5_a29
1587       , p5_a30
1588       , p5_a31
1589       , p5_a32
1590       , p5_a33
1591       , p5_a34
1592       , p5_a35
1593       , p5_a36
1594       , p5_a37
1595       );
1596 
1597     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p10(ddp_counter_relationships_tbl, p6_a0
1598       , p6_a1
1599       , p6_a2
1600       , p6_a3
1601       , p6_a4
1602       , p6_a5
1603       , p6_a6
1604       , p6_a7
1605       , p6_a8
1606       , p6_a9
1607       , p6_a10
1608       , p6_a11
1609       , p6_a12
1610       , p6_a13
1611       , p6_a14
1612       , p6_a15
1613       , p6_a16
1614       , p6_a17
1615       , p6_a18
1616       , p6_a19
1617       , p6_a20
1618       , p6_a21
1619       , p6_a22
1620       , p6_a23
1621       , p6_a24
1622       , p6_a25
1623       , p6_a26
1624       , p6_a27
1625       , p6_a28
1626       , p6_a29
1627       , p6_a30
1628       , p6_a31
1629       , p6_a32
1630       );
1631 
1632     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p16(ddp_ctr_derived_filters_tbl, p7_a0
1633       , p7_a1
1634       , p7_a2
1635       , p7_a3
1636       , p7_a4
1637       , p7_a5
1638       , p7_a6
1639       , p7_a7
1640       , p7_a8
1641       , p7_a9
1642       , p7_a10
1643       , p7_a11
1644       , p7_a12
1645       , p7_a13
1646       , p7_a14
1647       , p7_a15
1648       , p7_a16
1649       , p7_a17
1650       , p7_a18
1651       , p7_a19
1652       , p7_a20
1653       , p7_a21
1654       , p7_a22
1655       , p7_a23
1656       , p7_a24
1657       , p7_a25
1658       , p7_a26
1659       , p7_a27
1660       , p7_a28
1661       , p7_a29
1662       , p7_a30
1663       , p7_a31
1664       , p7_a32
1665       , p7_a33
1666       , p7_a34
1667       );
1668 
1669     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p22(ddp_counter_associations_tbl, p8_a0
1670       , p8_a1
1671       , p8_a2
1672       , p8_a3
1673       , p8_a4
1674       , p8_a5
1675       , p8_a6
1676       , p8_a7
1677       , p8_a8
1678       , p8_a9
1679       , p8_a10
1680       , p8_a11
1681       , p8_a12
1682       , p8_a13
1683       , p8_a14
1684       , p8_a15
1685       , p8_a16
1686       , p8_a17
1687       , p8_a18
1688       , p8_a19
1689       , p8_a20
1690       , p8_a21
1691       , p8_a22
1692       , p8_a23
1693       , p8_a24
1694       , p8_a25
1695       , p8_a26
1696       , p8_a27
1697       , p8_a28
1698       , p8_a29
1699       , p8_a30
1700       , p8_a31
1701       );
1702 
1703 
1704 
1705 
1706     -- here's the delegated call to the old PL/SQL routine
1707     csi_counter_pub.update_counter(p_api_version,
1708       p_init_msg_list,
1709       p_commit,
1710       p_validation_level,
1711       ddp_counter_instance_rec,
1712       ddp_ctr_properties_tbl,
1713       ddp_counter_relationships_tbl,
1714       ddp_ctr_derived_filters_tbl,
1715       ddp_counter_associations_tbl,
1716       x_return_status,
1717       x_msg_count,
1718       x_msg_data);
1719 
1720     -- copy data back from the local variables to OUT or IN-OUT args, if any
1721 
1722 
1723 
1724 
1725     p4_a0 := rosetta_g_miss_num_map(ddp_counter_instance_rec.counter_id);
1726     p4_a1 := rosetta_g_miss_num_map(ddp_counter_instance_rec.group_id);
1727     p4_a2 := ddp_counter_instance_rec.counter_type;
1728     p4_a3 := rosetta_g_miss_num_map(ddp_counter_instance_rec.initial_reading);
1729     p4_a4 := ddp_counter_instance_rec.initial_reading_date;
1730     p4_a5 := rosetta_g_miss_num_map(ddp_counter_instance_rec.created_from_counter_tmpl_id);
1731     p4_a6 := rosetta_g_miss_num_map(ddp_counter_instance_rec.tolerance_plus);
1732     p4_a7 := rosetta_g_miss_num_map(ddp_counter_instance_rec.tolerance_minus);
1733     p4_a8 := ddp_counter_instance_rec.uom_code;
1734     p4_a9 := rosetta_g_miss_num_map(ddp_counter_instance_rec.derive_counter_id);
1735     p4_a10 := ddp_counter_instance_rec.derive_function;
1736     p4_a11 := rosetta_g_miss_num_map(ddp_counter_instance_rec.derive_property_id);
1737     p4_a12 := ddp_counter_instance_rec.valid_flag;
1738     p4_a13 := ddp_counter_instance_rec.formula_incomplete_flag;
1739     p4_a14 := ddp_counter_instance_rec.formula_text;
1740     p4_a15 := rosetta_g_miss_num_map(ddp_counter_instance_rec.rollover_last_reading);
1741     p4_a16 := rosetta_g_miss_num_map(ddp_counter_instance_rec.rollover_first_reading);
1742     p4_a17 := rosetta_g_miss_num_map(ddp_counter_instance_rec.usage_item_id);
1743     p4_a18 := rosetta_g_miss_num_map(ddp_counter_instance_rec.ctr_val_max_seq_no);
1744     p4_a19 := ddp_counter_instance_rec.start_date_active;
1745     p4_a20 := ddp_counter_instance_rec.end_date_active;
1746     p4_a21 := rosetta_g_miss_num_map(ddp_counter_instance_rec.object_version_number);
1747     p4_a22 := ddp_counter_instance_rec.last_update_date;
1748     p4_a23 := rosetta_g_miss_num_map(ddp_counter_instance_rec.last_updated_by);
1749     p4_a24 := ddp_counter_instance_rec.creation_date;
1750     p4_a25 := rosetta_g_miss_num_map(ddp_counter_instance_rec.created_by);
1751     p4_a26 := rosetta_g_miss_num_map(ddp_counter_instance_rec.last_update_login);
1752     p4_a27 := ddp_counter_instance_rec.attribute1;
1753     p4_a28 := ddp_counter_instance_rec.attribute2;
1754     p4_a29 := ddp_counter_instance_rec.attribute3;
1755     p4_a30 := ddp_counter_instance_rec.attribute4;
1756     p4_a31 := ddp_counter_instance_rec.attribute5;
1757     p4_a32 := ddp_counter_instance_rec.attribute6;
1758     p4_a33 := ddp_counter_instance_rec.attribute7;
1759     p4_a34 := ddp_counter_instance_rec.attribute8;
1760     p4_a35 := ddp_counter_instance_rec.attribute9;
1761     p4_a36 := ddp_counter_instance_rec.attribute10;
1762     p4_a37 := ddp_counter_instance_rec.attribute11;
1763     p4_a38 := ddp_counter_instance_rec.attribute12;
1764     p4_a39 := ddp_counter_instance_rec.attribute13;
1765     p4_a40 := ddp_counter_instance_rec.attribute14;
1766     p4_a41 := ddp_counter_instance_rec.attribute15;
1767     p4_a42 := ddp_counter_instance_rec.attribute16;
1768     p4_a43 := ddp_counter_instance_rec.attribute17;
1769     p4_a44 := ddp_counter_instance_rec.attribute18;
1770     p4_a45 := ddp_counter_instance_rec.attribute19;
1771     p4_a46 := ddp_counter_instance_rec.attribute20;
1772     p4_a47 := ddp_counter_instance_rec.attribute21;
1773     p4_a48 := ddp_counter_instance_rec.attribute22;
1774     p4_a49 := ddp_counter_instance_rec.attribute23;
1775     p4_a50 := ddp_counter_instance_rec.attribute24;
1776     p4_a51 := ddp_counter_instance_rec.attribute25;
1777     p4_a52 := ddp_counter_instance_rec.attribute26;
1778     p4_a53 := ddp_counter_instance_rec.attribute27;
1779     p4_a54 := ddp_counter_instance_rec.attribute28;
1780     p4_a55 := ddp_counter_instance_rec.attribute29;
1781     p4_a56 := ddp_counter_instance_rec.attribute30;
1782     p4_a57 := ddp_counter_instance_rec.attribute_category;
1783     p4_a58 := ddp_counter_instance_rec.migrated_flag;
1784     p4_a59 := ddp_counter_instance_rec.customer_view;
1785     p4_a60 := ddp_counter_instance_rec.direction;
1786     p4_a61 := ddp_counter_instance_rec.filter_type;
1787     p4_a62 := rosetta_g_miss_num_map(ddp_counter_instance_rec.filter_reading_count);
1788     p4_a63 := ddp_counter_instance_rec.filter_time_uom;
1789     p4_a64 := rosetta_g_miss_num_map(ddp_counter_instance_rec.estimation_id);
1790     p4_a65 := rosetta_g_miss_num_map(ddp_counter_instance_rec.reading_type);
1791     p4_a66 := ddp_counter_instance_rec.automatic_rollover;
1792     p4_a67 := rosetta_g_miss_num_map(ddp_counter_instance_rec.default_usage_rate);
1793     p4_a68 := rosetta_g_miss_num_map(ddp_counter_instance_rec.use_past_reading);
1794     p4_a69 := ddp_counter_instance_rec.used_in_scheduling;
1795     p4_a70 := rosetta_g_miss_num_map(ddp_counter_instance_rec.defaulted_group_id);
1796     p4_a71 := rosetta_g_miss_num_map(ddp_counter_instance_rec.security_group_id);
1797     p4_a72 := ddp_counter_instance_rec.name;
1798     p4_a73 := ddp_counter_instance_rec.description;
1799     p4_a74 := ddp_counter_instance_rec.comments;
1800     p4_a75 := rosetta_g_miss_num_map(ddp_counter_instance_rec.step_value);
1801     p4_a76 := ddp_counter_instance_rec.time_based_manual_entry;
1802     p4_a77 := ddp_counter_instance_rec.eam_required_flag;
1803 
1804     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p20(ddp_ctr_properties_tbl, p5_a0
1805       , p5_a1
1806       , p5_a2
1807       , p5_a3
1808       , p5_a4
1809       , p5_a5
1810       , p5_a6
1811       , p5_a7
1812       , p5_a8
1813       , p5_a9
1814       , p5_a10
1815       , p5_a11
1816       , p5_a12
1817       , p5_a13
1818       , p5_a14
1819       , p5_a15
1820       , p5_a16
1821       , p5_a17
1822       , p5_a18
1823       , p5_a19
1824       , p5_a20
1825       , p5_a21
1826       , p5_a22
1827       , p5_a23
1828       , p5_a24
1829       , p5_a25
1830       , p5_a26
1831       , p5_a27
1832       , p5_a28
1833       , p5_a29
1834       , p5_a30
1835       , p5_a31
1836       , p5_a32
1837       , p5_a33
1838       , p5_a34
1839       , p5_a35
1840       , p5_a36
1841       , p5_a37
1842       );
1843 
1844     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p10(ddp_counter_relationships_tbl, p6_a0
1845       , p6_a1
1846       , p6_a2
1847       , p6_a3
1848       , p6_a4
1849       , p6_a5
1850       , p6_a6
1851       , p6_a7
1852       , p6_a8
1853       , p6_a9
1854       , p6_a10
1855       , p6_a11
1856       , p6_a12
1857       , p6_a13
1858       , p6_a14
1859       , p6_a15
1860       , p6_a16
1861       , p6_a17
1862       , p6_a18
1863       , p6_a19
1864       , p6_a20
1865       , p6_a21
1866       , p6_a22
1867       , p6_a23
1868       , p6_a24
1869       , p6_a25
1870       , p6_a26
1871       , p6_a27
1872       , p6_a28
1873       , p6_a29
1874       , p6_a30
1875       , p6_a31
1876       , p6_a32
1877       );
1878 
1879     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p16(ddp_ctr_derived_filters_tbl, p7_a0
1880       , p7_a1
1881       , p7_a2
1882       , p7_a3
1883       , p7_a4
1884       , p7_a5
1885       , p7_a6
1886       , p7_a7
1887       , p7_a8
1888       , p7_a9
1889       , p7_a10
1890       , p7_a11
1891       , p7_a12
1892       , p7_a13
1893       , p7_a14
1894       , p7_a15
1895       , p7_a16
1896       , p7_a17
1897       , p7_a18
1898       , p7_a19
1899       , p7_a20
1900       , p7_a21
1901       , p7_a22
1902       , p7_a23
1903       , p7_a24
1904       , p7_a25
1905       , p7_a26
1906       , p7_a27
1907       , p7_a28
1908       , p7_a29
1909       , p7_a30
1910       , p7_a31
1911       , p7_a32
1912       , p7_a33
1913       , p7_a34
1914       );
1915 
1916     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p22(ddp_counter_associations_tbl, p8_a0
1917       , p8_a1
1918       , p8_a2
1919       , p8_a3
1920       , p8_a4
1921       , p8_a5
1922       , p8_a6
1923       , p8_a7
1924       , p8_a8
1925       , p8_a9
1926       , p8_a10
1927       , p8_a11
1928       , p8_a12
1929       , p8_a13
1930       , p8_a14
1931       , p8_a15
1932       , p8_a16
1933       , p8_a17
1934       , p8_a18
1935       , p8_a19
1936       , p8_a20
1937       , p8_a21
1938       , p8_a22
1939       , p8_a23
1940       , p8_a24
1941       , p8_a25
1942       , p8_a26
1943       , p8_a27
1944       , p8_a28
1945       , p8_a29
1946       , p8_a30
1947       , p8_a31
1948       );
1949 
1950 
1951 
1952   end;
1953 
1954   procedure update_ctr_property(p_api_version  NUMBER
1955     , p_commit  VARCHAR2
1956     , p_init_msg_list  VARCHAR2
1957     , p_validation_level  NUMBER
1958     , p4_a0 in out nocopy JTF_NUMBER_TABLE
1959     , p4_a1 in out nocopy JTF_NUMBER_TABLE
1960     , p4_a2 in out nocopy JTF_VARCHAR2_TABLE_100
1961     , p4_a3 in out nocopy JTF_VARCHAR2_TABLE_100
1962     , p4_a4 in out nocopy JTF_VARCHAR2_TABLE_300
1963     , p4_a5 in out nocopy JTF_VARCHAR2_TABLE_300
1964     , p4_a6 in out nocopy JTF_VARCHAR2_TABLE_300
1965     , p4_a7 in out nocopy JTF_VARCHAR2_TABLE_100
1966     , p4_a8 in out nocopy JTF_DATE_TABLE
1967     , p4_a9 in out nocopy JTF_DATE_TABLE
1968     , p4_a10 in out nocopy JTF_NUMBER_TABLE
1969     , p4_a11 in out nocopy JTF_DATE_TABLE
1970     , p4_a12 in out nocopy JTF_NUMBER_TABLE
1971     , p4_a13 in out nocopy JTF_DATE_TABLE
1972     , p4_a14 in out nocopy JTF_NUMBER_TABLE
1973     , p4_a15 in out nocopy JTF_NUMBER_TABLE
1974     , p4_a16 in out nocopy JTF_VARCHAR2_TABLE_200
1975     , p4_a17 in out nocopy JTF_VARCHAR2_TABLE_200
1976     , p4_a18 in out nocopy JTF_VARCHAR2_TABLE_200
1977     , p4_a19 in out nocopy JTF_VARCHAR2_TABLE_200
1978     , p4_a20 in out nocopy JTF_VARCHAR2_TABLE_200
1979     , p4_a21 in out nocopy JTF_VARCHAR2_TABLE_200
1980     , p4_a22 in out nocopy JTF_VARCHAR2_TABLE_200
1981     , p4_a23 in out nocopy JTF_VARCHAR2_TABLE_200
1982     , p4_a24 in out nocopy JTF_VARCHAR2_TABLE_200
1983     , p4_a25 in out nocopy JTF_VARCHAR2_TABLE_200
1984     , p4_a26 in out nocopy JTF_VARCHAR2_TABLE_200
1985     , p4_a27 in out nocopy JTF_VARCHAR2_TABLE_200
1986     , p4_a28 in out nocopy JTF_VARCHAR2_TABLE_200
1987     , p4_a29 in out nocopy JTF_VARCHAR2_TABLE_200
1988     , p4_a30 in out nocopy JTF_VARCHAR2_TABLE_200
1989     , p4_a31 in out nocopy JTF_VARCHAR2_TABLE_100
1990     , p4_a32 in out nocopy JTF_VARCHAR2_TABLE_100
1991     , p4_a33 in out nocopy JTF_VARCHAR2_TABLE_100
1992     , p4_a34 in out nocopy JTF_NUMBER_TABLE
1993     , p4_a35 in out nocopy JTF_NUMBER_TABLE
1994     , p4_a36 in out nocopy JTF_VARCHAR2_TABLE_100
1995     , p4_a37 in out nocopy JTF_VARCHAR2_TABLE_300
1996     , x_return_status out nocopy  VARCHAR2
1997     , x_msg_count out nocopy  NUMBER
1998     , x_msg_data out nocopy  VARCHAR2
1999   )
2000 
2001   as
2002     ddp_ctr_properties_tbl csi_ctr_datastructures_pub.ctr_properties_tbl;
2003     ddindx binary_integer; indx binary_integer;
2004   begin
2005 
2006     -- copy data to the local IN or IN-OUT args, if any
2007 
2008 
2009 
2010 
2011     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p20(ddp_ctr_properties_tbl, p4_a0
2012       , p4_a1
2013       , p4_a2
2014       , p4_a3
2015       , p4_a4
2016       , p4_a5
2017       , p4_a6
2018       , p4_a7
2019       , p4_a8
2020       , p4_a9
2021       , p4_a10
2022       , p4_a11
2023       , p4_a12
2024       , p4_a13
2025       , p4_a14
2026       , p4_a15
2027       , p4_a16
2028       , p4_a17
2029       , p4_a18
2030       , p4_a19
2031       , p4_a20
2032       , p4_a21
2033       , p4_a22
2034       , p4_a23
2035       , p4_a24
2036       , p4_a25
2037       , p4_a26
2038       , p4_a27
2039       , p4_a28
2040       , p4_a29
2041       , p4_a30
2042       , p4_a31
2043       , p4_a32
2044       , p4_a33
2045       , p4_a34
2046       , p4_a35
2047       , p4_a36
2048       , p4_a37
2049       );
2050 
2051 
2052 
2053 
2054     -- here's the delegated call to the old PL/SQL routine
2055     csi_counter_pub.update_ctr_property(p_api_version,
2056       p_commit,
2057       p_init_msg_list,
2058       p_validation_level,
2059       ddp_ctr_properties_tbl,
2060       x_return_status,
2061       x_msg_count,
2062       x_msg_data);
2063 
2064     -- copy data back from the local variables to OUT or IN-OUT args, if any
2065 
2066 
2067 
2068 
2069     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p20(ddp_ctr_properties_tbl, p4_a0
2070       , p4_a1
2071       , p4_a2
2072       , p4_a3
2073       , p4_a4
2074       , p4_a5
2075       , p4_a6
2076       , p4_a7
2077       , p4_a8
2078       , p4_a9
2079       , p4_a10
2080       , p4_a11
2081       , p4_a12
2082       , p4_a13
2083       , p4_a14
2084       , p4_a15
2085       , p4_a16
2086       , p4_a17
2087       , p4_a18
2088       , p4_a19
2089       , p4_a20
2090       , p4_a21
2091       , p4_a22
2092       , p4_a23
2093       , p4_a24
2094       , p4_a25
2095       , p4_a26
2096       , p4_a27
2097       , p4_a28
2098       , p4_a29
2099       , p4_a30
2100       , p4_a31
2101       , p4_a32
2102       , p4_a33
2103       , p4_a34
2104       , p4_a35
2105       , p4_a36
2106       , p4_a37
2107       );
2108 
2109 
2110 
2111   end;
2112 
2113   procedure update_ctr_associations(p_api_version  NUMBER
2114     , p_commit  VARCHAR2
2115     , p_init_msg_list  VARCHAR2
2116     , p_validation_level  NUMBER
2117     , p4_a0 in out nocopy JTF_NUMBER_TABLE
2118     , p4_a1 in out nocopy JTF_VARCHAR2_TABLE_100
2119     , p4_a2 in out nocopy JTF_NUMBER_TABLE
2120     , p4_a3 in out nocopy JTF_NUMBER_TABLE
2121     , p4_a4 in out nocopy JTF_DATE_TABLE
2122     , p4_a5 in out nocopy JTF_NUMBER_TABLE
2123     , p4_a6 in out nocopy JTF_NUMBER_TABLE
2124     , p4_a7 in out nocopy JTF_DATE_TABLE
2125     , p4_a8 in out nocopy JTF_NUMBER_TABLE
2126     , p4_a9 in out nocopy JTF_VARCHAR2_TABLE_200
2127     , p4_a10 in out nocopy JTF_VARCHAR2_TABLE_200
2128     , p4_a11 in out nocopy JTF_VARCHAR2_TABLE_200
2129     , p4_a12 in out nocopy JTF_VARCHAR2_TABLE_200
2130     , p4_a13 in out nocopy JTF_VARCHAR2_TABLE_200
2131     , p4_a14 in out nocopy JTF_VARCHAR2_TABLE_200
2132     , p4_a15 in out nocopy JTF_VARCHAR2_TABLE_200
2133     , p4_a16 in out nocopy JTF_VARCHAR2_TABLE_200
2134     , p4_a17 in out nocopy JTF_VARCHAR2_TABLE_200
2135     , p4_a18 in out nocopy JTF_VARCHAR2_TABLE_200
2136     , p4_a19 in out nocopy JTF_VARCHAR2_TABLE_200
2137     , p4_a20 in out nocopy JTF_VARCHAR2_TABLE_200
2138     , p4_a21 in out nocopy JTF_VARCHAR2_TABLE_200
2139     , p4_a22 in out nocopy JTF_VARCHAR2_TABLE_200
2140     , p4_a23 in out nocopy JTF_VARCHAR2_TABLE_200
2141     , p4_a24 in out nocopy JTF_VARCHAR2_TABLE_100
2142     , p4_a25 in out nocopy JTF_NUMBER_TABLE
2143     , p4_a26 in out nocopy JTF_VARCHAR2_TABLE_100
2144     , p4_a27 in out nocopy JTF_NUMBER_TABLE
2145     , p4_a28 in out nocopy JTF_DATE_TABLE
2146     , p4_a29 in out nocopy JTF_DATE_TABLE
2147     , p4_a30 in out nocopy JTF_NUMBER_TABLE
2148     , p4_a31 in out nocopy JTF_VARCHAR2_TABLE_100
2149     , x_return_status out nocopy  VARCHAR2
2150     , x_msg_count out nocopy  NUMBER
2151     , x_msg_data out nocopy  VARCHAR2
2152   )
2153 
2154   as
2155     ddp_counter_associations_tbl csi_ctr_datastructures_pub.counter_associations_tbl;
2156     ddindx binary_integer; indx binary_integer;
2157   begin
2158 
2159     -- copy data to the local IN or IN-OUT args, if any
2160 
2161 
2162 
2163 
2164     csi_ctr_datastructures_pub_w.rosetta_table_copy_in_p22(ddp_counter_associations_tbl, p4_a0
2165       , p4_a1
2166       , p4_a2
2167       , p4_a3
2168       , p4_a4
2169       , p4_a5
2170       , p4_a6
2171       , p4_a7
2172       , p4_a8
2173       , p4_a9
2174       , p4_a10
2175       , p4_a11
2176       , p4_a12
2177       , p4_a13
2178       , p4_a14
2179       , p4_a15
2180       , p4_a16
2181       , p4_a17
2182       , p4_a18
2183       , p4_a19
2184       , p4_a20
2185       , p4_a21
2186       , p4_a22
2187       , p4_a23
2188       , p4_a24
2189       , p4_a25
2190       , p4_a26
2191       , p4_a27
2192       , p4_a28
2193       , p4_a29
2194       , p4_a30
2195       , p4_a31
2196       );
2197 
2198 
2199 
2200 
2201     -- here's the delegated call to the old PL/SQL routine
2202     csi_counter_pub.update_ctr_associations(p_api_version,
2203       p_commit,
2204       p_init_msg_list,
2205       p_validation_level,
2206       ddp_counter_associations_tbl,
2207       x_return_status,
2208       x_msg_count,
2209       x_msg_data);
2210 
2211     -- copy data back from the local variables to OUT or IN-OUT args, if any
2212 
2213 
2214 
2215 
2216     csi_ctr_datastructures_pub_w.rosetta_table_copy_out_p22(ddp_counter_associations_tbl, p4_a0
2217       , p4_a1
2218       , p4_a2
2219       , p4_a3
2220       , p4_a4
2221       , p4_a5
2222       , p4_a6
2223       , p4_a7
2224       , p4_a8
2225       , p4_a9
2226       , p4_a10
2227       , p4_a11
2228       , p4_a12
2229       , p4_a13
2230       , p4_a14
2231       , p4_a15
2232       , p4_a16
2233       , p4_a17
2234       , p4_a18
2235       , p4_a19
2236       , p4_a20
2237       , p4_a21
2238       , p4_a22
2239       , p4_a23
2240       , p4_a24
2241       , p4_a25
2242       , p4_a26
2243       , p4_a27
2244       , p4_a28
2245       , p4_a29
2246       , p4_a30
2247       , p4_a31
2248       );
2249 
2250 
2251 
2252   end;
2253 
2254 end csi_counter_pub_w;