295: )
296: IS
297: l_def_resp_id NUMBER;
298: l_def_app_id NUMBER;
299: l_def_resp_key FND_RESPONSIBILITY_VL.RESPONSIBILITY_KEY%TYPE;
300: l_def_resp_name FND_RESPONSIBILITY_VL.RESPONSIBILITY_NAME%TYPE;
301:
302: BEGIN
303: IF Fnd_User_Resp_Groups_Api.Assignment_Exists(
296: IS
297: l_def_resp_id NUMBER;
298: l_def_app_id NUMBER;
299: l_def_resp_key FND_RESPONSIBILITY_VL.RESPONSIBILITY_KEY%TYPE;
300: l_def_resp_name FND_RESPONSIBILITY_VL.RESPONSIBILITY_NAME%TYPE;
301:
302: BEGIN
303: IF Fnd_User_Resp_Groups_Api.Assignment_Exists(
304: user_id => X_USER_ID,
378: IS
379:
380: p_responsibility_id NUMBER;
381: CURSOR RESP_KEY IS SELECT RESPONSIBILITY_ID
382: FROM FND_RESPONSIBILITY_VL
383: WHERE RESPONSIBILITY_KEY = X_RESPONSIBILITY_KEY;
384: BEGIN
385:
386: OPEN RESP_KEY;
409: IS
410: p_responsibility_id NUMBER;
411: p_assign_def_resp boolean;
412: CURSOR RESP_KEY IS SELECT RESPONSIBILITY_ID
413: FROM FND_RESPONSIBILITY_VL
414: WHERE RESPONSIBILITY_KEY = X_RESPONSIBILITY_KEY;
415:
416: BEGIN
417:
460: IS
461:
462: p_responsibility_id NUMBER;
463: CURSOR RESP_KEY_ID IS SELECT RESPONSIBILITY_ID
464: FROM FND_RESPONSIBILITY_VL
465: WHERE RESPONSIBILITY_KEY = X_RESPONSIBILITY_KEY;
466: BEGIN
467:
468: OPEN RESP_KEY_ID;
506: l_procedure_name CONSTANT varchar2(30) := 'ASSIGN_USERTYPE_CREDENTIALS';
507: p_usertype_resp_id number;
508: p_usertype_app_id NUMBER;
509: p_principal_name VARCHAR2(255);
510: l_version FND_RESPONSIBILITY_VL.VERSION%TYPE;
511: l_resp_id number;
512: l_app_id number;
513: l_resp_key FND_RESPONSIBILITY_VL.RESPONSIBILITY_KEY%TYPE;
514: l_resp_name FND_RESPONSIBILITY_VL.RESPONSIBILITY_NAME%TYPE;
509: p_principal_name VARCHAR2(255);
510: l_version FND_RESPONSIBILITY_VL.VERSION%TYPE;
511: l_resp_id number;
512: l_app_id number;
513: l_resp_key FND_RESPONSIBILITY_VL.RESPONSIBILITY_KEY%TYPE;
514: l_resp_name FND_RESPONSIBILITY_VL.RESPONSIBILITY_NAME%TYPE;
515:
516: userStartDate DATE;
517: userEndDate DATE;
510: l_version FND_RESPONSIBILITY_VL.VERSION%TYPE;
511: l_resp_id number;
512: l_app_id number;
513: l_resp_key FND_RESPONSIBILITY_VL.RESPONSIBILITY_KEY%TYPE;
514: l_resp_name FND_RESPONSIBILITY_VL.RESPONSIBILITY_NAME%TYPE;
515:
516: userStartDate DATE;
517: userEndDate DATE;
518:
526: --added variables for 4287135
527: isDefaultRespPresent boolean :=false;
528:
529: CURSOR USERTYPE_RESP is select FR.RESPONSIBILITY_ID, UT.APPLICATION_ID, FR.VERSION
530: FROM JTF_UM_USERTYPE_RESP UT, FND_RESPONSIBILITY_VL FR
531: WHERE UT.USERTYPE_ID = X_USERTYPE_ID
532: AND FR.APPLICATION_ID = UT.APPLICATION_ID
533: AND FR.RESPONSIBILITY_KEY = UT.RESPONSIBILITY_KEY
534: AND (UT.EFFECTIVE_END_DATE IS NULL OR UT.EFFECTIVE_END_DATE > SYSDATE)
1062: ) IS
1063:
1064: l_procedure_name CONSTANT varchar2(30) := 'get_usertype_resp';
1065: CURSOR FIND_UT_RESP IS SELECT UTRESP.APPLICATION_ID, FURESP.RESPONSIBILITY_ID
1066: FROM JTF_UM_USERTYPE_RESP UTRESP, FND_RESPONSIBILITY_VL FURESP
1067: WHERE UTRESP.USERTYPE_ID = p_usertype_id
1068: AND NVL(UTRESP.EFFECTIVE_END_DATE,SYSDATE+1) > SYSDATE
1069: AND UTRESP.EFFECTIVE_START_DATE < SYSDATE
1070: AND UTRESP.RESPONSIBILITY_KEY = FURESP.RESPONSIBILITY_KEY;
1390: l_procedure_name CONSTANT varchar2(30) := 'get_default_login_resp';
1391: l_app_id_defined boolean;
1392: l_resp_id_defined boolean;
1393: CURSOR FIND_RESP_INFO IS SELECT RESPONSIBILITY_KEY, RESPONSIBILITY_NAME
1394: FROM FND_RESPONSIBILITY_VL
1395: WHERE RESPONSIBILITY_ID = x_resp_id
1396: AND APPLICATION_ID = x_app_id;
1397:
1398: BEGIN