[Home] [Help]
PACKAGE BODY: APPS.EAM_ASSET_OPERATION_TXN_PVT_W
Source
1 package body eam_asset_operation_txn_pvt_w as
2 /* $Header: EAMVAORB.pls 120.4 2008/01/26 01:53:51 devijay ship $ */
3 procedure insert_txn(p_api_version NUMBER
4 , p_init_msg_list VARCHAR2
5 , p_commit VARCHAR2
6 , p_validation_level NUMBER
7 , p_txn_date DATE
8 , p_txn_type NUMBER
9 , p_instance_id NUMBER
10 , p_comments VARCHAR2
11 , p_qa_collection_id NUMBER
12 , p_operable_flag NUMBER
13 , p_employee_id NUMBER
14 , p11_a0 JTF_NUMBER_TABLE
15 , p11_a1 JTF_NUMBER_TABLE
16 , p11_a2 JTF_NUMBER_TABLE
17 , p11_a3 JTF_NUMBER_TABLE
18 , p11_a4 JTF_NUMBER_TABLE
19 , p11_a5 JTF_NUMBER_TABLE
20 , p11_a6 JTF_NUMBER_TABLE
21 , p11_a7 JTF_NUMBER_TABLE
22 , p11_a8 JTF_VARCHAR2_TABLE_2000
23 , p11_a9 JTF_VARCHAR2_TABLE_100
24 , p11_a10 JTF_NUMBER_TABLE
25 , p11_a11 JTF_NUMBER_TABLE
26 , p11_a12 JTF_NUMBER_TABLE
27 , p11_a13 JTF_VARCHAR2_TABLE_100
28 , p11_a14 JTF_NUMBER_TABLE
29 , p12_a0 JTF_NUMBER_TABLE
30 , p12_a1 JTF_NUMBER_TABLE
31 , p12_a2 JTF_NUMBER_TABLE
32 , p12_a3 JTF_DATE_TABLE
33 , p12_a4 JTF_VARCHAR2_TABLE_100
34 , p12_a5 JTF_VARCHAR2_TABLE_100
35 , p12_a6 JTF_NUMBER_TABLE
36 , p12_a7 JTF_NUMBER_TABLE
37 , p12_a8 JTF_NUMBER_TABLE
38 , p12_a9 JTF_NUMBER_TABLE
39 , p12_a10 JTF_VARCHAR2_TABLE_100
40 , p12_a11 JTF_VARCHAR2_TABLE_100
41 , p12_a12 JTF_VARCHAR2_TABLE_100
42 , p12_a13 JTF_NUMBER_TABLE
43 , p12_a14 JTF_NUMBER_TABLE
44 , p12_a15 JTF_VARCHAR2_TABLE_300
45 , p12_a16 JTF_VARCHAR2_TABLE_100
46 , p12_a17 JTF_VARCHAR2_TABLE_200
47 , p12_a18 JTF_VARCHAR2_TABLE_200
48 , p12_a19 JTF_VARCHAR2_TABLE_200
49 , p12_a20 JTF_VARCHAR2_TABLE_200
50 , p12_a21 JTF_VARCHAR2_TABLE_200
51 , p12_a22 JTF_VARCHAR2_TABLE_200
52 , p12_a23 JTF_VARCHAR2_TABLE_200
53 , p12_a24 JTF_VARCHAR2_TABLE_200
54 , p12_a25 JTF_VARCHAR2_TABLE_200
55 , p12_a26 JTF_VARCHAR2_TABLE_200
56 , p12_a27 JTF_VARCHAR2_TABLE_200
57 , p12_a28 JTF_VARCHAR2_TABLE_200
58 , p12_a29 JTF_VARCHAR2_TABLE_200
59 , p12_a30 JTF_VARCHAR2_TABLE_200
60 , p12_a31 JTF_VARCHAR2_TABLE_200
61 , p12_a32 JTF_VARCHAR2_TABLE_200
62 , p12_a33 JTF_VARCHAR2_TABLE_200
63 , p12_a34 JTF_VARCHAR2_TABLE_200
64 , p12_a35 JTF_VARCHAR2_TABLE_200
65 , p12_a36 JTF_VARCHAR2_TABLE_200
66 , p12_a37 JTF_VARCHAR2_TABLE_200
67 , p12_a38 JTF_VARCHAR2_TABLE_200
68 , p12_a39 JTF_VARCHAR2_TABLE_200
69 , p12_a40 JTF_VARCHAR2_TABLE_200
70 , p12_a41 JTF_VARCHAR2_TABLE_200
71 , p12_a42 JTF_VARCHAR2_TABLE_200
72 , p12_a43 JTF_VARCHAR2_TABLE_200
73 , p12_a44 JTF_VARCHAR2_TABLE_200
74 , p12_a45 JTF_VARCHAR2_TABLE_200
75 , p12_a46 JTF_VARCHAR2_TABLE_200
76 , p12_a47 JTF_NUMBER_TABLE
77 , p12_a48 JTF_VARCHAR2_TABLE_100
78 , p13_a0 JTF_NUMBER_TABLE
79 , p13_a1 JTF_NUMBER_TABLE
80 , p13_a2 JTF_VARCHAR2_TABLE_300
81 , p13_a3 JTF_DATE_TABLE
82 , p13_a4 JTF_VARCHAR2_TABLE_100
83 , p13_a5 JTF_VARCHAR2_TABLE_200
84 , p13_a6 JTF_VARCHAR2_TABLE_200
85 , p13_a7 JTF_VARCHAR2_TABLE_200
86 , p13_a8 JTF_VARCHAR2_TABLE_200
87 , p13_a9 JTF_VARCHAR2_TABLE_200
88 , p13_a10 JTF_VARCHAR2_TABLE_200
89 , p13_a11 JTF_VARCHAR2_TABLE_200
90 , p13_a12 JTF_VARCHAR2_TABLE_200
91 , p13_a13 JTF_VARCHAR2_TABLE_200
92 , p13_a14 JTF_VARCHAR2_TABLE_200
93 , p13_a15 JTF_VARCHAR2_TABLE_200
94 , p13_a16 JTF_VARCHAR2_TABLE_200
95 , p13_a17 JTF_VARCHAR2_TABLE_200
96 , p13_a18 JTF_VARCHAR2_TABLE_200
97 , p13_a19 JTF_VARCHAR2_TABLE_200
98 , p13_a20 JTF_VARCHAR2_TABLE_100
99 , p_attribute_category VARCHAR2
100 , p_attribute1 VARCHAR2
101 , p_attribute2 VARCHAR2
102 , p_attribute3 VARCHAR2
103 , p_attribute4 VARCHAR2
104 , p_attribute5 VARCHAR2
105 , p_attribute6 VARCHAR2
106 , p_attribute7 VARCHAR2
107 , p_attribute8 VARCHAR2
108 , p_attribute9 VARCHAR2
109 , p_attribute10 VARCHAR2
110 , p_attribute11 VARCHAR2
111 , p_attribute12 VARCHAR2
112 , p_attribute13 VARCHAR2
113 , p_attribute14 VARCHAR2
114 , p_attribute15 VARCHAR2
115 , x_return_status out nocopy VARCHAR2
116 , x_msg_count out nocopy NUMBER
117 , x_msg_data out nocopy VARCHAR2
118 )
119
120 as
121 ddp_eam_ops_quality_tbl eam_asset_operation_txn_pub.eam_quality_tbl_type;
122 ddp_meter_reading_rec_tbl eam_asset_operation_txn_pub.meter_reading_rec_tbl_type;
123 ddp_counter_properties_tbl eam_asset_operation_txn_pub.ctr_property_readings_tbl;
124 ddindx binary_integer; indx binary_integer;
125 begin
126
127 -- copy data to the local IN or IN-OUT args, if any
128
129
130
131
132
133
134
135
136
137
138
139 eam_asset_operation_txn_pub_w.rosetta_table_copy_in_p2(ddp_eam_ops_quality_tbl, p11_a0
140 , p11_a1
141 , p11_a2
142 , p11_a3
143 , p11_a4
144 , p11_a5
145 , p11_a6
146 , p11_a7
147 , p11_a8
148 , p11_a9
149 , p11_a10
150 , p11_a11
151 , p11_a12
152 , p11_a13
153 , p11_a14
154 );
155
156 eam_asset_operation_txn_pub_w.rosetta_table_copy_in_p6(ddp_meter_reading_rec_tbl, p12_a0
157 , p12_a1
158 , p12_a2
159 , p12_a3
160 , p12_a4
161 , p12_a5
162 , p12_a6
163 , p12_a7
164 , p12_a8
165 , p12_a9
166 , p12_a10
167 , p12_a11
168 , p12_a12
169 , p12_a13
170 , p12_a14
171 , p12_a15
172 , p12_a16
173 , p12_a17
174 , p12_a18
175 , p12_a19
176 , p12_a20
177 , p12_a21
178 , p12_a22
179 , p12_a23
180 , p12_a24
181 , p12_a25
182 , p12_a26
183 , p12_a27
184 , p12_a28
185 , p12_a29
186 , p12_a30
187 , p12_a31
188 , p12_a32
189 , p12_a33
190 , p12_a34
191 , p12_a35
192 , p12_a36
193 , p12_a37
194 , p12_a38
195 , p12_a39
196 , p12_a40
197 , p12_a41
198 , p12_a42
199 , p12_a43
200 , p12_a44
201 , p12_a45
202 , p12_a46
203 , p12_a47
204 , p12_a48
205 );
206
207 eam_asset_operation_txn_pub_w.rosetta_table_copy_in_p4(ddp_counter_properties_tbl, p13_a0
208 , p13_a1
209 , p13_a2
210 , p13_a3
211 , p13_a4
212 , p13_a5
213 , p13_a6
214 , p13_a7
215 , p13_a8
216 , p13_a9
217 , p13_a10
218 , p13_a11
219 , p13_a12
220 , p13_a13
221 , p13_a14
222 , p13_a15
223 , p13_a16
224 , p13_a17
225 , p13_a18
226 , p13_a19
227 , p13_a20
228 );
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249 -- here's the delegated call to the old PL/SQL routine
250 eam_asset_operation_txn_pvt.insert_txn(p_api_version,
251 p_init_msg_list,
252 p_commit,
253 p_validation_level,
254 p_txn_date,
255 p_txn_type,
256 p_instance_id,
257 p_comments,
258 p_qa_collection_id,
259 p_operable_flag,
260 p_employee_id,
261 ddp_eam_ops_quality_tbl,
262 ddp_meter_reading_rec_tbl,
263 ddp_counter_properties_tbl,
264 p_attribute_category,
265 p_attribute1,
266 p_attribute2,
267 p_attribute3,
268 p_attribute4,
269 p_attribute5,
270 p_attribute6,
271 p_attribute7,
272 p_attribute8,
273 p_attribute9,
274 p_attribute10,
275 p_attribute11,
276 p_attribute12,
277 p_attribute13,
278 p_attribute14,
279 p_attribute15,
280 x_return_status,
281 x_msg_count,
282 x_msg_data);
283
284 -- copy data back from the local variables to OUT or IN-OUT args, if any
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317 end;
318
319 procedure insert_quality_plans(p0_a0 JTF_NUMBER_TABLE
320 , p0_a1 JTF_NUMBER_TABLE
321 , p0_a2 JTF_NUMBER_TABLE
322 , p0_a3 JTF_NUMBER_TABLE
323 , p0_a4 JTF_NUMBER_TABLE
324 , p0_a5 JTF_NUMBER_TABLE
325 , p0_a6 JTF_NUMBER_TABLE
326 , p0_a7 JTF_NUMBER_TABLE
327 , p0_a8 JTF_VARCHAR2_TABLE_2000
328 , p0_a9 JTF_VARCHAR2_TABLE_100
329 , p0_a10 JTF_NUMBER_TABLE
330 , p0_a11 JTF_NUMBER_TABLE
331 , p0_a12 JTF_NUMBER_TABLE
332 , p0_a13 JTF_VARCHAR2_TABLE_100
333 , p0_a14 JTF_NUMBER_TABLE
334 , p_instance_id NUMBER
335 , p_txn_date DATE
336 , p_comments VARCHAR2
337 , p_operable_flag NUMBER
338 , p_organization_id NUMBER
339 , p_employee_id NUMBER
340 , p_asset_group_id NUMBER
341 , p_asset_number VARCHAR2
342 , p_asset_instance_number VARCHAR2
343 , p_txn_number NUMBER
344 , x_return_status out nocopy VARCHAR2
345 , x_msg_count out nocopy NUMBER
346 , x_msg_data out nocopy VARCHAR2
347 )
348
349 as
350 ddp_eam_ops_quality_tbl eam_asset_operation_txn_pub.eam_quality_tbl_type;
351 ddindx binary_integer; indx binary_integer;
352 begin
353
354 -- copy data to the local IN or IN-OUT args, if any
355 eam_asset_operation_txn_pub_w.rosetta_table_copy_in_p2(ddp_eam_ops_quality_tbl, p0_a0
356 , p0_a1
357 , p0_a2
358 , p0_a3
359 , p0_a4
360 , p0_a5
361 , p0_a6
362 , p0_a7
363 , p0_a8
364 , p0_a9
365 , p0_a10
366 , p0_a11
367 , p0_a12
368 , p0_a13
369 , p0_a14
370 );
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385 -- here's the delegated call to the old PL/SQL routine
386 eam_asset_operation_txn_pvt.insert_quality_plans(ddp_eam_ops_quality_tbl,
387 p_instance_id,
388 p_txn_date,
389 p_comments,
390 p_operable_flag,
391 p_organization_id,
392 p_employee_id,
393 p_asset_group_id,
394 p_asset_number,
395 p_asset_instance_number,
396 p_txn_number,
397 x_return_status,
398 x_msg_count,
399 x_msg_data);
400
401 -- copy data back from the local variables to OUT or IN-OUT args, if any
402
403
404
405
406
407
408
409
410
411
412
413
414
415 end;
416
417 procedure insert_meter_readings(p0_a0 JTF_NUMBER_TABLE
418 , p0_a1 JTF_NUMBER_TABLE
419 , p0_a2 JTF_NUMBER_TABLE
420 , p0_a3 JTF_DATE_TABLE
421 , p0_a4 JTF_VARCHAR2_TABLE_100
422 , p0_a5 JTF_VARCHAR2_TABLE_100
423 , p0_a6 JTF_NUMBER_TABLE
424 , p0_a7 JTF_NUMBER_TABLE
425 , p0_a8 JTF_NUMBER_TABLE
426 , p0_a9 JTF_NUMBER_TABLE
427 , p0_a10 JTF_VARCHAR2_TABLE_100
428 , p0_a11 JTF_VARCHAR2_TABLE_100
429 , p0_a12 JTF_VARCHAR2_TABLE_100
430 , p0_a13 JTF_NUMBER_TABLE
431 , p0_a14 JTF_NUMBER_TABLE
432 , p0_a15 JTF_VARCHAR2_TABLE_300
433 , p0_a16 JTF_VARCHAR2_TABLE_100
434 , p0_a17 JTF_VARCHAR2_TABLE_200
435 , p0_a18 JTF_VARCHAR2_TABLE_200
436 , p0_a19 JTF_VARCHAR2_TABLE_200
437 , p0_a20 JTF_VARCHAR2_TABLE_200
438 , p0_a21 JTF_VARCHAR2_TABLE_200
439 , p0_a22 JTF_VARCHAR2_TABLE_200
440 , p0_a23 JTF_VARCHAR2_TABLE_200
441 , p0_a24 JTF_VARCHAR2_TABLE_200
442 , p0_a25 JTF_VARCHAR2_TABLE_200
443 , p0_a26 JTF_VARCHAR2_TABLE_200
444 , p0_a27 JTF_VARCHAR2_TABLE_200
445 , p0_a28 JTF_VARCHAR2_TABLE_200
446 , p0_a29 JTF_VARCHAR2_TABLE_200
447 , p0_a30 JTF_VARCHAR2_TABLE_200
448 , p0_a31 JTF_VARCHAR2_TABLE_200
449 , p0_a32 JTF_VARCHAR2_TABLE_200
450 , p0_a33 JTF_VARCHAR2_TABLE_200
451 , p0_a34 JTF_VARCHAR2_TABLE_200
452 , p0_a35 JTF_VARCHAR2_TABLE_200
453 , p0_a36 JTF_VARCHAR2_TABLE_200
454 , p0_a37 JTF_VARCHAR2_TABLE_200
455 , p0_a38 JTF_VARCHAR2_TABLE_200
456 , p0_a39 JTF_VARCHAR2_TABLE_200
457 , p0_a40 JTF_VARCHAR2_TABLE_200
458 , p0_a41 JTF_VARCHAR2_TABLE_200
459 , p0_a42 JTF_VARCHAR2_TABLE_200
460 , p0_a43 JTF_VARCHAR2_TABLE_200
461 , p0_a44 JTF_VARCHAR2_TABLE_200
462 , p0_a45 JTF_VARCHAR2_TABLE_200
463 , p0_a46 JTF_VARCHAR2_TABLE_200
464 , p0_a47 JTF_NUMBER_TABLE
465 , p0_a48 JTF_VARCHAR2_TABLE_100
466 , p1_a0 JTF_NUMBER_TABLE
467 , p1_a1 JTF_NUMBER_TABLE
468 , p1_a2 JTF_VARCHAR2_TABLE_300
469 , p1_a3 JTF_DATE_TABLE
470 , p1_a4 JTF_VARCHAR2_TABLE_100
471 , p1_a5 JTF_VARCHAR2_TABLE_200
472 , p1_a6 JTF_VARCHAR2_TABLE_200
473 , p1_a7 JTF_VARCHAR2_TABLE_200
474 , p1_a8 JTF_VARCHAR2_TABLE_200
475 , p1_a9 JTF_VARCHAR2_TABLE_200
476 , p1_a10 JTF_VARCHAR2_TABLE_200
477 , p1_a11 JTF_VARCHAR2_TABLE_200
478 , p1_a12 JTF_VARCHAR2_TABLE_200
479 , p1_a13 JTF_VARCHAR2_TABLE_200
480 , p1_a14 JTF_VARCHAR2_TABLE_200
481 , p1_a15 JTF_VARCHAR2_TABLE_200
482 , p1_a16 JTF_VARCHAR2_TABLE_200
483 , p1_a17 JTF_VARCHAR2_TABLE_200
484 , p1_a18 JTF_VARCHAR2_TABLE_200
485 , p1_a19 JTF_VARCHAR2_TABLE_200
486 , p1_a20 JTF_VARCHAR2_TABLE_100
487 , p_instance_id NUMBER
488 , p_txn_id NUMBER
489 , x_return_status out nocopy VARCHAR2
490 , x_msg_count out nocopy NUMBER
491 , x_msg_data out nocopy VARCHAR2
492 )
493
494 as
495 ddp_eam_meter_reading_tbl eam_asset_operation_txn_pub.meter_reading_rec_tbl_type;
496 ddp_counter_properties_tbl eam_asset_operation_txn_pub.ctr_property_readings_tbl;
497 ddindx binary_integer; indx binary_integer;
498 begin
499
500 -- copy data to the local IN or IN-OUT args, if any
501 eam_asset_operation_txn_pub_w.rosetta_table_copy_in_p6(ddp_eam_meter_reading_tbl, p0_a0
502 , p0_a1
503 , p0_a2
504 , p0_a3
505 , p0_a4
506 , p0_a5
507 , p0_a6
508 , p0_a7
509 , p0_a8
510 , p0_a9
511 , p0_a10
512 , p0_a11
513 , p0_a12
514 , p0_a13
515 , p0_a14
516 , p0_a15
517 , p0_a16
518 , p0_a17
519 , p0_a18
520 , p0_a19
521 , p0_a20
522 , p0_a21
523 , p0_a22
524 , p0_a23
525 , p0_a24
526 , p0_a25
527 , p0_a26
528 , p0_a27
529 , p0_a28
530 , p0_a29
531 , p0_a30
532 , p0_a31
533 , p0_a32
534 , p0_a33
535 , p0_a34
536 , p0_a35
537 , p0_a36
538 , p0_a37
539 , p0_a38
540 , p0_a39
541 , p0_a40
542 , p0_a41
543 , p0_a42
544 , p0_a43
545 , p0_a44
546 , p0_a45
547 , p0_a46
548 , p0_a47
549 , p0_a48
550 );
551
552 eam_asset_operation_txn_pub_w.rosetta_table_copy_in_p4(ddp_counter_properties_tbl, p1_a0
553 , p1_a1
554 , p1_a2
555 , p1_a3
556 , p1_a4
557 , p1_a5
558 , p1_a6
559 , p1_a7
560 , p1_a8
561 , p1_a9
562 , p1_a10
563 , p1_a11
564 , p1_a12
565 , p1_a13
566 , p1_a14
567 , p1_a15
568 , p1_a16
569 , p1_a17
570 , p1_a18
571 , p1_a19
572 , p1_a20
573 );
574
575
576
577
578
579
580 -- here's the delegated call to the old PL/SQL routine
581 eam_asset_operation_txn_pvt.insert_meter_readings(ddp_eam_meter_reading_tbl,
582 ddp_counter_properties_tbl,
583 p_instance_id,
584 p_txn_id,
585 x_return_status,
586 x_msg_count,
587 x_msg_data);
588
589 -- copy data back from the local variables to OUT or IN-OUT args, if any
590
591
592
593
594
595
596 end;
597
598 end eam_asset_operation_txn_pvt_w;