The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT aml_monitor_log_s.NEXTVAL
FROM dual;
SELECT 1
FROM AML_MONITOR_LOG
WHERE monitor_log_id = l_id;
-- Invoke table handler(As_Monitor_Log_Pkg.Insert_Row)
Aml_Monitor_Log_Pkg.Insert_Row(
px_monitor_log_id => l_monitor_log_id,
-- p_monitor_execution_id => p_monitor_log_rec.monitor_execution_id,
p_last_update_date => SYSDATE,
p_last_updated_by => FND_GLOBAL.USER_ID,
p_creation_date => SYSDATE,
p_created_by => FND_GLOBAL.USER_ID,
p_last_update_login => FND_GLOBAL.conc_login_id,
p_object_version_number => l_object_version_number,
p_request_id => p_monitor_log_rec.request_id,
p_program_application_id => p_monitor_log_rec.program_application_id,
p_program_id => p_monitor_log_rec.program_id,
p_program_update_date => p_monitor_log_rec.program_update_date,
p_monitor_condition_id => p_monitor_log_rec.monitor_condition_id,
p_recipient_role => p_monitor_log_rec.recipient_role,
p_monitor_action => p_monitor_log_rec.monitor_action,
p_recipient_resource_id => p_monitor_log_rec.recipient_resource_id,
p_sales_lead_id => p_monitor_log_rec.sales_lead_id,
p_attribute_category => p_monitor_log_rec.attribute_category,
p_attribute1 => p_monitor_log_rec.attribute1,
p_attribute2 => p_monitor_log_rec.attribute2,
p_attribute3 => p_monitor_log_rec.attribute3,
p_attribute4 => p_monitor_log_rec.attribute4,
p_attribute5 => p_monitor_log_rec.attribute5,
p_attribute6 => p_monitor_log_rec.attribute6,
p_attribute7 => p_monitor_log_rec.attribute7,
p_attribute8 => p_monitor_log_rec.attribute8,
p_attribute9 => p_monitor_log_rec.attribute9,
p_attribute10 => p_monitor_log_rec.attribute10,
p_attribute11 => p_monitor_log_rec.attribute11,
p_attribute12 => p_monitor_log_rec.attribute12,
p_attribute13 => p_monitor_log_rec.attribute13,
p_attribute14 => p_monitor_log_rec.attribute14,
p_attribute15 => p_monitor_log_rec.attribute15
);
PROCEDURE Update_Monitor_Log(
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_monitor_log_rec IN monitor_log_rec_type ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
)
IS
CURSOR c_get_monitor_log(monitor_log_id NUMBER) IS
SELECT *
FROM AML_MONITOR_LOG
WHERE monitor_log_id = p_monitor_log_rec.monitor_log_id;
L_API_NAME CONSTANT VARCHAR2(30) := 'Update_Monitor_Log';
SAVEPOINT update_monitor_log_pvt;
AS_UTILITY_PVT.debug_message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: - Open Cursor to Select');
FND_MESSAGE.Set_Name('AMS', 'API_MISSING_UPDATE_TARGET');
If (l_tar_monitor_log_rec.last_update_date is NULL or
l_tar_monitor_log_rec.last_update_date = FND_API.G_MISS_DATE ) Then
IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
FND_MESSAGE.Set_Name('AMS', 'API_MISSING_ID');
FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
If (to_char(l_tar_monitor_log_rec.last_update_date,'DD-MON-RRRR') <> TO_CHAR(l_ref_monitor_log_rec.last_update_date,'DD-MON-RRRR')) Then
IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
FND_MESSAGE.Set_Name('AMS', 'API_RECORD_CHANGED');
AS_UTILITY_PVT.debug_message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling update table handler');
AML_Monitor_Log_Pkg.Update_Row(
p_monitor_log_id => p_monitor_log_rec.monitor_log_id,
-- p_monitor_execution_id => p_monitor_log_rec.monitor_execution_id,
p_last_update_date => SYSDATE,
p_last_updated_by => FND_GLOBAL.USER_ID,
p_CREATION_DATE => SYSDATE,
p_CREATED_BY => FND_GLOBAL.USER_ID,
p_last_update_login => FND_GLOBAL.conc_login_id,
p_object_version_number => p_monitor_log_rec.object_version_number,
p_request_id => p_monitor_log_rec.request_id,
p_program_application_id => p_monitor_log_rec.program_application_id,
p_program_id => p_monitor_log_rec.program_id,
p_program_update_date => p_monitor_log_rec.program_update_date,
p_monitor_condition_id => p_monitor_log_rec.monitor_condition_id,
p_recipient_role => p_monitor_log_rec.recipient_role,
p_monitor_action => p_monitor_log_rec.monitor_action,
p_recipient_resource_id => p_monitor_log_rec.recipient_resource_id,
p_sales_lead_id => p_monitor_log_rec.sales_lead_id,
p_attribute_category => p_monitor_log_rec.attribute_category,
p_attribute1 => p_monitor_log_rec.attribute1,
p_attribute2 => p_monitor_log_rec.attribute2,
p_attribute3 => p_monitor_log_rec.attribute3,
p_attribute4 => p_monitor_log_rec.attribute4,
p_attribute5 => p_monitor_log_rec.attribute5,
p_attribute6 => p_monitor_log_rec.attribute6,
p_attribute7 => p_monitor_log_rec.attribute7,
p_attribute8 => p_monitor_log_rec.attribute8,
p_attribute9 => p_monitor_log_rec.attribute9,
p_attribute10 => p_monitor_log_rec.attribute10,
p_attribute11 => p_monitor_log_rec.attribute11,
p_attribute12 => p_monitor_log_rec.attribute12,
p_attribute13 => p_monitor_log_rec.attribute13,
p_attribute14 => p_monitor_log_rec.attribute14,
p_attribute15 => p_monitor_log_rec.attribute15
);
ROLLBACK TO UPDATE_Monitor_Log_PVT;
ROLLBACK TO UPDATE_Monitor_Log_PVT;
ROLLBACK TO UPDATE_Monitor_Log_PVT;
End Update_Monitor_Log;
PROCEDURE Delete_Monitor_Log(
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_monitor_log_id IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
)
IS
L_API_NAME CONSTANT VARCHAR2(30) := 'Delete_Monitor_Log';
SAVEPOINT delete_monitor_log_pvt;
AS_UTILITY_PVT.debug_message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling delete table handler');
AMl_Monitor_Log_Pkg.Delete_Row(
p_monitor_log_id => p_monitor_log_id
--, p_object_version_number => p_object_version_number
);
ROLLBACK TO DELETE_Monitor_Log_PVT;
ROLLBACK TO DELETE_Monitor_Log_PVT;
ROLLBACK TO DELETE_Monitor_Log_PVT;
End Delete_Monitor_Log;