[Home] [Help]
PACKAGE BODY: APPS.OKL_OPT_RUL_TMP_PUB
Source
1 Package BODY Okl_Opt_Rul_Tmp_Pub AS
2 /* $Header: OKLPRTMB.pls 115.5 2004/04/13 11:03:27 rnaik noship $ */
3
4 PROCEDURE insert_Opt_Rul_Tmp(
5 p_api_version IN NUMBER
6 ,p_init_msg_list IN VARCHAR2 DEFAULT Fnd_Api.G_FALSE
7 ,x_return_status OUT NOCOPY VARCHAR2
8 ,x_msg_count OUT NOCOPY NUMBER
9 ,x_msg_data OUT NOCOPY VARCHAR2
10 ,p_ovd_id IN NUMBER
11 ,p_rgrv_rec IN rgrv_rec_type
12 ,x_rgrv_rec OUT NOCOPY rgrv_rec_type) IS
13
14
15 l_api_version NUMBER ;
16 l_init_msg_list VARCHAR2(1) ;
17 l_return_status VARCHAR2(1);
18 l_msg_count NUMBER ;
19 l_msg_data VARCHAR2(2000);
20 lp_rgrv_rec rgrv_rec_type;
21 lx_rgrv_rec rgrv_rec_type;
22
23 BEGIN
24
25 SAVEPOINT Opt_Rul_Tmp_insert;
26
27
28 l_api_version := p_api_version ;
29 l_init_msg_list := p_init_msg_list ;
33 lp_rgrv_rec := p_rgrv_rec;
30 l_return_status := x_return_status ;
31 l_msg_count := x_msg_count ;
32 l_msg_data := x_msg_data ;
34 lx_rgrv_rec := x_rgrv_rec;
35
36
37
38
39
40
41 Okl_Opt_Rul_Tmp_Pvt.insert_row(
42 l_api_version
43 ,l_init_msg_list
44 ,l_return_status
45 ,l_msg_count
46 ,l_msg_data
47 ,p_ovd_id
48 ,lp_rgrv_rec
49 ,lx_rgrv_rec);
50
51 IF ( l_return_status = Fnd_Api.G_RET_STS_ERROR ) THEN
52 RAISE Fnd_Api.G_EXC_ERROR;
53 ELSIF (l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR ) THEN
54 RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
55 END IF;
56
57 --Copy value of OUT variable in the IN record type
58 lp_rgrv_rec := lx_rgrv_rec;
59
60
61
62
63
64 --Assign value to OUT variables
65 x_rgrv_rec := lx_rgrv_rec;
66 x_return_status := l_return_status ;
67 x_msg_count := l_msg_count ;
68 x_msg_data := l_msg_data ;
69
70 EXCEPTION
71
72 WHEN Fnd_Api.G_EXC_ERROR THEN
73 ROLLBACK TO Opt_Rul_Tmp_insert;
74 x_return_status := Fnd_Api.G_RET_STS_ERROR;
75 x_msg_count := l_msg_count ;
76 x_msg_data := l_msg_data ;
77 Fnd_Msg_Pub.count_and_get(
78 p_count => x_msg_count
79 ,p_data => x_msg_data);
80 WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
81 ROLLBACK TO Opt_Rul_Tmp_insert;
82 x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
83 x_msg_count := l_msg_count ;
84 x_msg_data := l_msg_data ;
85 Fnd_Msg_Pub.count_and_get(
86 p_count => x_msg_count
87 ,p_data => x_msg_data);
88 WHEN OTHERS THEN
89 ROLLBACK TO Opt_Rul_Tmp_insert;
90 x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
91 x_msg_count := l_msg_count ;
92 x_msg_data := l_msg_data ;
93 Fnd_Msg_Pub.ADD_EXC_MSG('OKL_Opt_Rul_Tmp_PUB','insert_Opt_Rul_Tmp');
94 Fnd_Msg_Pub.count_and_get(
95 p_count => x_msg_count
96 ,p_data => x_msg_data);
97 END insert_Opt_Rul_Tmp;
98
99 PROCEDURE insert_Opt_Rul_Tmp(
100 p_api_version IN NUMBER
101 ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
102 ,x_return_status OUT NOCOPY VARCHAR2
103 ,x_msg_count OUT NOCOPY NUMBER
104 ,x_msg_data OUT NOCOPY VARCHAR2
105 ,p_ovd_id IN NUMBER
106 ,p_rgrv_tbl IN rgrv_tbl_type
107 ,x_rgrv_tbl OUT NOCOPY rgrv_tbl_type) IS
108
109 l_api_version NUMBER;
110 l_init_msg_list VARCHAR2(1) ;
111 l_msg_data VARCHAR2(2000);
112 l_msg_count NUMBER ;
113 l_return_status VARCHAR2(1);
114 lp_rgrv_tbl rgrv_tbl_type;
115 lx_rgrv_tbl rgrv_tbl_type;
116
117 BEGIN
118 SAVEPOINT Opt_Rul_Tmp_insert;
119
120
121 l_api_version := p_api_version ;
122 l_init_msg_list := p_init_msg_list ;
123 l_return_status := x_return_status ;
124 l_msg_count := x_msg_count ;
125 l_msg_data := x_msg_data ;
126 lp_rgrv_tbl := p_rgrv_tbl;
127 lx_rgrv_tbl := x_rgrv_tbl;
128
129
130
131
132
133 Okl_Opt_Rul_Tmp_Pvt.insert_row(
134 l_api_version
135 ,l_init_msg_list
136 ,l_return_status
137 ,l_msg_count
138 ,l_msg_data
139 ,p_ovd_id
140 ,lp_rgrv_tbl
141 ,lx_rgrv_tbl);
142
143 IF ( l_return_status = Fnd_Api.G_RET_STS_ERROR ) THEN
144 RAISE Fnd_Api.G_EXC_ERROR;
145 ELSIF (l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR ) THEN
146 RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
147 END IF;
148
149 --Copy value of OUT variable in the IN record type
150 lp_rgrv_tbl := lx_rgrv_tbl;
151
152
153
154
155
156 --Assign value to OUT variables
157 x_rgrv_tbl := lx_rgrv_tbl;
158 x_return_status := l_return_status ;
159 x_msg_count := l_msg_count ;
160 x_msg_data := l_msg_data ;
161
162
163 EXCEPTION
164
165 WHEN Fnd_Api.G_EXC_ERROR THEN
166 ROLLBACK TO Opt_Rul_Tmp_insert;
167 x_return_status := Fnd_Api.G_RET_STS_ERROR;
168 x_msg_count := l_msg_count ;
169 x_msg_data := l_msg_data ;
170 Fnd_Msg_Pub.count_and_get(
171 p_count => x_msg_count
172 ,p_data => x_msg_data);
173 WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
174 ROLLBACK TO Opt_Rul_Tmp_insert;
175 x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
176 x_msg_count := l_msg_count ;
177 x_msg_data := l_msg_data ;
178 Fnd_Msg_Pub.count_and_get(
179 p_count => x_msg_count
180 ,p_data => x_msg_data);
181 WHEN OTHERS THEN
182 ROLLBACK TO Opt_Rul_Tmp_insert;
183 x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
184 x_msg_count := l_msg_count ;
185 x_msg_data := l_msg_data ;
186 Fnd_Msg_Pub.ADD_EXC_MSG('Okl_Opt_Rul_Tmp_Pub','insert_Opt_Rul_Tmp');
187 Fnd_Msg_Pub.count_and_get(
188 p_count => x_msg_count
189 ,p_data => x_msg_data);
190
191 END insert_Opt_Rul_Tmp;
192
193 PROCEDURE lock_Opt_Rul_Tmp(
194 p_api_version IN NUMBER
195 ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
196 ,x_return_status OUT NOCOPY VARCHAR2
197 ,x_msg_count OUT NOCOPY NUMBER
198 ,x_msg_data OUT NOCOPY VARCHAR2
199 ,p_rgrv_rec IN rgrv_rec_type) IS
200
201 BEGIN
202 NULL;
203 END lock_Opt_Rul_Tmp;
204
205 PROCEDURE lock_Opt_Rul_Tmp(
206 p_api_version IN NUMBER
207 ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
208 ,x_return_status OUT NOCOPY VARCHAR2
209 ,x_msg_count OUT NOCOPY NUMBER
210 ,x_msg_data OUT NOCOPY VARCHAR2
211 ,p_rgrv_tbl IN rgrv_tbl_type) IS
212
213 BEGIN
214 NULL;
215 END lock_Opt_Rul_Tmp;
216
217 PROCEDURE update_Opt_Rul_Tmp(
218 p_api_version IN NUMBER
219 ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
220 ,x_return_status OUT NOCOPY VARCHAR2
221 ,x_msg_count OUT NOCOPY NUMBER
222 ,x_msg_data OUT NOCOPY VARCHAR2
223 ,p_rgrv_rec IN rgrv_rec_type
224 ,x_rgrv_rec OUT NOCOPY rgrv_rec_type) IS
225
226 BEGIN
227 NULL;
228 END update_Opt_Rul_Tmp;
229
230 PROCEDURE update_Opt_Rul_Tmp(
231 p_api_version IN NUMBER
232 ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
233 ,x_return_status OUT NOCOPY VARCHAR2
234 ,x_msg_count OUT NOCOPY NUMBER
235 ,x_msg_data OUT NOCOPY VARCHAR2
236 ,p_rgrv_tbl IN rgrv_tbl_type
237 ,x_rgrv_tbl OUT NOCOPY rgrv_tbl_type) IS
238
239 BEGIN
240 NULL;
241 END update_Opt_Rul_Tmp;
242
243 --Put custom code for cascade delete by developer
244 PROCEDURE delete_Opt_Rul_Tmp(
245 p_api_version IN NUMBER
246 ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
247 ,x_return_status OUT NOCOPY VARCHAR2
248 ,x_msg_count OUT NOCOPY NUMBER
249 ,x_msg_data OUT NOCOPY VARCHAR2
250 ,p_rgrv_rec IN rgrv_rec_type) IS
251 BEGIN
252 NULL;
253 END delete_Opt_Rul_Tmp;
254
255 PROCEDURE delete_Opt_Rul_Tmp(
256 p_api_version IN NUMBER
257 ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
258 ,x_return_status OUT NOCOPY VARCHAR2
259 ,x_msg_count OUT NOCOPY NUMBER
260 ,x_msg_data OUT NOCOPY VARCHAR2
261 ,p_rgrv_tbl IN rgrv_tbl_type) IS
262
263 BEGIN
264 NULL;
265 END delete_Opt_Rul_Tmp;
266
267 PROCEDURE validate_Opt_Rul_Tmp(
268 p_api_version IN NUMBER
269 ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
270 ,x_return_status OUT NOCOPY VARCHAR2
271 ,x_msg_count OUT NOCOPY NUMBER
272 ,x_msg_data OUT NOCOPY VARCHAR2
273 ,p_rgrv_rec IN rgrv_rec_type) IS
274
275 BEGIN
276 NULL;
277 END validate_Opt_Rul_Tmp;
278
279 PROCEDURE validate_Opt_Rul_Tmp(
280 p_api_version IN NUMBER,
281 p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
282 x_return_status OUT NOCOPY VARCHAR2,
283 x_msg_count OUT NOCOPY NUMBER,
284 x_msg_data OUT NOCOPY VARCHAR2,
285 p_rgrv_tbl IN rgrv_tbl_type) IS
286
287 BEGIN
288 NULL;
289 END validate_Opt_Rul_Tmp;
290
291 END Okl_Opt_Rul_Tmp_Pub;