The following lines contain the word 'select', 'insert', 'update' or 'delete':
select count(*) into l_count from fnd_user_resp_groups where user_id=p_user_id and responsibility_id=p_responsibility_id;
fnd_user_resp_groups_api.Insert_Assignment
(user_id => p_user_id
,responsibility_id => p_responsibility_id
,responsibility_application_id => p_resp_appl_id
,security_group_id => p_security_group_id
,start_date => trunc(sysdate)
,end_date => null
,description => ' ' -- ### description was supposed to default
-- to null... but does not look like it has
);
fnd_user_resp_groups_api.Update_Assignment
(user_id => p_user_id
,responsibility_id => p_responsibility_id
,responsibility_application_id => p_resp_appl_id
,security_group_id => p_security_group_id
,start_date => trunc(sysdate)
,end_date => null
,description => ' ' -- ### description was supposed to default
-- to null... but does not look like it has
);
select user_id into userID
from fnd_user
where user_name = user AND
user_id <> 6 and
(start_date <= sysdate) AND
(end_date is null or end_date > sysdate);
| DESCRIPTION Inserts a record into umx_reg_requests table on the initiation
|of the UMX Add Access Flow
|
|
| PARAMETERS
|
|
* ======================================================================*/
---------------------------------------------------------------------------
PROCEDURE LogAccessRequest(p_reg_request_id IN OUT NOCOPY NUMBER,
p_reg_service_code IN VARCHAR2 )
---------------------------------------------------------------------------
IS
l_rowid VARCHAR2(100);
CURSOR C1 IS SELECT rowid FROM UMX_REG_REQUESTS
WHERE REG_REQUEST_ID = p_reg_request_id;
CURSOR C2 IS SELECT UMX_REG_REQUESTS_S.nextval FROM sys.dual;
CURSOR C3 IS SELECT Reg_Request_Id
FROM UMX_REG_REQUESTS
WHERE Created_By = nvl(FND_GLOBAL.user_id,-1)
AND Reg_Service_Code = p_reg_service_code
AND Status_Code = 'UNASSIGNED';
l_debug_info := 'Insert New UMX Reg Request Record';
SELECT REG_SERVICE_TYPE,WF_ROLE_NAME,AME_TRANSACTION_TYPE_ID INTO l_reg_service_type,l_wf_role_name,l_ame_transaction_type_id
FROM umx_reg_services_vl
WHERE REG_SERVICE_CODE = p_reg_service_code;
INSERT INTO UMX_REG_REQUESTS(
Reg_Request_Id,
Reg_Service_Type,
Status_Code,
Requested_Start_Date,
Created_By,
Creation_Date,
Last_Updated_By,
Last_Update_Date,
Last_Update_Login,
Requested_By_User_Id,
Requested_For_User_Id,
Wf_Role_Name,
Reg_Service_Code,
Ame_Application_Id,
Ame_Transaction_Type_Id,
Justification
) VALUES (
p_reg_request_id,
l_reg_service_type,
'UNASSIGNED',
sysdate,
nvl(FND_GLOBAL.user_id,-1),
sysdate,
nvl(FND_GLOBAL.user_id,-1),
sysdate,
nvl(FND_GLOBAL.conc_login_id,FND_GLOBAL.login_id),
nvl(FND_GLOBAL.user_id,-1),
nvl(FND_GLOBAL.user_id,-1),
l_wf_role_name,
p_reg_service_code,
nvl(FND_GLOBAL.resp_appl_id,-1),
l_ame_transaction_type_id,
l_justification
);