46: ,l_msg_data
47: ,lp_btcv_rec
48: ,lx_btcv_rec);
49:
50: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
51: RAISE FND_API.G_EXC_ERROR;
52: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
53: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
54: END IF;
47: ,lp_btcv_rec
48: ,lx_btcv_rec);
49:
50: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
51: RAISE FND_API.G_EXC_ERROR;
52: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
53: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
54: END IF;
55:
48: ,lx_btcv_rec);
49:
50: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
51: RAISE FND_API.G_EXC_ERROR;
52: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
53: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
54: END IF;
55:
56: lp_btcv_rec := lx_btcv_rec;
49:
50: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
51: RAISE FND_API.G_EXC_ERROR;
52: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
53: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
54: END IF;
55:
56: lp_btcv_rec := lx_btcv_rec;
57:
61: x_msg_data := l_msg_data ;
62:
63: EXCEPTION
64:
65: WHEN FND_API.G_EXC_ERROR THEN
66: ROLLBACK TO trx_csh_batch_insert;
67: x_return_status := FND_API.G_RET_STS_ERROR;
68: x_msg_count := l_msg_count ;
69: x_msg_data := l_msg_data ;
63: EXCEPTION
64:
65: WHEN FND_API.G_EXC_ERROR THEN
66: ROLLBACK TO trx_csh_batch_insert;
67: x_return_status := FND_API.G_RET_STS_ERROR;
68: x_msg_count := l_msg_count ;
69: x_msg_data := l_msg_data ;
70: FND_MSG_PUB.count_and_get(
71: p_count => x_msg_count
69: x_msg_data := l_msg_data ;
70: FND_MSG_PUB.count_and_get(
71: p_count => x_msg_count
72: ,p_data => x_msg_data);
73: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
74: ROLLBACK TO trx_csh_batch_insert;
75: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
76: x_msg_count := l_msg_count ;
77: x_msg_data := l_msg_data ;
71: p_count => x_msg_count
72: ,p_data => x_msg_data);
73: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
74: ROLLBACK TO trx_csh_batch_insert;
75: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
76: x_msg_count := l_msg_count ;
77: x_msg_data := l_msg_data ;
78: FND_MSG_PUB.count_and_get(
79: p_count => x_msg_count
79: p_count => x_msg_count
80: ,p_data => x_msg_data);
81: WHEN OTHERS THEN
82: ROLLBACK TO trx_csh_batch_insert;
83: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
84: x_msg_count := l_msg_count ;
85: x_msg_data := l_msg_data ;
86: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','insert_trx_csh_batch');
87: FND_MSG_PUB.count_and_get(
137: ,l_msg_data
138: ,lp_btcv_tbl
139: ,lx_btcv_tbl);
140:
141: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
142: RAISE FND_API.G_EXC_ERROR;
143: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
145: END IF;
138: ,lp_btcv_tbl
139: ,lx_btcv_tbl);
140:
141: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
142: RAISE FND_API.G_EXC_ERROR;
143: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
145: END IF;
146:
139: ,lx_btcv_tbl);
140:
141: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
142: RAISE FND_API.G_EXC_ERROR;
143: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
145: END IF;
146:
147: lp_btcv_tbl := lx_btcv_tbl;
140:
141: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
142: RAISE FND_API.G_EXC_ERROR;
143: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
145: END IF;
146:
147: lp_btcv_tbl := lx_btcv_tbl;
148:
153:
154:
155: EXCEPTION
156:
157: WHEN FND_API.G_EXC_ERROR THEN
158: ROLLBACK TO trx_csh_batch_insert;
159: x_return_status := FND_API.G_RET_STS_ERROR;
160: x_msg_count := l_msg_count ;
161: x_msg_data := l_msg_data ;
155: EXCEPTION
156:
157: WHEN FND_API.G_EXC_ERROR THEN
158: ROLLBACK TO trx_csh_batch_insert;
159: x_return_status := FND_API.G_RET_STS_ERROR;
160: x_msg_count := l_msg_count ;
161: x_msg_data := l_msg_data ;
162: FND_MSG_PUB.count_and_get(
163: p_count => x_msg_count
161: x_msg_data := l_msg_data ;
162: FND_MSG_PUB.count_and_get(
163: p_count => x_msg_count
164: ,p_data => x_msg_data);
165: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
166: ROLLBACK TO trx_csh_batch_insert;
167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
168: x_msg_count := l_msg_count ;
169: x_msg_data := l_msg_data ;
163: p_count => x_msg_count
164: ,p_data => x_msg_data);
165: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
166: ROLLBACK TO trx_csh_batch_insert;
167: x_return_status := FND_API.G_RET_STS_UNEXP_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
171: p_count => x_msg_count
172: ,p_data => x_msg_data);
173: WHEN OTHERS THEN
174: ROLLBACK TO trx_csh_batch_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.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','insert_trx_csh_batch');
179: FND_MSG_PUB.count_and_get(
197: x_msg_count,
198: x_msg_data,
199: p_btcv_rec);
200:
201: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
202: RAISE FND_API.G_EXC_ERROR;
203: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
205: END IF;
198: x_msg_data,
199: p_btcv_rec);
200:
201: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
202: RAISE FND_API.G_EXC_ERROR;
203: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
205: END IF;
206:
199: p_btcv_rec);
200:
201: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
202: RAISE FND_API.G_EXC_ERROR;
203: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
205: END IF;
206:
207:
200:
201: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
202: RAISE FND_API.G_EXC_ERROR;
203: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
205: END IF;
206:
207:
208: EXCEPTION
206:
207:
208: EXCEPTION
209:
210: WHEN FND_API.G_EXC_ERROR THEN
211: FND_MSG_PUB.count_and_get(
212: p_count => x_msg_count
213: ,p_data => x_msg_data);
214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
210: WHEN FND_API.G_EXC_ERROR THEN
211: FND_MSG_PUB.count_and_get(
212: p_count => x_msg_count
213: ,p_data => x_msg_data);
214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
215: FND_MSG_PUB.count_and_get(
216: p_count => x_msg_count
217: ,p_data => x_msg_data);
218: WHEN OTHERS THEN
215: FND_MSG_PUB.count_and_get(
216: p_count => x_msg_count
217: ,p_data => x_msg_data);
218: WHEN OTHERS THEN
219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
220: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','lock_trx_csh_batch');
221: FND_MSG_PUB.count_and_get(
222: p_count => x_msg_count
223: ,p_data => x_msg_data);
239: x_msg_count,
240: x_msg_data,
241: p_btcv_tbl);
242:
243: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
244: RAISE FND_API.G_EXC_ERROR;
245: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
247: END IF;
240: x_msg_data,
241: p_btcv_tbl);
242:
243: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
244: RAISE FND_API.G_EXC_ERROR;
245: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
247: END IF;
248:
241: p_btcv_tbl);
242:
243: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
244: RAISE FND_API.G_EXC_ERROR;
245: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
247: END IF;
248:
249:
242:
243: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
244: RAISE FND_API.G_EXC_ERROR;
245: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
247: END IF;
248:
249:
250: EXCEPTION
248:
249:
250: EXCEPTION
251:
252: WHEN FND_API.G_EXC_ERROR THEN
253: FND_MSG_PUB.count_and_get(
254: p_count => x_msg_count
255: ,p_data => x_msg_data);
256: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
252: WHEN FND_API.G_EXC_ERROR THEN
253: FND_MSG_PUB.count_and_get(
254: p_count => x_msg_count
255: ,p_data => x_msg_data);
256: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
257: FND_MSG_PUB.count_and_get(
258: p_count => x_msg_count
259: ,p_data => x_msg_data);
260: WHEN OTHERS THEN
257: FND_MSG_PUB.count_and_get(
258: p_count => x_msg_count
259: ,p_data => x_msg_data);
260: WHEN OTHERS THEN
261: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
262: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','lock_trx_csh_batch');
263: FND_MSG_PUB.count_and_get(
264: p_count => x_msg_count
265: ,p_data => x_msg_data);
303: ,l_msg_data
304: ,lp_btcv_rec
305: ,lx_btcv_rec);
306:
307: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
308: RAISE FND_API.G_EXC_ERROR;
309: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
311: END IF;
304: ,lp_btcv_rec
305: ,lx_btcv_rec);
306:
307: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
308: RAISE FND_API.G_EXC_ERROR;
309: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
311: END IF;
312:
305: ,lx_btcv_rec);
306:
307: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
308: RAISE FND_API.G_EXC_ERROR;
309: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
311: END IF;
312:
313: lp_btcv_rec := lx_btcv_rec;
306:
307: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
308: RAISE FND_API.G_EXC_ERROR;
309: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
310: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
311: END IF;
312:
313: lp_btcv_rec := lx_btcv_rec;
314:
319:
320:
321: EXCEPTION
322:
323: WHEN FND_API.G_EXC_ERROR THEN
324: ROLLBACK TO trx_csh_batch_update;
325: x_return_status := FND_API.G_RET_STS_ERROR;
326: x_msg_count := l_msg_count ;
327: x_msg_data := l_msg_data ;
321: EXCEPTION
322:
323: WHEN FND_API.G_EXC_ERROR THEN
324: ROLLBACK TO trx_csh_batch_update;
325: x_return_status := FND_API.G_RET_STS_ERROR;
326: x_msg_count := l_msg_count ;
327: x_msg_data := l_msg_data ;
328: FND_MSG_PUB.count_and_get(
329: p_count => x_msg_count
327: x_msg_data := l_msg_data ;
328: FND_MSG_PUB.count_and_get(
329: p_count => x_msg_count
330: ,p_data => x_msg_data);
331: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
332: ROLLBACK TO trx_csh_batch_update;
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
334: x_msg_count := l_msg_count ;
335: x_msg_data := l_msg_data ;
329: p_count => x_msg_count
330: ,p_data => x_msg_data);
331: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
332: ROLLBACK TO trx_csh_batch_update;
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
334: x_msg_count := l_msg_count ;
335: x_msg_data := l_msg_data ;
336: FND_MSG_PUB.count_and_get(
337: p_count => x_msg_count
337: p_count => x_msg_count
338: ,p_data => x_msg_data);
339: WHEN OTHERS THEN
340: ROLLBACK TO trx_csh_batch_update;
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: x_msg_count := l_msg_count ;
343: x_msg_data := l_msg_data ;
344: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','update_trx_csh_batch');
345: FND_MSG_PUB.count_and_get(
385: ,l_msg_data
386: ,lp_btcv_tbl
387: ,lx_btcv_tbl);
388:
389: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
390: RAISE FND_API.G_EXC_ERROR;
391: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
393: END IF;
386: ,lp_btcv_tbl
387: ,lx_btcv_tbl);
388:
389: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
390: RAISE FND_API.G_EXC_ERROR;
391: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
393: END IF;
394:
387: ,lx_btcv_tbl);
388:
389: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
390: RAISE FND_API.G_EXC_ERROR;
391: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
393: END IF;
394:
395: lp_btcv_tbl := lx_btcv_tbl;
388:
389: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
390: RAISE FND_API.G_EXC_ERROR;
391: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
393: END IF;
394:
395: lp_btcv_tbl := lx_btcv_tbl;
396:
401:
402:
403: EXCEPTION
404:
405: WHEN FND_API.G_EXC_ERROR THEN
406: ROLLBACK TO trx_csh_batch_update;
407: x_return_status := FND_API.G_RET_STS_ERROR;
408: x_msg_count := l_msg_count ;
409: x_msg_data := l_msg_data ;
403: EXCEPTION
404:
405: WHEN FND_API.G_EXC_ERROR THEN
406: ROLLBACK TO trx_csh_batch_update;
407: x_return_status := FND_API.G_RET_STS_ERROR;
408: x_msg_count := l_msg_count ;
409: x_msg_data := l_msg_data ;
410: FND_MSG_PUB.count_and_get(
411: p_count => x_msg_count
409: x_msg_data := l_msg_data ;
410: FND_MSG_PUB.count_and_get(
411: p_count => x_msg_count
412: ,p_data => x_msg_data);
413: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
414: ROLLBACK TO trx_csh_batch_update;
415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
416: x_msg_count := l_msg_count ;
417: x_msg_data := l_msg_data ;
411: p_count => x_msg_count
412: ,p_data => x_msg_data);
413: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
414: ROLLBACK TO trx_csh_batch_update;
415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
416: x_msg_count := l_msg_count ;
417: x_msg_data := l_msg_data ;
418: FND_MSG_PUB.count_and_get(
419: p_count => x_msg_count
419: p_count => x_msg_count
420: ,p_data => x_msg_data);
421: WHEN OTHERS THEN
422: ROLLBACK TO trx_csh_batch_update;
423: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
424: x_msg_count := l_msg_count ;
425: x_msg_data := l_msg_data ;
426: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','update_trx_csh_batch');
427: FND_MSG_PUB.count_and_get(
465: ,l_msg_count
466: ,l_msg_data
467: ,lp_btcv_rec);
468:
469: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
470: RAISE FND_API.G_EXC_ERROR;
471: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
473: END IF;
466: ,l_msg_data
467: ,lp_btcv_rec);
468:
469: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
470: RAISE FND_API.G_EXC_ERROR;
471: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
473: END IF;
474:
467: ,lp_btcv_rec);
468:
469: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
470: RAISE FND_API.G_EXC_ERROR;
471: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
473: END IF;
474:
475:
468:
469: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
470: RAISE FND_API.G_EXC_ERROR;
471: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
473: END IF;
474:
475:
476: x_msg_count := l_msg_count ;
478: x_return_status := l_return_status ;
479:
480: EXCEPTION
481:
482: WHEN FND_API.G_EXC_ERROR THEN
483: ROLLBACK TO trx_csh_batch_delete_rec;
484: x_return_status := FND_API.G_RET_STS_ERROR;
485: x_msg_count := l_msg_count ;
486: x_msg_data := l_msg_data ;
480: EXCEPTION
481:
482: WHEN FND_API.G_EXC_ERROR THEN
483: ROLLBACK TO trx_csh_batch_delete_rec;
484: x_return_status := FND_API.G_RET_STS_ERROR;
485: x_msg_count := l_msg_count ;
486: x_msg_data := l_msg_data ;
487: FND_MSG_PUB.count_and_get(
488: p_count => x_msg_count
486: x_msg_data := l_msg_data ;
487: FND_MSG_PUB.count_and_get(
488: p_count => x_msg_count
489: ,p_data => x_msg_data);
490: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
491: ROLLBACK TO trx_csh_batch_delete_rec;
492: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
493: x_msg_count := l_msg_count ;
494: x_msg_data := l_msg_data ;
488: p_count => x_msg_count
489: ,p_data => x_msg_data);
490: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
491: ROLLBACK TO trx_csh_batch_delete_rec;
492: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
493: x_msg_count := l_msg_count ;
494: x_msg_data := l_msg_data ;
495: FND_MSG_PUB.count_and_get(
496: p_count => x_msg_count
496: p_count => x_msg_count
497: ,p_data => x_msg_data);
498: WHEN OTHERS THEN
499: ROLLBACK TO trx_csh_batch_delete_rec;
500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
501: x_msg_count := l_msg_count ;
502: x_msg_data := l_msg_data ;
503: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','delete_trx_csh_batch');
504: FND_MSG_PUB.count_and_get(
551: EXIT WHEN (i = lp_btcv_tbl.LAST);
552: i := p_btcv_tbl.NEXT(i);
553: END LOOP;
554: END IF;
555: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
556: RAISE FND_API.G_EXC_ERROR;
557: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
559: END IF;
552: i := p_btcv_tbl.NEXT(i);
553: END LOOP;
554: END IF;
555: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
556: RAISE FND_API.G_EXC_ERROR;
557: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
559: END IF;
560:
553: END LOOP;
554: END IF;
555: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
556: RAISE FND_API.G_EXC_ERROR;
557: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
559: END IF;
560:
561: END;
554: END IF;
555: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
556: RAISE FND_API.G_EXC_ERROR;
557: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
559: END IF;
560:
561: END;
562:
566: x_return_status := l_return_status ;
567:
568: EXCEPTION
569:
570: WHEN FND_API.G_EXC_ERROR THEN
571: ROLLBACK TO trx_csh_batch_delete_tbl;
572: x_return_status := FND_API.G_RET_STS_ERROR;
573: x_msg_count := l_msg_count ;
574: x_msg_data := l_msg_data ;
568: EXCEPTION
569:
570: WHEN FND_API.G_EXC_ERROR THEN
571: ROLLBACK TO trx_csh_batch_delete_tbl;
572: x_return_status := FND_API.G_RET_STS_ERROR;
573: x_msg_count := l_msg_count ;
574: x_msg_data := l_msg_data ;
575: FND_MSG_PUB.count_and_get(
576: p_count => x_msg_count
574: x_msg_data := l_msg_data ;
575: FND_MSG_PUB.count_and_get(
576: p_count => x_msg_count
577: ,p_data => x_msg_data);
578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
579: ROLLBACK TO trx_csh_batch_delete_tbl;
580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
581: x_msg_count := l_msg_count ;
582: x_msg_data := l_msg_data ;
576: p_count => x_msg_count
577: ,p_data => x_msg_data);
578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
579: ROLLBACK TO trx_csh_batch_delete_tbl;
580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
581: x_msg_count := l_msg_count ;
582: x_msg_data := l_msg_data ;
583: FND_MSG_PUB.count_and_get(
584: p_count => x_msg_count
584: p_count => x_msg_count
585: ,p_data => x_msg_data);
586: WHEN OTHERS THEN
587: ROLLBACK TO trx_csh_batch_delete_tbl;
588: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
589: x_msg_count := l_msg_count ;
590: x_msg_data := l_msg_data ;
591: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','delete_trx_csh_batch');
592: FND_MSG_PUB.count_and_get(
629: ,l_msg_count
630: ,l_msg_data
631: ,lp_btcv_rec);
632:
633: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
634: RAISE FND_API.G_EXC_ERROR;
635: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
636: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
637: END IF;
630: ,l_msg_data
631: ,lp_btcv_rec);
632:
633: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
634: RAISE FND_API.G_EXC_ERROR;
635: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
636: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
637: END IF;
638:
631: ,lp_btcv_rec);
632:
633: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
634: RAISE FND_API.G_EXC_ERROR;
635: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
636: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
637: END IF;
638:
639: lp_btcv_rec := lx_btcv_rec;
632:
633: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
634: RAISE FND_API.G_EXC_ERROR;
635: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
636: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
637: END IF;
638:
639: lp_btcv_rec := lx_btcv_rec;
640:
644: x_return_status := l_return_status ;
645:
646: EXCEPTION
647:
648: WHEN FND_API.G_EXC_ERROR THEN
649: ROLLBACK TO trx_csh_batch_validate;
650: x_return_status := FND_API.G_RET_STS_ERROR;
651: x_msg_count := l_msg_count ;
652: x_msg_data := l_msg_data ;
646: EXCEPTION
647:
648: WHEN FND_API.G_EXC_ERROR THEN
649: ROLLBACK TO trx_csh_batch_validate;
650: x_return_status := FND_API.G_RET_STS_ERROR;
651: x_msg_count := l_msg_count ;
652: x_msg_data := l_msg_data ;
653: FND_MSG_PUB.count_and_get(
654: p_count => x_msg_count
652: x_msg_data := l_msg_data ;
653: FND_MSG_PUB.count_and_get(
654: p_count => x_msg_count
655: ,p_data => x_msg_data);
656: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
657: ROLLBACK TO trx_csh_batch_validate;
658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
659: x_msg_count := l_msg_count ;
660: x_msg_data := l_msg_data ;
654: p_count => x_msg_count
655: ,p_data => x_msg_data);
656: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
657: ROLLBACK TO trx_csh_batch_validate;
658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
659: x_msg_count := l_msg_count ;
660: x_msg_data := l_msg_data ;
661: FND_MSG_PUB.count_and_get(
662: p_count => x_msg_count
662: p_count => x_msg_count
663: ,p_data => x_msg_data);
664: WHEN OTHERS THEN
665: ROLLBACK TO trx_csh_batch_validate;
666: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
667: x_msg_count := l_msg_count ;
668: x_msg_data := l_msg_data ;
669: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','validate_trx_csh_batch');
670: FND_MSG_PUB.count_and_get(
706: ,x_msg_count
707: ,x_msg_data
708: ,lp_btcv_tbl);
709:
710: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
711: RAISE FND_API.G_EXC_ERROR;
712: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
714: END IF;
707: ,x_msg_data
708: ,lp_btcv_tbl);
709:
710: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
711: RAISE FND_API.G_EXC_ERROR;
712: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
714: END IF;
715:
708: ,lp_btcv_tbl);
709:
710: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
711: RAISE FND_API.G_EXC_ERROR;
712: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
714: END IF;
715:
716: lp_btcv_tbl := lx_btcv_tbl;
709:
710: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
711: RAISE FND_API.G_EXC_ERROR;
712: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
714: END IF;
715:
716: lp_btcv_tbl := lx_btcv_tbl;
717:
721: x_return_status := l_return_status ;
722:
723: EXCEPTION
724:
725: WHEN FND_API.G_EXC_ERROR THEN
726: ROLLBACK TO trx_csh_batch_validate;
727: x_return_status := FND_API.G_RET_STS_ERROR;
728: x_msg_count := l_msg_count ;
729: x_msg_data := l_msg_data ;
723: EXCEPTION
724:
725: WHEN FND_API.G_EXC_ERROR THEN
726: ROLLBACK TO trx_csh_batch_validate;
727: x_return_status := FND_API.G_RET_STS_ERROR;
728: x_msg_count := l_msg_count ;
729: x_msg_data := l_msg_data ;
730: FND_MSG_PUB.count_and_get(
731: p_count => x_msg_count
729: x_msg_data := l_msg_data ;
730: FND_MSG_PUB.count_and_get(
731: p_count => x_msg_count
732: ,p_data => x_msg_data);
733: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
734: ROLLBACK TO trx_csh_batch_validate;
735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
736: x_msg_count := l_msg_count ;
737: x_msg_data := l_msg_data ;
731: p_count => x_msg_count
732: ,p_data => x_msg_data);
733: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
734: ROLLBACK TO trx_csh_batch_validate;
735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
736: x_msg_count := l_msg_count ;
737: x_msg_data := l_msg_data ;
738: FND_MSG_PUB.count_and_get(
739: p_count => x_msg_count
739: p_count => x_msg_count
740: ,p_data => x_msg_data);
741: WHEN OTHERS THEN
742: ROLLBACK TO trx_csh_batch_validate;
743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
744: x_msg_count := l_msg_count ;
745: x_msg_data := l_msg_data ;
746: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','validate_trx_csh_batch');
747: FND_MSG_PUB.count_and_get(
790: ,x_btcv_rec => x_btcv_rec);
791: END IF;
792:
793: --Check for return status and raise appropriate exception
794: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
795: RAISE FND_API.G_EXC_ERROR;
796: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
798: END IF;
791: END IF;
792:
793: --Check for return status and raise appropriate exception
794: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
795: RAISE FND_API.G_EXC_ERROR;
796: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
798: END IF;
799:
792:
793: --Check for return status and raise appropriate exception
794: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
795: RAISE FND_API.G_EXC_ERROR;
796: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
798: END IF;
799:
800: l_init_msg_list := FND_API.G_FALSE;
793: --Check for return status and raise appropriate exception
794: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
795: RAISE FND_API.G_EXC_ERROR;
796: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
798: END IF;
799:
800: l_init_msg_list := FND_API.G_FALSE;
801:
796: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
798: END IF;
799:
800: l_init_msg_list := FND_API.G_FALSE;
801:
802: -- Check whether there are any records in lines table or not
803: IF(lp_btch_lines_tbl.COUNT > 0) THEN
804:
820: ,x_btch_tbl => x_btch_lines_tbl);
821: END IF;
822:
823: --Check for return status and raise appropriate exception
824: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
825: RAISE FND_API.G_EXC_ERROR;
826: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
828: END IF;
821: END IF;
822:
823: --Check for return status and raise appropriate exception
824: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
825: RAISE FND_API.G_EXC_ERROR;
826: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
828: END IF;
829:
822:
823: --Check for return status and raise appropriate exception
824: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
825: RAISE FND_API.G_EXC_ERROR;
826: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
828: END IF;
829:
830: EXCEPTION
823: --Check for return status and raise appropriate exception
824: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
825: RAISE FND_API.G_EXC_ERROR;
826: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
828: END IF;
829:
830: EXCEPTION
831:
828: END IF;
829:
830: EXCEPTION
831:
832: WHEN FND_API.G_EXC_ERROR THEN
833: ROLLBACK TO handle_batch_receipt;
834: x_return_status := FND_API.G_RET_STS_ERROR;
835: FND_MSG_PUB.count_and_get(
836: p_count => x_msg_count
830: EXCEPTION
831:
832: WHEN FND_API.G_EXC_ERROR THEN
833: ROLLBACK TO handle_batch_receipt;
834: x_return_status := FND_API.G_RET_STS_ERROR;
835: FND_MSG_PUB.count_and_get(
836: p_count => x_msg_count
837: ,p_data => x_msg_data);
838:
835: FND_MSG_PUB.count_and_get(
836: p_count => x_msg_count
837: ,p_data => x_msg_data);
838:
839: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
840: ROLLBACK TO handle_batch_receipt;
841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
842: FND_MSG_PUB.count_and_get(
843: p_count => x_msg_count
837: ,p_data => x_msg_data);
838:
839: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
840: ROLLBACK TO handle_batch_receipt;
841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
842: FND_MSG_PUB.count_and_get(
843: p_count => x_msg_count
844: ,p_data => x_msg_data);
845:
844: ,p_data => x_msg_data);
845:
846: WHEN OTHERS THEN
847: ROLLBACK TO handle_batch_receipt;
848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
849: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_CSH_BATCH_PUB','handle_batch_receipt');
850: FND_MSG_PUB.count_and_get(
851: p_count => x_msg_count
852: ,p_data => x_msg_data);