11: ,x_qabv_rec OUT NOCOPY qabv_rec_type) IS
12:
13: l_api_version NUMBER ;
14: l_init_msg_list VARCHAR2(3);
15: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
16: l_msg_count NUMBER;
17: l_msg_data VARCHAR2(2000);
18: lp_qabv_rec qabv_rec_type;
19: lx_qabv_rec qabv_rec_type;
35: ,x_msg_data => l_msg_data
36: ,p_qabv_rec => lp_qabv_rec
37: ,x_qabv_rec => lx_qabv_rec);
38:
39: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
40: RAISE FND_API.G_EXC_ERROR;
41: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
42: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
43: END IF;
36: ,p_qabv_rec => lp_qabv_rec
37: ,x_qabv_rec => lx_qabv_rec);
38:
39: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
40: RAISE FND_API.G_EXC_ERROR;
41: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
42: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
43: END IF;
44:
37: ,x_qabv_rec => lx_qabv_rec);
38:
39: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
40: RAISE FND_API.G_EXC_ERROR;
41: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
42: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
43: END IF;
44:
45: --Assign value to OUT variables
38:
39: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
40: RAISE FND_API.G_EXC_ERROR;
41: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
42: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
43: END IF;
44:
45: --Assign value to OUT variables
46: x_qabv_rec := lx_qabv_rec;
48: x_msg_count := l_msg_count ;
49: x_msg_data := l_msg_data ;
50:
51: EXCEPTION
52: WHEN FND_API.G_EXC_ERROR THEN
53: ROLLBACK TO create_txd_qte_ant_bill;
54: x_return_status := FND_API.G_RET_STS_ERROR;
55: x_msg_count := l_msg_count ;
56: x_msg_data := l_msg_data ;
50:
51: EXCEPTION
52: WHEN FND_API.G_EXC_ERROR THEN
53: ROLLBACK TO create_txd_qte_ant_bill;
54: x_return_status := FND_API.G_RET_STS_ERROR;
55: x_msg_count := l_msg_count ;
56: x_msg_data := l_msg_data ;
57: FND_MSG_PUB.count_and_get(
58: p_count => x_msg_count
56: x_msg_data := l_msg_data ;
57: FND_MSG_PUB.count_and_get(
58: p_count => x_msg_count
59: ,p_data => x_msg_data);
60: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
61: ROLLBACK TO create_txd_qte_ant_bill;
62: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
63: x_msg_count := l_msg_count ;
64: x_msg_data := l_msg_data ;
58: p_count => x_msg_count
59: ,p_data => x_msg_data);
60: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
61: ROLLBACK TO create_txd_qte_ant_bill;
62: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
63: x_msg_count := l_msg_count ;
64: x_msg_data := l_msg_data ;
65: FND_MSG_PUB.count_and_get(
66: p_count => x_msg_count
66: p_count => x_msg_count
67: ,p_data => x_msg_data);
68: WHEN OTHERS THEN
69: ROLLBACK TO create_txd_qte_ant_bill;
70: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
71: x_msg_count := l_msg_count ;
72: x_msg_data := l_msg_data ;
73: FND_MSG_PUB.ADD_EXC_MSG('OKL_TXD_QTE_ANTCPT_BILL_PUB','create_txd_qte_ant_bill');
74: FND_MSG_PUB.count_and_get(
86: ,x_qabv_tbl OUT NOCOPY qabv_tbl_type) IS
87:
88: l_api_version NUMBER ;
89: l_init_msg_list VARCHAR2(3);
90: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
91: l_msg_count NUMBER;
92: l_msg_data VARCHAR2(2000);
93: lp_qabv_tbl qabv_tbl_type;
94: lx_qabv_tbl qabv_tbl_type;
110: ,x_msg_data => l_msg_data
111: ,p_qabv_tbl => lp_qabv_tbl
112: ,x_qabv_tbl => lx_qabv_tbl);
113:
114: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
115: RAISE FND_API.G_EXC_ERROR;
116: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
118: END IF;
111: ,p_qabv_tbl => lp_qabv_tbl
112: ,x_qabv_tbl => lx_qabv_tbl);
113:
114: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
115: RAISE FND_API.G_EXC_ERROR;
116: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
118: END IF;
119:
112: ,x_qabv_tbl => lx_qabv_tbl);
113:
114: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
115: RAISE FND_API.G_EXC_ERROR;
116: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
118: END IF;
119:
120: --Assign value to OUT variables
113:
114: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
115: RAISE FND_API.G_EXC_ERROR;
116: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
118: END IF;
119:
120: --Assign value to OUT variables
121: x_qabv_tbl := lx_qabv_tbl;
123: x_msg_count := l_msg_count ;
124: x_msg_data := l_msg_data ;
125:
126: EXCEPTION
127: WHEN FND_API.G_EXC_ERROR THEN
128: ROLLBACK TO create_txd_qte_ant_bill;
129: x_return_status := FND_API.G_RET_STS_ERROR;
130: x_msg_count := l_msg_count ;
131: x_msg_data := l_msg_data ;
125:
126: EXCEPTION
127: WHEN FND_API.G_EXC_ERROR THEN
128: ROLLBACK TO create_txd_qte_ant_bill;
129: x_return_status := FND_API.G_RET_STS_ERROR;
130: x_msg_count := l_msg_count ;
131: x_msg_data := l_msg_data ;
132: FND_MSG_PUB.count_and_get(
133: p_count => x_msg_count
131: x_msg_data := l_msg_data ;
132: FND_MSG_PUB.count_and_get(
133: p_count => x_msg_count
134: ,p_data => x_msg_data);
135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
136: ROLLBACK TO create_txd_qte_ant_bill;
137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
138: x_msg_count := l_msg_count ;
139: x_msg_data := l_msg_data ;
133: p_count => x_msg_count
134: ,p_data => x_msg_data);
135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
136: ROLLBACK TO create_txd_qte_ant_bill;
137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
138: x_msg_count := l_msg_count ;
139: x_msg_data := l_msg_data ;
140: FND_MSG_PUB.count_and_get(
141: p_count => x_msg_count
141: p_count => x_msg_count
142: ,p_data => x_msg_data);
143: WHEN OTHERS THEN
144: ROLLBACK TO create_txd_qte_ant_bill;
145: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
146: x_msg_count := l_msg_count ;
147: x_msg_data := l_msg_data ;
148: FND_MSG_PUB.ADD_EXC_MSG('OKL_TXD_QTE_ANTCPT_BILL_PUB','create_txd_qte_ant_bill');
149: FND_MSG_PUB.count_and_get(
161: ,x_qabv_rec OUT NOCOPY qabv_rec_type) IS
162:
163: l_api_version NUMBER ;
164: l_init_msg_list VARCHAR2(3);
165: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
166: l_msg_count NUMBER;
167: l_msg_data VARCHAR2(2000);
168: lp_qabv_rec qabv_rec_type;
169: lx_qabv_rec qabv_rec_type;
185: ,x_msg_data => l_msg_data
186: ,p_qabv_rec => lp_qabv_rec
187: ,x_qabv_rec => lx_qabv_rec);
188:
189: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
190: RAISE FND_API.G_EXC_ERROR;
191: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
193: END IF;
186: ,p_qabv_rec => lp_qabv_rec
187: ,x_qabv_rec => lx_qabv_rec);
188:
189: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
190: RAISE FND_API.G_EXC_ERROR;
191: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
193: END IF;
194:
187: ,x_qabv_rec => lx_qabv_rec);
188:
189: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
190: RAISE FND_API.G_EXC_ERROR;
191: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
193: END IF;
194:
195: --Assign value to OUT variables
188:
189: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
190: RAISE FND_API.G_EXC_ERROR;
191: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
193: END IF;
194:
195: --Assign value to OUT variables
196: x_qabv_rec := lx_qabv_rec;
198: x_msg_count := l_msg_count ;
199: x_msg_data := l_msg_data ;
200:
201: EXCEPTION
202: WHEN FND_API.G_EXC_ERROR THEN
203: ROLLBACK TO update_txd_qte_ant_bill;
204: x_return_status := FND_API.G_RET_STS_ERROR;
205: x_msg_count := l_msg_count ;
206: x_msg_data := l_msg_data ;
200:
201: EXCEPTION
202: WHEN FND_API.G_EXC_ERROR THEN
203: ROLLBACK TO update_txd_qte_ant_bill;
204: x_return_status := FND_API.G_RET_STS_ERROR;
205: x_msg_count := l_msg_count ;
206: x_msg_data := l_msg_data ;
207: FND_MSG_PUB.count_and_get(
208: p_count => x_msg_count
206: x_msg_data := l_msg_data ;
207: FND_MSG_PUB.count_and_get(
208: p_count => x_msg_count
209: ,p_data => x_msg_data);
210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
211: ROLLBACK TO update_txd_qte_ant_bill;
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
213: x_msg_count := l_msg_count ;
214: x_msg_data := l_msg_data ;
208: p_count => x_msg_count
209: ,p_data => x_msg_data);
210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
211: ROLLBACK TO update_txd_qte_ant_bill;
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
213: x_msg_count := l_msg_count ;
214: x_msg_data := l_msg_data ;
215: FND_MSG_PUB.count_and_get(
216: p_count => x_msg_count
216: p_count => x_msg_count
217: ,p_data => x_msg_data);
218: WHEN OTHERS THEN
219: ROLLBACK TO update_txd_qte_ant_bill;
220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
221: x_msg_count := l_msg_count ;
222: x_msg_data := l_msg_data ;
223: FND_MSG_PUB.ADD_EXC_MSG('OKL_TXD_QTE_ANTCPT_BILL_PUB','update_txd_qte_ant_bill');
224: FND_MSG_PUB.count_and_get(
236: ,x_qabv_tbl OUT NOCOPY qabv_tbl_type) IS
237:
238: l_api_version NUMBER ;
239: l_init_msg_list VARCHAR2(3);
240: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
241: l_msg_count NUMBER;
242: l_msg_data VARCHAR2(2000);
243: lp_qabv_tbl qabv_tbl_type;
244: lx_qabv_tbl qabv_tbl_type;
260: ,x_msg_data => l_msg_data
261: ,p_qabv_tbl => lp_qabv_tbl
262: ,x_qabv_tbl => lx_qabv_tbl);
263:
264: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
265: RAISE FND_API.G_EXC_ERROR;
266: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
267: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
268: END IF;
261: ,p_qabv_tbl => lp_qabv_tbl
262: ,x_qabv_tbl => lx_qabv_tbl);
263:
264: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
265: RAISE FND_API.G_EXC_ERROR;
266: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
267: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
268: END IF;
269:
262: ,x_qabv_tbl => lx_qabv_tbl);
263:
264: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
265: RAISE FND_API.G_EXC_ERROR;
266: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
267: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
268: END IF;
269:
270: --Assign value to OUT variables
263:
264: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
265: RAISE FND_API.G_EXC_ERROR;
266: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
267: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
268: END IF;
269:
270: --Assign value to OUT variables
271: x_qabv_tbl := lx_qabv_tbl;
273: x_msg_count := l_msg_count ;
274: x_msg_data := l_msg_data ;
275:
276: EXCEPTION
277: WHEN FND_API.G_EXC_ERROR THEN
278: ROLLBACK TO update_txd_qte_ant_bill;
279: x_return_status := FND_API.G_RET_STS_ERROR;
280: x_msg_count := l_msg_count ;
281: x_msg_data := l_msg_data ;
275:
276: EXCEPTION
277: WHEN FND_API.G_EXC_ERROR THEN
278: ROLLBACK TO update_txd_qte_ant_bill;
279: x_return_status := FND_API.G_RET_STS_ERROR;
280: x_msg_count := l_msg_count ;
281: x_msg_data := l_msg_data ;
282: FND_MSG_PUB.count_and_get(
283: p_count => x_msg_count
281: x_msg_data := l_msg_data ;
282: FND_MSG_PUB.count_and_get(
283: p_count => x_msg_count
284: ,p_data => x_msg_data);
285: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
286: ROLLBACK TO update_txd_qte_ant_bill;
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
288: x_msg_count := l_msg_count ;
289: x_msg_data := l_msg_data ;
283: p_count => x_msg_count
284: ,p_data => x_msg_data);
285: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
286: ROLLBACK TO update_txd_qte_ant_bill;
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
288: x_msg_count := l_msg_count ;
289: x_msg_data := l_msg_data ;
290: FND_MSG_PUB.count_and_get(
291: p_count => x_msg_count
291: p_count => x_msg_count
292: ,p_data => x_msg_data);
293: WHEN OTHERS THEN
294: ROLLBACK TO update_txd_qte_ant_bill;
295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
296: x_msg_count := l_msg_count ;
297: x_msg_data := l_msg_data ;
298: FND_MSG_PUB.ADD_EXC_MSG('OKL_TXD_QTE_ANTCPT_BILL_PUB','update_txd_qte_ant_bill');
299: FND_MSG_PUB.count_and_get(
310: ,p_qabv_rec IN qabv_rec_type) IS
311:
312: l_api_version NUMBER ;
313: l_init_msg_list VARCHAR2(3);
314: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
315: l_msg_count NUMBER;
316: l_msg_data VARCHAR2(2000);
317: lp_qabv_rec qabv_rec_type;
318:
332: ,x_msg_count => l_msg_count
333: ,x_msg_data => l_msg_data
334: ,p_qabv_rec => lp_qabv_rec);
335:
336: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
337: RAISE FND_API.G_EXC_ERROR;
338: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
339: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
340: END IF;
333: ,x_msg_data => l_msg_data
334: ,p_qabv_rec => lp_qabv_rec);
335:
336: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
337: RAISE FND_API.G_EXC_ERROR;
338: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
339: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
340: END IF;
341:
334: ,p_qabv_rec => lp_qabv_rec);
335:
336: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
337: RAISE FND_API.G_EXC_ERROR;
338: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
339: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
340: END IF;
341:
342: --Assign value to OUT variables
335:
336: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
337: RAISE FND_API.G_EXC_ERROR;
338: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
339: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
340: END IF;
341:
342: --Assign value to OUT variables
343: x_return_status := l_return_status ;
344: x_msg_count := l_msg_count ;
345: x_msg_data := l_msg_data ;
346:
347: EXCEPTION
348: WHEN FND_API.G_EXC_ERROR THEN
349: ROLLBACK TO lock_txd_qte_ant_bill;
350: x_return_status := FND_API.G_RET_STS_ERROR;
351: x_msg_count := l_msg_count ;
352: x_msg_data := l_msg_data ;
346:
347: EXCEPTION
348: WHEN FND_API.G_EXC_ERROR THEN
349: ROLLBACK TO lock_txd_qte_ant_bill;
350: x_return_status := FND_API.G_RET_STS_ERROR;
351: x_msg_count := l_msg_count ;
352: x_msg_data := l_msg_data ;
353: FND_MSG_PUB.count_and_get(
354: p_count => x_msg_count
352: x_msg_data := l_msg_data ;
353: FND_MSG_PUB.count_and_get(
354: p_count => x_msg_count
355: ,p_data => x_msg_data);
356: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
357: ROLLBACK TO lock_txd_qte_ant_bill;
358: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
359: x_msg_count := l_msg_count ;
360: x_msg_data := l_msg_data ;
354: p_count => x_msg_count
355: ,p_data => x_msg_data);
356: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
357: ROLLBACK TO lock_txd_qte_ant_bill;
358: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
359: x_msg_count := l_msg_count ;
360: x_msg_data := l_msg_data ;
361: FND_MSG_PUB.count_and_get(
362: p_count => x_msg_count
362: p_count => x_msg_count
363: ,p_data => x_msg_data);
364: WHEN OTHERS THEN
365: ROLLBACK TO lock_txd_qte_ant_bill;
366: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
367: x_msg_count := l_msg_count ;
368: x_msg_data := l_msg_data ;
369: FND_MSG_PUB.ADD_EXC_MSG('OKL_TXD_QTE_ANTCPT_BILL_PUB','lock_txd_qte_ant_bill');
370: FND_MSG_PUB.count_and_get(
381: ,p_qabv_tbl IN qabv_tbl_type) IS
382:
383: l_api_version NUMBER ;
384: l_init_msg_list VARCHAR2(3);
385: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
386: l_msg_count NUMBER;
387: l_msg_data VARCHAR2(2000);
388: lp_qabv_tbl qabv_tbl_type;
389:
403: ,x_msg_count => l_msg_count
404: ,x_msg_data => l_msg_data
405: ,p_qabv_tbl => lp_qabv_tbl);
406:
407: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
408: RAISE FND_API.G_EXC_ERROR;
409: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
411: END IF;
404: ,x_msg_data => l_msg_data
405: ,p_qabv_tbl => lp_qabv_tbl);
406:
407: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
408: RAISE FND_API.G_EXC_ERROR;
409: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
411: END IF;
412:
405: ,p_qabv_tbl => lp_qabv_tbl);
406:
407: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
408: RAISE FND_API.G_EXC_ERROR;
409: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
411: END IF;
412:
413: --Assign value to OUT variables
406:
407: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
408: RAISE FND_API.G_EXC_ERROR;
409: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
411: END IF;
412:
413: --Assign value to OUT variables
414: x_return_status := l_return_status ;
415: x_msg_count := l_msg_count ;
416: x_msg_data := l_msg_data ;
417:
418: EXCEPTION
419: WHEN FND_API.G_EXC_ERROR THEN
420: ROLLBACK TO lock_txd_qte_ant_bill;
421: x_return_status := FND_API.G_RET_STS_ERROR;
422: x_msg_count := l_msg_count ;
423: x_msg_data := l_msg_data ;
417:
418: EXCEPTION
419: WHEN FND_API.G_EXC_ERROR THEN
420: ROLLBACK TO lock_txd_qte_ant_bill;
421: x_return_status := FND_API.G_RET_STS_ERROR;
422: x_msg_count := l_msg_count ;
423: x_msg_data := l_msg_data ;
424: FND_MSG_PUB.count_and_get(
425: p_count => x_msg_count
423: x_msg_data := l_msg_data ;
424: FND_MSG_PUB.count_and_get(
425: p_count => x_msg_count
426: ,p_data => x_msg_data);
427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
428: ROLLBACK TO lock_txd_qte_ant_bill;
429: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
430: x_msg_count := l_msg_count ;
431: x_msg_data := l_msg_data ;
425: p_count => x_msg_count
426: ,p_data => x_msg_data);
427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
428: ROLLBACK TO lock_txd_qte_ant_bill;
429: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
430: x_msg_count := l_msg_count ;
431: x_msg_data := l_msg_data ;
432: FND_MSG_PUB.count_and_get(
433: p_count => x_msg_count
433: p_count => x_msg_count
434: ,p_data => x_msg_data);
435: WHEN OTHERS THEN
436: ROLLBACK TO lock_txd_qte_ant_bill;
437: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
438: x_msg_count := l_msg_count ;
439: x_msg_data := l_msg_data ;
440: FND_MSG_PUB.ADD_EXC_MSG('OKL_TXD_QTE_ANTCPT_BILL_PUB','lock_txd_qte_ant_bill');
441: FND_MSG_PUB.count_and_get(
452: ,p_qabv_rec IN qabv_rec_type) IS
453:
454: l_api_version NUMBER ;
455: l_init_msg_list VARCHAR2(3);
456: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
457: l_msg_count NUMBER;
458: l_msg_data VARCHAR2(2000);
459: lp_qabv_rec qabv_rec_type;
460:
474: ,x_msg_count => l_msg_count
475: ,x_msg_data => l_msg_data
476: ,p_qabv_rec => lp_qabv_rec);
477:
478: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
479: RAISE FND_API.G_EXC_ERROR;
480: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
481: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
482: END IF;
475: ,x_msg_data => l_msg_data
476: ,p_qabv_rec => lp_qabv_rec);
477:
478: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
479: RAISE FND_API.G_EXC_ERROR;
480: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
481: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
482: END IF;
483:
476: ,p_qabv_rec => lp_qabv_rec);
477:
478: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
479: RAISE FND_API.G_EXC_ERROR;
480: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
481: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
482: END IF;
483:
484: --Assign value to OUT variables
477:
478: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
479: RAISE FND_API.G_EXC_ERROR;
480: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
481: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
482: END IF;
483:
484: --Assign value to OUT variables
485: x_return_status := l_return_status ;
486: x_msg_count := l_msg_count ;
487: x_msg_data := l_msg_data ;
488:
489: EXCEPTION
490: WHEN FND_API.G_EXC_ERROR THEN
491: ROLLBACK TO delete_txd_qte_ant_bill;
492: x_return_status := FND_API.G_RET_STS_ERROR;
493: x_msg_count := l_msg_count ;
494: x_msg_data := l_msg_data ;
488:
489: EXCEPTION
490: WHEN FND_API.G_EXC_ERROR THEN
491: ROLLBACK TO delete_txd_qte_ant_bill;
492: x_return_status := FND_API.G_RET_STS_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
494: x_msg_data := l_msg_data ;
495: FND_MSG_PUB.count_and_get(
496: p_count => x_msg_count
497: ,p_data => x_msg_data);
498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
499: ROLLBACK TO delete_txd_qte_ant_bill;
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 ;
496: p_count => x_msg_count
497: ,p_data => x_msg_data);
498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
499: ROLLBACK TO delete_txd_qte_ant_bill;
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.count_and_get(
504: p_count => x_msg_count
504: p_count => x_msg_count
505: ,p_data => x_msg_data);
506: WHEN OTHERS THEN
507: ROLLBACK TO delete_txd_qte_ant_bill;
508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
509: x_msg_count := l_msg_count ;
510: x_msg_data := l_msg_data ;
511: FND_MSG_PUB.ADD_EXC_MSG('OKL_TXD_QTE_ANTCPT_BILL_PUB','delete_txd_qte_ant_bill');
512: FND_MSG_PUB.count_and_get(
523: ,p_qabv_tbl IN qabv_tbl_type) IS
524:
525: l_api_version NUMBER ;
526: l_init_msg_list VARCHAR2(3);
527: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
528: l_msg_count NUMBER;
529: l_msg_data VARCHAR2(2000);
530: lp_qabv_tbl qabv_tbl_type;
531:
545: ,x_msg_count => l_msg_count
546: ,x_msg_data => l_msg_data
547: ,p_qabv_tbl => lp_qabv_tbl);
548:
549: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
550: RAISE FND_API.G_EXC_ERROR;
551: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
553: END IF;
546: ,x_msg_data => l_msg_data
547: ,p_qabv_tbl => lp_qabv_tbl);
548:
549: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
550: RAISE FND_API.G_EXC_ERROR;
551: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
553: END IF;
554:
547: ,p_qabv_tbl => lp_qabv_tbl);
548:
549: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
550: RAISE FND_API.G_EXC_ERROR;
551: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
553: END IF;
554:
555: --Assign value to OUT variables
548:
549: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
550: RAISE FND_API.G_EXC_ERROR;
551: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
553: END IF;
554:
555: --Assign value to OUT variables
556: x_return_status := l_return_status ;
557: x_msg_count := l_msg_count ;
558: x_msg_data := l_msg_data ;
559:
560: EXCEPTION
561: WHEN FND_API.G_EXC_ERROR THEN
562: ROLLBACK TO delete_txd_qte_ant_bill;
563: x_return_status := FND_API.G_RET_STS_ERROR;
564: x_msg_count := l_msg_count ;
565: x_msg_data := l_msg_data ;
559:
560: EXCEPTION
561: WHEN FND_API.G_EXC_ERROR THEN
562: ROLLBACK TO delete_txd_qte_ant_bill;
563: x_return_status := FND_API.G_RET_STS_ERROR;
564: x_msg_count := l_msg_count ;
565: x_msg_data := l_msg_data ;
566: FND_MSG_PUB.count_and_get(
567: p_count => x_msg_count
565: x_msg_data := l_msg_data ;
566: FND_MSG_PUB.count_and_get(
567: p_count => x_msg_count
568: ,p_data => x_msg_data);
569: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
570: ROLLBACK TO delete_txd_qte_ant_bill;
571: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
572: x_msg_count := l_msg_count ;
573: x_msg_data := l_msg_data ;
567: p_count => x_msg_count
568: ,p_data => x_msg_data);
569: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
570: ROLLBACK TO delete_txd_qte_ant_bill;
571: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
572: x_msg_count := l_msg_count ;
573: x_msg_data := l_msg_data ;
574: FND_MSG_PUB.count_and_get(
575: p_count => x_msg_count
575: p_count => x_msg_count
576: ,p_data => x_msg_data);
577: WHEN OTHERS THEN
578: ROLLBACK TO delete_txd_qte_ant_bill;
579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
580: x_msg_count := l_msg_count ;
581: x_msg_data := l_msg_data ;
582: FND_MSG_PUB.ADD_EXC_MSG('OKL_TXD_QTE_ANTCPT_BILL_PUB','delete_txd_qte_ant_bill');
583: FND_MSG_PUB.count_and_get(
594: ,p_qabv_rec IN qabv_rec_type) IS
595:
596: l_api_version NUMBER ;
597: l_init_msg_list VARCHAR2(3);
598: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
599: l_msg_count NUMBER;
600: l_msg_data VARCHAR2(2000);
601: lp_qabv_rec qabv_rec_type;
602:
616: ,x_msg_count => l_msg_count
617: ,x_msg_data => l_msg_data
618: ,p_qabv_rec => lp_qabv_rec);
619:
620: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
621: RAISE FND_API.G_EXC_ERROR;
622: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
624: END IF;
617: ,x_msg_data => l_msg_data
618: ,p_qabv_rec => lp_qabv_rec);
619:
620: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
621: RAISE FND_API.G_EXC_ERROR;
622: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
624: END IF;
625:
618: ,p_qabv_rec => lp_qabv_rec);
619:
620: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
621: RAISE FND_API.G_EXC_ERROR;
622: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
624: END IF;
625:
626: --Assign value to OUT variables
619:
620: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
621: RAISE FND_API.G_EXC_ERROR;
622: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
624: END IF;
625:
626: --Assign value to OUT variables
627: x_return_status := l_return_status ;
628: x_msg_count := l_msg_count ;
629: x_msg_data := l_msg_data ;
630:
631: EXCEPTION
632: WHEN FND_API.G_EXC_ERROR THEN
633: ROLLBACK TO validate_txd_qte_ant_bill;
634: x_return_status := FND_API.G_RET_STS_ERROR;
635: x_msg_count := l_msg_count ;
636: x_msg_data := l_msg_data ;
630:
631: EXCEPTION
632: WHEN FND_API.G_EXC_ERROR THEN
633: ROLLBACK TO validate_txd_qte_ant_bill;
634: x_return_status := FND_API.G_RET_STS_ERROR;
635: x_msg_count := l_msg_count ;
636: x_msg_data := l_msg_data ;
637: FND_MSG_PUB.count_and_get(
638: p_count => x_msg_count
636: x_msg_data := l_msg_data ;
637: FND_MSG_PUB.count_and_get(
638: p_count => x_msg_count
639: ,p_data => x_msg_data);
640: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
641: ROLLBACK TO validate_txd_qte_ant_bill;
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 ;
638: p_count => x_msg_count
639: ,p_data => x_msg_data);
640: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
641: ROLLBACK TO validate_txd_qte_ant_bill;
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.count_and_get(
646: p_count => x_msg_count
646: p_count => x_msg_count
647: ,p_data => x_msg_data);
648: WHEN OTHERS THEN
649: ROLLBACK TO validate_txd_qte_ant_bill;
650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
651: x_msg_count := l_msg_count ;
652: x_msg_data := l_msg_data ;
653: FND_MSG_PUB.ADD_EXC_MSG('OKL_TXD_QTE_ANTCPT_BILL_PUB','validate_txd_qte_ant_bill');
654: FND_MSG_PUB.count_and_get(
665: ,p_qabv_tbl IN qabv_tbl_type) IS
666:
667: l_api_version NUMBER ;
668: l_init_msg_list VARCHAR2(3);
669: l_return_status VARCHAR2(3) := FND_API.G_RET_STS_SUCCESS;
670: l_msg_count NUMBER;
671: l_msg_data VARCHAR2(2000);
672: lp_qabv_tbl qabv_tbl_type;
673:
687: ,x_msg_count => l_msg_count
688: ,x_msg_data => l_msg_data
689: ,p_qabv_tbl => lp_qabv_tbl);
690:
691: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
692: RAISE FND_API.G_EXC_ERROR;
693: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
695: END IF;
688: ,x_msg_data => l_msg_data
689: ,p_qabv_tbl => lp_qabv_tbl);
690:
691: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
692: RAISE FND_API.G_EXC_ERROR;
693: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
695: END IF;
696:
689: ,p_qabv_tbl => lp_qabv_tbl);
690:
691: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
692: RAISE FND_API.G_EXC_ERROR;
693: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
695: END IF;
696:
697: --Assign value to OUT variables
690:
691: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
692: RAISE FND_API.G_EXC_ERROR;
693: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
695: END IF;
696:
697: --Assign value to OUT variables
698: x_return_status := l_return_status ;
699: x_msg_count := l_msg_count ;
700: x_msg_data := l_msg_data ;
701:
702: EXCEPTION
703: WHEN FND_API.G_EXC_ERROR THEN
704: ROLLBACK TO validate_txd_qte_ant_bill;
705: x_return_status := FND_API.G_RET_STS_ERROR;
706: x_msg_count := l_msg_count ;
707: x_msg_data := l_msg_data ;
701:
702: EXCEPTION
703: WHEN FND_API.G_EXC_ERROR THEN
704: ROLLBACK TO validate_txd_qte_ant_bill;
705: x_return_status := FND_API.G_RET_STS_ERROR;
706: x_msg_count := l_msg_count ;
707: x_msg_data := l_msg_data ;
708: FND_MSG_PUB.count_and_get(
709: p_count => x_msg_count
707: x_msg_data := l_msg_data ;
708: FND_MSG_PUB.count_and_get(
709: p_count => x_msg_count
710: ,p_data => x_msg_data);
711: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
712: ROLLBACK TO validate_txd_qte_ant_bill;
713: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
714: x_msg_count := l_msg_count ;
715: x_msg_data := l_msg_data ;
709: p_count => x_msg_count
710: ,p_data => x_msg_data);
711: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
712: ROLLBACK TO validate_txd_qte_ant_bill;
713: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
714: x_msg_count := l_msg_count ;
715: x_msg_data := l_msg_data ;
716: FND_MSG_PUB.count_and_get(
717: p_count => x_msg_count
717: p_count => x_msg_count
718: ,p_data => x_msg_data);
719: WHEN OTHERS THEN
720: ROLLBACK TO validate_txd_qte_ant_bill;
721: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
722: x_msg_count := l_msg_count ;
723: x_msg_data := l_msg_data ;
724: FND_MSG_PUB.ADD_EXC_MSG('OKL_TXD_QTE_ANTCPT_BILL_PUB','validate_txd_qte_ant_bill');
725: FND_MSG_PUB.count_and_get(