[Home] [Help]
PACKAGE BODY: APPS.OKL_CNTR_GRP_BILLING_PUB
Source
1 PACKAGE BODY OKL_CNTR_GRP_BILLING_PUB AS
2 /* $Header: OKLPCLBB.pls 115.6 2004/04/13 10:37:58 rnaik noship $ */
3 -- Start of wraper code generated automatically by Debug code generator
4 L_MODULE VARCHAR2(40) := 'LEASE.RECEIVABLES.COUNTER';
5 L_DEBUG_ENABLED CONSTANT VARCHAR2(10) := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
6 L_LEVEL_PROCEDURE NUMBER;
7 IS_DEBUG_PROCEDURE_ON BOOLEAN;
8 -- End of wraper code generated automatically by Debug code generator
9
10
11 PROCEDURE calculate_cntgrp_bill_amt(
12 p_api_version IN NUMBER
13 ,p_init_msg_list IN VARCHAR2 DEFAULT Fnd_Api.G_FALSE
14 ,x_return_status OUT NOCOPY VARCHAR2
15 ,x_msg_count OUT NOCOPY NUMBER
16 ,x_msg_data OUT NOCOPY VARCHAR2
17 ,p_cntr_bill_tbl IN cntr_bill_tbl_type
18 ,x_cntr_bill_tbl OUT NOCOPY cntr_bill_tbl_type
19 ) IS
20
21 l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
22 l_api_version NUMBER ;
23 l_init_msg_list VARCHAR2(1) ;
24 l_msg_data VARCHAR2(2000);
25 l_msg_count NUMBER ;
26 lp_cntr_bill_tbl cntr_bill_tbl_type;
27 lx_cntr_bill_tbl cntr_bill_tbl_type;
28
29 BEGIN
30
31
32
33
34
35
36 SAVEPOINT calculate_cntgrp_bill_amt_rec;
37
38 l_api_version := p_api_version ;
39 l_init_msg_list := p_init_msg_list ;
40 l_msg_data := x_msg_data;
41 l_msg_count := x_msg_count ;
42 lp_cntr_bill_tbl := p_cntr_bill_tbl;
43 lx_cntr_bill_tbl := p_cntr_bill_tbl;
44
45
46 -- Start of wraper code generated automatically by Debug code generator for OKL_CNTR_GRP_BILLING_PVT.counter_grp_billing_calc
47 IF(L_DEBUG_ENABLED='Y') THEN
48 L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
49 IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
50 END IF;
51 IF(IS_DEBUG_PROCEDURE_ON) THEN
52 BEGIN
53 OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPCLBB.pls call OKL_CNTR_GRP_BILLING_PVT.counter_grp_billing_calc ');
54 END;
55 END IF;
56 OKL_CNTR_GRP_BILLING_PVT.counter_grp_billing_calc(
57 p_api_version => l_api_version
58 ,p_init_msg_list => l_init_msg_list
59 ,x_return_status => l_return_status
60 ,x_msg_count => l_msg_count
61 ,x_msg_data => l_msg_data
62 ,p_cntr_bill_tbl => lp_cntr_bill_tbl
63 ,x_cntr_bill_tbl => lx_cntr_bill_tbl);
64 IF(IS_DEBUG_PROCEDURE_ON) THEN
65 BEGIN
66 OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPCLBB.pls call OKL_CNTR_GRP_BILLING_PVT.counter_grp_billing_calc ');
67 END;
68 END IF;
69 -- End of wraper code generated automatically by Debug code generator for OKL_CNTR_GRP_BILLING_PVT.counter_grp_billing_calc
70
71 x_return_status := l_return_status ;
72 x_msg_count := l_msg_count ;
73 x_msg_data := l_msg_data ;
74 x_cntr_bill_tbl := lx_cntr_bill_tbl;
75
76
77
78
79 EXCEPTION
80
81 WHEN Fnd_Api.G_EXC_ERROR THEN
82 ROLLBACK TO calculate_cntgrp_bill_amt_rec;
83 x_return_status := Fnd_Api.G_RET_STS_ERROR;
84 x_msg_count := l_msg_count ;
85 x_msg_data := l_msg_data ;
86 WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
87 ROLLBACK TO calculate_cntgrp_bill_amt_rec;
88 x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
89 x_msg_count := l_msg_count ;
90 x_msg_data := l_msg_data ;
91 WHEN OTHERS THEN
92 ROLLBACK TO calculate_cntgrp_bill_amt_rec;
93 x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
94 x_msg_count := l_msg_count ;
95 x_msg_data := l_msg_data ;
96
97
98 END;
99
100 PROCEDURE calculate_cntgrp_bill_amt(
101 p_api_version IN NUMBER
102 ,p_init_msg_list IN VARCHAR2 DEFAULT Fnd_Api.G_FALSE
103 ,x_return_status OUT NOCOPY VARCHAR2
104 ,x_msg_count OUT NOCOPY NUMBER
105 ,x_msg_data OUT NOCOPY VARCHAR2
106 ,p_cntr_bill_rec IN cntr_bill_rec_type
107 ,x_cntr_bill_rec OUT NOCOPY cntr_bill_rec_type) IS
108 BEGIN
109 NULL ;
110 END;
111
112 PROCEDURE insert_cntr_grp_bill(
113 p_api_version IN NUMBER
114 ,p_init_msg_list IN VARCHAR2 DEFAULT Fnd_Api.G_FALSE
115 ,x_return_status OUT NOCOPY VARCHAR2
116 ,x_msg_count OUT NOCOPY NUMBER
117 ,x_msg_data OUT NOCOPY VARCHAR2
118 ,p_cntr_bill_tbl IN cntr_bill_tbl_type
119 ,x_cntr_bill_tbl OUT NOCOPY cntr_bill_tbl_type
120 ) IS
121
122 l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
123 l_api_version NUMBER ;
124 l_init_msg_list VARCHAR2(1) ;
125 l_msg_data VARCHAR2(2000);
126 l_msg_count NUMBER ;
127 lp_cntr_bill_tbl cntr_bill_tbl_type;
128 lx_cntr_bill_tbl cntr_bill_tbl_type;
129
130 BEGIN
131
132
133
134
135
136
137 SAVEPOINT insert_cntr_grp_bill_rec;
138
139 l_api_version := p_api_version ;
140 l_init_msg_list := p_init_msg_list ;
141 l_msg_data := x_msg_data;
142 l_msg_count := x_msg_count ;
143 lp_cntr_bill_tbl := p_cntr_bill_tbl;
144 lx_cntr_bill_tbl := p_cntr_bill_tbl;
145
146 -- Start of wraper code generated automatically by Debug code generator for OKL_CNTR_GRP_BILLING_PVT.counter_grp_billing_insert
147 IF(L_DEBUG_ENABLED='Y') THEN
148 L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
149 IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
150 END IF;
151 IF(IS_DEBUG_PROCEDURE_ON) THEN
152 BEGIN
153 OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPCLBB.pls call OKL_CNTR_GRP_BILLING_PVT.counter_grp_billing_insert ');
154 END;
155 END IF;
156 OKL_CNTR_GRP_BILLING_PVT.counter_grp_billing_insert(
157 p_api_version => l_api_version
158 ,p_init_msg_list => l_init_msg_list
159 ,x_return_status => l_return_status
160 ,x_msg_count => l_msg_count
161 ,x_msg_data => l_msg_data
162 ,p_cntr_bill_tbl => lp_cntr_bill_tbl
163 ,x_cntr_bill_tbl => lx_cntr_bill_tbl
164 );
165 IF(IS_DEBUG_PROCEDURE_ON) THEN
166 BEGIN
167 OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPCLBB.pls call OKL_CNTR_GRP_BILLING_PVT.counter_grp_billing_insert ');
168 END;
169 END IF;
170 -- End of wraper code generated automatically by Debug code generator for OKL_CNTR_GRP_BILLING_PVT.counter_grp_billing_insert
171
172 x_return_status := l_return_status ;
173 x_msg_count := l_msg_count ;
174 x_msg_data := l_msg_data ;
175 x_cntr_bill_tbl := lx_cntr_bill_tbl;
176
177
178
179
180 EXCEPTION
181
182 WHEN Fnd_Api.G_EXC_ERROR THEN
183 ROLLBACK TO insert_cntr_grp_bill_rec;
184 x_return_status := Fnd_Api.G_RET_STS_ERROR;
185 x_msg_count := l_msg_count ;
186 x_msg_data := l_msg_data ;
187 WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
188 ROLLBACK TO insert_cntr_grp_bill_rec;
189 x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
190 x_msg_count := l_msg_count ;
191 x_msg_data := l_msg_data ;
192 WHEN OTHERS THEN
193 ROLLBACK TO insert_cntr_grp_bill_rec;
194 x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
195 x_msg_count := l_msg_count ;
196 x_msg_data := l_msg_data ;
197
198 END insert_cntr_grp_bill;
199
200 PROCEDURE insert_cntr_grp_bill(
201 p_api_version IN NUMBER
202 ,p_init_msg_list IN VARCHAR2 DEFAULT Fnd_Api.G_FALSE
203 ,x_return_status OUT NOCOPY VARCHAR2
204 ,x_msg_count OUT NOCOPY NUMBER
205 ,x_msg_data OUT NOCOPY VARCHAR2
206 ,p_cntr_bill_rec IN cntr_bill_rec_type
207 ,x_cntr_bill_rec OUT NOCOPY cntr_bill_rec_type)IS
208 BEGIN
209 NULL ;
210 END;
211
212 end OKL_CNTR_GRP_BILLING_PUB;