50: -- Standard Start of API savepoint
51: SAVEPOINT create_dispute_pub;
52:
53: -- Initialize API return status to SUCCESS
54: x_return_status := FND_API.G_RET_STS_SUCCESS;
55:
56: -- Standard call to check for call compatibility.
57: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
58: p_api_version,
53: -- Initialize API return status to SUCCESS
54: x_return_status := FND_API.G_RET_STS_SUCCESS;
55:
56: -- Standard call to check for call compatibility.
57: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
58: p_api_version,
59: l_api_name,
60: G_PKG_NAME)
61: THEN
58: p_api_version,
59: l_api_name,
60: G_PKG_NAME)
61: THEN
62: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
63: END IF;
64:
65: -- Initialize message list if p_init_msg_list is set to TRUE.
66: IF FND_API.to_Boolean( p_init_msg_list )
62: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
63: END IF;
64:
65: -- Initialize message list if p_init_msg_list is set to TRUE.
66: IF FND_API.to_Boolean( p_init_msg_list )
67: THEN
68: FND_MSG_PUB.initialize;
69: END IF;
70:
94: x_msg_count := l_msg_count ;
95: x_msg_data := l_msg_data ;
96:
97: -- TEST TO CATCH ERROR HERE
98: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
99: FND_MESSAGE.SET_NAME('IEX', 'IEX_DISPUTE_FAILED');
100: FND_MSG_PUB.Add;
101: x_return_status := FND_API.G_RET_STS_ERROR;
102: RAISE FND_API.G_EXC_ERROR;
97: -- TEST TO CATCH ERROR HERE
98: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
99: FND_MESSAGE.SET_NAME('IEX', 'IEX_DISPUTE_FAILED');
100: FND_MSG_PUB.Add;
101: x_return_status := FND_API.G_RET_STS_ERROR;
102: RAISE FND_API.G_EXC_ERROR;
103:
104: END IF ;
105:
98: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
99: FND_MESSAGE.SET_NAME('IEX', 'IEX_DISPUTE_FAILED');
100: FND_MSG_PUB.Add;
101: x_return_status := FND_API.G_RET_STS_ERROR;
102: RAISE FND_API.G_EXC_ERROR;
103:
104: END IF ;
105:
106: -- End of API body
104: END IF ;
105:
106: -- End of API body
107:
108: IF FND_API.to_Boolean(p_commit) THEN
109: COMMIT WORK;
110: END IF;
111:
112: -- Debug Message
120: p_data => x_msg_data);
121:
122:
123: EXCEPTION
124: WHEN FND_API.G_EXC_ERROR THEN
125: ROLLBACK TO create_dispute_pub;
126: x_return_status := FND_API.G_RET_STS_ERROR;
127: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
128: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
122:
123: EXCEPTION
124: WHEN FND_API.G_EXC_ERROR THEN
125: ROLLBACK TO create_dispute_pub;
126: x_return_status := FND_API.G_RET_STS_ERROR;
127: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
128: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
129: ROLLBACK TO create_dispute_pub;
130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
124: WHEN FND_API.G_EXC_ERROR THEN
125: ROLLBACK TO create_dispute_pub;
126: x_return_status := FND_API.G_RET_STS_ERROR;
127: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
128: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
129: ROLLBACK TO create_dispute_pub;
130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
131: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
132: WHEN OTHERS THEN
126: x_return_status := FND_API.G_RET_STS_ERROR;
127: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
128: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
129: ROLLBACK TO create_dispute_pub;
130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
131: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
132: WHEN OTHERS THEN
133: ROLLBACK TO create_dispute_pub;
134: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
131: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
132: WHEN OTHERS THEN
133: ROLLBACK TO create_dispute_pub;
134: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
135: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
136: THEN
137: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
138: END IF;
167: -- Standard Start of API savepoint
168: SAVEPOINT is_delinquency_pvt;
169:
170: -- Initialize API return status to SUCCESS
171: x_return_status := FND_API.G_RET_STS_SUCCESS;
172:
173: -- Standard call to check for call compatibility.
174: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
175: p_api_version,
170: -- Initialize API return status to SUCCESS
171: x_return_status := FND_API.G_RET_STS_SUCCESS;
172:
173: -- Standard call to check for call compatibility.
174: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
175: p_api_version,
176: l_api_name,
177: G_PKG_NAME)
178: THEN
175: p_api_version,
176: l_api_name,
177: G_PKG_NAME)
178: THEN
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180: END IF;
181:
182: -- Initialize message list if p_init_msg_list is set to TRUE.
183: IF FND_API.to_Boolean( p_init_msg_list )
179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180: END IF;
181:
182: -- Initialize message list if p_init_msg_list is set to TRUE.
183: IF FND_API.to_Boolean( p_init_msg_list )
184: THEN
185: FND_MSG_PUB.initialize;
186: END IF;
187:
204: x_return_status := l_return_status ;
205: x_msg_count := l_msg_count ;
206: x_msg_data := l_msg_data ;
207:
208: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
209: FND_MESSAGE.SET_NAME('IEX', 'IEX_DISPUTE_DELINQUENT_FAILED');
210: FND_MSG_PUB.Add;
211: x_return_status := FND_API.G_RET_STS_ERROR;
212: RAISE FND_API.G_EXC_ERROR;
207:
208: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
209: FND_MESSAGE.SET_NAME('IEX', 'IEX_DISPUTE_DELINQUENT_FAILED');
210: FND_MSG_PUB.Add;
211: x_return_status := FND_API.G_RET_STS_ERROR;
212: RAISE FND_API.G_EXC_ERROR;
213:
214: END IF ;
215:
208: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
209: FND_MESSAGE.SET_NAME('IEX', 'IEX_DISPUTE_DELINQUENT_FAILED');
210: FND_MSG_PUB.Add;
211: x_return_status := FND_API.G_RET_STS_ERROR;
212: RAISE FND_API.G_EXC_ERROR;
213:
214: END IF ;
215:
216: -- End of API body
227: p_data => x_msg_data
228: );
229:
230: EXCEPTION
231: WHEN FND_API.G_EXC_ERROR THEN
232: ROLLBACK TO is_delinquency_pvt;
233: x_return_status := FND_API.G_RET_STS_ERROR;
234: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
235: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
229:
230: EXCEPTION
231: WHEN FND_API.G_EXC_ERROR THEN
232: ROLLBACK TO is_delinquency_pvt;
233: x_return_status := FND_API.G_RET_STS_ERROR;
234: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
235: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
236: ROLLBACK TO is_delinquency_pvt;
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
231: WHEN FND_API.G_EXC_ERROR THEN
232: ROLLBACK TO is_delinquency_pvt;
233: x_return_status := FND_API.G_RET_STS_ERROR;
234: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
235: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
236: ROLLBACK TO is_delinquency_pvt;
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
238: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
239: WHEN OTHERS THEN
233: x_return_status := FND_API.G_RET_STS_ERROR;
234: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
235: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
236: ROLLBACK TO is_delinquency_pvt;
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
238: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
239: WHEN OTHERS THEN
240: ROLLBACK TO is_delinquency_pvt;
241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
238: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
239: WHEN OTHERS THEN
240: ROLLBACK TO is_delinquency_pvt;
241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
242: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
243: THEN
244: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
245: END IF;
279: -- Standard Start of API savepoint
280: SAVEPOINT cancel_dispute_pub;
281:
282: -- Initialize API return status to SUCCESS
283: x_return_status := FND_API.G_RET_STS_SUCCESS;
284:
285: -- Standard call to check for call compatibility.
286: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
287: p_api_version,
282: -- Initialize API return status to SUCCESS
283: x_return_status := FND_API.G_RET_STS_SUCCESS;
284:
285: -- Standard call to check for call compatibility.
286: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
287: p_api_version,
288: l_api_name,
289: G_PKG_NAME)
290: THEN
287: p_api_version,
288: l_api_name,
289: G_PKG_NAME)
290: THEN
291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
292: END IF;
293:
294: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
295: IEX_DEBUG_PUB.logMessage('Cancel_Dispute: ' || 'PVT: ' || l_api_name || ' start');
310: x_msg_count := l_msg_count ;
311: x_msg_data := l_msg_data ;
312:
313: -- TEST TO CATCH ERROR HERE
314: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
315: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
316: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - exception');
317: errmsg := SQLERRM;
318: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - errmsg='||errmsg);
316: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - exception');
317: errmsg := SQLERRM;
318: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - errmsg='||errmsg);
319: END IF;
320: x_return_status := FND_API.G_RET_STS_ERROR;
321: RAISE FND_API.G_EXC_ERROR;
322:
323: END IF ;
324:
317: errmsg := SQLERRM;
318: IEX_DEBUG_PUB.logMessage('CANCEL_DISPUTE: - errmsg='||errmsg);
319: END IF;
320: x_return_status := FND_API.G_RET_STS_ERROR;
321: RAISE FND_API.G_EXC_ERROR;
322:
323: END IF ;
324:
325: -- End of API body
323: END IF ;
324:
325: -- End of API body
326:
327: IF FND_API.to_Boolean(p_commit) THEN
328: COMMIT WORK;
329: END IF;
330:
331: -- Debug Message
339: p_data => x_msg_data);
340:
341:
342: EXCEPTION
343: WHEN FND_API.G_EXC_ERROR THEN
344: ROLLBACK TO cancel_dispute_pub;
345: x_return_status := FND_API.G_RET_STS_ERROR;
346: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
347: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341:
342: EXCEPTION
343: WHEN FND_API.G_EXC_ERROR THEN
344: ROLLBACK TO cancel_dispute_pub;
345: x_return_status := FND_API.G_RET_STS_ERROR;
346: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
347: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
348: ROLLBACK TO cancel_dispute_pub;
349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
343: WHEN FND_API.G_EXC_ERROR THEN
344: ROLLBACK TO cancel_dispute_pub;
345: x_return_status := FND_API.G_RET_STS_ERROR;
346: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
347: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
348: ROLLBACK TO cancel_dispute_pub;
349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
350: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
351: WHEN OTHERS THEN
345: x_return_status := FND_API.G_RET_STS_ERROR;
346: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
347: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
348: ROLLBACK TO cancel_dispute_pub;
349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
350: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
351: WHEN OTHERS THEN
352: ROLLBACK TO cancel_dispute_pub;
353: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
350: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
351: WHEN OTHERS THEN
352: ROLLBACK TO cancel_dispute_pub;
353: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
354: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
355: THEN
356: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
357: END IF;