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

Source


1 package body okl_btch_cash_applic_pub_w as
2   /* $Header: OKLUBAPB.pls 120.3 2007/09/19 06:57:35 varangan ship $ */
3   procedure okl_batch_cash_applic(p_api_version  NUMBER
4     , p_init_msg_list  VARCHAR2
5     , x_return_status out nocopy  VARCHAR2
6     , x_msg_count out nocopy  NUMBER
7     , x_msg_data out nocopy  VARCHAR2
8     , p5_a0 JTF_NUMBER_TABLE
9     , p5_a1 JTF_NUMBER_TABLE
10     , p5_a2 JTF_NUMBER_TABLE
11     , p5_a3 JTF_VARCHAR2_TABLE_100
12     , p5_a4 JTF_VARCHAR2_TABLE_100
13     , p5_a5 JTF_VARCHAR2_TABLE_100
14     , p5_a6 JTF_VARCHAR2_TABLE_100
15     , p5_a7 JTF_DATE_TABLE
16     , p5_a8 JTF_NUMBER_TABLE
17     , p5_a9 JTF_NUMBER_TABLE
18     , p5_a10 JTF_NUMBER_TABLE
19     , p5_a11 JTF_NUMBER_TABLE
20     , p5_a12 JTF_VARCHAR2_TABLE_200
21     , p5_a13 JTF_NUMBER_TABLE
22     , p5_a14 JTF_VARCHAR2_TABLE_100
23     , p5_a15 JTF_VARCHAR2_TABLE_100
24     , p5_a16 JTF_VARCHAR2_TABLE_200
25     , p5_a17 JTF_VARCHAR2_TABLE_200
26     , p5_a18 JTF_VARCHAR2_TABLE_200
27     , p5_a19 JTF_VARCHAR2_TABLE_200
28     , p5_a20 JTF_VARCHAR2_TABLE_200
29     , p5_a21 JTF_VARCHAR2_TABLE_200
30     , p5_a22 JTF_VARCHAR2_TABLE_200
31     , p5_a23 JTF_VARCHAR2_TABLE_200
32     , p5_a24 JTF_VARCHAR2_TABLE_200
33     , p5_a25 JTF_VARCHAR2_TABLE_200
34     , p5_a26 JTF_VARCHAR2_TABLE_200
35     , p5_a27 JTF_VARCHAR2_TABLE_200
36     , p5_a28 JTF_VARCHAR2_TABLE_200
37     , p5_a29 JTF_VARCHAR2_TABLE_200
38     , p5_a30 JTF_VARCHAR2_TABLE_200
39     , p6_a0 out nocopy JTF_NUMBER_TABLE
40     , p6_a1 out nocopy JTF_NUMBER_TABLE
41     , p6_a2 out nocopy JTF_NUMBER_TABLE
42     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
43     , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
44     , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
45     , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
46     , p6_a7 out nocopy JTF_DATE_TABLE
47     , p6_a8 out nocopy JTF_NUMBER_TABLE
48     , p6_a9 out nocopy JTF_NUMBER_TABLE
49     , p6_a10 out nocopy JTF_NUMBER_TABLE
50     , p6_a11 out nocopy JTF_NUMBER_TABLE
51     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_200
52     , p6_a13 out nocopy JTF_NUMBER_TABLE
53     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
54     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
55     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_200
56     , p6_a17 out nocopy JTF_VARCHAR2_TABLE_200
57     , p6_a18 out nocopy JTF_VARCHAR2_TABLE_200
58     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_200
59     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_200
60     , p6_a21 out nocopy JTF_VARCHAR2_TABLE_200
61     , p6_a22 out nocopy JTF_VARCHAR2_TABLE_200
62     , p6_a23 out nocopy JTF_VARCHAR2_TABLE_200
63     , p6_a24 out nocopy JTF_VARCHAR2_TABLE_200
64     , p6_a25 out nocopy JTF_VARCHAR2_TABLE_200
65     , p6_a26 out nocopy JTF_VARCHAR2_TABLE_200
66     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_200
67     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_200
68     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_200
69     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_200
70   )
71 
72   as
73     ddp_btch_tbl okl_btch_cash_applic_pub.okl_btch_dtls_tbl_type;
74     ddx_btch_tbl okl_btch_cash_applic_pub.okl_btch_dtls_tbl_type;
75     ddindx binary_integer; indx binary_integer;
76   begin
77 
78     -- copy data to the local IN or IN-OUT args, if any
79 
80 
81 
82 
83 
84     okl_btch_cash_applic_w.rosetta_table_copy_in_p13(ddp_btch_tbl, p5_a0
85       , p5_a1
86       , p5_a2
87       , p5_a3
88       , p5_a4
89       , p5_a5
90       , p5_a6
91       , p5_a7
92       , p5_a8
93       , p5_a9
94       , p5_a10
95       , p5_a11
96       , p5_a12
97       , p5_a13
98       , p5_a14
99       , p5_a15
100       , p5_a16
101       , p5_a17
102       , p5_a18
103       , p5_a19
104       , p5_a20
105       , p5_a21
106       , p5_a22
107       , p5_a23
108       , p5_a24
109       , p5_a25
110       , p5_a26
111       , p5_a27
112       , p5_a28
113       , p5_a29
114       , p5_a30
115       );
116 
117 
118     -- here's the delegated call to the old PL/SQL routine
119     okl_btch_cash_applic_pub.okl_batch_cash_applic(p_api_version,
120       p_init_msg_list,
121       x_return_status,
122       x_msg_count,
123       x_msg_data,
124       ddp_btch_tbl,
125       ddx_btch_tbl);
126 
127     -- copy data back from the local variables to OUT or IN-OUT args, if any
128 
129 
130 
131 
132 
133 
134     okl_btch_cash_applic_w.rosetta_table_copy_out_p13(ddx_btch_tbl, p6_a0
135       , p6_a1
136       , p6_a2
137       , p6_a3
138       , p6_a4
139       , p6_a5
140       , p6_a6
141       , p6_a7
142       , p6_a8
143       , p6_a9
144       , p6_a10
145       , p6_a11
146       , p6_a12
147       , p6_a13
148       , p6_a14
149       , p6_a15
150       , p6_a16
151       , p6_a17
152       , p6_a18
153       , p6_a19
154       , p6_a20
155       , p6_a21
156       , p6_a22
157       , p6_a23
158       , p6_a24
159       , p6_a25
160       , p6_a26
161       , p6_a27
162       , p6_a28
163       , p6_a29
164       , p6_a30
165       );
166   end;
167 
168 end okl_btch_cash_applic_pub_w;