The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT count(*) INTO l_count
FROM FND_APPLICATION
WHERE APPLICATION_ID = p_application_id;
SELECT COUNT(*) INTO l_count
FROM fnd_responsibility
WHERE responsibility_id = p_resp_id
And application_id = p_resp_app_id;
select count(*) into l_count
FROM FND_USER_RESP_GROUPS GRP WHERE USER_ID = P_PRIMARY_APPROVER_ID
AND RESPONSIBILITY_ID = P_RESPONSIBILITY_ID;
select count (*) into l_count_rec
from bom_departments
where department_id = p_dept_id
and organization_id = p_org_id;
select count (*) into l_count_rec
from BOM_EAM_DEPT_APPROVERS
where dept_id = p_dept_id
and responsibility_id = p_responsibility_id;
SELECT COUNT(*) INTO l_count
FROM BOM_EAM_DEPT_APPROVERS
WHERE DEPT_ID = P_DEPT_ID and
ORGANIZATION_ID = P_ORGANIZATION_ID and
RESPONSIBILITY_APPLICATION_ID = P_RESP_APP_ID and
RESPONSIBILITY_ID = P_RESPONSIBILITY_ID;
SELECT COUNT(*) INTO l_count
FROM BOM_EAM_DEPT_APPROVERS
WHERE DEPT_ID = P_DEPT_ID and
ORGANIZATION_ID = P_ORGANIZATION_ID;
PROCEDURE insert_dept_appr
( p_api_version 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 ,
x_return_status OUT NOCOPY VARCHAR2 ,
x_msg_count OUT NOCOPY NUMBER ,
x_msg_data OUT NOCOPY VARCHAR2 ,
p_dept_id IN NUMBER,
p_organization_id IN NUMBER,
p_resp_app_id IN NUMBER,
p_responsibility_id IN NUMBER,
p_primary_approver_id IN NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'insert_dept_appr';
SAVEPOINT INSERT_DEPT_APPR;
INSERT INTO BOM_EAM_DEPT_APPROVERS
(
DEPT_ID ,
ORGANIZATION_ID ,
RESPONSIBILITY_APPLICATION_ID ,
RESPONSIBILITY_ID ,
PRIMARY_APPROVER_ID ,
CREATED_BY ,
CREATION_DATE ,
LAST_UPDATE_LOGIN ,
LAST_UPDATE_DATE ,
LAST_UPDATED_BY
)
VALUES
(
P_DEPT_ID ,
P_ORGANIZATION_ID ,
p_resp_app_id ,
P_RESPONSIBILITY_ID ,
P_PRIMARY_APPROVER_ID ,
fnd_global.user_id,
sysdate,
fnd_global.login_id,
sysdate ,
fnd_global.user_id
);
ROLLBACK TO INSERT_DEPT_APPR;
ROLLBACK TO INSERT_DEPT_APPR;
ROLLBACK TO INSERT_DEPT_APPR;
END INSERT_DEPT_APPR;
PROCEDURE update_dept_appr
( p_api_version 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 ,
x_return_status OUT NOCOPY VARCHAR2 ,
x_msg_count OUT NOCOPY NUMBER ,
x_msg_data OUT NOCOPY VARCHAR2 ,
p_dept_id IN NUMBER,
p_organization_id IN NUMBER,
p_resp_app_id IN NUMBER,
p_responsibility_id IN NUMBER,
p_primary_approver_id IN NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'update_dept_appr';
SAVEPOINT UPDATE_DEPT_APPR;
UPDATE BOM_EAM_DEPT_APPROVERS
SET
--DEPT_ID = P_DEPT_ID ,
--ORGANIZATION_ID = P_ORGANIZATION_ID ,
--RESPONSIBILITY_APPLICATION_ID = P_RESP_APP_ID ,
--RESPONSIBILITY_ID = P_RESPONSIBILITY_ID ,
PRIMARY_APPROVER_ID = P_PRIMARY_APPROVER_ID ,
LAST_UPDATE_LOGIN = fnd_global.login_id ,
LAST_UPDATE_DATE = sysdate,
LAST_UPDATED_BY = fnd_global.user_id
where
DEPT_ID = P_DEPT_ID and
ORGANIZATION_ID = P_ORGANIZATION_ID and
RESPONSIBILITY_APPLICATION_ID = P_RESP_APP_ID and
RESPONSIBILITY_ID = P_RESPONSIBILITY_ID;
ROLLBACK TO UPDATE_DEPT_APPR;
ROLLBACK TO UPDATE_DEPT_APPR;
ROLLBACK TO UPDATE_DEPT_APPR;
END update_dept_appr;