55: X_MSG_COUNT => l_msg_count,
56: X_MSG_DATA => l_msg_data,
57: X_est_DISCounted_amt_TBL => l_contracts_out_tbl);
58:
59: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
60:
61: FOR k in 1..l_contracts_out_tbl.count LOOP
62:
63: IF l_contracts_out_tbl(1).discounted_amount IS NULL THEN
69: END IF;
70: END LOOP;
71:
72:
73: ELSIF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
74: x_msg_data := l_msg_data;
75: x_msg_count := l_msg_count;
76: x_return_status := l_return_status;
77:
172: x_msg_count => x_msg_count,
173: x_msg_data => x_msg_data,
174: x_ent_contracts => x_ent_contracts);
175:
176: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
177: RAISE FND_API.G_EXC_ERROR ;
178: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
180: END IF ;
173: x_msg_data => x_msg_data,
174: x_ent_contracts => x_ent_contracts);
175:
176: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
177: RAISE FND_API.G_EXC_ERROR ;
178: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
180: END IF ;
181: x_return_status := l_return_status;
174: x_ent_contracts => x_ent_contracts);
175:
176: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
177: RAISE FND_API.G_EXC_ERROR ;
178: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
180: END IF ;
181: x_return_status := l_return_status;
182:
175:
176: IF (l_return_status = FND_API.G_RET_STS_ERROR ) THEN
177: RAISE FND_API.G_EXC_ERROR ;
178: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
180: END IF ;
181: x_return_status := l_return_status;
182:
183: EXCEPTION
180: END IF ;
181: x_return_status := l_return_status;
182:
183: EXCEPTION
184: WHEN FND_API.G_EXC_ERROR THEN
185: ROLLBACK TO Get_contract_lines;
186: x_return_status := FND_API.G_RET_STS_ERROR ;
187: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
188: p_data => x_msg_data ,
182:
183: EXCEPTION
184: WHEN FND_API.G_EXC_ERROR THEN
185: ROLLBACK TO Get_contract_lines;
186: x_return_status := FND_API.G_RET_STS_ERROR ;
187: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
188: p_data => x_msg_data ,
189: p_encoded => fnd_api.g_false );
190:
185: ROLLBACK TO Get_contract_lines;
186: x_return_status := FND_API.G_RET_STS_ERROR ;
187: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
188: p_data => x_msg_data ,
189: p_encoded => fnd_api.g_false );
190:
191: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
192: ROLLBACK TO Get_contract_lines;
193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
187: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
188: p_data => x_msg_data ,
189: p_encoded => fnd_api.g_false );
190:
191: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
192: ROLLBACK TO Get_contract_lines;
193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
194: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
195: p_data => x_msg_data ,
189: p_encoded => fnd_api.g_false );
190:
191: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
192: ROLLBACK TO Get_contract_lines;
193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
194: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
195: p_data => x_msg_data ,
196: p_encoded => fnd_api.g_false );
197:
192: ROLLBACK TO Get_contract_lines;
193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
194: FND_MSG_PUB.COUNT_AND_GET (p_count =>x_msg_count ,
195: p_data => x_msg_data ,
196: p_encoded => fnd_api.g_false );
197:
198: WHEN OTHERS THEN
199: ROLLBACK TO Get_contract_lines;
200: x_return_status := FND_API.G_RET_STS_unexp_error ;
196: p_encoded => fnd_api.g_false );
197:
198: WHEN OTHERS THEN
199: ROLLBACK TO Get_contract_lines;
200: x_return_status := FND_API.G_RET_STS_unexp_error ;
201: IF fnd_msg_pub.check_msg_level ( fnd_msg_pub.g_msg_lvl_unexp_error ) THEN
202: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name ) ;
203: END IF;
204: fnd_msg_pub.count_and_get ( p_count =>x_msg_count ,p_data => x_msg_data ,p_encoded => fnd_api.g_false );
200: x_return_status := FND_API.G_RET_STS_unexp_error ;
201: IF fnd_msg_pub.check_msg_level ( fnd_msg_pub.g_msg_lvl_unexp_error ) THEN
202: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name ) ;
203: END IF;
204: fnd_msg_pub.count_and_get ( p_count =>x_msg_count ,p_data => x_msg_data ,p_encoded => fnd_api.g_false );
205:
206: END Get_Contract_Lines;
207:
208: END CS_Est_Apply_Contract_PKG;