38: x_msg_data => l_msg_data,
39: p_contract_id => lp_contract_id);
40:
41:
42: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
43: RAISE FND_API.G_EXC_ERROR;
44: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
45: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
46: END IF;
39: p_contract_id => lp_contract_id);
40:
41:
42: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
43: RAISE FND_API.G_EXC_ERROR;
44: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
45: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
46: END IF;
47: --Assign value to OUT variables
40:
41:
42: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
43: RAISE FND_API.G_EXC_ERROR;
44: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
45: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
46: END IF;
47: --Assign value to OUT variables
48: x_return_status := l_return_status ;
41:
42: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
43: RAISE FND_API.G_EXC_ERROR;
44: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
45: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
46: END IF;
47: --Assign value to OUT variables
48: x_return_status := l_return_status ;
49: x_msg_count := l_msg_count ;
49: x_msg_count := l_msg_count ;
50: x_msg_data := l_msg_data ;
51:
52: EXCEPTION
53: WHEN FND_API.G_EXC_ERROR THEN
54: ROLLBACK TO trx_create_cntrct_prtfl;
55: x_return_status := FND_API.G_RET_STS_ERROR;
56: x_msg_count := l_msg_count ;
57: x_msg_data := l_msg_data ;
51:
52: EXCEPTION
53: WHEN FND_API.G_EXC_ERROR THEN
54: ROLLBACK TO trx_create_cntrct_prtfl;
55: x_return_status := FND_API.G_RET_STS_ERROR;
56: x_msg_count := l_msg_count ;
57: x_msg_data := l_msg_data ;
58: FND_MSG_PUB.count_and_get(
59: p_count => x_msg_count
57: x_msg_data := l_msg_data ;
58: FND_MSG_PUB.count_and_get(
59: p_count => x_msg_count
60: ,p_data => x_msg_data);
61: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
62: ROLLBACK TO trx_create_cntrct_prtfl;
63: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
64: x_msg_count := l_msg_count ;
65: x_msg_data := l_msg_data ;
59: p_count => x_msg_count
60: ,p_data => x_msg_data);
61: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
62: ROLLBACK TO trx_create_cntrct_prtfl;
63: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
64: x_msg_count := l_msg_count ;
65: x_msg_data := l_msg_data ;
66: FND_MSG_PUB.count_and_get(
67: p_count => x_msg_count
67: p_count => x_msg_count
68: ,p_data => x_msg_data);
69: WHEN OTHERS THEN
70: ROLLBACK TO trx_create_cntrct_prtfl;
71: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
72: x_msg_count := l_msg_count ;
73: x_msg_data := l_msg_data ;
74: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_CONTRACT_PRTFL_PUB','create_cntrct_prtfl');
75: FND_MSG_PUB.count_and_get(
110: p_init_msg_list => l_init_msg_list,
111: p_contract_id => lp_contract_id);
112:
113: IF ( lx_retcode <> 0 ) THEN
114: RAISE FND_API.G_EXC_ERROR;
115: END IF;
116: --Assign value to OUT variables
117: ERRBUF := lx_errbuf ;
118: RETCODE := lx_retcode;
117: ERRBUF := lx_errbuf ;
118: RETCODE := lx_retcode;
119:
120: EXCEPTION
121: WHEN FND_API.G_EXC_ERROR THEN
122: ROLLBACK TO trx_batch_upd_cntrct_prtfl;
123:
124:
125: WHEN OTHERS THEN
176: ,p_contract_id => lp_contract_id,
177: x_total_count => lx_total_count,
178: x_processed_count => lx_processed_count,
179: x_error_count => lx_error_count) ;
180: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
181: RAISE FND_API.G_EXC_ERROR;
182: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
184: END IF;
177: x_total_count => lx_total_count,
178: x_processed_count => lx_processed_count,
179: x_error_count => lx_error_count) ;
180: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
181: RAISE FND_API.G_EXC_ERROR;
182: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
184: END IF;
185: --Assign value to OUT variables
178: x_processed_count => lx_processed_count,
179: x_error_count => lx_error_count) ;
180: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
181: RAISE FND_API.G_EXC_ERROR;
182: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
184: END IF;
185: --Assign value to OUT variables
186: x_return_status := l_return_status ;
179: x_error_count => lx_error_count) ;
180: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
181: RAISE FND_API.G_EXC_ERROR;
182: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
184: END IF;
185: --Assign value to OUT variables
186: x_return_status := l_return_status ;
187: x_msg_count := l_msg_count ;
189: x_total_count := lx_total_count;
190: x_processed_count := lx_processed_count;
191: x_error_count := lx_error_count;
192: EXCEPTION
193: WHEN FND_API.G_EXC_ERROR THEN
194: ROLLBACK TO trx_update_cntrct_prtfl;
195: x_return_status := FND_API.G_RET_STS_ERROR;
196: x_msg_count := l_msg_count ;
197: x_msg_data := l_msg_data ;
191: x_error_count := lx_error_count;
192: EXCEPTION
193: WHEN FND_API.G_EXC_ERROR THEN
194: ROLLBACK TO trx_update_cntrct_prtfl;
195: x_return_status := FND_API.G_RET_STS_ERROR;
196: x_msg_count := l_msg_count ;
197: x_msg_data := l_msg_data ;
198: FND_MSG_PUB.count_and_get(
199: p_count => x_msg_count
197: x_msg_data := l_msg_data ;
198: FND_MSG_PUB.count_and_get(
199: p_count => x_msg_count
200: ,p_data => x_msg_data);
201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
202: ROLLBACK TO trx_update_cntrct_prtfl;
203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
204: x_msg_count := l_msg_count ;
205: x_msg_data := l_msg_data ;
199: p_count => x_msg_count
200: ,p_data => x_msg_data);
201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
202: ROLLBACK TO trx_update_cntrct_prtfl;
203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
204: x_msg_count := l_msg_count ;
205: x_msg_data := l_msg_data ;
206: FND_MSG_PUB.count_and_get(
207: p_count => x_msg_count
207: p_count => x_msg_count
208: ,p_data => x_msg_data);
209: WHEN OTHERS THEN
210: ROLLBACK TO trx_update_cntrct_prtfl;
211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
212: x_msg_count := l_msg_count ;
213: x_msg_data := l_msg_data ;
214: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_CONTRACT_PRTFL_PUB','update_cntrct_prtfl');
215: FND_MSG_PUB.count_and_get(
244: p_api_version => l_api_version,
245: p_init_msg_list => l_init_msg_list);
246:
247: IF ( lx_retcode <> 0 ) THEN
248: RAISE FND_API.G_EXC_ERROR;
249: END IF;
250: --Assign value to OUT variables
251: ERRBUF := lx_errbuf ;
252: RETCODE := lx_retcode;
251: ERRBUF := lx_errbuf ;
252: RETCODE := lx_retcode;
253:
254: EXCEPTION
255: WHEN FND_API.G_EXC_ERROR THEN
256: ROLLBACK TO trx_batch_exe_cntrct_prtfl;
257:
258:
259: WHEN OTHERS THEN
306: ,x_msg_data => l_msg_data
307: ,x_total_count => lx_total_count,
308: x_processed_count => lx_processed_count,
309: x_error_count => lx_error_count) ;
310: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
311: RAISE FND_API.G_EXC_ERROR;
312: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
313: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
314: END IF;
307: ,x_total_count => lx_total_count,
308: x_processed_count => lx_processed_count,
309: x_error_count => lx_error_count) ;
310: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
311: RAISE FND_API.G_EXC_ERROR;
312: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
313: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
314: END IF;
315: --Assign value to OUT variables
308: x_processed_count => lx_processed_count,
309: x_error_count => lx_error_count) ;
310: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
311: RAISE FND_API.G_EXC_ERROR;
312: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
313: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
314: END IF;
315: --Assign value to OUT variables
316: x_return_status := l_return_status ;
309: x_error_count => lx_error_count) ;
310: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
311: RAISE FND_API.G_EXC_ERROR;
312: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
313: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
314: END IF;
315: --Assign value to OUT variables
316: x_return_status := l_return_status ;
317: x_msg_count := l_msg_count ;
319: x_total_count := lx_total_count;
320: x_processed_count := lx_processed_count;
321: x_error_count := lx_error_count;
322: EXCEPTION
323: WHEN FND_API.G_EXC_ERROR THEN
324: ROLLBACK TO trx_execute_cntrct_prtfl;
325: x_return_status := FND_API.G_RET_STS_ERROR;
326: x_msg_count := l_msg_count ;
327: x_msg_data := l_msg_data ;
321: x_error_count := lx_error_count;
322: EXCEPTION
323: WHEN FND_API.G_EXC_ERROR THEN
324: ROLLBACK TO trx_execute_cntrct_prtfl;
325: x_return_status := FND_API.G_RET_STS_ERROR;
326: x_msg_count := l_msg_count ;
327: x_msg_data := l_msg_data ;
328: FND_MSG_PUB.count_and_get(
329: p_count => x_msg_count
327: x_msg_data := l_msg_data ;
328: FND_MSG_PUB.count_and_get(
329: p_count => x_msg_count
330: ,p_data => x_msg_data);
331: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
332: ROLLBACK TO trx_execute_cntrct_prtfl;
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
334: x_msg_count := l_msg_count ;
335: x_msg_data := l_msg_data ;
329: p_count => x_msg_count
330: ,p_data => x_msg_data);
331: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
332: ROLLBACK TO trx_execute_cntrct_prtfl;
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
334: x_msg_count := l_msg_count ;
335: x_msg_data := l_msg_data ;
336: FND_MSG_PUB.count_and_get(
337: p_count => x_msg_count
337: p_count => x_msg_count
338: ,p_data => x_msg_data);
339: WHEN OTHERS THEN
340: ROLLBACK TO trx_execute_cntrct_prtfl;
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: x_msg_count := l_msg_count ;
343: x_msg_data := l_msg_data ;
344: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_CONTRACT_PRTFL_PUB','execute_cntrct_prtfl');
345: FND_MSG_PUB.count_and_get(