2258:
2259: SAVEPOINT Query_Aging_lines;
2260:
2261: -- Standard call to check for call compatibility.
2262: IF NOT FND_API.Compatible_API_Call (l_api_version,
2263: p_api_version,
2264: l_api_name,
2265: G_PKG_NAME) THEN
2266: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2262: IF NOT FND_API.Compatible_API_Call (l_api_version,
2263: p_api_version,
2264: l_api_name,
2265: G_PKG_NAME) THEN
2266: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2267: END IF;
2268:
2269: -- Check p_init_msg_list
2270: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2266: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2267: END IF;
2268:
2269: -- Check p_init_msg_list
2270: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2271: FND_MSG_PUB.initialize;
2272: END IF;
2273:
2274:
2283: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2284: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || 'Bucket Id >> ' || p_bucket_id );
2285: END IF;
2286:
2287: x_return_status := FND_API.G_RET_STS_SUCCESS;
2288:
2289: IEX_CURRENCY_PVT.GET_FUNCT_CURR(
2290: P_API_VERSION =>1.0,
2291: p_init_msg_list => 'T',
3293: x_bucket_lines_tbl(l_total_rec).disputed_tran_amount :=
3294: l_total_disp_amount ;
3295:
3296: -- Standard check of p_commit
3297: IF FND_API.To_Boolean(p_commit) THEN
3298: COMMIT WORK;
3299: END IF;
3300:
3301: -- Standard call to get message count and if count is 1, get message info
3314: IEX_DEBUG_PUB.LogMessage('QUERY_AGING_LINES: ' || '-----------------------------------------');
3315: END IF;
3316:
3317: EXCEPTION
3318: WHEN FND_API.G_EXC_ERROR THEN
3319: ROLLBACK TO Query_Aging_lines;
3320: x_return_status := FND_API.G_RET_STS_ERROR;
3321: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3322:
3316:
3317: EXCEPTION
3318: WHEN FND_API.G_EXC_ERROR THEN
3319: ROLLBACK TO Query_Aging_lines;
3320: x_return_status := FND_API.G_RET_STS_ERROR;
3321: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3322:
3323: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3324: ROLLBACK TO Query_Aging_lines;
3319: ROLLBACK TO Query_Aging_lines;
3320: x_return_status := FND_API.G_RET_STS_ERROR;
3321: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3322:
3323: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3324: ROLLBACK TO Query_Aging_lines;
3325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3326: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3327:
3321: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3322:
3323: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3324: ROLLBACK TO Query_Aging_lines;
3325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3326: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3327:
3328: WHEN OTHERS THEN
3329: ROLLBACK TO Query_Aging_lines;
3326: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3327:
3328: WHEN OTHERS THEN
3329: ROLLBACK TO Query_Aging_lines;
3330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3331: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3332: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3333: END IF;
3334: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);