45: ,l_msg_data
46: ,lp_cfov_rec
47: ,lx_cfov_rec);
48:
49: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
50: RAISE FND_API.G_EXC_ERROR;
51: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
52: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
53: END IF;
46: ,lp_cfov_rec
47: ,lx_cfov_rec);
48:
49: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
50: RAISE FND_API.G_EXC_ERROR;
51: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
52: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
53: END IF;
54:
47: ,lx_cfov_rec);
48:
49: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
50: RAISE FND_API.G_EXC_ERROR;
51: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
52: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
53: END IF;
54:
55: --Copy value of OUT variable in the IN record type
48:
49: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
50: RAISE FND_API.G_EXC_ERROR;
51: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
52: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
53: END IF;
54:
55: --Copy value of OUT variable in the IN record type
56: lp_cfov_rec := lx_cfov_rec;
66: x_msg_data := l_msg_data ;
67:
68: EXCEPTION
69:
70: WHEN FND_API.G_EXC_ERROR THEN
71: ROLLBACK TO cash_flow_obj_ins;
72: x_return_status := FND_API.G_RET_STS_ERROR;
73: x_msg_count := l_msg_count ;
74: x_msg_data := l_msg_data ;
68: EXCEPTION
69:
70: WHEN FND_API.G_EXC_ERROR THEN
71: ROLLBACK TO cash_flow_obj_ins;
72: x_return_status := FND_API.G_RET_STS_ERROR;
73: x_msg_count := l_msg_count ;
74: x_msg_data := l_msg_data ;
75: FND_MSG_PUB.count_and_get(
76: p_count => x_msg_count
74: x_msg_data := l_msg_data ;
75: FND_MSG_PUB.count_and_get(
76: p_count => x_msg_count
77: ,p_data => x_msg_data);
78: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
79: ROLLBACK TO cash_flow_obj_ins;
80: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
81: x_msg_count := l_msg_count ;
82: x_msg_data := l_msg_data ;
76: p_count => x_msg_count
77: ,p_data => x_msg_data);
78: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
79: ROLLBACK TO cash_flow_obj_ins;
80: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
81: x_msg_count := l_msg_count ;
82: x_msg_data := l_msg_data ;
83: FND_MSG_PUB.count_and_get(
84: p_count => x_msg_count
84: p_count => x_msg_count
85: ,p_data => x_msg_data);
86: WHEN OTHERS THEN
87: ROLLBACK TO cash_flow_obj_ins;
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: FND_MSG_PUB.ADD_EXC_MSG('OKL_CASH_FLOW_OBJECTS_PUB','insert_cash_flow_object');
92: FND_MSG_PUB.count_and_get(
134: ,l_msg_data
135: ,lp_cfov_tbl
136: ,lx_cfov_tbl);
137:
138: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
139: RAISE FND_API.G_EXC_ERROR;
140: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
141: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
142: END IF;
135: ,lp_cfov_tbl
136: ,lx_cfov_tbl);
137:
138: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
139: RAISE FND_API.G_EXC_ERROR;
140: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
141: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
142: END IF;
143:
136: ,lx_cfov_tbl);
137:
138: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
139: RAISE FND_API.G_EXC_ERROR;
140: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
141: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
142: END IF;
143:
144: --Copy value of OUT variable in the IN record type
137:
138: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
139: RAISE FND_API.G_EXC_ERROR;
140: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
141: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
142: END IF;
143:
144: --Copy value of OUT variable in the IN record type
145: lp_cfov_tbl := lx_cfov_tbl;
154:
155:
156: EXCEPTION
157:
158: WHEN FND_API.G_EXC_ERROR THEN
159: ROLLBACK TO cash_flow_obj_ins;
160: x_return_status := FND_API.G_RET_STS_ERROR;
161: x_msg_count := l_msg_count ;
162: x_msg_data := l_msg_data ;
156: EXCEPTION
157:
158: WHEN FND_API.G_EXC_ERROR THEN
159: ROLLBACK TO cash_flow_obj_ins;
160: x_return_status := FND_API.G_RET_STS_ERROR;
161: x_msg_count := l_msg_count ;
162: x_msg_data := l_msg_data ;
163: FND_MSG_PUB.count_and_get(
164: p_count => x_msg_count
162: x_msg_data := l_msg_data ;
163: FND_MSG_PUB.count_and_get(
164: p_count => x_msg_count
165: ,p_data => x_msg_data);
166: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
167: ROLLBACK TO cash_flow_obj_ins;
168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
169: x_msg_count := l_msg_count ;
170: x_msg_data := l_msg_data ;
164: p_count => x_msg_count
165: ,p_data => x_msg_data);
166: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
167: ROLLBACK TO cash_flow_obj_ins;
168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
169: x_msg_count := l_msg_count ;
170: x_msg_data := l_msg_data ;
171: FND_MSG_PUB.count_and_get(
172: p_count => x_msg_count
172: p_count => x_msg_count
173: ,p_data => x_msg_data);
174: WHEN OTHERS THEN
175: ROLLBACK TO cash_flow_obj_ins;
176: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
177: x_msg_count := l_msg_count ;
178: x_msg_data := l_msg_data ;
179: FND_MSG_PUB.ADD_EXC_MSG('OKL_CASH_FLOW_OBJECTS_PUB','insert_cash_flow_object');
180: FND_MSG_PUB.count_and_get(
198: x_msg_count,
199: x_msg_data,
200: p_cfov_rec);
201:
202: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
203: RAISE FND_API.G_EXC_ERROR;
204: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
205: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
206: END IF;
199: x_msg_data,
200: p_cfov_rec);
201:
202: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
203: RAISE FND_API.G_EXC_ERROR;
204: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
205: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
206: END IF;
207:
200: p_cfov_rec);
201:
202: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
203: RAISE FND_API.G_EXC_ERROR;
204: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
205: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
206: END IF;
207:
208:
201:
202: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
203: RAISE FND_API.G_EXC_ERROR;
204: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
205: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
206: END IF;
207:
208:
209: EXCEPTION
207:
208:
209: EXCEPTION
210:
211: WHEN FND_API.G_EXC_ERROR THEN
212: FND_MSG_PUB.count_and_get(
213: p_count => x_msg_count
214: ,p_data => x_msg_data);
215: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
211: WHEN FND_API.G_EXC_ERROR THEN
212: FND_MSG_PUB.count_and_get(
213: p_count => x_msg_count
214: ,p_data => x_msg_data);
215: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
216: FND_MSG_PUB.count_and_get(
217: p_count => x_msg_count
218: ,p_data => x_msg_data);
219: WHEN OTHERS THEN
216: FND_MSG_PUB.count_and_get(
217: p_count => x_msg_count
218: ,p_data => x_msg_data);
219: WHEN OTHERS THEN
220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
221: FND_MSG_PUB.ADD_EXC_MSG('OKL_CASH_FLOW_OBJECTS_PUB','lock_cash_flow_object');
222: FND_MSG_PUB.count_and_get(
223: p_count => x_msg_count
224: ,p_data => x_msg_data);
240: x_msg_count,
241: x_msg_data,
242: p_cfov_tbl);
243:
244: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
245: RAISE FND_API.G_EXC_ERROR;
246: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
248: END IF;
241: x_msg_data,
242: p_cfov_tbl);
243:
244: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
245: RAISE FND_API.G_EXC_ERROR;
246: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
248: END IF;
249:
242: p_cfov_tbl);
243:
244: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
245: RAISE FND_API.G_EXC_ERROR;
246: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
248: END IF;
249:
250:
243:
244: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
245: RAISE FND_API.G_EXC_ERROR;
246: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
248: END IF;
249:
250:
251: EXCEPTION
249:
250:
251: EXCEPTION
252:
253: WHEN FND_API.G_EXC_ERROR THEN
254: FND_MSG_PUB.count_and_get(
255: p_count => x_msg_count
256: ,p_data => x_msg_data);
257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
253: WHEN FND_API.G_EXC_ERROR THEN
254: FND_MSG_PUB.count_and_get(
255: p_count => x_msg_count
256: ,p_data => x_msg_data);
257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
258: FND_MSG_PUB.count_and_get(
259: p_count => x_msg_count
260: ,p_data => x_msg_data);
261: WHEN OTHERS THEN
258: FND_MSG_PUB.count_and_get(
259: p_count => x_msg_count
260: ,p_data => x_msg_data);
261: WHEN OTHERS THEN
262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
263: FND_MSG_PUB.ADD_EXC_MSG('OKL_CASH_FLOW_OBJECTS_PUB','lock_cash_flow_object');
264: FND_MSG_PUB.count_and_get(
265: p_count => x_msg_count
266: ,p_data => x_msg_data);
309: ,l_msg_data
310: ,lp_cfov_rec
311: ,lx_cfov_rec);
312:
313: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
314: RAISE FND_API.G_EXC_ERROR;
315: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
316: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
317: END IF;
310: ,lp_cfov_rec
311: ,lx_cfov_rec);
312:
313: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
314: RAISE FND_API.G_EXC_ERROR;
315: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
316: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
317: END IF;
318:
311: ,lx_cfov_rec);
312:
313: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
314: RAISE FND_API.G_EXC_ERROR;
315: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
316: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
317: END IF;
318:
319: --Copy value of OUT variable in the IN record type
312:
313: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
314: RAISE FND_API.G_EXC_ERROR;
315: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
316: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
317: END IF;
318:
319: --Copy value of OUT variable in the IN record type
320: lp_cfov_rec := lx_cfov_rec;
330:
331:
332: EXCEPTION
333:
334: WHEN FND_API.G_EXC_ERROR THEN
335: ROLLBACK TO cash_flow_obj_upd;
336: x_return_status := FND_API.G_RET_STS_ERROR;
337: x_msg_count := l_msg_count ;
338: x_msg_data := l_msg_data ;
332: EXCEPTION
333:
334: WHEN FND_API.G_EXC_ERROR THEN
335: ROLLBACK TO cash_flow_obj_upd;
336: x_return_status := FND_API.G_RET_STS_ERROR;
337: x_msg_count := l_msg_count ;
338: x_msg_data := l_msg_data ;
339: FND_MSG_PUB.count_and_get(
340: p_count => x_msg_count
338: x_msg_data := l_msg_data ;
339: FND_MSG_PUB.count_and_get(
340: p_count => x_msg_count
341: ,p_data => x_msg_data);
342: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
343: ROLLBACK TO cash_flow_obj_upd;
344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
345: x_msg_count := l_msg_count ;
346: x_msg_data := l_msg_data ;
340: p_count => x_msg_count
341: ,p_data => x_msg_data);
342: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
343: ROLLBACK TO cash_flow_obj_upd;
344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
345: x_msg_count := l_msg_count ;
346: x_msg_data := l_msg_data ;
347: FND_MSG_PUB.count_and_get(
348: p_count => x_msg_count
348: p_count => x_msg_count
349: ,p_data => x_msg_data);
350: WHEN OTHERS THEN
351: ROLLBACK TO cash_flow_obj_upd;
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353: x_msg_count := l_msg_count ;
354: x_msg_data := l_msg_data ;
355: FND_MSG_PUB.ADD_EXC_MSG('OKL_CASH_FLOW_OBJECTS_PUB','update_cash_flow_object');
356: FND_MSG_PUB.count_and_get(
399: ,l_msg_data
400: ,lp_cfov_tbl
401: ,lx_cfov_tbl);
402:
403: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
404: RAISE FND_API.G_EXC_ERROR;
405: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
407: END IF;
400: ,lp_cfov_tbl
401: ,lx_cfov_tbl);
402:
403: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
404: RAISE FND_API.G_EXC_ERROR;
405: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
407: END IF;
408:
401: ,lx_cfov_tbl);
402:
403: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
404: RAISE FND_API.G_EXC_ERROR;
405: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
407: END IF;
408:
409: --Copy value of OUT variable in the IN record type
402:
403: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
404: RAISE FND_API.G_EXC_ERROR;
405: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
407: END IF;
408:
409: --Copy value of OUT variable in the IN record type
410: lp_cfov_tbl := lx_cfov_tbl;
419:
420:
421: EXCEPTION
422:
423: WHEN FND_API.G_EXC_ERROR THEN
424: ROLLBACK TO cash_flow_obj_upd;
425: x_return_status := FND_API.G_RET_STS_ERROR;
426: x_msg_count := l_msg_count ;
427: x_msg_data := l_msg_data ;
421: EXCEPTION
422:
423: WHEN FND_API.G_EXC_ERROR THEN
424: ROLLBACK TO cash_flow_obj_upd;
425: x_return_status := FND_API.G_RET_STS_ERROR;
426: x_msg_count := l_msg_count ;
427: x_msg_data := l_msg_data ;
428: FND_MSG_PUB.count_and_get(
429: p_count => x_msg_count
427: x_msg_data := l_msg_data ;
428: FND_MSG_PUB.count_and_get(
429: p_count => x_msg_count
430: ,p_data => x_msg_data);
431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
432: ROLLBACK TO cash_flow_obj_upd;
433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
434: x_msg_count := l_msg_count ;
435: x_msg_data := l_msg_data ;
429: p_count => x_msg_count
430: ,p_data => x_msg_data);
431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
432: ROLLBACK TO cash_flow_obj_upd;
433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
434: x_msg_count := l_msg_count ;
435: x_msg_data := l_msg_data ;
436: FND_MSG_PUB.count_and_get(
437: p_count => x_msg_count
437: p_count => x_msg_count
438: ,p_data => x_msg_data);
439: WHEN OTHERS THEN
440: ROLLBACK TO cash_flow_obj_upd;
441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
442: x_msg_count := l_msg_count ;
443: x_msg_data := l_msg_data ;
444: FND_MSG_PUB.ADD_EXC_MSG('OKL_CASH_FLOW_OBJECTS_PUB','update_cash_flow_object');
445: FND_MSG_PUB.count_and_get(
488: ,l_msg_count
489: ,l_msg_data
490: ,lp_cfov_rec);
491:
492: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
493: RAISE FND_API.G_EXC_ERROR;
494: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
496: END IF;
489: ,l_msg_data
490: ,lp_cfov_rec);
491:
492: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
493: RAISE FND_API.G_EXC_ERROR;
494: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
496: END IF;
497:
490: ,lp_cfov_rec);
491:
492: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
493: RAISE FND_API.G_EXC_ERROR;
494: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
496: END IF;
497:
498:
491:
492: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
493: RAISE FND_API.G_EXC_ERROR;
494: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
496: END IF;
497:
498:
499:
505: x_return_status := l_return_status ;
506:
507: EXCEPTION
508:
509: WHEN FND_API.G_EXC_ERROR THEN
510: ROLLBACK TO cash_flow_obj_del;
511: x_return_status := FND_API.G_RET_STS_ERROR;
512: x_msg_count := l_msg_count ;
513: x_msg_data := l_msg_data ;
507: EXCEPTION
508:
509: WHEN FND_API.G_EXC_ERROR THEN
510: ROLLBACK TO cash_flow_obj_del;
511: x_return_status := FND_API.G_RET_STS_ERROR;
512: x_msg_count := l_msg_count ;
513: x_msg_data := l_msg_data ;
514: FND_MSG_PUB.count_and_get(
515: p_count => x_msg_count
513: x_msg_data := l_msg_data ;
514: FND_MSG_PUB.count_and_get(
515: p_count => x_msg_count
516: ,p_data => x_msg_data);
517: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
518: ROLLBACK TO cash_flow_obj_del;
519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
520: x_msg_count := l_msg_count ;
521: x_msg_data := l_msg_data ;
515: p_count => x_msg_count
516: ,p_data => x_msg_data);
517: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
518: ROLLBACK TO cash_flow_obj_del;
519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
520: x_msg_count := l_msg_count ;
521: x_msg_data := l_msg_data ;
522: FND_MSG_PUB.count_and_get(
523: p_count => x_msg_count
523: p_count => x_msg_count
524: ,p_data => x_msg_data);
525: WHEN OTHERS THEN
526: ROLLBACK TO cash_flow_obj_del;
527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
528: x_msg_count := l_msg_count ;
529: x_msg_data := l_msg_data ;
530: FND_MSG_PUB.ADD_EXC_MSG('OKL_CASH_FLOW_OBJECTS_PUB','delete_cash_flow_object');
531: FND_MSG_PUB.count_and_get(
574: ,l_msg_count
575: ,l_msg_data
576: ,lp_cfov_tbl);
577:
578: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
579: RAISE FND_API.G_EXC_ERROR;
580: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
581: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
582: END IF;
575: ,l_msg_data
576: ,lp_cfov_tbl);
577:
578: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
579: RAISE FND_API.G_EXC_ERROR;
580: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
581: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
582: END IF;
583:
576: ,lp_cfov_tbl);
577:
578: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
579: RAISE FND_API.G_EXC_ERROR;
580: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
581: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
582: END IF;
583:
584:
577:
578: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
579: RAISE FND_API.G_EXC_ERROR;
580: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
581: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
582: END IF;
583:
584:
585:
590: x_msg_data := l_msg_data ;
591: x_return_status := l_return_status ;
592: EXCEPTION
593:
594: WHEN FND_API.G_EXC_ERROR THEN
595: ROLLBACK TO cash_flow_obj_del;
596: x_return_status := FND_API.G_RET_STS_ERROR;
597: x_msg_count := l_msg_count ;
598: x_msg_data := l_msg_data ;
592: EXCEPTION
593:
594: WHEN FND_API.G_EXC_ERROR THEN
595: ROLLBACK TO cash_flow_obj_del;
596: x_return_status := FND_API.G_RET_STS_ERROR;
597: x_msg_count := l_msg_count ;
598: x_msg_data := l_msg_data ;
599: FND_MSG_PUB.count_and_get(
600: p_count => x_msg_count
598: x_msg_data := l_msg_data ;
599: FND_MSG_PUB.count_and_get(
600: p_count => x_msg_count
601: ,p_data => x_msg_data);
602: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
603: ROLLBACK TO cash_flow_obj_del;
604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
605: x_msg_count := l_msg_count ;
606: x_msg_data := l_msg_data ;
600: p_count => x_msg_count
601: ,p_data => x_msg_data);
602: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
603: ROLLBACK TO cash_flow_obj_del;
604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
605: x_msg_count := l_msg_count ;
606: x_msg_data := l_msg_data ;
607: FND_MSG_PUB.count_and_get(
608: p_count => x_msg_count
608: p_count => x_msg_count
609: ,p_data => x_msg_data);
610: WHEN OTHERS THEN
611: ROLLBACK TO cash_flow_obj_del;
612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
613: x_msg_count := l_msg_count ;
614: x_msg_data := l_msg_data ;
615: FND_MSG_PUB.ADD_EXC_MSG('OKL_CASH_FLOW_OBJECTS_PUB','delete_cash_flow_object');
616: FND_MSG_PUB.count_and_get(
658: ,l_msg_count
659: ,l_msg_data
660: ,lp_cfov_rec);
661:
662: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
663: RAISE FND_API.G_EXC_ERROR;
664: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
666: END IF;
659: ,l_msg_data
660: ,lp_cfov_rec);
661:
662: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
663: RAISE FND_API.G_EXC_ERROR;
664: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
666: END IF;
667:
660: ,lp_cfov_rec);
661:
662: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
663: RAISE FND_API.G_EXC_ERROR;
664: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
666: END IF;
667:
668: --Copy value of OUT variable in the IN record type
661:
662: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
663: RAISE FND_API.G_EXC_ERROR;
664: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
665: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
666: END IF;
667:
668: --Copy value of OUT variable in the IN record type
669: lp_cfov_rec := lx_cfov_rec;
682: x_return_status := l_return_status ;
683:
684: EXCEPTION
685:
686: WHEN FND_API.G_EXC_ERROR THEN
687: ROLLBACK TO cash_flow_obj_val;
688: x_return_status := FND_API.G_RET_STS_ERROR;
689: x_msg_count := l_msg_count ;
690: x_msg_data := l_msg_data ;
684: EXCEPTION
685:
686: WHEN FND_API.G_EXC_ERROR THEN
687: ROLLBACK TO cash_flow_obj_val;
688: x_return_status := FND_API.G_RET_STS_ERROR;
689: x_msg_count := l_msg_count ;
690: x_msg_data := l_msg_data ;
691: FND_MSG_PUB.count_and_get(
692: p_count => x_msg_count
690: x_msg_data := l_msg_data ;
691: FND_MSG_PUB.count_and_get(
692: p_count => x_msg_count
693: ,p_data => x_msg_data);
694: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
695: ROLLBACK TO cash_flow_obj_val;
696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
697: x_msg_count := l_msg_count ;
698: x_msg_data := l_msg_data ;
692: p_count => x_msg_count
693: ,p_data => x_msg_data);
694: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
695: ROLLBACK TO cash_flow_obj_val;
696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
697: x_msg_count := l_msg_count ;
698: x_msg_data := l_msg_data ;
699: FND_MSG_PUB.count_and_get(
700: p_count => x_msg_count
700: p_count => x_msg_count
701: ,p_data => x_msg_data);
702: WHEN OTHERS THEN
703: ROLLBACK TO cash_flow_obj_val;
704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
705: x_msg_count := l_msg_count ;
706: x_msg_data := l_msg_data ;
707: FND_MSG_PUB.ADD_EXC_MSG('OKL_CASH_FLOW_OBJECTS_PUB','validate_cash_flow_object');
708: FND_MSG_PUB.count_and_get(
747: ,x_msg_count
748: ,x_msg_data
749: ,lp_cfov_tbl);
750:
751: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
752: RAISE FND_API.G_EXC_ERROR;
753: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
755: END IF;
748: ,x_msg_data
749: ,lp_cfov_tbl);
750:
751: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
752: RAISE FND_API.G_EXC_ERROR;
753: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
755: END IF;
756:
749: ,lp_cfov_tbl);
750:
751: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
752: RAISE FND_API.G_EXC_ERROR;
753: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
755: END IF;
756:
757: --Copy value of OUT variable in the IN record type
750:
751: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
752: RAISE FND_API.G_EXC_ERROR;
753: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
755: END IF;
756:
757: --Copy value of OUT variable in the IN record type
758: lp_cfov_tbl := lx_cfov_tbl;
768: x_return_status := l_return_status ;
769:
770: EXCEPTION
771:
772: WHEN FND_API.G_EXC_ERROR THEN
773: ROLLBACK TO cash_flow_obj_val;
774: x_return_status := FND_API.G_RET_STS_ERROR;
775: x_msg_count := l_msg_count ;
776: x_msg_data := l_msg_data ;
770: EXCEPTION
771:
772: WHEN FND_API.G_EXC_ERROR THEN
773: ROLLBACK TO cash_flow_obj_val;
774: x_return_status := FND_API.G_RET_STS_ERROR;
775: x_msg_count := l_msg_count ;
776: x_msg_data := l_msg_data ;
777: FND_MSG_PUB.count_and_get(
778: p_count => x_msg_count
776: x_msg_data := l_msg_data ;
777: FND_MSG_PUB.count_and_get(
778: p_count => x_msg_count
779: ,p_data => x_msg_data);
780: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
781: ROLLBACK TO cash_flow_obj_val;
782: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
783: x_msg_count := l_msg_count ;
784: x_msg_data := l_msg_data ;
778: p_count => x_msg_count
779: ,p_data => x_msg_data);
780: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
781: ROLLBACK TO cash_flow_obj_val;
782: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
783: x_msg_count := l_msg_count ;
784: x_msg_data := l_msg_data ;
785: FND_MSG_PUB.count_and_get(
786: p_count => x_msg_count
786: p_count => x_msg_count
787: ,p_data => x_msg_data);
788: WHEN OTHERS THEN
789: ROLLBACK TO cash_flow_obj_val;
790: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
791: x_msg_count := l_msg_count ;
792: x_msg_data := l_msg_data ;
793: FND_MSG_PUB.ADD_EXC_MSG('OKL_CASH_FLOW_OBJECTS_PUB','validate_cash_flow_object');
794: FND_MSG_PUB.count_and_get(