The following lines contain the word 'select', 'insert', 'update' or 'delete':
p_create_update_flag IN VARCHAR2,
p_financial_report_rec IN HZ_ORG_INFO_PUB.FINANCIAL_REPORTS_REC_TYPE,
x_financial_report_rec OUT NOCOPY HZ_ORGANIZATION_INFO_V2PUB.FINANCIAL_REPORT_REC_TYPE
) IS
BEGIN
IF p_financial_report_rec.financial_report_id IS NULL THEN
x_financial_report_rec.financial_report_id := FND_API.G_MISS_NUM;
IF p_create_update_flag = 'C' THEN
x_financial_report_rec.created_by_module := DEFAULT_CREATED_BY_MODULE;
PROCEDURE v2_update_financial_report (
p_financial_report_rec IN HZ_ORG_INFO_PUB.FINANCIAL_REPORTS_REC_TYPE,
p_last_update_date IN OUT NOCOPY DATE,
x_return_status IN OUT NOCOPY VARCHAR2
) IS
l_financial_report_rec HZ_ORGANIZATION_INFO_V2PUB.FINANCIAL_REPORT_REC_TYPE;
l_last_update_date DATE;
IF p_last_update_date IS NULL OR
p_last_update_date = FND_API.G_MISS_DATE
THEN
FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
SELECT ROWID, OBJECT_VERSION_NUMBER, LAST_UPDATE_DATE
INTO l_rowid, l_object_version_number, l_last_update_date
FROM HZ_FINANCIAL_REPORTS
WHERE FINANCIAL_REPORT_ID = p_financial_report_rec.financial_report_id;
IF TO_CHAR( p_last_update_date, 'DD-MON-YYYY HH:MI:SS') <>
TO_CHAR( l_last_update_date, 'DD-MON-YYYY HH:MI:SS')
THEN
FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_RECORD_CHANGED' );
HZ_ORGANIZATION_INFO_V2PUB.update_financial_report (
p_financial_report_rec => l_financial_report_rec,
p_object_version_number => l_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
END v2_update_financial_report;
p_create_update_flag IN VARCHAR2,
p_financial_number_rec IN HZ_ORG_INFO_PUB.FINANCIAL_NUMBERS_REC_TYPE,
x_financial_number_rec OUT NOCOPY HZ_ORGANIZATION_INFO_V2PUB.FINANCIAL_NUMBER_REC_TYPE
) IS
BEGIN
IF p_financial_number_rec.financial_number_id IS NULL THEN
x_financial_number_rec.financial_number_id := FND_API.G_MISS_NUM;
IF p_create_update_flag = 'C' THEN
x_financial_number_rec.created_by_module := DEFAULT_CREATED_BY_MODULE;
PROCEDURE v2_update_financial_number (
p_financial_number_rec IN HZ_ORG_INFO_PUB.FINANCIAL_NUMBERS_REC_TYPE,
p_last_update_date IN OUT NOCOPY DATE,
x_return_status IN OUT NOCOPY VARCHAR2
) IS
l_financial_number_rec HZ_ORGANIZATION_INFO_V2PUB.FINANCIAL_NUMBER_REC_TYPE;
l_last_update_date DATE;
IF p_last_update_date IS NULL OR
p_last_update_date = FND_API.G_MISS_DATE
THEN
FND_MESSAGE.SET_NAME('AR', 'HZ_API_MISSING_COLUMN');
FND_MESSAGE.SET_TOKEN('COLUMN', 'p_last_update_date');
SELECT ROWID, OBJECT_VERSION_NUMBER, LAST_UPDATE_DATE
INTO l_rowid, l_object_version_number, l_last_update_date
FROM HZ_FINANCIAL_NUMBERS
WHERE FINANCIAL_NUMBER_ID = p_financial_number_rec.financial_number_id;
IF TO_CHAR( p_last_update_date, 'DD-MON-YYYY HH:MI:SS') <>
TO_CHAR( l_last_update_date, 'DD-MON-YYYY HH:MI:SS')
THEN
FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_RECORD_CHANGED' );
HZ_ORGANIZATION_INFO_V2PUB.update_financial_number (
p_financial_number_rec => l_financial_number_rec,
p_object_version_number => l_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
END v2_update_financial_number;