The following lines contain the word 'select', 'insert', 'update' or 'delete':
REM | insert records in the FND Responsibility table |
REM | |
REM | NOTES |
REM | 07-MAR-2005 KRISHNA Created. |
REM +=======================================================================+
*/
PROCEDURE UPDATE_ROW(
p_application_id IN NUMBER
, p_responsibility_id IN NUMBER
, p_menu_id IN NUMBER
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
) IS
l_responsibility_rec Responsibility_Rec_Type;
SELECT web_host_name,
web_agent_name,
data_group_application_id,
data_group_id,
start_date,
end_date,
group_application_id,
request_group_id,
version ,
responsibility_key ,
responsibility_name,
description
FROM fnd_responsibility_vl
WHERE application_id = p_application_id
AND responsibility_id = p_responsibility_id;
FND_RESPONSIBILITY_PKG.UPDATE_ROW(
X_RESPONSIBILITY_ID => p_responsibility_id
, X_APPLICATION_ID => p_application_id
, X_WEB_HOST_NAME => l_responsibility_rec.web_host_name
, X_WEB_AGENT_NAME => l_responsibility_rec.web_agent_name
, X_DATA_GROUP_APPLICATION_ID => l_responsibility_rec.data_group_application_id
, X_DATA_GROUP_ID => l_responsibility_rec.data_group_id
, X_MENU_ID => p_menu_id
, X_START_DATE => l_responsibility_rec.start_date
, X_END_DATE => l_responsibility_rec.end_date
, X_GROUP_APPLICATION_ID => l_responsibility_rec.group_application_id
, X_REQUEST_GROUP_ID => l_responsibility_rec.request_group_id
, X_VERSION => l_responsibility_rec.version
, X_RESPONSIBILITY_KEY => l_responsibility_rec.responsibility_key
, X_RESPONSIBILITY_NAME => l_responsibility_rec.responsibility_name
, X_DESCRIPTION => l_responsibility_rec.description
, X_LAST_UPDATE_DATE => sysdate
, X_LAST_UPDATED_BY => fnd_global.user_id
, X_LAST_UPDATE_LOGIN => fnd_global.user_id
);
END UPDATE_ROW;
, p_last_update_date IN DATE
) IS
l_last_update_date DATE;
SELECT last_update_date
FROM fnd_responsibility
WHERE responsibility_id = p_responsibility_id
AND application_id = p_application_id
FOR UPDATE OF menu_id NOWAIT;
FETCH cResponsibility INTO l_last_update_date;
FND_MESSAGE.SET_NAME('BIS','BIS_RESP_DELETED_ERROR');
IF p_last_update_date IS NOT NULL THEN
IF p_last_update_date <> l_last_update_date THEN
FND_MESSAGE.SET_NAME('BIS','BIS_RESP_CHANGED_ERROR');