2: /* $Header: OKLPXCAB.pls 115.8 2004/04/13 11:27:03 rnaik noship $ */
3:
4: PROCEDURE insert_xtl_csh_apps(
5: p_api_version IN NUMBER
6: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
7: ,x_return_status OUT NOCOPY VARCHAR2
8: ,x_msg_count OUT NOCOPY NUMBER
9: ,x_msg_data OUT NOCOPY VARCHAR2
10: ,p_xcav_rec IN xcav_rec_type
45: ,l_msg_data
46: ,lp_xcav_rec
47: ,lx_xcav_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_xcav_rec
47: ,lx_xcav_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_xcav_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_xcav_rec := lx_xcav_rec;
65: x_msg_data := l_msg_data ;
66:
67: EXCEPTION
68:
69: WHEN FND_API.G_EXC_ERROR THEN
70: ROLLBACK TO xtl_csh_apps_insert;
71: x_return_status := FND_API.G_RET_STS_ERROR;
72: x_msg_count := l_msg_count ;
73: x_msg_data := l_msg_data ;
67: EXCEPTION
68:
69: WHEN FND_API.G_EXC_ERROR THEN
70: ROLLBACK TO xtl_csh_apps_insert;
71: x_return_status := FND_API.G_RET_STS_ERROR;
72: x_msg_count := l_msg_count ;
73: x_msg_data := l_msg_data ;
74: FND_MSG_PUB.count_and_get(
75: p_count => x_msg_count
73: x_msg_data := l_msg_data ;
74: FND_MSG_PUB.count_and_get(
75: p_count => x_msg_count
76: ,p_data => x_msg_data);
77: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
78: ROLLBACK TO xtl_csh_apps_insert;
79: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
80: x_msg_count := l_msg_count ;
81: x_msg_data := l_msg_data ;
75: p_count => x_msg_count
76: ,p_data => x_msg_data);
77: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
78: ROLLBACK TO xtl_csh_apps_insert;
79: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
80: x_msg_count := l_msg_count ;
81: x_msg_data := l_msg_data ;
82: FND_MSG_PUB.count_and_get(
83: p_count => x_msg_count
83: p_count => x_msg_count
84: ,p_data => x_msg_data);
85: WHEN OTHERS THEN
86: ROLLBACK TO xtl_csh_apps_insert;
87: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
88: x_msg_count := l_msg_count ;
89: x_msg_data := l_msg_data ;
90: FND_MSG_PUB.ADD_EXC_MSG('OKL_XTL_CSH_APPS_PUB','insert_xtl_csh_apps');
91: FND_MSG_PUB.count_and_get(
94: END insert_xtl_csh_apps;
95:
96: PROCEDURE insert_xtl_csh_apps(
97: p_api_version IN NUMBER
98: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
99: ,x_return_status OUT NOCOPY VARCHAR2
100: ,x_msg_count OUT NOCOPY NUMBER
101: ,x_msg_data OUT NOCOPY VARCHAR2
102: ,p_xcav_tbl IN xcav_tbl_type
133: ,l_msg_data
134: ,lp_xcav_tbl
135: ,lx_xcav_tbl);
136:
137: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
138: RAISE FND_API.G_EXC_ERROR;
139: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
141: END IF;
134: ,lp_xcav_tbl
135: ,lx_xcav_tbl);
136:
137: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
138: RAISE FND_API.G_EXC_ERROR;
139: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
141: END IF;
142:
135: ,lx_xcav_tbl);
136:
137: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
138: RAISE FND_API.G_EXC_ERROR;
139: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
141: END IF;
142:
143: --Copy value of OUT variable in the IN record type
136:
137: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
138: RAISE FND_API.G_EXC_ERROR;
139: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
141: END IF;
142:
143: --Copy value of OUT variable in the IN record type
144: lp_xcav_tbl := lx_xcav_tbl;
153:
154:
155: EXCEPTION
156:
157: WHEN FND_API.G_EXC_ERROR THEN
158: ROLLBACK TO xtl_csh_apps_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 xtl_csh_apps_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 xtl_csh_apps_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 xtl_csh_apps_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 xtl_csh_apps_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_XTL_CSH_APPS_PUB','insert_xtl_csh_apps');
179: FND_MSG_PUB.count_and_get(
182: END insert_xtl_csh_apps;
183:
184: PROCEDURE lock_xtl_csh_apps(
185: p_api_version IN NUMBER
186: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
187: ,x_return_status OUT NOCOPY VARCHAR2
188: ,x_msg_count OUT NOCOPY NUMBER
189: ,x_msg_data OUT NOCOPY VARCHAR2
190: ,p_xcav_rec IN xcav_rec_type) IS
197: x_msg_count,
198: x_msg_data,
199: p_xcav_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_xcav_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_xcav_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_XTL_CSH_APPS_PUB','lock_xtl_csh_apps');
221: FND_MSG_PUB.count_and_get(
222: p_count => x_msg_count
223: ,p_data => x_msg_data);
224: END lock_xtl_csh_apps;
225:
226: PROCEDURE lock_xtl_csh_apps(
227: p_api_version IN NUMBER
228: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
229: ,x_return_status OUT NOCOPY VARCHAR2
230: ,x_msg_count OUT NOCOPY NUMBER
231: ,x_msg_data OUT NOCOPY VARCHAR2
232: ,p_xcav_tbl IN xcav_tbl_type) IS
239: x_msg_count,
240: x_msg_data,
241: p_xcav_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_xcav_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_xcav_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_XTL_CSH_APPS_PUB','lock_xtl_csh_apps');
263: FND_MSG_PUB.count_and_get(
264: p_count => x_msg_count
265: ,p_data => x_msg_data);
266: END lock_xtl_csh_apps;
267:
268: PROCEDURE update_xtl_csh_apps(
269: p_api_version IN NUMBER
270: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
271: ,x_return_status OUT NOCOPY VARCHAR2
272: ,x_msg_count OUT NOCOPY NUMBER
273: ,x_msg_data OUT NOCOPY VARCHAR2
274: ,p_xcav_rec IN xcav_rec_type
307: ,l_msg_data
308: ,lp_xcav_rec
309: ,lx_xcav_rec);
310:
311: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
312: RAISE FND_API.G_EXC_ERROR;
313: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
315: END IF;
308: ,lp_xcav_rec
309: ,lx_xcav_rec);
310:
311: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
312: RAISE FND_API.G_EXC_ERROR;
313: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
315: END IF;
316:
309: ,lx_xcav_rec);
310:
311: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
312: RAISE FND_API.G_EXC_ERROR;
313: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
315: END IF;
316:
317: --Copy value of OUT variable in the IN record type
310:
311: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
312: RAISE FND_API.G_EXC_ERROR;
313: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
315: END IF;
316:
317: --Copy value of OUT variable in the IN record type
318: lp_xcav_rec := lx_xcav_rec;
328:
329:
330: EXCEPTION
331:
332: WHEN FND_API.G_EXC_ERROR THEN
333: ROLLBACK TO xtl_csh_apps_update;
334: x_return_status := FND_API.G_RET_STS_ERROR;
335: x_msg_count := l_msg_count ;
336: x_msg_data := l_msg_data ;
330: EXCEPTION
331:
332: WHEN FND_API.G_EXC_ERROR THEN
333: ROLLBACK TO xtl_csh_apps_update;
334: x_return_status := FND_API.G_RET_STS_ERROR;
335: x_msg_count := l_msg_count ;
336: x_msg_data := l_msg_data ;
337: FND_MSG_PUB.count_and_get(
338: p_count => x_msg_count
336: x_msg_data := l_msg_data ;
337: FND_MSG_PUB.count_and_get(
338: p_count => x_msg_count
339: ,p_data => x_msg_data);
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: ROLLBACK TO xtl_csh_apps_update;
342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
343: x_msg_count := l_msg_count ;
344: x_msg_data := l_msg_data ;
338: p_count => x_msg_count
339: ,p_data => x_msg_data);
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: ROLLBACK TO xtl_csh_apps_update;
342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
343: x_msg_count := l_msg_count ;
344: x_msg_data := l_msg_data ;
345: FND_MSG_PUB.count_and_get(
346: p_count => x_msg_count
346: p_count => x_msg_count
347: ,p_data => x_msg_data);
348: WHEN OTHERS THEN
349: ROLLBACK TO xtl_csh_apps_update;
350: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
351: x_msg_count := l_msg_count ;
352: x_msg_data := l_msg_data ;
353: FND_MSG_PUB.ADD_EXC_MSG('OKL_XTL_CSH_APPS_PUB','update_xtl_csh_apps');
354: FND_MSG_PUB.count_and_get(
357: END update_xtl_csh_apps;
358:
359: PROCEDURE update_xtl_csh_apps(
360: p_api_version IN NUMBER
361: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
362: ,x_return_status OUT NOCOPY VARCHAR2
363: ,x_msg_count OUT NOCOPY NUMBER
364: ,x_msg_data OUT NOCOPY VARCHAR2
365: ,p_xcav_tbl IN xcav_tbl_type
397: ,l_msg_data
398: ,lp_xcav_tbl
399: ,lx_xcav_tbl);
400:
401: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
402: RAISE FND_API.G_EXC_ERROR;
403: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
405: END IF;
398: ,lp_xcav_tbl
399: ,lx_xcav_tbl);
400:
401: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
402: RAISE FND_API.G_EXC_ERROR;
403: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
405: END IF;
406:
399: ,lx_xcav_tbl);
400:
401: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
402: RAISE FND_API.G_EXC_ERROR;
403: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
405: END IF;
406:
407: --Copy value of OUT variable in the IN record type
400:
401: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
402: RAISE FND_API.G_EXC_ERROR;
403: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
405: END IF;
406:
407: --Copy value of OUT variable in the IN record type
408: lp_xcav_tbl := lx_xcav_tbl;
417:
418:
419: EXCEPTION
420:
421: WHEN FND_API.G_EXC_ERROR THEN
422: ROLLBACK TO xtl_csh_apps_update;
423: x_return_status := FND_API.G_RET_STS_ERROR;
424: x_msg_count := l_msg_count ;
425: x_msg_data := l_msg_data ;
419: EXCEPTION
420:
421: WHEN FND_API.G_EXC_ERROR THEN
422: ROLLBACK TO xtl_csh_apps_update;
423: x_return_status := FND_API.G_RET_STS_ERROR;
424: x_msg_count := l_msg_count ;
425: x_msg_data := l_msg_data ;
426: FND_MSG_PUB.count_and_get(
427: p_count => x_msg_count
425: x_msg_data := l_msg_data ;
426: FND_MSG_PUB.count_and_get(
427: p_count => x_msg_count
428: ,p_data => x_msg_data);
429: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
430: ROLLBACK TO xtl_csh_apps_update;
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
432: x_msg_count := l_msg_count ;
433: x_msg_data := l_msg_data ;
427: p_count => x_msg_count
428: ,p_data => x_msg_data);
429: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
430: ROLLBACK TO xtl_csh_apps_update;
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
432: x_msg_count := l_msg_count ;
433: x_msg_data := l_msg_data ;
434: FND_MSG_PUB.count_and_get(
435: p_count => x_msg_count
435: p_count => x_msg_count
436: ,p_data => x_msg_data);
437: WHEN OTHERS THEN
438: ROLLBACK TO xtl_csh_apps_update;
439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
440: x_msg_count := l_msg_count ;
441: x_msg_data := l_msg_data ;
442: FND_MSG_PUB.ADD_EXC_MSG('OKL_XTL_CSH_APPS_PUB','update_xtl_csh_apps');
443: FND_MSG_PUB.count_and_get(
447:
448: --Put custom code for cascade delete by developer
449: PROCEDURE delete_xtl_csh_apps(
450: p_api_version IN NUMBER
451: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
452: ,x_return_status OUT NOCOPY VARCHAR2
453: ,x_msg_count OUT NOCOPY NUMBER
454: ,x_msg_data OUT NOCOPY VARCHAR2
455: ,p_xcav_rec IN xcav_rec_type) IS
486: ,l_msg_count
487: ,l_msg_data
488: ,lp_xcav_rec);
489:
490: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
491: RAISE FND_API.G_EXC_ERROR;
492: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
494: END IF;
487: ,l_msg_data
488: ,lp_xcav_rec);
489:
490: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
491: RAISE FND_API.G_EXC_ERROR;
492: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
494: END IF;
495:
488: ,lp_xcav_rec);
489:
490: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
491: RAISE FND_API.G_EXC_ERROR;
492: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
494: END IF;
495:
496:
489:
490: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
491: RAISE FND_API.G_EXC_ERROR;
492: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
494: END IF;
495:
496:
497:
503: x_return_status := l_return_status ;
504:
505: EXCEPTION
506:
507: WHEN FND_API.G_EXC_ERROR THEN
508: ROLLBACK TO xtl_csh_apps_delete_rec;
509: x_return_status := FND_API.G_RET_STS_ERROR;
510: x_msg_count := l_msg_count ;
511: x_msg_data := l_msg_data ;
505: EXCEPTION
506:
507: WHEN FND_API.G_EXC_ERROR THEN
508: ROLLBACK TO xtl_csh_apps_delete_rec;
509: x_return_status := FND_API.G_RET_STS_ERROR;
510: x_msg_count := l_msg_count ;
511: x_msg_data := l_msg_data ;
512: FND_MSG_PUB.count_and_get(
513: p_count => x_msg_count
511: x_msg_data := l_msg_data ;
512: FND_MSG_PUB.count_and_get(
513: p_count => x_msg_count
514: ,p_data => x_msg_data);
515: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
516: ROLLBACK TO xtl_csh_apps_delete_rec;
517: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
518: x_msg_count := l_msg_count ;
519: x_msg_data := l_msg_data ;
513: p_count => x_msg_count
514: ,p_data => x_msg_data);
515: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
516: ROLLBACK TO xtl_csh_apps_delete_rec;
517: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
518: x_msg_count := l_msg_count ;
519: x_msg_data := l_msg_data ;
520: FND_MSG_PUB.count_and_get(
521: p_count => x_msg_count
521: p_count => x_msg_count
522: ,p_data => x_msg_data);
523: WHEN OTHERS THEN
524: ROLLBACK TO xtl_csh_apps_delete_rec;
525: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
526: x_msg_count := l_msg_count ;
527: x_msg_data := l_msg_data ;
528: FND_MSG_PUB.ADD_EXC_MSG('OKL_XTL_CSH_APPS_PUB','delete_xtl_csh_apps');
529: FND_MSG_PUB.count_and_get(
532: END delete_xtl_csh_apps;
533:
534: PROCEDURE delete_xtl_csh_apps(
535: p_api_version IN NUMBER
536: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
537: ,x_return_status OUT NOCOPY VARCHAR2
538: ,x_msg_count OUT NOCOPY NUMBER
539: ,x_msg_data OUT NOCOPY VARCHAR2
540: ,p_xcav_tbl IN xcav_tbl_type) IS
580: EXIT WHEN (i = lp_xcav_tbl.LAST);
581: i := p_xcav_tbl.NEXT(i);
582: END LOOP;
583: END IF;
584: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
585: RAISE FND_API.G_EXC_ERROR;
586: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
588: END IF;
581: i := p_xcav_tbl.NEXT(i);
582: END LOOP;
583: END IF;
584: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
585: RAISE FND_API.G_EXC_ERROR;
586: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
588: END IF;
589:
582: END LOOP;
583: END IF;
584: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
585: RAISE FND_API.G_EXC_ERROR;
586: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
588: END IF;
589:
590: END;
583: END IF;
584: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
585: RAISE FND_API.G_EXC_ERROR;
586: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
588: END IF;
589:
590: END;
591:
600: x_return_status := l_return_status ;
601:
602: EXCEPTION
603:
604: WHEN FND_API.G_EXC_ERROR THEN
605: ROLLBACK TO xtl_csh_apps_delete_tbl;
606: x_return_status := FND_API.G_RET_STS_ERROR;
607: x_msg_count := l_msg_count ;
608: x_msg_data := l_msg_data ;
602: EXCEPTION
603:
604: WHEN FND_API.G_EXC_ERROR THEN
605: ROLLBACK TO xtl_csh_apps_delete_tbl;
606: x_return_status := FND_API.G_RET_STS_ERROR;
607: x_msg_count := l_msg_count ;
608: x_msg_data := l_msg_data ;
609: FND_MSG_PUB.count_and_get(
610: p_count => x_msg_count
608: x_msg_data := l_msg_data ;
609: FND_MSG_PUB.count_and_get(
610: p_count => x_msg_count
611: ,p_data => x_msg_data);
612: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
613: ROLLBACK TO xtl_csh_apps_delete_tbl;
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: x_msg_count := l_msg_count ;
616: x_msg_data := l_msg_data ;
610: p_count => x_msg_count
611: ,p_data => x_msg_data);
612: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
613: ROLLBACK TO xtl_csh_apps_delete_tbl;
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: x_msg_count := l_msg_count ;
616: x_msg_data := l_msg_data ;
617: FND_MSG_PUB.count_and_get(
618: p_count => x_msg_count
618: p_count => x_msg_count
619: ,p_data => x_msg_data);
620: WHEN OTHERS THEN
621: ROLLBACK TO xtl_csh_apps_delete_tbl;
622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
623: x_msg_count := l_msg_count ;
624: x_msg_data := l_msg_data ;
625: FND_MSG_PUB.ADD_EXC_MSG('OKL_XTL_CSH_APPS_PUB','delete_xtl_csh_apps');
626: FND_MSG_PUB.count_and_get(
629: END delete_xtl_csh_apps;
630:
631: PROCEDURE validate_xtl_csh_apps(
632: p_api_version IN NUMBER
633: ,p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
634: ,x_return_status OUT NOCOPY VARCHAR2
635: ,x_msg_count OUT NOCOPY NUMBER
636: ,x_msg_data OUT NOCOPY VARCHAR2
637: ,p_xcav_rec IN xcav_rec_type) IS
666: ,l_msg_count
667: ,l_msg_data
668: ,lp_xcav_rec);
669:
670: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
671: RAISE FND_API.G_EXC_ERROR;
672: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
674: END IF;
667: ,l_msg_data
668: ,lp_xcav_rec);
669:
670: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
671: RAISE FND_API.G_EXC_ERROR;
672: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
674: END IF;
675:
668: ,lp_xcav_rec);
669:
670: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
671: RAISE FND_API.G_EXC_ERROR;
672: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
674: END IF;
675:
676:
669:
670: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
671: RAISE FND_API.G_EXC_ERROR;
672: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
674: END IF;
675:
676:
677:
686: x_return_status := l_return_status ;
687:
688: EXCEPTION
689:
690: WHEN FND_API.G_EXC_ERROR THEN
691: ROLLBACK TO xtl_csh_apps_validate;
692: x_return_status := FND_API.G_RET_STS_ERROR;
693: x_msg_count := l_msg_count ;
694: x_msg_data := l_msg_data ;
688: EXCEPTION
689:
690: WHEN FND_API.G_EXC_ERROR THEN
691: ROLLBACK TO xtl_csh_apps_validate;
692: x_return_status := FND_API.G_RET_STS_ERROR;
693: x_msg_count := l_msg_count ;
694: x_msg_data := l_msg_data ;
695: FND_MSG_PUB.count_and_get(
696: p_count => x_msg_count
694: x_msg_data := l_msg_data ;
695: FND_MSG_PUB.count_and_get(
696: p_count => x_msg_count
697: ,p_data => x_msg_data);
698: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
699: ROLLBACK TO xtl_csh_apps_validate;
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: x_msg_count := l_msg_count ;
702: x_msg_data := l_msg_data ;
696: p_count => x_msg_count
697: ,p_data => x_msg_data);
698: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
699: ROLLBACK TO xtl_csh_apps_validate;
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: x_msg_count := l_msg_count ;
702: x_msg_data := l_msg_data ;
703: FND_MSG_PUB.count_and_get(
704: p_count => x_msg_count
704: p_count => x_msg_count
705: ,p_data => x_msg_data);
706: WHEN OTHERS THEN
707: ROLLBACK TO xtl_csh_apps_validate;
708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
709: x_msg_count := l_msg_count ;
710: x_msg_data := l_msg_data ;
711: FND_MSG_PUB.ADD_EXC_MSG('OKL_XTL_CSH_APPS_PUB','validate_xtl_csh_apps');
712: FND_MSG_PUB.count_and_get(
715: END validate_xtl_csh_apps;
716:
717: PROCEDURE validate_xtl_csh_apps(
718: p_api_version IN NUMBER,
719: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
720: x_return_status OUT NOCOPY VARCHAR2,
721: x_msg_count OUT NOCOPY NUMBER,
722: x_msg_data OUT NOCOPY VARCHAR2,
723: p_xcav_tbl IN xcav_tbl_type) IS
750: ,x_msg_count
751: ,x_msg_data
752: ,lp_xcav_tbl);
753:
754: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
755: RAISE FND_API.G_EXC_ERROR;
756: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
758: END IF;
751: ,x_msg_data
752: ,lp_xcav_tbl);
753:
754: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
755: RAISE FND_API.G_EXC_ERROR;
756: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
758: END IF;
759:
752: ,lp_xcav_tbl);
753:
754: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
755: RAISE FND_API.G_EXC_ERROR;
756: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
758: END IF;
759:
760:
753:
754: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
755: RAISE FND_API.G_EXC_ERROR;
756: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
758: END IF;
759:
760:
761:
768: x_return_status := l_return_status ;
769:
770: EXCEPTION
771:
772: WHEN FND_API.G_EXC_ERROR THEN
773: ROLLBACK TO xtl_csh_apps_validate;
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 xtl_csh_apps_validate;
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 xtl_csh_apps_validate;
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 xtl_csh_apps_validate;
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 xtl_csh_apps_validate;
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_XTL_CSH_APPS_PUB','validate_xtl_csh_apps');
794: FND_MSG_PUB.count_and_get(