78: ,p_person_id in number
79: ) is
80: --
81: l_proc varchar2(72) := g_package||'populate_new_contact';
82: l_prog_id number(15) := fnd_profile.value('CONC_PROGRAM_ID');
83: l_req_id number(15) := fnd_profile.value('CONC_REQUEST_ID');
84: l_appl_id number(15) := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
85: l_upd_date date := trunc(sysdate);
86: --
79: ) is
80: --
81: l_proc varchar2(72) := g_package||'populate_new_contact';
82: l_prog_id number(15) := fnd_profile.value('CONC_PROGRAM_ID');
83: l_req_id number(15) := fnd_profile.value('CONC_REQUEST_ID');
84: l_appl_id number(15) := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
85: l_upd_date date := trunc(sysdate);
86: --
87: begin
80: --
81: l_proc varchar2(72) := g_package||'populate_new_contact';
82: l_prog_id number(15) := fnd_profile.value('CONC_PROGRAM_ID');
83: l_req_id number(15) := fnd_profile.value('CONC_REQUEST_ID');
84: l_appl_id number(15) := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
85: l_upd_date date := trunc(sysdate);
86: --
87: begin
88: --
128: (p_business_group_id in number
129: ,p_person_id in number) is
130: --
131: l_proc varchar2(72) := g_package||'populate_new_person';
132: l_program_id number(15) := fnd_profile.value('CONC_PROGRAM_ID');
133: l_request_id number(15) := fnd_profile.value('CONC_REQUEST_ID');
134: l_program_application_id number(15) := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
135: l_update_date date := trunc(sysdate);
136: --
129: ,p_person_id in number) is
130: --
131: l_proc varchar2(72) := g_package||'populate_new_person';
132: l_program_id number(15) := fnd_profile.value('CONC_PROGRAM_ID');
133: l_request_id number(15) := fnd_profile.value('CONC_REQUEST_ID');
134: l_program_application_id number(15) := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
135: l_update_date date := trunc(sysdate);
136: --
137: begin
130: --
131: l_proc varchar2(72) := g_package||'populate_new_person';
132: l_program_id number(15) := fnd_profile.value('CONC_PROGRAM_ID');
133: l_request_id number(15) := fnd_profile.value('CONC_REQUEST_ID');
134: l_program_application_id number(15) := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
135: l_update_date date := trunc(sysdate);
136: --
137: begin
138: hr_utility.set_location('Entering:'|| l_proc, 10);
345: l_assignment_type per_all_assignments_f.assignment_type%type;
346: l_current_employee_flag per_all_people_f.current_employee_flag%type;
347: l_current_npw_flag per_all_people_f.current_npw_flag%type;
348: --
349: l_program_id number(15) := fnd_profile.value('CONC_PROGRAM_ID');
350: l_request_id number(15) := fnd_profile.value('CONC_REQUEST_ID');
351: l_prog_appl_id number(15) := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
352: l_update_date date := trunc(sysdate);
353: --
346: l_current_employee_flag per_all_people_f.current_employee_flag%type;
347: l_current_npw_flag per_all_people_f.current_npw_flag%type;
348: --
349: l_program_id number(15) := fnd_profile.value('CONC_PROGRAM_ID');
350: l_request_id number(15) := fnd_profile.value('CONC_REQUEST_ID');
351: l_prog_appl_id number(15) := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
352: l_update_date date := trunc(sysdate);
353: --
354: l_proc varchar2(72) := g_package||'add_to_person_list';
347: l_current_npw_flag per_all_people_f.current_npw_flag%type;
348: --
349: l_program_id number(15) := fnd_profile.value('CONC_PROGRAM_ID');
350: l_request_id number(15) := fnd_profile.value('CONC_REQUEST_ID');
351: l_prog_appl_id number(15) := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
352: l_update_date date := trunc(sysdate);
353: --
354: l_proc varchar2(72) := g_package||'add_to_person_list';
355: --
3110: --
3111: -- This procedure is used primarily for ADF applications, where database
3112: -- sessions (and therefore cached PL/SQL values) are pooled and can
3113: -- be reused by a user that may have entirely different security permissions
3114: -- and contexts (such as fnd profile options).
3115: --
3116: -- This is not relevant for PUI applications and new database sessions are
3117: -- always created, not reused.
3118: --
4679: IF p_effective_date IS NOT NULL
4680: AND p_sec_prof_rec.security_profile_id IS NOT NULL
4681: THEN
4682: -- Query for the Security Profile Option set for Ex-Employee.
4683: -- fnd_profile.get('PER_EX_SECURITY_PROFILE',l_ex_emp_security);
4684: fnd_profile.get(
4685: NAME => 'PER_EX_SECURITY_PROFILE'
4686: ,VAL => l_ex_emp_security);
4687: IF g_dbg THEN hr_utility.trace( 'Ex-Employee Profile Value= '||l_ex_emp_security); END IF;
4680: AND p_sec_prof_rec.security_profile_id IS NOT NULL
4681: THEN
4682: -- Query for the Security Profile Option set for Ex-Employee.
4683: -- fnd_profile.get('PER_EX_SECURITY_PROFILE',l_ex_emp_security);
4684: fnd_profile.get(
4685: NAME => 'PER_EX_SECURITY_PROFILE'
4686: ,VAL => l_ex_emp_security);
4687: IF g_dbg THEN hr_utility.trace( 'Ex-Employee Profile Value= '||l_ex_emp_security); END IF;
4688:
4747: -- listgen currently does not maintain static assignment list.
4748: --
4749:
4750: --- Bug # 12739699 ---
4751: if NVL(fnd_profile.value('PER_SECURITY_ENHANCER'),'N') = 'PERF_ASG' then
4752: l_paaf_name := 'per_all_assignments_f_perf';
4753: else
4754: l_paaf_name := 'per_all_assignments_f';
4755: end if;
6993: --
6994: -- Local variables. Used for populating the who columns.
6995: --
6996: l_proc VARCHAR2(72) := g_package||'insert_org_list_for_user';
6997: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6998: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6999: l_program_application_id NUMBER := fnd_profile.value
7000: ('CONC_PROGRAM_APPLICATION_ID');
7001: i NUMBER;
6994: -- Local variables. Used for populating the who columns.
6995: --
6996: l_proc VARCHAR2(72) := g_package||'insert_org_list_for_user';
6997: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6998: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6999: l_program_application_id NUMBER := fnd_profile.value
7000: ('CONC_PROGRAM_APPLICATION_ID');
7001: i NUMBER;
7002:
6995: --
6996: l_proc VARCHAR2(72) := g_package||'insert_org_list_for_user';
6997: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6998: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6999: l_program_application_id NUMBER := fnd_profile.value
7000: ('CONC_PROGRAM_APPLICATION_ID');
7001: i NUMBER;
7002:
7003: BEGIN
7085: --
7086: -- Local variables. Used for populating the who columns.
7087: --
7088: l_proc VARCHAR2(72) := g_package||'insert_pos_list_for_user';
7089: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7090: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7091: l_program_application_id NUMBER := fnd_profile.value
7092: ('CONC_PROGRAM_APPLICATION_ID');
7093: i NUMBER;
7086: -- Local variables. Used for populating the who columns.
7087: --
7088: l_proc VARCHAR2(72) := g_package||'insert_pos_list_for_user';
7089: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7090: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7091: l_program_application_id NUMBER := fnd_profile.value
7092: ('CONC_PROGRAM_APPLICATION_ID');
7093: i NUMBER;
7094:
7087: --
7088: l_proc VARCHAR2(72) := g_package||'insert_pos_list_for_user';
7089: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7090: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7091: l_program_application_id NUMBER := fnd_profile.value
7092: ('CONC_PROGRAM_APPLICATION_ID');
7093: i NUMBER;
7094:
7095: BEGIN
7177: --
7178: -- Local variables. Used for populating the who columns.
7179: --
7180: l_proc VARCHAR2(72) := g_package||'insert_per_list_for_user';
7181: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7182: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7183: l_program_application_id NUMBER := fnd_profile.value
7184: ('CONC_PROGRAM_APPLICATION_ID');
7185: i NUMBER;
7178: -- Local variables. Used for populating the who columns.
7179: --
7180: l_proc VARCHAR2(72) := g_package||'insert_per_list_for_user';
7181: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7182: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7183: l_program_application_id NUMBER := fnd_profile.value
7184: ('CONC_PROGRAM_APPLICATION_ID');
7185: i NUMBER;
7186:
7179: --
7180: l_proc VARCHAR2(72) := g_package||'insert_per_list_for_user';
7181: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7182: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7183: l_program_application_id NUMBER := fnd_profile.value
7184: ('CONC_PROGRAM_APPLICATION_ID');
7185: i NUMBER;
7186:
7187: BEGIN
7269: --
7270: -- Local variables. Used for populating the who columns.
7271: --
7272: l_proc VARCHAR2(72) := g_package||'insert_asg_list_for_user';
7273: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7274: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7275: l_program_application_id NUMBER := fnd_profile.value
7276: ('CONC_PROGRAM_APPLICATION_ID');
7277: i NUMBER;
7270: -- Local variables. Used for populating the who columns.
7271: --
7272: l_proc VARCHAR2(72) := g_package||'insert_asg_list_for_user';
7273: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7274: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7275: l_program_application_id NUMBER := fnd_profile.value
7276: ('CONC_PROGRAM_APPLICATION_ID');
7277: i NUMBER;
7278:
7271: --
7272: l_proc VARCHAR2(72) := g_package||'insert_asg_list_for_user';
7273: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7274: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7275: l_program_application_id NUMBER := fnd_profile.value
7276: ('CONC_PROGRAM_APPLICATION_ID');
7277: i NUMBER;
7278:
7279: BEGIN
8004: --
8005: end if;
8006: --
8007: /* Get the value of Profile option 'Enable RTM Security' */
8008: fnd_profile.get(NAME => 'PER_RTM_SECURITY_PROFILE'
8009: ,VAL => l_rtm_security);
8010:
8011:
8012: /* Check Enable RTM Security is 'Yes' and current user is
8289: --
8290: end if;
8291: --
8292: /* Get the value of Profile option 'Enable RTM Security' */
8293: fnd_profile.get(NAME => 'PER_RTM_SECURITY_PROFILE'
8294: ,VAL => l_rtm_security);
8295:
8296:
8297: /* Check Enable RTM Security is 'Yes' and current user is
9151: -- USE ONLY.
9152: --
9153: IF g_dbg THEN op('Leaving: '||l_proc, 999); END IF;
9154:
9155: RETURN NVL(to_number(fnd_profile.value('HR_SEC_EVALUATION_TYPE'))
9156: ,g_PER_SEC_ONLY);
9157:
9158: END get_what_to_evaluate;
9159: --
9183: -- USE ONLY.
9184: --
9185: IF g_dbg THEN op('Leaving: '||l_proc, 999); END IF;
9186:
9187: RETURN (NVL(fnd_profile.value('HR_SEC_USE_STATIC_LISTS'),'Y')
9188: = 'Y');
9189:
9190: END get_use_static_lists;
9191: --
9307: --
9308: BEGIN
9309: -- Set WHO columns
9310: p_update_date := trunc(sysdate);
9311: p_request_id := fnd_profile.value('CONC_REQUEST_ID');
9312:
9313: -- If called from concurrent request then get other values
9314: IF (p_request_id > 0) THEN
9315: p_program_id := fnd_profile.value('CONC_PROGRAM_ID');
9311: p_request_id := fnd_profile.value('CONC_REQUEST_ID');
9312:
9313: -- If called from concurrent request then get other values
9314: IF (p_request_id > 0) THEN
9315: p_program_id := fnd_profile.value('CONC_PROGRAM_ID');
9316: p_program_application_id := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
9317: END IF;
9318:
9319: insert into per_organization_list
9312:
9313: -- If called from concurrent request then get other values
9314: IF (p_request_id > 0) THEN
9315: p_program_id := fnd_profile.value('CONC_PROGRAM_ID');
9316: p_program_application_id := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
9317: END IF;
9318:
9319: insert into per_organization_list
9320: (organization_id