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: --
3070: --
3071: -- This procedure is used primarily for ADF applications, where database
3072: -- sessions (and therefore cached PL/SQL values) are pooled and can
3073: -- be reused by a user that may have entirely different security permissions
3074: -- and contexts (such as fnd profile options).
3075: --
3076: -- This is not relevant for PUI applications and new database sessions are
3077: -- always created, not reused.
3078: --
4554: IF p_effective_date IS NOT NULL
4555: AND p_sec_prof_rec.security_profile_id IS NOT NULL
4556: THEN
4557: -- Query for the Security Profile Option set for Ex-Employee.
4558: -- fnd_profile.get('PER_EX_SECURITY_PROFILE',l_ex_emp_security);
4559: fnd_profile.get(
4560: NAME => 'PER_EX_SECURITY_PROFILE'
4561: ,VAL => l_ex_emp_security);
4562: IF g_dbg THEN hr_utility.trace( 'Ex-Employee Profile Value= '||l_ex_emp_security); END IF;
4555: AND p_sec_prof_rec.security_profile_id IS NOT NULL
4556: THEN
4557: -- Query for the Security Profile Option set for Ex-Employee.
4558: -- fnd_profile.get('PER_EX_SECURITY_PROFILE',l_ex_emp_security);
4559: fnd_profile.get(
4560: NAME => 'PER_EX_SECURITY_PROFILE'
4561: ,VAL => l_ex_emp_security);
4562: IF g_dbg THEN hr_utility.trace( 'Ex-Employee Profile Value= '||l_ex_emp_security); END IF;
4563:
6749: --
6750: -- Local variables. Used for populating the who columns.
6751: --
6752: l_proc VARCHAR2(72) := g_package||'insert_org_list_for_user';
6753: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6754: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6755: l_program_application_id NUMBER := fnd_profile.value
6756: ('CONC_PROGRAM_APPLICATION_ID');
6757: i NUMBER;
6750: -- Local variables. Used for populating the who columns.
6751: --
6752: l_proc VARCHAR2(72) := g_package||'insert_org_list_for_user';
6753: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6754: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6755: l_program_application_id NUMBER := fnd_profile.value
6756: ('CONC_PROGRAM_APPLICATION_ID');
6757: i NUMBER;
6758:
6751: --
6752: l_proc VARCHAR2(72) := g_package||'insert_org_list_for_user';
6753: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6754: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6755: l_program_application_id NUMBER := fnd_profile.value
6756: ('CONC_PROGRAM_APPLICATION_ID');
6757: i NUMBER;
6758:
6759: BEGIN
6841: --
6842: -- Local variables. Used for populating the who columns.
6843: --
6844: l_proc VARCHAR2(72) := g_package||'insert_pos_list_for_user';
6845: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6846: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6847: l_program_application_id NUMBER := fnd_profile.value
6848: ('CONC_PROGRAM_APPLICATION_ID');
6849: i NUMBER;
6842: -- Local variables. Used for populating the who columns.
6843: --
6844: l_proc VARCHAR2(72) := g_package||'insert_pos_list_for_user';
6845: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6846: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6847: l_program_application_id NUMBER := fnd_profile.value
6848: ('CONC_PROGRAM_APPLICATION_ID');
6849: i NUMBER;
6850:
6843: --
6844: l_proc VARCHAR2(72) := g_package||'insert_pos_list_for_user';
6845: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6846: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6847: l_program_application_id NUMBER := fnd_profile.value
6848: ('CONC_PROGRAM_APPLICATION_ID');
6849: i NUMBER;
6850:
6851: BEGIN
6933: --
6934: -- Local variables. Used for populating the who columns.
6935: --
6936: l_proc VARCHAR2(72) := g_package||'insert_per_list_for_user';
6937: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6938: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6939: l_program_application_id NUMBER := fnd_profile.value
6940: ('CONC_PROGRAM_APPLICATION_ID');
6941: i NUMBER;
6934: -- Local variables. Used for populating the who columns.
6935: --
6936: l_proc VARCHAR2(72) := g_package||'insert_per_list_for_user';
6937: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6938: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6939: l_program_application_id NUMBER := fnd_profile.value
6940: ('CONC_PROGRAM_APPLICATION_ID');
6941: i NUMBER;
6942:
6935: --
6936: l_proc VARCHAR2(72) := g_package||'insert_per_list_for_user';
6937: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
6938: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
6939: l_program_application_id NUMBER := fnd_profile.value
6940: ('CONC_PROGRAM_APPLICATION_ID');
6941: i NUMBER;
6942:
6943: BEGIN
7025: --
7026: -- Local variables. Used for populating the who columns.
7027: --
7028: l_proc VARCHAR2(72) := g_package||'insert_asg_list_for_user';
7029: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7030: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7031: l_program_application_id NUMBER := fnd_profile.value
7032: ('CONC_PROGRAM_APPLICATION_ID');
7033: i NUMBER;
7026: -- Local variables. Used for populating the who columns.
7027: --
7028: l_proc VARCHAR2(72) := g_package||'insert_asg_list_for_user';
7029: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7030: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7031: l_program_application_id NUMBER := fnd_profile.value
7032: ('CONC_PROGRAM_APPLICATION_ID');
7033: i NUMBER;
7034:
7027: --
7028: l_proc VARCHAR2(72) := g_package||'insert_asg_list_for_user';
7029: l_request_id NUMBER := fnd_profile.value('CONC_REQUEST_ID');
7030: l_program_id NUMBER := fnd_profile.value('CONC_PROGRAM_ID');
7031: l_program_application_id NUMBER := fnd_profile.value
7032: ('CONC_PROGRAM_APPLICATION_ID');
7033: i NUMBER;
7034:
7035: BEGIN
8287: -- USE ONLY.
8288: --
8289: IF g_dbg THEN op('Leaving: '||l_proc, 999); END IF;
8290:
8291: RETURN NVL(to_number(fnd_profile.value('HR_SEC_EVALUATION_TYPE'))
8292: ,g_PER_SEC_ONLY);
8293:
8294: END get_what_to_evaluate;
8295: --
8319: -- USE ONLY.
8320: --
8321: IF g_dbg THEN op('Leaving: '||l_proc, 999); END IF;
8322:
8323: RETURN (NVL(fnd_profile.value('HR_SEC_USE_STATIC_LISTS'),'Y')
8324: = 'Y');
8325:
8326: END get_use_static_lists;
8327: --
8443: --
8444: BEGIN
8445: -- Set WHO columns
8446: p_update_date := trunc(sysdate);
8447: p_request_id := fnd_profile.value('CONC_REQUEST_ID');
8448:
8449: -- If called from concurrent request then get other values
8450: IF (p_request_id > 0) THEN
8451: p_program_id := fnd_profile.value('CONC_PROGRAM_ID');
8447: p_request_id := fnd_profile.value('CONC_REQUEST_ID');
8448:
8449: -- If called from concurrent request then get other values
8450: IF (p_request_id > 0) THEN
8451: p_program_id := fnd_profile.value('CONC_PROGRAM_ID');
8452: p_program_application_id := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
8453: END IF;
8454:
8455: insert into per_organization_list
8448:
8449: -- If called from concurrent request then get other values
8450: IF (p_request_id > 0) THEN
8451: p_program_id := fnd_profile.value('CONC_PROGRAM_ID');
8452: p_program_application_id := fnd_profile.value('CONC_PROGRAM_APPLICATION_ID');
8453: END IF;
8454:
8455: insert into per_organization_list
8456: (organization_id