DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_SETUPPQVALUES_PUB

Source


1 PACKAGE BODY OKL_SETUPPQVALUES_PUB AS
2 /* $Header: OKLPSUVB.pls 120.3 2007/09/26 08:22:34 rajnisku ship $ */
3 -- Start of wraper code generated automatically by Debug code generator
4   L_MODULE VARCHAR2(40) := 'LEASE.SETUP.PRODUCTS';
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   -- PROCEDURE get_rec for: Okl_Pdt_Pqy_Vals_v
11   ---------------------------------------------------------------------------
12   PROCEDURE get_rec(p_pqvv_rec			  IN pqvv_rec_type,
13 			        x_return_status		  OUT NOCOPY VARCHAR2,
14 					x_msg_data			  OUT NOCOPY VARCHAR2,
15     				x_no_data_found       OUT NOCOPY BOOLEAN,
16 					x_pqvv_rec			  OUT NOCOPY pqvv_rec_type) IS
17     l_pqvv_rec                        pqvv_rec_type;
18     l_return_status                   VARCHAR2(1)    := FND_API.G_RET_STS_SUCCESS;
19     l_no_data_found					  BOOLEAN;
20   BEGIN
21 
22   	l_pqvv_rec := p_pqvv_rec;
23 	x_return_status := FND_API.G_RET_STS_SUCCESS;
24 	x_no_data_found := TRUE;
25 
26 -- Start of wraper code generated automatically by Debug code generator for okl_setuppqvalues_pvt.get_rec
27   IF(L_DEBUG_ENABLED='Y') THEN
28     L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
29     IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
30   END IF;
31   IF(IS_DEBUG_PROCEDURE_ON) THEN
32     BEGIN
33         OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSUVB.pls call okl_setuppqvalues_pvt.get_rec ');
34     END;
35   END IF;
36     okl_setuppqvalues_pvt.get_rec(p_pqvv_rec      => l_pqvv_rec,
37 								  x_return_status => l_return_status,
38 								  x_no_data_found => l_no_data_found,
39 								  x_pqvv_rec	  => x_pqvv_rec);
40   IF(IS_DEBUG_PROCEDURE_ON) THEN
41     BEGIN
42         OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPSUVB.pls call okl_setuppqvalues_pvt.get_rec ');
43     END;
44   END IF;
45 -- End of wraper code generated automatically by Debug code generator for okl_setuppqvalues_pvt.get_rec
46 
47      IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
48         RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
49      END IF;
50 
51   EXCEPTION
52     WHEN OTHERS THEN
53       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
54 	  x_no_data_found := FALSE;
55 	  FND_MESSAGE.set_name(application	=> G_APP_NAME,
56 	  					   name			=> G_UNEXPECTED_ERROR);
57 	  x_msg_data := FND_MESSAGE.get;
58   END get_rec;
59 
60   ---------------------------------------------------------------------------
61   -- PROCEDURE insert_pqvalues
62   -- Public wrapper for insert_pqvalues process api
63   ---------------------------------------------------------------------------
64   PROCEDURE insert_pqvalues(p_api_version      IN  NUMBER,
65                             p_init_msg_list    IN  VARCHAR2 DEFAULT OKL_API.G_FALSE,
66                         	x_return_status    OUT NOCOPY VARCHAR2,
67                         	x_msg_count        OUT NOCOPY NUMBER,
68                         	x_msg_data         OUT NOCOPY VARCHAR2,
69                         	p_pqyv_rec         IN  pqyv_rec_type,
70 							p_pdtv_rec         IN  pdtv_rec_type,
71 							p_pqvv_rec         IN  pqvv_rec_type,
72                         	x_pqvv_rec         OUT NOCOPY pqvv_rec_type
73 						    ) IS
74     l_pqvv_rec                        pqvv_rec_type;
75     l_pqyv_rec                        pqyv_rec_type;
76     l_pdtv_rec                        pdtv_rec_type;
77     l_data                            VARCHAR2(100);
78     l_count                           NUMBER ;
79     l_api_name                        CONSTANT VARCHAR2(30)  := 'insert_pqvalues';
80     l_return_status                   VARCHAR2(1)    := FND_API.G_RET_STS_SUCCESS;
81   BEGIN
82     x_return_status := FND_API.G_RET_STS_SUCCESS;
83     SAVEPOINT sp_insert_pqvalues;
84     l_pqvv_rec := p_pqvv_rec;
85     l_pqyv_rec := p_pqyv_rec;
86     l_pdtv_rec := p_pdtv_rec;
87 
88 
89 
90 	-- call process api to insert pqvalues
91 -- Start of wraper code generated automatically by Debug code generator for okl_setuppqvalues_pvt.insert_pqvalues
92   IF(L_DEBUG_ENABLED='Y') THEN
93     L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
94     IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
95   END IF;
96   IF(IS_DEBUG_PROCEDURE_ON) THEN
97     BEGIN
98         OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSUVB.pls call okl_setuppqvalues_pvt.insert_pqvalues ');
99     END;
100   END IF;
101     okl_setuppqvalues_pvt.insert_pqvalues(p_api_version   => p_api_version,
102                                           p_init_msg_list => p_init_msg_list,
103                               			  x_return_status => l_return_status,
104                               			  x_msg_count     => x_msg_count,
105                               			  x_msg_data      => x_msg_data,
106                               			  p_pqvv_rec      => l_pqvv_rec,
107                               			  x_pqvv_rec      => x_pqvv_rec,
108 										  p_pqyv_rec      => l_pqyv_rec,
109 										  p_pdtv_rec      => l_pdtv_rec
110 										  );
111   IF(IS_DEBUG_PROCEDURE_ON) THEN
112     BEGIN
113         OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPSUVB.pls call okl_setuppqvalues_pvt.insert_pqvalues ');
114     END;
115   END IF;
116 -- End of wraper code generated automatically by Debug code generator for okl_setuppqvalues_pvt.insert_pqvalues
117 
118      IF l_return_status = FND_API.G_RET_STS_ERROR THEN
119         RAISE FND_API.G_EXC_ERROR;
120      ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
121         RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
122      END IF;
123 
124     /* re-assign local record structure using output record from pvt api */
125     l_pqvv_rec := x_pqvv_rec;
126 
127 
128   EXCEPTION
129     WHEN FND_API.G_EXC_ERROR THEN
130       ROLLBACK TO sp_insert_pqvalues;
131       -- notify caller of an UNEXPECTED error
132       x_return_status := FND_API.G_RET_STS_ERROR;
133 
134       -- store SQL error message on message stack for caller
135       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
136 	  						    p_count   => x_msg_count,
137                                 p_data    => x_msg_data);
138 
139     WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
140       ROLLBACK TO sp_insert_pqvalues;
141       -- notify caller of an UNEXPECTED error
142       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
143 
144       -- store SQL error message on message stack for caller
145       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
146 	  						    p_count   => x_msg_count,
147                                 p_data    => x_msg_data);
148 
149     WHEN OTHERS THEN
150       -- notify caller of an UNEXPECTED error
151       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
152       FND_MSG_PUB.ADD_EXC_MSG('OKL_SETUPPQVALUES_PUB','insert_pqvalues');
153 
154       -- store SQL error message on message stack for caller
155       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
156 	  						    p_count   => x_msg_count,
157                                 p_data    => x_msg_data);
158   END insert_pqvalues;
159 
160    ---------------------------------------------------------------------------
161   -- PROCEDURE update_pqvalues
162   -- Public wrapper for update_pqvalues process api
163   ---------------------------------------------------------------------------
164   PROCEDURE update_pqvalues(p_api_version      IN  NUMBER,
165                             p_init_msg_list    IN  VARCHAR2 DEFAULT OKL_API.G_FALSE,
166                         	x_return_status    OUT NOCOPY VARCHAR2,
167                         	x_msg_count        OUT NOCOPY NUMBER,
168                         	x_msg_data         OUT NOCOPY VARCHAR2,
169                         	p_pqyv_rec         IN  pqyv_rec_type,
170 							p_pdtv_rec         IN  pdtv_rec_type,
171 							p_pqvv_rec         IN  pqvv_rec_type,
172                         	x_pqvv_rec         OUT NOCOPY pqvv_rec_type
173 						    ) IS
174     l_pqvv_rec                        pqvv_rec_type;
175     l_pqyv_rec                        pqyv_rec_type;
176     l_pdtv_rec                        pdtv_rec_type;
177     l_data                            VARCHAR2(100);
178     l_count                           NUMBER ;
179     l_api_name                        CONSTANT VARCHAR2(30)  := 'update_pqvalues';
180     l_return_status                   VARCHAR2(1)    := FND_API.G_RET_STS_SUCCESS;
181   BEGIN
182     x_return_status := FND_API.G_RET_STS_SUCCESS;
183     SAVEPOINT sp_update_pqvalues;
184     l_pqvv_rec := p_pqvv_rec;
185     l_pqyv_rec := p_pqyv_rec;
186     l_pdtv_rec := p_pdtv_rec;
187 
188 
189 
190 	-- call process api to update pqvalues
191 -- Start of wraper code generated automatically by Debug code generator for okl_setuppqvalues_pvt.update_pqvalues
192   IF(L_DEBUG_ENABLED='Y') THEN
193     L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
194     IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
195   END IF;
196   IF(IS_DEBUG_PROCEDURE_ON) THEN
197     BEGIN
198         OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSUVB.pls call okl_setuppqvalues_pvt.update_pqvalues ');
199     END;
200   END IF;
201     okl_setuppqvalues_pvt.update_pqvalues(p_api_version   => p_api_version,
202                                           p_init_msg_list => p_init_msg_list,
203                               			  x_return_status => l_return_status,
204                               			  x_msg_count     => x_msg_count,
205                               			  x_msg_data      => x_msg_data,
206                               			  p_pqvv_rec      => l_pqvv_rec,
207                               			  x_pqvv_rec      => x_pqvv_rec,
208 										  p_pqyv_rec      => l_pqyv_rec,
209 										  p_pdtv_rec      => l_pdtv_rec
210 										  );
211   IF(IS_DEBUG_PROCEDURE_ON) THEN
212     BEGIN
213         OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPSUVB.pls call okl_setuppqvalues_pvt.update_pqvalues ');
214     END;
215   END IF;
216 -- End of wraper code generated automatically by Debug code generator for okl_setuppqvalues_pvt.update_pqvalues
217 
218      IF l_return_status = FND_API.G_RET_STS_ERROR THEN
219         RAISE FND_API.G_EXC_ERROR;
220      ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
221         RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
222      END IF;
223 
224     /* re-assign local record structure using output record from pvt api */
225     l_pqvv_rec := x_pqvv_rec;
226 
227 
228   EXCEPTION
229     WHEN FND_API.G_EXC_ERROR THEN
230       ROLLBACK TO sp_update_pqvalues;
231       -- notify caller of an UNEXPECTED error
232       x_return_status := FND_API.G_RET_STS_ERROR;
233 
234       -- store SQL error message on message stack for caller
235       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
236 	  						    p_count   => x_msg_count,
237                                 p_data    => x_msg_data);
238 
239     WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
240       ROLLBACK TO sp_update_pqvalues;
241       -- notify caller of an UNEXPECTED error
242       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
243 
244       -- store SQL error message on message stack for caller
245       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
246 	  						    p_count   => x_msg_count,
247                                 p_data    => x_msg_data);
248 
249     WHEN OTHERS THEN
250       -- notify caller of an UNEXPECTED error
251       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
252       FND_MSG_PUB.ADD_EXC_MSG('OKL_SETUPPQVALUES_PUB','update_pqvalues');
253 
254       -- store SQL error message on message stack for caller
255       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
256 	  						    p_count   => x_msg_count,
257                                 p_data    => x_msg_data);
258   END update_pqvalues;
259       PROCEDURE insert_pqvalues(p_api_version      IN  NUMBER,
260                             p_init_msg_list    IN  VARCHAR2 DEFAULT OKL_API.G_FALSE,
261                         	x_return_status    OUT NOCOPY VARCHAR2,
262                         	x_msg_count        OUT NOCOPY NUMBER,
263                         	x_msg_data         OUT NOCOPY VARCHAR2,
264                         	p_pqyv_rec         IN  pqyv_rec_type,
265 							p_pdtv_rec         IN  pdtv_rec_type,
266 							p_pqvv_tbl         IN  pqvv_tbl_type,
267                         	x_pqvv_tbl         OUT NOCOPY pqvv_tbl_type
268 						    ) IS
269   l_pqyv_rec						pqyv_rec_type:= p_pqyv_rec ;
270     l_pdtv_rec						pdtv_rec_type:= p_pdtv_rec ;
271     l_pqvv_tbl						pqvv_tbl_type:= p_pqvv_tbl ;
272     l_data                            VARCHAR2(100);
273     l_api_name                        CONSTANT VARCHAR2(30)  := 'insert_dqualitys';
274     l_count                           NUMBER ;
275     l_return_status                   VARCHAR2(1)    := FND_API.G_RET_STS_SUCCESS;
276   BEGIN
277     x_return_status := FND_API.G_RET_STS_SUCCESS;
278     SAVEPOINT sp_insert_pqvalues;
279 		l_pqyv_rec :=      p_pqyv_rec;
280         l_pdtv_rec  :=  p_pdtv_rec;
281 		l_pqvv_tbl      :=   p_pqvv_tbl;
282                         	--x_pqvv_tbl      :=   x_pqvv_tbl
283 
284 
285 
286 	-- call process api to insert dqualitys
287 -- Start of wraper code generated automatically by Debug code generator for OKL_SETUPPQVALUES_PUB .insert_pqvalues
288   IF(L_DEBUG_ENABLED='Y') THEN
289     L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
290     IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
291   END IF;
292   IF(IS_DEBUG_PROCEDURE_ON) THEN
293     BEGIN
294         OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSUVB.pls  call OKL_SETUPPQVALUES_PUB.insert_pqvalues ');
295     END;
296   END IF;
297    OKL_SETUPPQVALUES_PVT.insert_pqvalues(p_api_version   => p_api_version,                                            p_init_msg_list => p_init_msg_list,
298                               			    x_return_status => l_return_status,
299                               			    x_msg_count     => x_msg_count,
300                               			    x_msg_data      => x_msg_data,
301 											p_pqyv_rec  =>        l_pqyv_rec,
302 							p_pdtv_rec     =>  l_pdtv_rec,
303 							p_pqvv_tbl       =>    l_pqvv_tbl,
304                         	x_pqvv_tbl       =>   x_pqvv_tbl);
305   IF(IS_DEBUG_PROCEDURE_ON) THEN
306     BEGIN
307         OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPSUVB.pls  call OKL_SETUPPQVALUES_PUB.insert_pqvalues ');
308     END;
309   END IF;
310 -- End of wraper code generated automatically by Debug code generator for OKL_SETUPPQVALUES_PUB .insert_pqvalues
311 
312      IF l_return_status = FND_API.G_RET_STS_ERROR THEN
313         RAISE FND_API.G_EXC_ERROR;
314      ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
315         RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
316      END IF;
317 
318     /* re-assign local record structure using output record from pvt api */
319     l_pqvv_tbl := x_pqvv_tbl;
320 
321 
322 
323 
324   EXCEPTION
325     WHEN FND_API.G_EXC_ERROR THEN
326       ROLLBACK TO sp_insert_pqvalues;
327       -- notify caller of an UNEXPECTED error
328       x_return_status := FND_API.G_RET_STS_ERROR;
329 
330       -- store SQL error message on message stack for caller
331       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
332 	  						    p_count   => x_msg_count,
333                                 p_data    => x_msg_data);
334 
335     WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
336       ROLLBACK TO sp_insert_pqvalues;
337       -- notify caller of an UNEXPECTED error
338       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
339 
340       -- store SQL error message on message stack for caller
341       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
342 	  						    p_count   => x_msg_count,
343                                 p_data    => x_msg_data);
344 
345     WHEN OTHERS THEN
346       -- notify caller of an UNEXPECTED error
347       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
348       FND_MSG_PUB.ADD_EXC_MSG('OKL_SETUPPQVALUES_PUB','insert_pqvalues');
349 
350       -- store SQL error message on message stack for caller
351       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
352 	  						    p_count   => x_msg_count,
353                                 p_data    => x_msg_data);
354   END insert_pqvalues;
355       PROCEDURE update_pqvalues(p_api_version      IN  NUMBER,
356                             p_init_msg_list    IN  VARCHAR2 DEFAULT OKL_API.G_FALSE,
357                         	x_return_status    OUT NOCOPY VARCHAR2,
358                         	x_msg_count        OUT NOCOPY NUMBER,
359                         	x_msg_data         OUT NOCOPY VARCHAR2,
360                         	p_pqyv_rec         IN  pqyv_rec_type,
361 							p_pdtv_rec         IN  pdtv_rec_type,
362 							p_pqvv_tbl         IN  pqvv_tbl_type,
363                         	x_pqvv_tbl         OUT NOCOPY pqvv_tbl_type
364 						    ) IS
365   l_pqyv_rec						pqyv_rec_type:= p_pqyv_rec ;
366     l_pdtv_rec						pdtv_rec_type:= p_pdtv_rec ;
367     l_pqvv_tbl						pqvv_tbl_type:= p_pqvv_tbl ;
368     l_data                            VARCHAR2(100);
369     l_api_name                        CONSTANT VARCHAR2(30)  := 'update_pqvalues';
370     l_count                           NUMBER ;
371     l_return_status                   VARCHAR2(1)    := FND_API.G_RET_STS_SUCCESS;
372   BEGIN
373     x_return_status := FND_API.G_RET_STS_SUCCESS;
374     SAVEPOINT sp_update_pqvalues;
375 		l_pqyv_rec :=      p_pqyv_rec;
376         l_pdtv_rec  :=  p_pdtv_rec;
377 		l_pqvv_tbl      :=   p_pqvv_tbl;
378                         	--x_pqvv_tbl      :=   x_pqvv_tbl
379 
380 
381 
382 	-- call process api to insert dqualitys
383 -- Start of wraper code generated automatically by Debug code generator for OKL_SETUPPQVALUES_PUB .insert_pqvalues
384   IF(L_DEBUG_ENABLED='Y') THEN
385     L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
386     IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
387   END IF;
388   IF(IS_DEBUG_PROCEDURE_ON) THEN
389     BEGIN
390         OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSUVB.pls  call OKL_SETUPPQVALUES_PUB.update_pqvalues ');
391     END;
392   END IF;
393   OKL_SETUPPQVALUES_PVT.update_pqvalues(p_api_version   => p_api_version,                                            p_init_msg_list => p_init_msg_list,
394                               			    x_return_status => l_return_status,
395                               			    x_msg_count     => x_msg_count,
396                               			    x_msg_data      => x_msg_data,
397 											p_pqyv_rec  =>        l_pqyv_rec,
398 							p_pdtv_rec     =>  l_pdtv_rec,
399 							p_pqvv_tbl       =>    l_pqvv_tbl,
400                         	x_pqvv_tbl       =>   x_pqvv_tbl);
401   IF(IS_DEBUG_PROCEDURE_ON) THEN
402     BEGIN
403         OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPSUVB.pls  call OKL_SETUPPQVALUES_PUB.update_pqvalues ');
404     END;
405   END IF;
406 -- End of wraper code generated automatically by Debug code generator for OKL_SETUPPQVALUES_PUB .insert_pqvalues
407 
408      IF l_return_status = FND_API.G_RET_STS_ERROR THEN
409         RAISE FND_API.G_EXC_ERROR;
410      ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
411         RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
412      END IF;
413 
414     /* re-assign local record structure using output record from pvt api */
415     l_pqvv_tbl := x_pqvv_tbl;
416 
417 
418 
419 
420   EXCEPTION
421     WHEN FND_API.G_EXC_ERROR THEN
422       ROLLBACK TO sp_update_pqvalues;
423       -- notify caller of an UNEXPECTED error
424       x_return_status := FND_API.G_RET_STS_ERROR;
425 
426       -- store SQL error message on message stack for caller
427       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
428 	  						    p_count   => x_msg_count,
429                                 p_data    => x_msg_data);
430 
431     WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
432       ROLLBACK TO sp_update_pqvalues;
433       -- notify caller of an UNEXPECTED error
434       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
435 
436       -- store SQL error message on message stack for caller
437       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
438 	  						    p_count   => x_msg_count,
439                                 p_data    => x_msg_data);
440 
441     WHEN OTHERS THEN
442       -- notify caller of an UNEXPECTED error
443       x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
444       FND_MSG_PUB.ADD_EXC_MSG('OKL_SETUPPQVALUES_PUB','update_pqvalues');
445 
446       -- store SQL error message on message stack for caller
447       FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
448 	  						    p_count   => x_msg_count,
449                                 p_data    => x_msg_data);
450   END update_pqvalues;
451 
452 
453 END OKL_SETUPPQVALUES_PUB;