The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT unit_config_header_id, name, object_version_number, unit_config_status_code, active_uc_status_code
FROM ahl_unit_config_headers
WHERE trunc(nvl(active_start_date,sysdate)) <= trunc(sysdate)
AND trunc(sysdate) < trunc(nvl(active_end_date, sysdate+1))
AND unit_config_header_id = c_uc_header_id;
PROCEDURE UPDATE_STATUS
(
itemtype IN VARCHAR2
,itemkey IN VARCHAR2
,actid IN NUMBER
,funcmode IN VARCHAR2
,resultout OUT NOCOPY VARCHAR2
)
IS
CURSOR check_uc_ovn(c_uc_header_id in number, c_object_version_number in number)
IS
SELECT unit_config_header_id, name, unit_config_status_code, active_uc_status_code
FROM ahl_unit_config_headers
WHERE trunc(nvl(active_start_date,sysdate)) <= trunc(sysdate)
AND trunc(sysdate) < trunc(nvl(active_end_date, sysdate+1))
AND unit_config_header_id = c_uc_header_id
AND object_version_number = c_object_version_number;
AHL_DEBUG_PUB.debug( 'UC:Start Update Status API');
aname => 'UPDATE_GEN_STATUS'
);
AHL_DEBUG_PUB.debug('UC: UPDATE_STATUS -- l_approval_status='||l_approval_status);
AHL_DEBUG_PUB.debug('UC: UPDATE_STATUS -- l_original_status='||l_original_status);
AHL_DEBUG_PUB.debug('UC: UPDATE_STATUS --> l_object_version_number='||l_object_version_number);
AHL_DEBUG_PUB.debug('UC: UPDATE_STATUS --> l_object_id='||l_object_id);
AHL_DEBUG_PUB.debug('UC: UPDATE_STATUS check_uc_ovn --> fnd_message='||fnd_message.get );
AHL_DEBUG_PUB.debug('UC:AHL_UC_WF_APPR_PVT.update_status -->l_msg_count...... ' || l_msg_count);
AHL_DEBUG_PUB.debug('UC:AHL_UC_WF_APPR_PVT.update_status -->l_error_msg...... ' || l_error_msg);
AHL_DEBUG_PUB.debug('UC:AHL_UC_WF_APPR_PVT.update_status -->l_msg_data...... ' || l_msg_data);
AHL_DEBUG_PUB.debug('UC:AHL_UC_WF_APPR_PVT.update_status --> Before call to complete_uc_approval ');
AHL_DEBUG_PUB.debug('UC:AHL_UC_WF_APPR_PVT.update_status -- Completed call to complete_uc_approval ');
AHL_DEBUG_PUB.debug( 'UC:End Update Status API, l_object_id =' || l_object_id );
'UPDATE_STATUS',
itemtype,
itemkey,
actid,
funcmode,
l_error_msg
);
'UPDATE_STATUS',
itemtype,
itemkey,
actid,
funcmode,
l_error_msg
);
END UPDATE_STATUS;
SELECT unit_config_header_id, name, unit_config_status_code, active_uc_status_code
FROM ahl_unit_config_headers
WHERE trunc(nvl(active_start_date,sysdate)) <= trunc(sysdate)
AND trunc(sysdate) < trunc(nvl(active_end_date, sysdate+1))
AND unit_config_header_id = c_uc_header_id
AND object_version_number = c_object_version_number;
UPDATE ahl_unit_config_headers
SET unit_config_status_code = l_next_status,
object_version_number = l_object_version_number + 1,
last_update_date = sysdate,
last_updated_by = to_number(fnd_global.login_id),
last_update_login = to_number(fnd_global.login_id)
WHERE unit_config_header_id = l_object_id;
UPDATE ahl_unit_config_headers
SET active_uc_status_code = l_next_status,
object_version_number = l_object_version_number + 1,
last_update_date = sysdate,
last_updated_by = to_number(fnd_global.login_id),
last_update_login = to_number(fnd_global.login_id)
WHERE unit_config_header_id = l_object_id;