8: G_MODULE_NAME CONSTANT VARCHAR2(500) := 'okl.am.plsql.okl_trx_quotes_pub.';
9:
10: PROCEDURE insert_trx_quotes(
11: p_api_version IN NUMBER
12: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
13: ,x_return_status OUT NOCOPY VARCHAR2
14: ,x_msg_count OUT NOCOPY NUMBER
15: ,x_msg_data OUT NOCOPY VARCHAR2
16: ,p_qtev_rec IN qtev_rec_type
71: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,L_MODULE_NAME,
72: 'after call to okl_qte_pvt.insert_row :'||l_return_status);
73: END IF;
74:
75: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
76: RAISE FND_API.G_EXC_ERROR;
77: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
79: END IF;
72: 'after call to okl_qte_pvt.insert_row :'||l_return_status);
73: END IF;
74:
75: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
76: RAISE FND_API.G_EXC_ERROR;
77: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
79: END IF;
80:
73: END IF;
74:
75: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
76: RAISE FND_API.G_EXC_ERROR;
77: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
79: END IF;
80:
81: --Copy value of OUT variable in the IN record type
74:
75: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
76: RAISE FND_API.G_EXC_ERROR;
77: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
78: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
79: END IF;
80:
81: --Copy value of OUT variable in the IN record type
82: lp_qtev_rec := lx_qtev_rec;
96: END IF;
97:
98: EXCEPTION
99:
100: WHEN FND_API.G_EXC_ERROR THEN
101: ROLLBACK TO trx_quotes_insert;
102: x_return_status := FND_API.G_RET_STS_ERROR;
103: x_msg_count := l_msg_count ;
104: x_msg_data := l_msg_data ;
98: EXCEPTION
99:
100: WHEN FND_API.G_EXC_ERROR THEN
101: ROLLBACK TO trx_quotes_insert;
102: x_return_status := FND_API.G_RET_STS_ERROR;
103: x_msg_count := l_msg_count ;
104: x_msg_data := l_msg_data ;
105: FND_MSG_PUB.count_and_get(
106: p_count => x_msg_count
104: x_msg_data := l_msg_data ;
105: FND_MSG_PUB.count_and_get(
106: p_count => x_msg_count
107: ,p_data => x_msg_data);
108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
109: ROLLBACK TO trx_quotes_insert;
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
111: x_msg_count := l_msg_count ;
112: x_msg_data := l_msg_data ;
106: p_count => x_msg_count
107: ,p_data => x_msg_data);
108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
109: ROLLBACK TO trx_quotes_insert;
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
111: x_msg_count := l_msg_count ;
112: x_msg_data := l_msg_data ;
113: FND_MSG_PUB.count_and_get(
114: p_count => x_msg_count
119: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
120: || sqlcode || ' , SQLERRM : ' || sqlerrm);
121: END IF;
122: ROLLBACK TO trx_quotes_insert;
123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
124: x_msg_count := l_msg_count ;
125: x_msg_data := l_msg_data ;
126: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_QUOTES_PUB','insert_trx_quotes');
127: FND_MSG_PUB.count_and_get(
130: END insert_trx_quotes;
131:
132: PROCEDURE insert_trx_quotes(
133: p_api_version IN NUMBER
134: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
135: ,x_return_status OUT NOCOPY VARCHAR2
136: ,x_msg_count OUT NOCOPY NUMBER
137: ,x_msg_data OUT NOCOPY VARCHAR2
138: ,p_qtev_tbl IN qtev_tbl_type
191: 'after call to okl_qte_pvt.insert_row :'||l_return_status);
192: END IF;
193:
194:
195: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
196: RAISE FND_API.G_EXC_ERROR;
197: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
198: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
199: END IF;
192: END IF;
193:
194:
195: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
196: RAISE FND_API.G_EXC_ERROR;
197: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
198: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
199: END IF;
200:
193:
194:
195: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
196: RAISE FND_API.G_EXC_ERROR;
197: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
198: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
199: END IF;
200:
201: --Copy value of OUT variable in the IN record type
194:
195: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
196: RAISE FND_API.G_EXC_ERROR;
197: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
198: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
199: END IF;
200:
201: --Copy value of OUT variable in the IN record type
202: lp_qtev_tbl := lx_qtev_tbl;
215:
216:
217: EXCEPTION
218:
219: WHEN FND_API.G_EXC_ERROR THEN
220: ROLLBACK TO trx_quotes_insert;
221: x_return_status := FND_API.G_RET_STS_ERROR;
222: x_msg_count := l_msg_count ;
223: x_msg_data := l_msg_data ;
217: EXCEPTION
218:
219: WHEN FND_API.G_EXC_ERROR THEN
220: ROLLBACK TO trx_quotes_insert;
221: x_return_status := FND_API.G_RET_STS_ERROR;
222: x_msg_count := l_msg_count ;
223: x_msg_data := l_msg_data ;
224: FND_MSG_PUB.count_and_get(
225: p_count => x_msg_count
223: x_msg_data := l_msg_data ;
224: FND_MSG_PUB.count_and_get(
225: p_count => x_msg_count
226: ,p_data => x_msg_data);
227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
228: ROLLBACK TO trx_quotes_insert;
229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
230: x_msg_count := l_msg_count ;
231: x_msg_data := l_msg_data ;
225: p_count => x_msg_count
226: ,p_data => x_msg_data);
227: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
228: ROLLBACK TO trx_quotes_insert;
229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
230: x_msg_count := l_msg_count ;
231: x_msg_data := l_msg_data ;
232: FND_MSG_PUB.count_and_get(
233: p_count => x_msg_count
237: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
238: || sqlcode || ' , SQLERRM : ' || sqlerrm);
239: END IF;
240: ROLLBACK TO trx_quotes_insert;
241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
242: x_msg_count := l_msg_count ;
243: x_msg_data := l_msg_data ;
244: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_QUOTES_PUB','insert_trx_quotes');
245: FND_MSG_PUB.count_and_get(
248: END insert_trx_quotes;
249:
250: PROCEDURE lock_trx_quotes(
251: p_api_version IN NUMBER
252: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
253: ,x_return_status OUT NOCOPY VARCHAR2
254: ,x_msg_count OUT NOCOPY NUMBER
255: ,x_msg_data OUT NOCOPY VARCHAR2
256: ,p_qtev_rec IN qtev_rec_type) IS
285: 'after call to okl_qte_pvt.lock_row :'||x_return_status);
286: END IF;
287:
288:
289: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
290: RAISE FND_API.G_EXC_ERROR;
291: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
292: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
293: END IF;
286: END IF;
287:
288:
289: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
290: RAISE FND_API.G_EXC_ERROR;
291: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
292: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
293: END IF;
294:
287:
288:
289: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
290: RAISE FND_API.G_EXC_ERROR;
291: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
292: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
293: END IF;
294:
295: IF (is_debug_procedure_on) THEN
288:
289: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
290: RAISE FND_API.G_EXC_ERROR;
291: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
292: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
293: END IF;
294:
295: IF (is_debug_procedure_on) THEN
296: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'End(-)');
297: END IF;
298:
299: EXCEPTION
300:
301: WHEN FND_API.G_EXC_ERROR THEN
302: FND_MSG_PUB.count_and_get(
303: p_count => x_msg_count
304: ,p_data => x_msg_data);
305: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
301: WHEN FND_API.G_EXC_ERROR THEN
302: FND_MSG_PUB.count_and_get(
303: p_count => x_msg_count
304: ,p_data => x_msg_data);
305: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
306: FND_MSG_PUB.count_and_get(
307: p_count => x_msg_count
308: ,p_data => x_msg_data);
309: WHEN OTHERS THEN
310: IF (is_debug_exception_on) THEN
311: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
312: || sqlcode || ' , SQLERRM : ' || sqlerrm);
313: END IF;
314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
315: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_QUOTES_PUB','lock_trx_quotes');
316: FND_MSG_PUB.count_and_get(
317: p_count => x_msg_count
318: ,p_data => x_msg_data);
319: END lock_trx_quotes;
320:
321: PROCEDURE lock_trx_quotes(
322: p_api_version IN NUMBER
323: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
324: ,x_return_status OUT NOCOPY VARCHAR2
325: ,x_msg_count OUT NOCOPY NUMBER
326: ,x_msg_data OUT NOCOPY VARCHAR2
327: ,p_qtev_tbl IN qtev_tbl_type) IS
356: 'after call to okl_qte_pvt.lock_row :'||x_return_status);
357: END IF;
358:
359:
360: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
361: RAISE FND_API.G_EXC_ERROR;
362: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
364: END IF;
357: END IF;
358:
359:
360: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
361: RAISE FND_API.G_EXC_ERROR;
362: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
364: END IF;
365:
358:
359:
360: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
361: RAISE FND_API.G_EXC_ERROR;
362: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
364: END IF;
365:
366:
359:
360: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
361: RAISE FND_API.G_EXC_ERROR;
362: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
364: END IF;
365:
366:
367: EXCEPTION
365:
366:
367: EXCEPTION
368:
369: WHEN FND_API.G_EXC_ERROR THEN
370: IF (is_debug_exception_on) THEN
371: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
372: END IF;
373: FND_MSG_PUB.count_and_get(
372: END IF;
373: FND_MSG_PUB.count_and_get(
374: p_count => x_msg_count
375: ,p_data => x_msg_data);
376: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
377: IF (is_debug_exception_on) THEN
378: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
379: END IF;
380:
387: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
388: || sqlcode || ' , SQLERRM : ' || sqlerrm);
389: END IF;
390:
391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
392: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_QUOTES_PUB','lock_trx_quotes');
393: FND_MSG_PUB.count_and_get(
394: p_count => x_msg_count
395: ,p_data => x_msg_data);
396: END lock_trx_quotes;
397:
398: PROCEDURE update_trx_quotes(
399: p_api_version IN NUMBER
400: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
401: ,x_return_status OUT NOCOPY VARCHAR2
402: ,x_msg_count OUT NOCOPY NUMBER
403: ,x_msg_data OUT NOCOPY VARCHAR2
404: ,p_qtev_rec IN qtev_rec_type
455: IF (is_debug_statement_on) THEN
456: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,L_MODULE_NAME,
457: 'after call to okl_qte_pvt.update_row :'||l_return_status);
458: END IF;
459: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
460: RAISE FND_API.G_EXC_ERROR;
461: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
462: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
463: END IF;
456: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,L_MODULE_NAME,
457: 'after call to okl_qte_pvt.update_row :'||l_return_status);
458: END IF;
459: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
460: RAISE FND_API.G_EXC_ERROR;
461: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
462: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
463: END IF;
464:
457: 'after call to okl_qte_pvt.update_row :'||l_return_status);
458: END IF;
459: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
460: RAISE FND_API.G_EXC_ERROR;
461: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
462: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
463: END IF;
464:
465: --Copy value of OUT variable in the IN record type
458: END IF;
459: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
460: RAISE FND_API.G_EXC_ERROR;
461: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
462: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
463: END IF;
464:
465: --Copy value of OUT variable in the IN record type
466: lp_qtev_rec := lx_qtev_rec;
479: END IF;
480:
481: EXCEPTION
482:
483: WHEN FND_API.G_EXC_ERROR THEN
484: IF (is_debug_exception_on) THEN
485: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
486: END IF;
487:
485: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
486: END IF;
487:
488: ROLLBACK TO trx_quotes_update;
489: x_return_status := FND_API.G_RET_STS_ERROR;
490: x_msg_count := l_msg_count ;
491: x_msg_data := l_msg_data ;
492: FND_MSG_PUB.count_and_get(
493: p_count => x_msg_count
491: x_msg_data := l_msg_data ;
492: FND_MSG_PUB.count_and_get(
493: p_count => x_msg_count
494: ,p_data => x_msg_data);
495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
496: IF (is_debug_exception_on) THEN
497: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
498: END IF;
499:
497: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
498: END IF;
499:
500: ROLLBACK TO trx_quotes_update;
501: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
502: x_msg_count := l_msg_count ;
503: x_msg_data := l_msg_data ;
504: FND_MSG_PUB.count_and_get(
505: p_count => x_msg_count
511: || sqlcode || ' , SQLERRM : ' || sqlerrm);
512: END IF;
513:
514: ROLLBACK TO trx_quotes_update;
515: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
516: x_msg_count := l_msg_count ;
517: x_msg_data := l_msg_data ;
518: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_QUOTES_PUB','update_trx_quotes');
519: FND_MSG_PUB.count_and_get(
522: END update_trx_quotes;
523:
524: PROCEDURE update_trx_quotes(
525: p_api_version IN NUMBER
526: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
527: ,x_return_status OUT NOCOPY VARCHAR2
528: ,x_msg_count OUT NOCOPY NUMBER
529: ,x_msg_data OUT NOCOPY VARCHAR2
530: ,p_qtev_tbl IN qtev_tbl_type
581: 'after call to okl_qte_pvt.update_row :'||l_return_status);
582: END IF;
583:
584:
585: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
586: RAISE FND_API.G_EXC_ERROR;
587: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
588: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
589: END IF;
582: END IF;
583:
584:
585: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
586: RAISE FND_API.G_EXC_ERROR;
587: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
588: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
589: END IF;
590:
583:
584:
585: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
586: RAISE FND_API.G_EXC_ERROR;
587: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
588: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
589: END IF;
590:
591: --Copy value of OUT variable in the IN record type
584:
585: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
586: RAISE FND_API.G_EXC_ERROR;
587: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
588: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
589: END IF;
590:
591: --Copy value of OUT variable in the IN record type
592: lp_qtev_tbl := lx_qtev_tbl;
605:
606:
607: EXCEPTION
608:
609: WHEN FND_API.G_EXC_ERROR THEN
610:
611: IF (is_debug_exception_on) THEN
612: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
613: END IF;
612: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
613: END IF;
614:
615: ROLLBACK TO trx_quotes_update;
616: x_return_status := FND_API.G_RET_STS_ERROR;
617: x_msg_count := l_msg_count ;
618: x_msg_data := l_msg_data ;
619: FND_MSG_PUB.count_and_get(
620: p_count => x_msg_count
618: x_msg_data := l_msg_data ;
619: FND_MSG_PUB.count_and_get(
620: p_count => x_msg_count
621: ,p_data => x_msg_data);
622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
623:
624: IF (is_debug_exception_on) THEN
625: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
626: END IF;
624: IF (is_debug_exception_on) THEN
625: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
626: END IF;
627: ROLLBACK TO trx_quotes_update;
628: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
629: x_msg_count := l_msg_count ;
630: x_msg_data := l_msg_data ;
631: FND_MSG_PUB.count_and_get(
632: p_count => x_msg_count
638: || sqlcode || ' , SQLERRM : ' || sqlerrm);
639: END IF;
640:
641: ROLLBACK TO trx_quotes_update;
642: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
643: x_msg_count := l_msg_count ;
644: x_msg_data := l_msg_data ;
645: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_QUOTES_PUB','update_trx_quotes');
646: FND_MSG_PUB.count_and_get(
650:
651: --Put custom code for cascade delete by developer
652: PROCEDURE delete_trx_quotes(
653: p_api_version IN NUMBER
654: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
655: ,x_return_status OUT NOCOPY VARCHAR2
656: ,x_msg_count OUT NOCOPY NUMBER
657: ,x_msg_data OUT NOCOPY VARCHAR2
658: ,p_qtev_rec IN qtev_rec_type) IS
707: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,L_MODULE_NAME,
708: 'after call to okl_qte_pvt.delete_row :'||l_return_status);
709: END IF;
710:
711: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
712: RAISE FND_API.G_EXC_ERROR;
713: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
714: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
715: END IF;
708: 'after call to okl_qte_pvt.delete_row :'||l_return_status);
709: END IF;
710:
711: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
712: RAISE FND_API.G_EXC_ERROR;
713: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
714: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
715: END IF;
716:
709: END IF;
710:
711: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
712: RAISE FND_API.G_EXC_ERROR;
713: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
714: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
715: END IF;
716:
717:
710:
711: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
712: RAISE FND_API.G_EXC_ERROR;
713: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
714: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
715: END IF;
716:
717:
718:
728: END IF;
729:
730: EXCEPTION
731:
732: WHEN FND_API.G_EXC_ERROR THEN
733: IF (is_debug_exception_on) THEN
734: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
735: END IF;
736:
734: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
735: END IF;
736:
737: ROLLBACK TO trx_quotes_delete_rec;
738: x_return_status := FND_API.G_RET_STS_ERROR;
739: x_msg_count := l_msg_count ;
740: x_msg_data := l_msg_data ;
741: FND_MSG_PUB.count_and_get(
742: p_count => x_msg_count
740: x_msg_data := l_msg_data ;
741: FND_MSG_PUB.count_and_get(
742: p_count => x_msg_count
743: ,p_data => x_msg_data);
744: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
745:
746: IF (is_debug_exception_on) THEN
747: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
748: END IF;
746: IF (is_debug_exception_on) THEN
747: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
748: END IF;
749: ROLLBACK TO trx_quotes_delete_rec;
750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
751: x_msg_count := l_msg_count ;
752: x_msg_data := l_msg_data ;
753: FND_MSG_PUB.count_and_get(
754: p_count => x_msg_count
759: || sqlcode || ' , SQLERRM : ' || sqlerrm);
760: END IF;
761:
762: ROLLBACK TO trx_quotes_delete_rec;
763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
764: x_msg_count := l_msg_count ;
765: x_msg_data := l_msg_data ;
766: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_QUOTES_PUB','delete_trx_quotes');
767: FND_MSG_PUB.count_and_get(
770: END delete_trx_quotes;
771:
772: PROCEDURE delete_trx_quotes(
773: p_api_version IN NUMBER
774: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
775: ,x_return_status OUT NOCOPY VARCHAR2
776: ,x_msg_count OUT NOCOPY NUMBER
777: ,x_msg_data OUT NOCOPY VARCHAR2
778: ,p_qtev_tbl IN qtev_tbl_type) IS
833: EXIT WHEN (i = lp_qtev_tbl.LAST);
834: i := p_qtev_tbl.NEXT(i);
835: END LOOP;
836: END IF;
837: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
838: RAISE FND_API.G_EXC_ERROR;
839: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
840: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
841: END IF;
834: i := p_qtev_tbl.NEXT(i);
835: END LOOP;
836: END IF;
837: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
838: RAISE FND_API.G_EXC_ERROR;
839: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
840: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
841: END IF;
842:
835: END LOOP;
836: END IF;
837: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
838: RAISE FND_API.G_EXC_ERROR;
839: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
840: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
841: END IF;
842:
843: END;
836: END IF;
837: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
838: RAISE FND_API.G_EXC_ERROR;
839: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
840: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
841: END IF;
842:
843: END;
844:
857: END IF;
858:
859: EXCEPTION
860:
861: WHEN FND_API.G_EXC_ERROR THEN
862:
863: IF (is_debug_exception_on) THEN
864: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
865: END IF;
864: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
865: END IF;
866:
867: ROLLBACK TO trx_quotes_delete_tbl;
868: x_return_status := FND_API.G_RET_STS_ERROR;
869: x_msg_count := l_msg_count ;
870: x_msg_data := l_msg_data ;
871: FND_MSG_PUB.count_and_get(
872: p_count => x_msg_count
870: x_msg_data := l_msg_data ;
871: FND_MSG_PUB.count_and_get(
872: p_count => x_msg_count
873: ,p_data => x_msg_data);
874: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
875: IF (is_debug_exception_on) THEN
876: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
877: END IF;
878:
876: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
877: END IF;
878:
879: ROLLBACK TO trx_quotes_delete_tbl;
880: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
881: x_msg_count := l_msg_count ;
882: x_msg_data := l_msg_data ;
883: FND_MSG_PUB.count_and_get(
884: p_count => x_msg_count
890: || sqlcode || ' , SQLERRM : ' || sqlerrm);
891: END IF;
892:
893: ROLLBACK TO trx_quotes_delete_tbl;
894: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
895: x_msg_count := l_msg_count ;
896: x_msg_data := l_msg_data ;
897: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_QUOTES_PUB','delete_trx_quotes');
898: FND_MSG_PUB.count_and_get(
901: END delete_trx_quotes;
902:
903: PROCEDURE validate_trx_quotes(
904: p_api_version IN NUMBER
905: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
906: ,x_return_status OUT NOCOPY VARCHAR2
907: ,x_msg_count OUT NOCOPY NUMBER
908: ,x_msg_data OUT NOCOPY VARCHAR2
909: ,p_qtev_rec IN qtev_rec_type) IS
957: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,L_MODULE_NAME,
958: 'after call to okl_qte_pvt.validate_row :'||l_return_status);
959: END IF;
960:
961: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
962: RAISE FND_API.G_EXC_ERROR;
963: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
964: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
965: END IF;
958: 'after call to okl_qte_pvt.validate_row :'||l_return_status);
959: END IF;
960:
961: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
962: RAISE FND_API.G_EXC_ERROR;
963: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
964: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
965: END IF;
966:
959: END IF;
960:
961: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
962: RAISE FND_API.G_EXC_ERROR;
963: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
964: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
965: END IF;
966:
967: --Copy value of OUT variable in the IN record type
960:
961: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
962: RAISE FND_API.G_EXC_ERROR;
963: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
964: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
965: END IF;
966:
967: --Copy value of OUT variable in the IN record type
968: lp_qtev_rec := lx_qtev_rec;
979:
980:
981: EXCEPTION
982:
983: WHEN FND_API.G_EXC_ERROR THEN
984: IF (is_debug_exception_on) THEN
985: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
986: END IF;
987: ROLLBACK TO trx_quotes_validate;
984: IF (is_debug_exception_on) THEN
985: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
986: END IF;
987: ROLLBACK TO trx_quotes_validate;
988: x_return_status := FND_API.G_RET_STS_ERROR;
989: x_msg_count := l_msg_count ;
990: x_msg_data := l_msg_data ;
991: FND_MSG_PUB.count_and_get(
992: p_count => x_msg_count
990: x_msg_data := l_msg_data ;
991: FND_MSG_PUB.count_and_get(
992: p_count => x_msg_count
993: ,p_data => x_msg_data);
994: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
995:
996: IF (is_debug_exception_on) THEN
997: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
998: END IF;
997: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
998: END IF;
999:
1000: ROLLBACK TO trx_quotes_validate;
1001: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1002: x_msg_count := l_msg_count ;
1003: x_msg_data := l_msg_data ;
1004: FND_MSG_PUB.count_and_get(
1005: p_count => x_msg_count
1009: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
1010: || sqlcode || ' , SQLERRM : ' || sqlerrm);
1011: END IF;
1012: ROLLBACK TO trx_quotes_validate;
1013: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1014: x_msg_count := l_msg_count ;
1015: x_msg_data := l_msg_data ;
1016: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_QUOTES_PUB','validate_trx_quotes');
1017: FND_MSG_PUB.count_and_get(
1020: END validate_trx_quotes;
1021:
1022: PROCEDURE validate_trx_quotes(
1023: p_api_version IN NUMBER
1024: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
1025: ,x_return_status OUT NOCOPY VARCHAR2
1026: ,x_msg_count OUT NOCOPY NUMBER
1027: ,x_msg_data OUT NOCOPY VARCHAR2
1028: ,p_qtev_tbl IN qtev_tbl_type) IS
1075: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,L_MODULE_NAME,
1076: 'after call to okl_qte_pvt.validate_row :'||l_return_status);
1077: END IF;
1078:
1079: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1080: RAISE FND_API.G_EXC_ERROR;
1081: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1082: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1083: END IF;
1076: 'after call to okl_qte_pvt.validate_row :'||l_return_status);
1077: END IF;
1078:
1079: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1080: RAISE FND_API.G_EXC_ERROR;
1081: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1082: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1083: END IF;
1084:
1077: END IF;
1078:
1079: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1080: RAISE FND_API.G_EXC_ERROR;
1081: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1082: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1083: END IF;
1084:
1085: --Copy value of OUT variable in the IN record type
1078:
1079: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1080: RAISE FND_API.G_EXC_ERROR;
1081: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1082: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1083: END IF;
1084:
1085: --Copy value of OUT variable in the IN record type
1086: lp_qtev_tbl := lx_qtev_tbl;
1096: END IF;
1097:
1098: EXCEPTION
1099:
1100: WHEN FND_API.G_EXC_ERROR THEN
1101: IF (is_debug_exception_on) THEN
1102: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
1103: END IF;
1104: ROLLBACK TO trx_quotes_validate;
1101: IF (is_debug_exception_on) THEN
1102: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'USER DEFINED');
1103: END IF;
1104: ROLLBACK TO trx_quotes_validate;
1105: x_return_status := FND_API.G_RET_STS_ERROR;
1106: x_msg_count := l_msg_count ;
1107: x_msg_data := l_msg_data ;
1108: FND_MSG_PUB.count_and_get(
1109: p_count => x_msg_count
1107: x_msg_data := l_msg_data ;
1108: FND_MSG_PUB.count_and_get(
1109: p_count => x_msg_count
1110: ,p_data => x_msg_data);
1111: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1112:
1113: IF (is_debug_exception_on) THEN
1114: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
1115: END IF;
1114: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'UNEXPECTED');
1115: END IF;
1116:
1117: ROLLBACK TO trx_quotes_validate;
1118: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1119: x_msg_count := l_msg_count ;
1120: x_msg_data := l_msg_data ;
1121: FND_MSG_PUB.count_and_get(
1122: p_count => x_msg_count
1126: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_EXCEPTION,L_MODULE_NAME, 'EXCEPTION :'||'OTHERS, SQLCODE: '
1127: || sqlcode || ' , SQLERRM : ' || sqlerrm);
1128: END IF;
1129: ROLLBACK TO trx_quotes_validate;
1130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1131: x_msg_count := l_msg_count ;
1132: x_msg_data := l_msg_data ;
1133: FND_MSG_PUB.ADD_EXC_MSG('OKL_TRX_QUOTES_PUB','validate_trx_quotes');
1134: FND_MSG_PUB.count_and_get(