[Home] [Help]
1540: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1541: END IF;
1542:
1543: -- Standard call to check for call compatibility.
1544: IF NOT FND_API.Compatible_API_Call (l_api_version,
1545: p_api_version,
1546: l_api_name,
1547: G_PKG_NAME )
1548: THEN
1545: p_api_version,
1546: l_api_name,
1547: G_PKG_NAME )
1548: THEN
1549: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1550: END IF;
1551:
1552: -- Initialize message list if p_init_msg_list is set to TRUE.
1553: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1549: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1550: END IF;
1551:
1552: -- Initialize message list if p_init_msg_list is set to TRUE.
1553: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1554: FND_MSG_PUB.initialize;
1555: END IF;
1556:
1557: l_debug_info := 'Calling AP Void Pkg.Iby_Void_Check';
1559: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1560: END IF;
1561:
1562: -- Initialize API return status to success
1563: x_return_status := FND_API.G_RET_STS_SUCCESS;
1564:
1565: --------------------------------------------
1566: -- Step 1, Open , fetch selected check cursor
1567: --------------------------------------------
1709: ||' l_amt_due = '||to_char(l_amt_due)
1710: ||' l_payment_date = '||to_char(l_payment_date) );
1711: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1712: FND_MSG_PUB.ADD;
1713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1714: --APP_EXCEPTION.RAISE_EXCEPTION;
1715:
1716: END;
1717:
1811: ||' l_amt_due = '||to_char(l_amt_due)
1812: ||' l_payment_date = '||to_char(l_payment_date) );
1813: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1814: FND_MSG_PUB.ADD;
1815: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1816: --APP_EXCEPTION.RAISE_EXCEPTION;
1817:
1818:
1819: END;
2033: CLOSE selected_checks;
2034:
2035: EXCEPTION
2036:
2037: WHEN FND_API.G_EXC_ERROR THEN
2038: ROLLBACK TO AP_JAPANBANKCHARGEHOOK;
2039: x_return_status := FND_API.G_RET_STS_ERROR ;
2040: FND_MSG_PUB.Count_And_Get
2041: ( p_count => x_msg_count,
2035: EXCEPTION
2036:
2037: WHEN FND_API.G_EXC_ERROR THEN
2038: ROLLBACK TO AP_JAPANBANKCHARGEHOOK;
2039: x_return_status := FND_API.G_RET_STS_ERROR ;
2040: FND_MSG_PUB.Count_And_Get
2041: ( p_count => x_msg_count,
2042: p_data => x_msg_data
2043: );
2040: FND_MSG_PUB.Count_And_Get
2041: ( p_count => x_msg_count,
2042: p_data => x_msg_data
2043: );
2044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2045: ROLLBACK TO AP_JAPANBANKCHARGEHOOK;
2046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2047: FND_MSG_PUB.Count_And_Get
2048: ( p_count => x_msg_count,
2042: p_data => x_msg_data
2043: );
2044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2045: ROLLBACK TO AP_JAPANBANKCHARGEHOOK;
2046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2047: FND_MSG_PUB.Count_And_Get
2048: ( p_count => x_msg_count,
2049: p_data => x_msg_data
2050: );
2050: );
2051:
2052: WHEN BANK_CHARGE_FAILURE THEN
2053: ROLLBACK TO AP_JAPANBANKCHARGEHOOK;
2054: x_return_status := FND_API.G_RET_STS_ERROR ;
2055: IF x_msg_data is NOT NULL THEN
2056: x_msg_count := 1;
2057: ELSE
2058: FND_MSG_PUB.Count_And_Get
2065:
2066: CLOSE selected_checks;
2067:
2068: ROLLBACK TO AP_JAPANBANKCHARGEHOOK;
2069: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2070: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2071: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2072: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
2073: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);