24: SAVEPOINT exclusion_hist_insert;
25:
26:
27: l_api_version := p_api_version ;
28: l_init_msg_list := FND_API.G_FALSE ;
29: l_return_status := x_return_status ;
30: l_msg_count := x_msg_count ;
31: l_msg_data := x_msg_data ;
32: lp_iehv_rec := p_iehv_rec;
41: ,x_msg_count => l_msg_count
42: ,x_return_status => l_return_status
43: ,p_iehv_rec => lp_iehv_rec
44: ,x_iehv_rec => lx_iehv_rec) ;
45: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
46: RAISE FND_API.G_EXC_ERROR;
47: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
48: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
49: END IF;
42: ,x_return_status => l_return_status
43: ,p_iehv_rec => lp_iehv_rec
44: ,x_iehv_rec => lx_iehv_rec) ;
45: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
46: RAISE FND_API.G_EXC_ERROR;
47: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
48: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
49: END IF;
50:
43: ,p_iehv_rec => lp_iehv_rec
44: ,x_iehv_rec => lx_iehv_rec) ;
45: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
46: RAISE FND_API.G_EXC_ERROR;
47: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
48: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
49: END IF;
50:
51: --Copy value of OUT record type variable in the IN record type
44: ,x_iehv_rec => lx_iehv_rec) ;
45: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
46: RAISE FND_API.G_EXC_ERROR;
47: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
48: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
49: END IF;
50:
51: --Copy value of OUT record type variable in the IN record type
52: lp_iehv_rec := lx_iehv_rec;
64: ,x_msg_count => l_msg_count
65: ,x_return_status => l_return_status
66: ,p_iehv_rec => lp_iehv_rec
67: ,x_iehv_rec => lx_iehv_rec );
68: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
69: RAISE FND_API.G_EXC_ERROR;
70: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
71: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
72: END IF;
65: ,x_return_status => l_return_status
66: ,p_iehv_rec => lp_iehv_rec
67: ,x_iehv_rec => lx_iehv_rec );
68: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
69: RAISE FND_API.G_EXC_ERROR;
70: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
71: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
72: END IF;
73:
66: ,p_iehv_rec => lp_iehv_rec
67: ,x_iehv_rec => lx_iehv_rec );
68: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
69: RAISE FND_API.G_EXC_ERROR;
70: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
71: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
72: END IF;
73:
74: --Copy value of OUT variable in the IN record type
67: ,x_iehv_rec => lx_iehv_rec );
68: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
69: RAISE FND_API.G_EXC_ERROR;
70: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
71: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
72: END IF;
73:
74: --Copy value of OUT variable in the IN record type
75: lp_iehv_rec := lx_iehv_rec;
85: ,l_msg_data
86: ,lp_iehv_rec
87: ,lx_iehv_rec);
88:
89: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
90: RAISE FND_API.G_EXC_ERROR;
91: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
93: END IF;
86: ,lp_iehv_rec
87: ,lx_iehv_rec);
88:
89: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
90: RAISE FND_API.G_EXC_ERROR;
91: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
93: END IF;
94:
87: ,lx_iehv_rec);
88:
89: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
90: RAISE FND_API.G_EXC_ERROR;
91: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
93: END IF;
94:
95: --Copy value of OUT variable in the IN record type
88:
89: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
90: RAISE FND_API.G_EXC_ERROR;
91: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
93: END IF;
94:
95: --Copy value of OUT variable in the IN record type
96: lp_iehv_rec := lx_iehv_rec;
103: ,x_msg_data => l_msg_data
104: ,x_msg_count => l_msg_count
105: ,x_return_status => l_return_status
106: ,p_iehv_rec => lp_iehv_rec);
107: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
108: RAISE FND_API.G_EXC_ERROR;
109: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
111: END IF;
104: ,x_msg_count => l_msg_count
105: ,x_return_status => l_return_status
106: ,p_iehv_rec => lp_iehv_rec);
107: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
108: RAISE FND_API.G_EXC_ERROR;
109: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
111: END IF;
112: END IF;
105: ,x_return_status => l_return_status
106: ,p_iehv_rec => lp_iehv_rec);
107: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
108: RAISE FND_API.G_EXC_ERROR;
109: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
111: END IF;
112: END IF;
113: --Vertical post processing user hook call end
106: ,p_iehv_rec => lp_iehv_rec);
107: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
108: RAISE FND_API.G_EXC_ERROR;
109: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
111: END IF;
112: END IF;
113: --Vertical post processing user hook call end
114:
120: ,x_msg_data => l_msg_data
121: ,x_msg_count => l_msg_count
122: ,x_return_status => l_return_status
123: ,p_iehv_rec => lp_iehv_rec);
124: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
125: RAISE FND_API.G_EXC_ERROR;
126: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
127: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
128: END IF;
121: ,x_msg_count => l_msg_count
122: ,x_return_status => l_return_status
123: ,p_iehv_rec => lp_iehv_rec);
124: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
125: RAISE FND_API.G_EXC_ERROR;
126: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
127: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
128: END IF;
129: END IF;
122: ,x_return_status => l_return_status
123: ,p_iehv_rec => lp_iehv_rec);
124: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
125: RAISE FND_API.G_EXC_ERROR;
126: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
127: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
128: END IF;
129: END IF;
130: --Customer post processing user hook call end
123: ,p_iehv_rec => lp_iehv_rec);
124: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
125: RAISE FND_API.G_EXC_ERROR;
126: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
127: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
128: END IF;
129: END IF;
130: --Customer post processing user hook call end
131: */
137: x_msg_data := l_msg_data ;
138:
139: EXCEPTION
140:
141: WHEN FND_API.G_EXC_ERROR THEN
142: ROLLBACK TO exclusion_hist_insert;
143: x_return_status := FND_API.G_RET_STS_ERROR;
144: x_msg_count := l_msg_count ;
145: x_msg_data := l_msg_data ;
139: EXCEPTION
140:
141: WHEN FND_API.G_EXC_ERROR THEN
142: ROLLBACK TO exclusion_hist_insert;
143: x_return_status := FND_API.G_RET_STS_ERROR;
144: x_msg_count := l_msg_count ;
145: x_msg_data := l_msg_data ;
146: FND_MSG_PUB.count_and_get(
147: p_count => x_msg_count
145: x_msg_data := l_msg_data ;
146: FND_MSG_PUB.count_and_get(
147: p_count => x_msg_count
148: ,p_data => x_msg_data);
149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
150: ROLLBACK TO exclusion_hist_insert;
151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
152: x_msg_count := l_msg_count ;
153: x_msg_data := l_msg_data ;
147: p_count => x_msg_count
148: ,p_data => x_msg_data);
149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
150: ROLLBACK TO exclusion_hist_insert;
151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
152: x_msg_count := l_msg_count ;
153: x_msg_data := l_msg_data ;
154: FND_MSG_PUB.count_and_get(
155: p_count => x_msg_count
155: p_count => x_msg_count
156: ,p_data => x_msg_data);
157: WHEN OTHERS THEN
158: ROLLBACK TO exclusion_hist_insert;
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
160: x_msg_count := l_msg_count ;
161: x_msg_data := l_msg_data ;
162: FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','insert_exclusion_hist');
163: FND_MSG_PUB.count_and_get(
187: SAVEPOINT exclusion_hist_insert;
188:
189:
190: l_api_version := p_api_version ;
191: l_init_msg_list := FND_API.G_FALSE ;
192: l_return_status := x_return_status ;
193: l_msg_count := x_msg_count ;
194: l_msg_data := x_msg_data ;
195: lp_iehv_tbl := p_iehv_tbl;
204: ,x_msg_count => l_msg_count
205: ,x_return_status => l_return_status
206: ,p_iehv_tbl => lp_iehv_tbl
207: ,x_iehv_tbl => lx_iehv_tbl);
208: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
209: RAISE FND_API.G_EXC_ERROR;
210: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
212: END IF;
205: ,x_return_status => l_return_status
206: ,p_iehv_tbl => lp_iehv_tbl
207: ,x_iehv_tbl => lx_iehv_tbl);
208: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
209: RAISE FND_API.G_EXC_ERROR;
210: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
212: END IF;
213:
206: ,p_iehv_tbl => lp_iehv_tbl
207: ,x_iehv_tbl => lx_iehv_tbl);
208: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
209: RAISE FND_API.G_EXC_ERROR;
210: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
212: END IF;
213:
214: --Copy value of OUT variable in the IN record type
207: ,x_iehv_tbl => lx_iehv_tbl);
208: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
209: RAISE FND_API.G_EXC_ERROR;
210: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
212: END IF;
213:
214: --Copy value of OUT variable in the IN record type
215: lp_iehv_tbl := lx_iehv_tbl;
225: ,x_msg_count => l_msg_count
226: ,x_return_status => l_return_status
227: ,p_iehv_tbl => lp_iehv_tbl
228: ,x_iehv_tbl => lx_iehv_tbl);
229: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
230: RAISE FND_API.G_EXC_ERROR;
231: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
232: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
233: END IF;
226: ,x_return_status => l_return_status
227: ,p_iehv_tbl => lp_iehv_tbl
228: ,x_iehv_tbl => lx_iehv_tbl);
229: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
230: RAISE FND_API.G_EXC_ERROR;
231: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
232: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
233: END IF;
234:
227: ,p_iehv_tbl => lp_iehv_tbl
228: ,x_iehv_tbl => lx_iehv_tbl);
229: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
230: RAISE FND_API.G_EXC_ERROR;
231: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
232: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
233: END IF;
234:
235: --Copy value of OUT variable in the IN record type
228: ,x_iehv_tbl => lx_iehv_tbl);
229: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
230: RAISE FND_API.G_EXC_ERROR;
231: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
232: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
233: END IF;
234:
235: --Copy value of OUT variable in the IN record type
236: lp_iehv_tbl := lx_iehv_tbl;
246: ,l_msg_data
247: ,lp_iehv_tbl
248: ,lx_iehv_tbl);
249:
250: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
251: RAISE FND_API.G_EXC_ERROR;
252: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
254: END IF;
247: ,lp_iehv_tbl
248: ,lx_iehv_tbl);
249:
250: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
251: RAISE FND_API.G_EXC_ERROR;
252: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
254: END IF;
255:
248: ,lx_iehv_tbl);
249:
250: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
251: RAISE FND_API.G_EXC_ERROR;
252: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
254: END IF;
255:
256: --Copy value of OUT variable in the IN record type
249:
250: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
251: RAISE FND_API.G_EXC_ERROR;
252: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
254: END IF;
255:
256: --Copy value of OUT variable in the IN record type
257: lp_iehv_tbl := lx_iehv_tbl;
264: ,x_msg_data => l_msg_data
265: ,x_msg_count => l_msg_count
266: ,x_return_status => l_return_status
267: ,p_iehv_tbl => lp_iehv_tbl) ;
268: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
269: RAISE FND_API.G_EXC_ERROR;
270: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
271: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
272: END IF;
265: ,x_msg_count => l_msg_count
266: ,x_return_status => l_return_status
267: ,p_iehv_tbl => lp_iehv_tbl) ;
268: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
269: RAISE FND_API.G_EXC_ERROR;
270: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
271: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
272: END IF;
273: END IF;
266: ,x_return_status => l_return_status
267: ,p_iehv_tbl => lp_iehv_tbl) ;
268: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
269: RAISE FND_API.G_EXC_ERROR;
270: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
271: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
272: END IF;
273: END IF;
274: --Vertical post-processing user hook call end
267: ,p_iehv_tbl => lp_iehv_tbl) ;
268: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
269: RAISE FND_API.G_EXC_ERROR;
270: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
271: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
272: END IF;
273: END IF;
274: --Vertical post-processing user hook call end
275:
280: ,x_msg_data => l_msg_data
281: ,x_msg_count => l_msg_count
282: ,x_return_status => l_return_status
283: ,p_iehv_tbl => lp_iehv_tbl) ;
284: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
285: RAISE FND_API.G_EXC_ERROR;
286: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
288: END IF;
281: ,x_msg_count => l_msg_count
282: ,x_return_status => l_return_status
283: ,p_iehv_tbl => lp_iehv_tbl) ;
284: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
285: RAISE FND_API.G_EXC_ERROR;
286: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
288: END IF;
289: END IF;
282: ,x_return_status => l_return_status
283: ,p_iehv_tbl => lp_iehv_tbl) ;
284: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
285: RAISE FND_API.G_EXC_ERROR;
286: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
288: END IF;
289: END IF;
290: --Customer post-processing user hook call end
283: ,p_iehv_tbl => lp_iehv_tbl) ;
284: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
285: RAISE FND_API.G_EXC_ERROR;
286: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
288: END IF;
289: END IF;
290: --Customer post-processing user hook call end
291: */
298:
299:
300: EXCEPTION
301:
302: WHEN FND_API.G_EXC_ERROR THEN
303: ROLLBACK TO exclusion_hist_insert;
304: x_return_status := FND_API.G_RET_STS_ERROR;
305: x_msg_count := l_msg_count ;
306: x_msg_data := l_msg_data ;
300: EXCEPTION
301:
302: WHEN FND_API.G_EXC_ERROR THEN
303: ROLLBACK TO exclusion_hist_insert;
304: x_return_status := FND_API.G_RET_STS_ERROR;
305: x_msg_count := l_msg_count ;
306: x_msg_data := l_msg_data ;
307: FND_MSG_PUB.count_and_get(
308: p_count => x_msg_count
306: x_msg_data := l_msg_data ;
307: FND_MSG_PUB.count_and_get(
308: p_count => x_msg_count
309: ,p_data => x_msg_data);
310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
311: ROLLBACK TO exclusion_hist_insert;
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: x_msg_count := l_msg_count ;
314: x_msg_data := l_msg_data ;
308: p_count => x_msg_count
309: ,p_data => x_msg_data);
310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
311: ROLLBACK TO exclusion_hist_insert;
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: x_msg_count := l_msg_count ;
314: x_msg_data := l_msg_data ;
315: FND_MSG_PUB.count_and_get(
316: p_count => x_msg_count
316: p_count => x_msg_count
317: ,p_data => x_msg_data);
318: WHEN OTHERS THEN
319: ROLLBACK TO exclusion_hist_insert;
320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
321: x_msg_count := l_msg_count ;
322: x_msg_data := l_msg_data ;
323: FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','insert_exclusion_hist');
324: FND_MSG_PUB.count_and_get(
342: x_msg_count,
343: x_msg_data,
344: p_iehv_rec);
345:
346: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
347: RAISE FND_API.G_EXC_ERROR;
348: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
349: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
350: END IF;
343: x_msg_data,
344: p_iehv_rec);
345:
346: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
347: RAISE FND_API.G_EXC_ERROR;
348: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
349: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
350: END IF;
351:
344: p_iehv_rec);
345:
346: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
347: RAISE FND_API.G_EXC_ERROR;
348: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
349: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
350: END IF;
351:
352:
345:
346: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
347: RAISE FND_API.G_EXC_ERROR;
348: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
349: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
350: END IF;
351:
352:
353: EXCEPTION
351:
352:
353: EXCEPTION
354:
355: WHEN FND_API.G_EXC_ERROR THEN
356: FND_MSG_PUB.count_and_get(
357: p_count => x_msg_count
358: ,p_data => x_msg_data);
359: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
355: WHEN FND_API.G_EXC_ERROR THEN
356: FND_MSG_PUB.count_and_get(
357: p_count => x_msg_count
358: ,p_data => x_msg_data);
359: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
360: FND_MSG_PUB.count_and_get(
361: p_count => x_msg_count
362: ,p_data => x_msg_data);
363: WHEN OTHERS THEN
360: FND_MSG_PUB.count_and_get(
361: p_count => x_msg_count
362: ,p_data => x_msg_data);
363: WHEN OTHERS THEN
364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
365: FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','lock_exclusion_hist');
366: FND_MSG_PUB.count_and_get(
367: p_count => x_msg_count
368: ,p_data => x_msg_data);
384: x_msg_count,
385: x_msg_data,
386: p_iehv_tbl);
387:
388: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
389: RAISE FND_API.G_EXC_ERROR;
390: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
391: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
392: END IF;
385: x_msg_data,
386: p_iehv_tbl);
387:
388: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
389: RAISE FND_API.G_EXC_ERROR;
390: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
391: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
392: END IF;
393:
386: p_iehv_tbl);
387:
388: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
389: RAISE FND_API.G_EXC_ERROR;
390: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
391: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
392: END IF;
393:
394:
387:
388: IF ( x_return_status = FND_API.G_RET_STS_ERROR ) THEN
389: RAISE FND_API.G_EXC_ERROR;
390: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
391: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
392: END IF;
393:
394:
395: EXCEPTION
393:
394:
395: EXCEPTION
396:
397: WHEN FND_API.G_EXC_ERROR THEN
398: FND_MSG_PUB.count_and_get(
399: p_count => x_msg_count
400: ,p_data => x_msg_data);
401: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
397: WHEN FND_API.G_EXC_ERROR THEN
398: FND_MSG_PUB.count_and_get(
399: p_count => x_msg_count
400: ,p_data => x_msg_data);
401: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
402: FND_MSG_PUB.count_and_get(
403: p_count => x_msg_count
404: ,p_data => x_msg_data);
405: WHEN OTHERS THEN
402: FND_MSG_PUB.count_and_get(
403: p_count => x_msg_count
404: ,p_data => x_msg_data);
405: WHEN OTHERS THEN
406: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
407: FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','lock_exclusion_hist');
408: FND_MSG_PUB.count_and_get(
409: p_count => x_msg_count
410: ,p_data => x_msg_data);
432: SAVEPOINT exclusion_hist_update;
433:
434:
435: l_api_version := p_api_version ;
436: l_init_msg_list := FND_API.G_FALSE ;
437: l_return_status := x_return_status ;
438: l_msg_count := x_msg_count ;
439: l_msg_data := x_msg_data ;
440: lp_iehv_rec := p_iehv_rec;
449: ,x_msg_count => l_msg_count
450: ,x_return_status => l_return_status
451: ,p_iehv_rec => lp_iehv_rec
452: ,x_iehv_rec => lx_iehv_rec) ;
453: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
454: RAISE FND_API.G_EXC_ERROR;
455: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: END IF;
450: ,x_return_status => l_return_status
451: ,p_iehv_rec => lp_iehv_rec
452: ,x_iehv_rec => lx_iehv_rec) ;
453: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
454: RAISE FND_API.G_EXC_ERROR;
455: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: END IF;
458:
451: ,p_iehv_rec => lp_iehv_rec
452: ,x_iehv_rec => lx_iehv_rec) ;
453: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
454: RAISE FND_API.G_EXC_ERROR;
455: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: END IF;
458:
459: --Copy value of OUT variable in the IN record type
452: ,x_iehv_rec => lx_iehv_rec) ;
453: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
454: RAISE FND_API.G_EXC_ERROR;
455: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: END IF;
458:
459: --Copy value of OUT variable in the IN record type
460: lp_iehv_rec := lx_iehv_rec;
471: ,x_msg_count => l_msg_count
472: ,x_return_status => l_return_status
473: ,p_iehv_rec => lp_iehv_rec
474: ,x_iehv_rec => lx_iehv_rec) ;
475: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
476: RAISE FND_API.G_EXC_ERROR;
477: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
479: END IF;
472: ,x_return_status => l_return_status
473: ,p_iehv_rec => lp_iehv_rec
474: ,x_iehv_rec => lx_iehv_rec) ;
475: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
476: RAISE FND_API.G_EXC_ERROR;
477: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
479: END IF;
480:
473: ,p_iehv_rec => lp_iehv_rec
474: ,x_iehv_rec => lx_iehv_rec) ;
475: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
476: RAISE FND_API.G_EXC_ERROR;
477: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
479: END IF;
480:
481: --Copy value of OUT variable in the IN record type
474: ,x_iehv_rec => lx_iehv_rec) ;
475: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
476: RAISE FND_API.G_EXC_ERROR;
477: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
478: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
479: END IF;
480:
481: --Copy value of OUT variable in the IN record type
482: lp_iehv_rec := lx_iehv_rec;
492: ,l_msg_data
493: ,lp_iehv_rec
494: ,lx_iehv_rec);
495:
496: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
497: RAISE FND_API.G_EXC_ERROR;
498: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
493: ,lp_iehv_rec
494: ,lx_iehv_rec);
495:
496: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
497: RAISE FND_API.G_EXC_ERROR;
498: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
501:
494: ,lx_iehv_rec);
495:
496: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
497: RAISE FND_API.G_EXC_ERROR;
498: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
501:
502: --Copy value of OUT variable in the IN record type
495:
496: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
497: RAISE FND_API.G_EXC_ERROR;
498: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
501:
502: --Copy value of OUT variable in the IN record type
503: lp_iehv_rec := lx_iehv_rec;
509: ,x_msg_data => l_msg_data
510: ,x_msg_count => l_msg_count
511: ,x_return_status => l_return_status
512: ,p_iehv_rec => lp_iehv_rec) ;
513: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
514: RAISE FND_API.G_EXC_ERROR;
515: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
517: END IF;
510: ,x_msg_count => l_msg_count
511: ,x_return_status => l_return_status
512: ,p_iehv_rec => lp_iehv_rec) ;
513: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
514: RAISE FND_API.G_EXC_ERROR;
515: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
517: END IF;
518: END IF;
511: ,x_return_status => l_return_status
512: ,p_iehv_rec => lp_iehv_rec) ;
513: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
514: RAISE FND_API.G_EXC_ERROR;
515: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
517: END IF;
518: END IF;
519: --Vertical post-processing user hook call end
512: ,p_iehv_rec => lp_iehv_rec) ;
513: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
514: RAISE FND_API.G_EXC_ERROR;
515: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
517: END IF;
518: END IF;
519: --Vertical post-processing user hook call end
520:
526: ,x_msg_data => l_msg_data
527: ,x_msg_count => l_msg_count
528: ,x_return_status => l_return_status
529: ,p_iehv_rec => lp_iehv_rec) ;
530: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
531: RAISE FND_API.G_EXC_ERROR;
532: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
534: END IF;
527: ,x_msg_count => l_msg_count
528: ,x_return_status => l_return_status
529: ,p_iehv_rec => lp_iehv_rec) ;
530: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
531: RAISE FND_API.G_EXC_ERROR;
532: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
534: END IF;
535: END IF;
528: ,x_return_status => l_return_status
529: ,p_iehv_rec => lp_iehv_rec) ;
530: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
531: RAISE FND_API.G_EXC_ERROR;
532: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
534: END IF;
535: END IF;
536: --Customer post-processing user hook call end
529: ,p_iehv_rec => lp_iehv_rec) ;
530: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
531: RAISE FND_API.G_EXC_ERROR;
532: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
534: END IF;
535: END IF;
536: --Customer post-processing user hook call end
537: */
543:
544:
545: EXCEPTION
546:
547: WHEN FND_API.G_EXC_ERROR THEN
548: ROLLBACK TO exclusion_hist_update;
549: x_return_status := FND_API.G_RET_STS_ERROR;
550: x_msg_count := l_msg_count ;
551: x_msg_data := l_msg_data ;
545: EXCEPTION
546:
547: WHEN FND_API.G_EXC_ERROR THEN
548: ROLLBACK TO exclusion_hist_update;
549: x_return_status := FND_API.G_RET_STS_ERROR;
550: x_msg_count := l_msg_count ;
551: x_msg_data := l_msg_data ;
552: FND_MSG_PUB.count_and_get(
553: p_count => x_msg_count
551: x_msg_data := l_msg_data ;
552: FND_MSG_PUB.count_and_get(
553: p_count => x_msg_count
554: ,p_data => x_msg_data);
555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
556: ROLLBACK TO exclusion_hist_update;
557: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
558: x_msg_count := l_msg_count ;
559: x_msg_data := l_msg_data ;
553: p_count => x_msg_count
554: ,p_data => x_msg_data);
555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
556: ROLLBACK TO exclusion_hist_update;
557: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
558: x_msg_count := l_msg_count ;
559: x_msg_data := l_msg_data ;
560: FND_MSG_PUB.count_and_get(
561: p_count => x_msg_count
561: p_count => x_msg_count
562: ,p_data => x_msg_data);
563: WHEN OTHERS THEN
564: ROLLBACK TO exclusion_hist_update;
565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
566: x_msg_count := l_msg_count ;
567: x_msg_data := l_msg_data ;
568: FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','update_exclusion_hist');
569: FND_MSG_PUB.count_and_get(
595:
596: lp_iehv_tbl := p_iehv_tbl;
597: lx_iehv_tbl := x_iehv_tbl;
598: l_api_version := p_api_version ;
599: l_init_msg_list := FND_API.G_FALSE ;
600: l_msg_data := x_msg_data ;
601: l_msg_count := x_msg_count ;
602:
603: /*
609: ,x_msg_count => l_msg_count
610: ,x_return_status => l_return_status
611: ,p_iehv_tbl => lp_iehv_tbl
612: ,x_iehv_tbl => lx_iehv_tbl) ;
613: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
614: RAISE FND_API.G_EXC_ERROR;
615: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
616: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
617: END IF;
610: ,x_return_status => l_return_status
611: ,p_iehv_tbl => lp_iehv_tbl
612: ,x_iehv_tbl => lx_iehv_tbl) ;
613: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
614: RAISE FND_API.G_EXC_ERROR;
615: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
616: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
617: END IF;
618:
611: ,p_iehv_tbl => lp_iehv_tbl
612: ,x_iehv_tbl => lx_iehv_tbl) ;
613: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
614: RAISE FND_API.G_EXC_ERROR;
615: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
616: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
617: END IF;
618:
619: --Copy value of OUT variable in the IN record type
612: ,x_iehv_tbl => lx_iehv_tbl) ;
613: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
614: RAISE FND_API.G_EXC_ERROR;
615: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
616: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
617: END IF;
618:
619: --Copy value of OUT variable in the IN record type
620: lp_iehv_tbl := lx_iehv_tbl;
631: ,x_msg_count => l_msg_count
632: ,x_return_status => l_return_status
633: ,p_iehv_tbl => lp_iehv_tbl
634: ,x_iehv_tbl => lx_iehv_tbl) ;
635: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END IF;
632: ,x_return_status => l_return_status
633: ,p_iehv_tbl => lp_iehv_tbl
634: ,x_iehv_tbl => lx_iehv_tbl) ;
635: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END IF;
640:
633: ,p_iehv_tbl => lp_iehv_tbl
634: ,x_iehv_tbl => lx_iehv_tbl) ;
635: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END IF;
640:
641: --Copy value of OUT variable in the IN record type
634: ,x_iehv_tbl => lx_iehv_tbl) ;
635: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END IF;
640:
641: --Copy value of OUT variable in the IN record type
642: lp_iehv_tbl := lx_iehv_tbl;
652: ,l_msg_data
653: ,lp_iehv_tbl
654: ,lx_iehv_tbl);
655:
656: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
657: RAISE FND_API.G_EXC_ERROR;
658: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
660: END IF;
653: ,lp_iehv_tbl
654: ,lx_iehv_tbl);
655:
656: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
657: RAISE FND_API.G_EXC_ERROR;
658: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
660: END IF;
661:
654: ,lx_iehv_tbl);
655:
656: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
657: RAISE FND_API.G_EXC_ERROR;
658: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
660: END IF;
661:
662: --Copy value of OUT variable in the IN record type
655:
656: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
657: RAISE FND_API.G_EXC_ERROR;
658: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
660: END IF;
661:
662: --Copy value of OUT variable in the IN record type
663: lp_iehv_tbl := lx_iehv_tbl;
670: ,x_msg_data => l_msg_data
671: ,x_msg_count => l_msg_count
672: ,x_return_status => l_return_status
673: ,p_iehv_tbl => lp_iehv_tbl) ;
674: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
675: RAISE FND_API.G_EXC_ERROR;
676: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
678: END IF;
671: ,x_msg_count => l_msg_count
672: ,x_return_status => l_return_status
673: ,p_iehv_tbl => lp_iehv_tbl) ;
674: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
675: RAISE FND_API.G_EXC_ERROR;
676: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
678: END IF;
679: END IF;
672: ,x_return_status => l_return_status
673: ,p_iehv_tbl => lp_iehv_tbl) ;
674: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
675: RAISE FND_API.G_EXC_ERROR;
676: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
678: END IF;
679: END IF;
680: --Vertical post-processing user hook call end
673: ,p_iehv_tbl => lp_iehv_tbl) ;
674: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
675: RAISE FND_API.G_EXC_ERROR;
676: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
678: END IF;
679: END IF;
680: --Vertical post-processing user hook call end
681:
686: ,x_msg_data => l_msg_data
687: ,x_msg_count => l_msg_count
688: ,x_return_status => l_return_status
689: ,p_iehv_tbl => lp_iehv_tbl) ;
690: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
691: RAISE FND_API.G_EXC_ERROR;
692: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
694: END IF;
687: ,x_msg_count => l_msg_count
688: ,x_return_status => l_return_status
689: ,p_iehv_tbl => lp_iehv_tbl) ;
690: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
691: RAISE FND_API.G_EXC_ERROR;
692: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
694: END IF;
695: END IF;
688: ,x_return_status => l_return_status
689: ,p_iehv_tbl => lp_iehv_tbl) ;
690: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
691: RAISE FND_API.G_EXC_ERROR;
692: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
694: END IF;
695: END IF;
696: --Customer post-processing user hook call end
689: ,p_iehv_tbl => lp_iehv_tbl) ;
690: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
691: RAISE FND_API.G_EXC_ERROR;
692: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
694: END IF;
695: END IF;
696: --Customer post-processing user hook call end
697: */
703:
704:
705: EXCEPTION
706:
707: WHEN FND_API.G_EXC_ERROR THEN
708: ROLLBACK TO exclusion_hist_update;
709: x_return_status := FND_API.G_RET_STS_ERROR;
710: x_msg_count := l_msg_count ;
711: x_msg_data := l_msg_data ;
705: EXCEPTION
706:
707: WHEN FND_API.G_EXC_ERROR THEN
708: ROLLBACK TO exclusion_hist_update;
709: x_return_status := FND_API.G_RET_STS_ERROR;
710: x_msg_count := l_msg_count ;
711: x_msg_data := l_msg_data ;
712: FND_MSG_PUB.count_and_get(
713: p_count => x_msg_count
711: x_msg_data := l_msg_data ;
712: FND_MSG_PUB.count_and_get(
713: p_count => x_msg_count
714: ,p_data => x_msg_data);
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716: ROLLBACK TO exclusion_hist_update;
717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
718: x_msg_count := l_msg_count ;
719: x_msg_data := l_msg_data ;
713: p_count => x_msg_count
714: ,p_data => x_msg_data);
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716: ROLLBACK TO exclusion_hist_update;
717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
718: x_msg_count := l_msg_count ;
719: x_msg_data := l_msg_data ;
720: FND_MSG_PUB.count_and_get(
721: p_count => x_msg_count
721: p_count => x_msg_count
722: ,p_data => x_msg_data);
723: WHEN OTHERS THEN
724: ROLLBACK TO exclusion_hist_update;
725: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
726: x_msg_count := l_msg_count ;
727: x_msg_data := l_msg_data ;
728: FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','update_exclusion_hist');
729: FND_MSG_PUB.count_and_get(
755:
756:
757: l_return_status := OKC_API.G_RET_STS_SUCCESS;
758: l_api_version := p_api_version ;
759: l_init_msg_list := FND_API.G_FALSE ;
760: l_msg_data := x_msg_data;
761: l_msg_count := x_msg_count ;
762: lp_iehv_rec := p_iehv_rec;
763: lx_iehv_rec := p_iehv_rec;
771: ,x_msg_count => l_msg_count
772: ,x_return_status => l_return_status
773: ,p_iehv_rec => lp_iehv_rec
774: ,x_iehv_rec => lx_iehv_rec) ;
775: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
776: RAISE FND_API.G_EXC_ERROR;
777: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
778: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
779: END IF;
772: ,x_return_status => l_return_status
773: ,p_iehv_rec => lp_iehv_rec
774: ,x_iehv_rec => lx_iehv_rec) ;
775: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
776: RAISE FND_API.G_EXC_ERROR;
777: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
778: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
779: END IF;
780:
773: ,p_iehv_rec => lp_iehv_rec
774: ,x_iehv_rec => lx_iehv_rec) ;
775: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
776: RAISE FND_API.G_EXC_ERROR;
777: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
778: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
779: END IF;
780:
781: --Copy value of OUT variable in the IN record type
774: ,x_iehv_rec => lx_iehv_rec) ;
775: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
776: RAISE FND_API.G_EXC_ERROR;
777: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
778: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
779: END IF;
780:
781: --Copy value of OUT variable in the IN record type
782: lp_iehv_rec := lx_iehv_rec;
793: ,x_msg_count => l_msg_count
794: ,x_return_status => l_return_status
795: ,p_iehv_rec => lp_iehv_rec
796: ,x_iehv_rec => lx_iehv_rec) ;
797: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
798: RAISE FND_API.G_EXC_ERROR;
799: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
800: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
801: END IF;
794: ,x_return_status => l_return_status
795: ,p_iehv_rec => lp_iehv_rec
796: ,x_iehv_rec => lx_iehv_rec) ;
797: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
798: RAISE FND_API.G_EXC_ERROR;
799: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
800: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
801: END IF;
802:
795: ,p_iehv_rec => lp_iehv_rec
796: ,x_iehv_rec => lx_iehv_rec) ;
797: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
798: RAISE FND_API.G_EXC_ERROR;
799: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
800: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
801: END IF;
802:
803: --Copy value of OUT variable in the IN record type
796: ,x_iehv_rec => lx_iehv_rec) ;
797: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
798: RAISE FND_API.G_EXC_ERROR;
799: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
800: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
801: END IF;
802:
803: --Copy value of OUT variable in the IN record type
804: lp_iehv_rec := lx_iehv_rec;
814: ,l_msg_count
815: ,l_msg_data
816: ,lp_iehv_rec);
817:
818: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
819: RAISE FND_API.G_EXC_ERROR;
820: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
822: END IF;
815: ,l_msg_data
816: ,lp_iehv_rec);
817:
818: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
819: RAISE FND_API.G_EXC_ERROR;
820: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
822: END IF;
823:
816: ,lp_iehv_rec);
817:
818: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
819: RAISE FND_API.G_EXC_ERROR;
820: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
822: END IF;
823:
824: /*
817:
818: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
819: RAISE FND_API.G_EXC_ERROR;
820: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
822: END IF;
823:
824: /*
825: --Vertical post-processing user hook call start
829: ,x_msg_data => l_msg_data
830: ,x_msg_count => l_msg_count
831: ,x_return_status => l_return_status
832: ,p_iehv_rec => lp_iehv_rec) ;
833: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
834: RAISE FND_API.G_EXC_ERROR;
835: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
836: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
837: END IF;
830: ,x_msg_count => l_msg_count
831: ,x_return_status => l_return_status
832: ,p_iehv_rec => lp_iehv_rec) ;
833: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
834: RAISE FND_API.G_EXC_ERROR;
835: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
836: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
837: END IF;
838: END IF;
831: ,x_return_status => l_return_status
832: ,p_iehv_rec => lp_iehv_rec) ;
833: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
834: RAISE FND_API.G_EXC_ERROR;
835: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
836: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
837: END IF;
838: END IF;
839: --Vertical post-processing user hook call end
832: ,p_iehv_rec => lp_iehv_rec) ;
833: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
834: RAISE FND_API.G_EXC_ERROR;
835: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
836: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
837: END IF;
838: END IF;
839: --Vertical post-processing user hook call end
840:
846: ,x_msg_data => l_msg_data
847: ,x_msg_count => l_msg_count
848: ,x_return_status => l_return_status
849: ,p_iehv_rec => lp_iehv_rec) ;
850: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
851: RAISE FND_API.G_EXC_ERROR;
852: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
854: END IF;
847: ,x_msg_count => l_msg_count
848: ,x_return_status => l_return_status
849: ,p_iehv_rec => lp_iehv_rec) ;
850: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
851: RAISE FND_API.G_EXC_ERROR;
852: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
854: END IF;
855: END IF;
848: ,x_return_status => l_return_status
849: ,p_iehv_rec => lp_iehv_rec) ;
850: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
851: RAISE FND_API.G_EXC_ERROR;
852: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
854: END IF;
855: END IF;
856: --Customer post-processing user hook call end
849: ,p_iehv_rec => lp_iehv_rec) ;
850: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
851: RAISE FND_API.G_EXC_ERROR;
852: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
854: END IF;
855: END IF;
856: --Customer post-processing user hook call end
857: */
861: x_return_status := l_return_status ;
862:
863: EXCEPTION
864:
865: WHEN FND_API.G_EXC_ERROR THEN
866: ROLLBACK TO exclusion_hist_delete_rec;
867: x_return_status := FND_API.G_RET_STS_ERROR;
868: x_msg_count := l_msg_count ;
869: x_msg_data := l_msg_data ;
863: EXCEPTION
864:
865: WHEN FND_API.G_EXC_ERROR THEN
866: ROLLBACK TO exclusion_hist_delete_rec;
867: x_return_status := FND_API.G_RET_STS_ERROR;
868: x_msg_count := l_msg_count ;
869: x_msg_data := l_msg_data ;
870: FND_MSG_PUB.count_and_get(
871: p_count => x_msg_count
869: x_msg_data := l_msg_data ;
870: FND_MSG_PUB.count_and_get(
871: p_count => x_msg_count
872: ,p_data => x_msg_data);
873: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
874: ROLLBACK TO exclusion_hist_delete_rec;
875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
876: x_msg_count := l_msg_count ;
877: x_msg_data := l_msg_data ;
871: p_count => x_msg_count
872: ,p_data => x_msg_data);
873: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
874: ROLLBACK TO exclusion_hist_delete_rec;
875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
876: x_msg_count := l_msg_count ;
877: x_msg_data := l_msg_data ;
878: FND_MSG_PUB.count_and_get(
879: p_count => x_msg_count
879: p_count => x_msg_count
880: ,p_data => x_msg_data);
881: WHEN OTHERS THEN
882: ROLLBACK TO exclusion_hist_delete_rec;
883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
884: x_msg_count := l_msg_count ;
885: x_msg_data := l_msg_data ;
886: FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','delete_exclusion_hist');
887: FND_MSG_PUB.count_and_get(
912:
913:
914: l_return_status := OKC_API.G_RET_STS_SUCCESS;
915: l_api_version := p_api_version ;
916: l_init_msg_list := FND_API.G_FALSE ;
917: l_msg_data := x_msg_data;
918: l_msg_count := x_msg_count ;
919: lp_iehv_tbl := p_iehv_tbl;
920: lx_iehv_tbl := p_iehv_tbl;
928: ,x_msg_count => l_msg_count
929: ,x_return_status => l_return_status
930: ,p_iehv_tbl => lp_iehv_tbl
931: ,x_iehv_tbl => lx_iehv_tbl) ;
932: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
933: RAISE FND_API.G_EXC_ERROR;
934: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
935: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
936: END IF;
929: ,x_return_status => l_return_status
930: ,p_iehv_tbl => lp_iehv_tbl
931: ,x_iehv_tbl => lx_iehv_tbl) ;
932: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
933: RAISE FND_API.G_EXC_ERROR;
934: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
935: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
936: END IF;
937:
930: ,p_iehv_tbl => lp_iehv_tbl
931: ,x_iehv_tbl => lx_iehv_tbl) ;
932: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
933: RAISE FND_API.G_EXC_ERROR;
934: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
935: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
936: END IF;
937:
938: --Copy value of OUT variable in the IN record type
931: ,x_iehv_tbl => lx_iehv_tbl) ;
932: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
933: RAISE FND_API.G_EXC_ERROR;
934: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
935: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
936: END IF;
937:
938: --Copy value of OUT variable in the IN record type
939: lp_iehv_tbl := lx_iehv_tbl;
950: ,x_msg_count => l_msg_count
951: ,x_return_status => l_return_status
952: ,p_iehv_tbl => lp_iehv_tbl
953: ,x_iehv_tbl => lx_iehv_tbl) ;
954: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
955: RAISE FND_API.G_EXC_ERROR;
956: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
957: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
958: END IF;
951: ,x_return_status => l_return_status
952: ,p_iehv_tbl => lp_iehv_tbl
953: ,x_iehv_tbl => lx_iehv_tbl) ;
954: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
955: RAISE FND_API.G_EXC_ERROR;
956: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
957: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
958: END IF;
959:
952: ,p_iehv_tbl => lp_iehv_tbl
953: ,x_iehv_tbl => lx_iehv_tbl) ;
954: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
955: RAISE FND_API.G_EXC_ERROR;
956: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
957: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
958: END IF;
959:
960: --Copy value of OUT variable in the IN record type
953: ,x_iehv_tbl => lx_iehv_tbl) ;
954: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
955: RAISE FND_API.G_EXC_ERROR;
956: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
957: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
958: END IF;
959:
960: --Copy value of OUT variable in the IN record type
961: lp_iehv_tbl := lx_iehv_tbl;
980: EXIT WHEN (i = lp_iehv_tbl.LAST);
981: i := p_iehv_tbl.NEXT(i);
982: END LOOP;
983: END IF;
984: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
985: RAISE FND_API.G_EXC_ERROR;
986: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
988: END IF;
981: i := p_iehv_tbl.NEXT(i);
982: END LOOP;
983: END IF;
984: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
985: RAISE FND_API.G_EXC_ERROR;
986: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
988: END IF;
989:
982: END LOOP;
983: END IF;
984: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
985: RAISE FND_API.G_EXC_ERROR;
986: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
988: END IF;
989:
990: END;
983: END IF;
984: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
985: RAISE FND_API.G_EXC_ERROR;
986: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
988: END IF;
989:
990: END;
991:
997: ,x_msg_data => l_msg_data
998: ,x_msg_count => l_msg_count
999: ,x_return_status => l_return_status
1000: ,p_iehv_tbl => lp_iehv_tbl) ;
1001: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1002: RAISE FND_API.G_EXC_ERROR;
1003: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1005: END IF;
998: ,x_msg_count => l_msg_count
999: ,x_return_status => l_return_status
1000: ,p_iehv_tbl => lp_iehv_tbl) ;
1001: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1002: RAISE FND_API.G_EXC_ERROR;
1003: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1005: END IF;
1006: END IF;
999: ,x_return_status => l_return_status
1000: ,p_iehv_tbl => lp_iehv_tbl) ;
1001: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1002: RAISE FND_API.G_EXC_ERROR;
1003: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1005: END IF;
1006: END IF;
1007: --Vertical post-processing user hook call end
1000: ,p_iehv_tbl => lp_iehv_tbl) ;
1001: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1002: RAISE FND_API.G_EXC_ERROR;
1003: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1005: END IF;
1006: END IF;
1007: --Vertical post-processing user hook call end
1008:
1014: ,x_msg_data => l_msg_data
1015: ,x_msg_count => l_msg_count
1016: ,x_return_status => l_return_status
1017: ,p_iehv_tbl => lp_iehv_tbl) ;
1018: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1019: RAISE FND_API.G_EXC_ERROR;
1020: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1021: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1022: END IF;
1015: ,x_msg_count => l_msg_count
1016: ,x_return_status => l_return_status
1017: ,p_iehv_tbl => lp_iehv_tbl) ;
1018: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1019: RAISE FND_API.G_EXC_ERROR;
1020: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1021: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1022: END IF;
1023: END IF;
1016: ,x_return_status => l_return_status
1017: ,p_iehv_tbl => lp_iehv_tbl) ;
1018: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1019: RAISE FND_API.G_EXC_ERROR;
1020: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1021: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1022: END IF;
1023: END IF;
1024: --Customer post-processing user hook call end
1017: ,p_iehv_tbl => lp_iehv_tbl) ;
1018: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1019: RAISE FND_API.G_EXC_ERROR;
1020: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1021: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1022: END IF;
1023: END IF;
1024: --Customer post-processing user hook call end
1025: */
1030: x_return_status := l_return_status ;
1031:
1032: EXCEPTION
1033:
1034: WHEN FND_API.G_EXC_ERROR THEN
1035: ROLLBACK TO exclusion_hist_delete_tbl;
1036: x_return_status := FND_API.G_RET_STS_ERROR;
1037: x_msg_count := l_msg_count ;
1038: x_msg_data := l_msg_data ;
1032: EXCEPTION
1033:
1034: WHEN FND_API.G_EXC_ERROR THEN
1035: ROLLBACK TO exclusion_hist_delete_tbl;
1036: x_return_status := FND_API.G_RET_STS_ERROR;
1037: x_msg_count := l_msg_count ;
1038: x_msg_data := l_msg_data ;
1039: FND_MSG_PUB.count_and_get(
1040: p_count => x_msg_count
1038: x_msg_data := l_msg_data ;
1039: FND_MSG_PUB.count_and_get(
1040: p_count => x_msg_count
1041: ,p_data => x_msg_data);
1042: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1043: ROLLBACK TO exclusion_hist_delete_tbl;
1044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1045: x_msg_count := l_msg_count ;
1046: x_msg_data := l_msg_data ;
1040: p_count => x_msg_count
1041: ,p_data => x_msg_data);
1042: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1043: ROLLBACK TO exclusion_hist_delete_tbl;
1044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1045: x_msg_count := l_msg_count ;
1046: x_msg_data := l_msg_data ;
1047: FND_MSG_PUB.count_and_get(
1048: p_count => x_msg_count
1048: p_count => x_msg_count
1049: ,p_data => x_msg_data);
1050: WHEN OTHERS THEN
1051: ROLLBACK TO exclusion_hist_delete_tbl;
1052: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1053: x_msg_count := l_msg_count ;
1054: x_msg_data := l_msg_data ;
1055: FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','delete_exclusion_hist');
1056: FND_MSG_PUB.count_and_get(
1079: SAVEPOINT exclusion_hist_validate;
1080:
1081:
1082: l_api_version := p_api_version ;
1083: l_init_msg_list := FND_API.G_FALSE ;
1084: l_msg_data := x_msg_data;
1085: l_msg_count := x_msg_count ;
1086: lp_iehv_rec := p_iehv_rec;
1087: lx_iehv_rec := p_iehv_rec;
1095: ,x_msg_count => l_msg_count
1096: ,x_return_status => l_return_status
1097: ,p_iehv_rec => lp_iehv_rec
1098: ,x_iehv_rec => lx_iehv_rec) ;
1099: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1100: RAISE FND_API.G_EXC_ERROR;
1101: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1103: END IF;
1096: ,x_return_status => l_return_status
1097: ,p_iehv_rec => lp_iehv_rec
1098: ,x_iehv_rec => lx_iehv_rec) ;
1099: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1100: RAISE FND_API.G_EXC_ERROR;
1101: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1103: END IF;
1104:
1097: ,p_iehv_rec => lp_iehv_rec
1098: ,x_iehv_rec => lx_iehv_rec) ;
1099: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1100: RAISE FND_API.G_EXC_ERROR;
1101: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1103: END IF;
1104:
1105: --Copy value of OUT variable in the IN record type
1098: ,x_iehv_rec => lx_iehv_rec) ;
1099: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1100: RAISE FND_API.G_EXC_ERROR;
1101: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1103: END IF;
1104:
1105: --Copy value of OUT variable in the IN record type
1106: lp_iehv_rec := lx_iehv_rec;
1117: ,x_msg_count => l_msg_count
1118: ,x_return_status => l_return_status
1119: ,p_iehv_rec => lp_iehv_rec
1120: ,x_iehv_rec => lx_iehv_rec) ;
1121: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1122: RAISE FND_API.G_EXC_ERROR;
1123: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125: END IF;
1118: ,x_return_status => l_return_status
1119: ,p_iehv_rec => lp_iehv_rec
1120: ,x_iehv_rec => lx_iehv_rec) ;
1121: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1122: RAISE FND_API.G_EXC_ERROR;
1123: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125: END IF;
1126:
1119: ,p_iehv_rec => lp_iehv_rec
1120: ,x_iehv_rec => lx_iehv_rec) ;
1121: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1122: RAISE FND_API.G_EXC_ERROR;
1123: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125: END IF;
1126:
1127: --Copy value of OUT variable in the IN record type
1120: ,x_iehv_rec => lx_iehv_rec) ;
1121: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1122: RAISE FND_API.G_EXC_ERROR;
1123: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125: END IF;
1126:
1127: --Copy value of OUT variable in the IN record type
1128: lp_iehv_rec := lx_iehv_rec;
1137: ,l_msg_count
1138: ,l_msg_data
1139: ,lp_iehv_rec);
1140:
1141: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1142: RAISE FND_API.G_EXC_ERROR;
1143: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1145: END IF;
1138: ,l_msg_data
1139: ,lp_iehv_rec);
1140:
1141: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1142: RAISE FND_API.G_EXC_ERROR;
1143: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1145: END IF;
1146:
1139: ,lp_iehv_rec);
1140:
1141: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1142: RAISE FND_API.G_EXC_ERROR;
1143: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1145: END IF;
1146:
1147: --Copy value of OUT variable in the IN record type
1140:
1141: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1142: RAISE FND_API.G_EXC_ERROR;
1143: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1145: END IF;
1146:
1147: --Copy value of OUT variable in the IN record type
1148: lp_iehv_rec := lx_iehv_rec;
1155: ,x_msg_data => l_msg_data
1156: ,x_msg_count => l_msg_count
1157: ,x_return_status => l_return_status
1158: ,p_iehv_rec => lp_iehv_rec) ;
1159: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1160: RAISE FND_API.G_EXC_ERROR;
1161: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1163: END IF;
1156: ,x_msg_count => l_msg_count
1157: ,x_return_status => l_return_status
1158: ,p_iehv_rec => lp_iehv_rec) ;
1159: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1160: RAISE FND_API.G_EXC_ERROR;
1161: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1163: END IF;
1164: END IF;
1157: ,x_return_status => l_return_status
1158: ,p_iehv_rec => lp_iehv_rec) ;
1159: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1160: RAISE FND_API.G_EXC_ERROR;
1161: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1163: END IF;
1164: END IF;
1165:
1158: ,p_iehv_rec => lp_iehv_rec) ;
1159: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1160: RAISE FND_API.G_EXC_ERROR;
1161: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1163: END IF;
1164: END IF;
1165:
1166:
1175: ,x_msg_data => l_msg_data
1176: ,x_msg_count => l_msg_count
1177: ,x_return_status => l_return_status
1178: ,p_iehv_rec => lp_iehv_rec) ;
1179: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1180: RAISE FND_API.G_EXC_ERROR;
1181: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1183: END IF;
1176: ,x_msg_count => l_msg_count
1177: ,x_return_status => l_return_status
1178: ,p_iehv_rec => lp_iehv_rec) ;
1179: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1180: RAISE FND_API.G_EXC_ERROR;
1181: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1183: END IF;
1184: END IF;
1177: ,x_return_status => l_return_status
1178: ,p_iehv_rec => lp_iehv_rec) ;
1179: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1180: RAISE FND_API.G_EXC_ERROR;
1181: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1183: END IF;
1184: END IF;
1185: --Customer post-processing user hook call end
1178: ,p_iehv_rec => lp_iehv_rec) ;
1179: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1180: RAISE FND_API.G_EXC_ERROR;
1181: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1183: END IF;
1184: END IF;
1185: --Customer post-processing user hook call end
1186: */
1191: x_return_status := l_return_status ;
1192:
1193: EXCEPTION
1194:
1195: WHEN FND_API.G_EXC_ERROR THEN
1196: ROLLBACK TO exclusion_hist_validate;
1197: x_return_status := FND_API.G_RET_STS_ERROR;
1198: x_msg_count := l_msg_count ;
1199: x_msg_data := l_msg_data ;
1193: EXCEPTION
1194:
1195: WHEN FND_API.G_EXC_ERROR THEN
1196: ROLLBACK TO exclusion_hist_validate;
1197: x_return_status := FND_API.G_RET_STS_ERROR;
1198: x_msg_count := l_msg_count ;
1199: x_msg_data := l_msg_data ;
1200: FND_MSG_PUB.count_and_get(
1201: p_count => x_msg_count
1199: x_msg_data := l_msg_data ;
1200: FND_MSG_PUB.count_and_get(
1201: p_count => x_msg_count
1202: ,p_data => x_msg_data);
1203: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1204: ROLLBACK TO exclusion_hist_validate;
1205: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1206: x_msg_count := l_msg_count ;
1207: x_msg_data := l_msg_data ;
1201: p_count => x_msg_count
1202: ,p_data => x_msg_data);
1203: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1204: ROLLBACK TO exclusion_hist_validate;
1205: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1206: x_msg_count := l_msg_count ;
1207: x_msg_data := l_msg_data ;
1208: FND_MSG_PUB.count_and_get(
1209: p_count => x_msg_count
1209: p_count => x_msg_count
1210: ,p_data => x_msg_data);
1211: WHEN OTHERS THEN
1212: ROLLBACK TO exclusion_hist_validate;
1213: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1214: x_msg_count := l_msg_count ;
1215: x_msg_data := l_msg_data ;
1216: FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','validate_exclusion_hist');
1217: FND_MSG_PUB.count_and_get(
1239: SAVEPOINT exclusion_hist_validate;
1240:
1241:
1242: l_api_version := p_api_version ;
1243: l_init_msg_list := FND_API.G_FALSE ;
1244: l_msg_data := x_msg_data;
1245: l_msg_count := x_msg_count ;
1246: lp_iehv_tbl := p_iehv_tbl;
1247: lx_iehv_tbl := p_iehv_tbl;
1254: ,x_msg_count => l_msg_count
1255: ,x_return_status => l_return_status
1256: ,p_iehv_tbl => lp_iehv_tbl
1257: ,x_iehv_tbl => lx_iehv_tbl) ;
1258: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1259: RAISE FND_API.G_EXC_ERROR;
1260: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1261: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1262: END IF;
1255: ,x_return_status => l_return_status
1256: ,p_iehv_tbl => lp_iehv_tbl
1257: ,x_iehv_tbl => lx_iehv_tbl) ;
1258: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1259: RAISE FND_API.G_EXC_ERROR;
1260: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1261: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1262: END IF;
1263:
1256: ,p_iehv_tbl => lp_iehv_tbl
1257: ,x_iehv_tbl => lx_iehv_tbl) ;
1258: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1259: RAISE FND_API.G_EXC_ERROR;
1260: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1261: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1262: END IF;
1263:
1264: --Copy value of OUT variable in the IN record type
1257: ,x_iehv_tbl => lx_iehv_tbl) ;
1258: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1259: RAISE FND_API.G_EXC_ERROR;
1260: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1261: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1262: END IF;
1263:
1264: --Copy value of OUT variable in the IN record type
1265: lp_iehv_tbl := lx_iehv_tbl;
1275: ,x_msg_count => l_msg_count
1276: ,x_return_status => l_return_status
1277: ,p_iehv_tbl => lp_iehv_tbl
1278: ,x_iehv_tbl => lx_iehv_tbl) ;
1279: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1280: RAISE FND_API.G_EXC_ERROR;
1281: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1283: END IF;
1276: ,x_return_status => l_return_status
1277: ,p_iehv_tbl => lp_iehv_tbl
1278: ,x_iehv_tbl => lx_iehv_tbl) ;
1279: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1280: RAISE FND_API.G_EXC_ERROR;
1281: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1283: END IF;
1284:
1277: ,p_iehv_tbl => lp_iehv_tbl
1278: ,x_iehv_tbl => lx_iehv_tbl) ;
1279: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1280: RAISE FND_API.G_EXC_ERROR;
1281: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1283: END IF;
1284:
1285: --Copy value of OUT variable in the IN record type
1278: ,x_iehv_tbl => lx_iehv_tbl) ;
1279: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1280: RAISE FND_API.G_EXC_ERROR;
1281: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1283: END IF;
1284:
1285: --Copy value of OUT variable in the IN record type
1286: lp_iehv_tbl := lx_iehv_tbl;
1296: ,x_msg_count
1297: ,x_msg_data
1298: ,lp_iehv_tbl);
1299:
1300: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1301: RAISE FND_API.G_EXC_ERROR;
1302: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1304: END IF;
1297: ,x_msg_data
1298: ,lp_iehv_tbl);
1299:
1300: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1301: RAISE FND_API.G_EXC_ERROR;
1302: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1304: END IF;
1305:
1298: ,lp_iehv_tbl);
1299:
1300: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1301: RAISE FND_API.G_EXC_ERROR;
1302: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1304: END IF;
1305:
1306: --Copy value of OUT variable in the IN record type
1299:
1300: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1301: RAISE FND_API.G_EXC_ERROR;
1302: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1304: END IF;
1305:
1306: --Copy value of OUT variable in the IN record type
1307: lp_iehv_tbl := lx_iehv_tbl;
1313: ,x_msg_data => l_msg_data
1314: ,x_msg_count => l_msg_count
1315: ,x_return_status => l_return_status
1316: ,p_iehv_tbl => lp_iehv_tbl) ;
1317: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1318: RAISE FND_API.G_EXC_ERROR;
1319: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1320: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1321: END IF;
1314: ,x_msg_count => l_msg_count
1315: ,x_return_status => l_return_status
1316: ,p_iehv_tbl => lp_iehv_tbl) ;
1317: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1318: RAISE FND_API.G_EXC_ERROR;
1319: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1320: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1321: END IF;
1322: END IF;
1315: ,x_return_status => l_return_status
1316: ,p_iehv_tbl => lp_iehv_tbl) ;
1317: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1318: RAISE FND_API.G_EXC_ERROR;
1319: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1320: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1321: END IF;
1322: END IF;
1323: --Vertical post-processing user hook call end
1316: ,p_iehv_tbl => lp_iehv_tbl) ;
1317: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1318: RAISE FND_API.G_EXC_ERROR;
1319: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1320: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1321: END IF;
1322: END IF;
1323: --Vertical post-processing user hook call end
1324: --Customer post-processing user hook call start
1329: ,x_msg_data => l_msg_data
1330: ,x_msg_count => l_msg_count
1331: ,x_return_status => l_return_status
1332: ,p_iehv_tbl => lp_iehv_tbl) ;
1333: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1334: RAISE FND_API.G_EXC_ERROR;
1335: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1336: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1337: END IF;
1330: ,x_msg_count => l_msg_count
1331: ,x_return_status => l_return_status
1332: ,p_iehv_tbl => lp_iehv_tbl) ;
1333: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1334: RAISE FND_API.G_EXC_ERROR;
1335: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1336: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1337: END IF;
1338: END IF;
1331: ,x_return_status => l_return_status
1332: ,p_iehv_tbl => lp_iehv_tbl) ;
1333: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1334: RAISE FND_API.G_EXC_ERROR;
1335: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1336: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1337: END IF;
1338: END IF;
1339:
1332: ,p_iehv_tbl => lp_iehv_tbl) ;
1333: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1334: RAISE FND_API.G_EXC_ERROR;
1335: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1336: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1337: END IF;
1338: END IF;
1339:
1340: */
1348: x_return_status := l_return_status ;
1349:
1350: EXCEPTION
1351:
1352: WHEN FND_API.G_EXC_ERROR THEN
1353: ROLLBACK TO exclusion_hist_validate;
1354: x_return_status := FND_API.G_RET_STS_ERROR;
1355: x_msg_count := l_msg_count ;
1356: x_msg_data := l_msg_data ;
1350: EXCEPTION
1351:
1352: WHEN FND_API.G_EXC_ERROR THEN
1353: ROLLBACK TO exclusion_hist_validate;
1354: x_return_status := FND_API.G_RET_STS_ERROR;
1355: x_msg_count := l_msg_count ;
1356: x_msg_data := l_msg_data ;
1357: FND_MSG_PUB.count_and_get(
1358: p_count => x_msg_count
1356: x_msg_data := l_msg_data ;
1357: FND_MSG_PUB.count_and_get(
1358: p_count => x_msg_count
1359: ,p_data => x_msg_data);
1360: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1361: ROLLBACK TO exclusion_hist_validate;
1362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1363: x_msg_count := l_msg_count ;
1364: x_msg_data := l_msg_data ;
1358: p_count => x_msg_count
1359: ,p_data => x_msg_data);
1360: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1361: ROLLBACK TO exclusion_hist_validate;
1362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1363: x_msg_count := l_msg_count ;
1364: x_msg_data := l_msg_data ;
1365: FND_MSG_PUB.count_and_get(
1366: p_count => x_msg_count
1366: p_count => x_msg_count
1367: ,p_data => x_msg_data);
1368: WHEN OTHERS THEN
1369: ROLLBACK TO exclusion_hist_validate;
1370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1371: x_msg_count := l_msg_count ;
1372: x_msg_data := l_msg_data ;
1373: FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','validate_exclusion_hist');
1374: FND_MSG_PUB.count_and_get(