[Home] [Help]
5: --
6: --
7: g_package varchar2(33) := 'hr_user_acct_api.';
8: g_api_vers constant number := 1.0;
9: g_empty_fnd_user_rec hr_user_acct_utility.fnd_user_rec;
10: g_emtpy_fnd_resp_tbl hr_user_acct_utility.fnd_responsibility_tbl;
11: g_emtpy_fnd_prof_opt_val_tbl hr_user_acct_utility.fnd_profile_opt_val_tbl;
12: g_empty_fnd_resp_func_tbl hr_user_acct_utility.fnd_resp_functions_tbl;
13: g_empty_func_sec_excl_tbl hr_user_acct_utility.func_sec_excl_tbl;
6: --
7: g_package varchar2(33) := 'hr_user_acct_api.';
8: g_api_vers constant number := 1.0;
9: g_empty_fnd_user_rec hr_user_acct_utility.fnd_user_rec;
10: g_emtpy_fnd_resp_tbl hr_user_acct_utility.fnd_responsibility_tbl;
11: g_emtpy_fnd_prof_opt_val_tbl hr_user_acct_utility.fnd_profile_opt_val_tbl;
12: g_empty_fnd_resp_func_tbl hr_user_acct_utility.fnd_resp_functions_tbl;
13: g_empty_func_sec_excl_tbl hr_user_acct_utility.func_sec_excl_tbl;
14: --
7: g_package varchar2(33) := 'hr_user_acct_api.';
8: g_api_vers constant number := 1.0;
9: g_empty_fnd_user_rec hr_user_acct_utility.fnd_user_rec;
10: g_emtpy_fnd_resp_tbl hr_user_acct_utility.fnd_responsibility_tbl;
11: g_emtpy_fnd_prof_opt_val_tbl hr_user_acct_utility.fnd_profile_opt_val_tbl;
12: g_empty_fnd_resp_func_tbl hr_user_acct_utility.fnd_resp_functions_tbl;
13: g_empty_func_sec_excl_tbl hr_user_acct_utility.func_sec_excl_tbl;
14: --
15: -- ----------------------------------------------------------------------------
8: g_api_vers constant number := 1.0;
9: g_empty_fnd_user_rec hr_user_acct_utility.fnd_user_rec;
10: g_emtpy_fnd_resp_tbl hr_user_acct_utility.fnd_responsibility_tbl;
11: g_emtpy_fnd_prof_opt_val_tbl hr_user_acct_utility.fnd_profile_opt_val_tbl;
12: g_empty_fnd_resp_func_tbl hr_user_acct_utility.fnd_resp_functions_tbl;
13: g_empty_func_sec_excl_tbl hr_user_acct_utility.func_sec_excl_tbl;
14: --
15: -- ----------------------------------------------------------------------------
16: -- |-----------------------< create_user_acct >------------------------|
9: g_empty_fnd_user_rec hr_user_acct_utility.fnd_user_rec;
10: g_emtpy_fnd_resp_tbl hr_user_acct_utility.fnd_responsibility_tbl;
11: g_emtpy_fnd_prof_opt_val_tbl hr_user_acct_utility.fnd_profile_opt_val_tbl;
12: g_empty_fnd_resp_func_tbl hr_user_acct_utility.fnd_resp_functions_tbl;
13: g_empty_func_sec_excl_tbl hr_user_acct_utility.func_sec_excl_tbl;
14: --
15: -- ----------------------------------------------------------------------------
16: -- |-----------------------< create_user_acct >------------------------|
17: -- ----------------------------------------------------------------------------
105: l_language fnd_profile_option_values.profile_option_value%type
106: default null;
107: l_user_id number default null;
108: --
109: l_fnd_resp_rec hr_user_acct_utility.fnd_responsibility_rec;
110: l_responsibility_id fnd_responsibility.responsibility_id%type := null;
111: l_responsibility_key fnd_responsibility.responsibility_key%type := null;
112: l_user_resp_start_date fnd_user_resp_groups.start_date%type;
113: l_user_resp_end_date fnd_user_resp_groups.end_date%type;
115: l_count number default 0;
116: l_prof_opt_val_count number default 0;
117: l_resp_count number default 0;
118: l_resp_func_count number default 0;
119: l_out_profile_opt_val_tbl hr_user_acct_utility.fnd_profile_opt_val_tbl;
120: l_out_profile_opt_val_count number default 0;
121: l_profile_value_saved boolean default null;
122: l_msg_text varchar2(2000) default null;
123: l_new_resp_id fnd_responsibility.responsibility_id%type := null;
121: l_profile_value_saved boolean default null;
122: l_msg_text varchar2(2000) default null;
123: l_new_resp_id fnd_responsibility.responsibility_id%type := null;
124: l_temp varchar2(2000) default null;
125: l_out_func_sec_excl_tbl hr_user_acct_utility.func_sec_excl_tbl;
126: l_old_resp_rec lc_get_existing_fnd_resp%rowtype;
127: l_user_resp_app_id fnd_responsibility.application_id%type := null;
128: l_temp_id number(15) default null;
129: l_status varchar2(2000) default null;
145: begin
146: -- Clear the global record table variables first. Otherwise,these variables
147: -- will retain values from the previous employee.
148: --
149: hr_user_acct_utility.g_fnd_user_rec := g_empty_fnd_user_rec;
150: hr_user_acct_utility.g_fnd_resp_tbl := g_emtpy_fnd_resp_tbl;
151: hr_user_acct_utility.g_fnd_profile_opt_val_tbl :=
152: g_emtpy_fnd_prof_opt_val_tbl;
153: hr_user_acct_utility.g_fnd_resp_functions_tbl :=
146: -- Clear the global record table variables first. Otherwise,these variables
147: -- will retain values from the previous employee.
148: --
149: hr_user_acct_utility.g_fnd_user_rec := g_empty_fnd_user_rec;
150: hr_user_acct_utility.g_fnd_resp_tbl := g_emtpy_fnd_resp_tbl;
151: hr_user_acct_utility.g_fnd_profile_opt_val_tbl :=
152: g_emtpy_fnd_prof_opt_val_tbl;
153: hr_user_acct_utility.g_fnd_resp_functions_tbl :=
154: g_empty_fnd_resp_func_tbl;
147: -- will retain values from the previous employee.
148: --
149: hr_user_acct_utility.g_fnd_user_rec := g_empty_fnd_user_rec;
150: hr_user_acct_utility.g_fnd_resp_tbl := g_emtpy_fnd_resp_tbl;
151: hr_user_acct_utility.g_fnd_profile_opt_val_tbl :=
152: g_emtpy_fnd_prof_opt_val_tbl;
153: hr_user_acct_utility.g_fnd_resp_functions_tbl :=
154: g_empty_fnd_resp_func_tbl;
155: --
149: hr_user_acct_utility.g_fnd_user_rec := g_empty_fnd_user_rec;
150: hr_user_acct_utility.g_fnd_resp_tbl := g_emtpy_fnd_resp_tbl;
151: hr_user_acct_utility.g_fnd_profile_opt_val_tbl :=
152: g_emtpy_fnd_prof_opt_val_tbl;
153: hr_user_acct_utility.g_fnd_resp_functions_tbl :=
154: g_empty_fnd_resp_func_tbl;
155: --
156: -- Start of API User Hook for the before hook of create_user_acct
157: -- The Person ID, per_all_people_f.effective_start_date and
206: --
207: -----------------------------------------------------------------------------
208: -- NOTE: User hooks can pass information back to us, such as user name,
209: -- password, responsibilities and profile info. via global variables
210: -- in the dummy hr_user_acct_utility package header. We directly
211: -- move information from there to the parameters in
212: -- create_fnd_user. Validations will be done in individual business
213: -- process, such as create_fnd_user, not at the wrapper level.
214: --
226: --
227: hr_user_acct_internal.create_fnd_user
228: (p_hire_date => l_hire_date
229: ,p_user_name =>
230: hr_user_acct_utility.g_fnd_user_rec.user_name
231: ,p_password =>
232: hr_user_acct_utility.g_fnd_user_rec.password
233: ,p_user_start_date =>
234: hr_user_acct_utility.g_fnd_user_rec.start_date
228: (p_hire_date => l_hire_date
229: ,p_user_name =>
230: hr_user_acct_utility.g_fnd_user_rec.user_name
231: ,p_password =>
232: hr_user_acct_utility.g_fnd_user_rec.password
233: ,p_user_start_date =>
234: hr_user_acct_utility.g_fnd_user_rec.start_date
235: ,p_user_end_date =>
236: hr_user_acct_utility.g_fnd_user_rec.end_date
230: hr_user_acct_utility.g_fnd_user_rec.user_name
231: ,p_password =>
232: hr_user_acct_utility.g_fnd_user_rec.password
233: ,p_user_start_date =>
234: hr_user_acct_utility.g_fnd_user_rec.start_date
235: ,p_user_end_date =>
236: hr_user_acct_utility.g_fnd_user_rec.end_date
237: ,p_email_address =>
238: hr_user_acct_utility.g_fnd_user_rec.email_address
232: hr_user_acct_utility.g_fnd_user_rec.password
233: ,p_user_start_date =>
234: hr_user_acct_utility.g_fnd_user_rec.start_date
235: ,p_user_end_date =>
236: hr_user_acct_utility.g_fnd_user_rec.end_date
237: ,p_email_address =>
238: hr_user_acct_utility.g_fnd_user_rec.email_address
239: ,p_fax =>
240: hr_user_acct_utility.g_fnd_user_rec.fax
234: hr_user_acct_utility.g_fnd_user_rec.start_date
235: ,p_user_end_date =>
236: hr_user_acct_utility.g_fnd_user_rec.end_date
237: ,p_email_address =>
238: hr_user_acct_utility.g_fnd_user_rec.email_address
239: ,p_fax =>
240: hr_user_acct_utility.g_fnd_user_rec.fax
241: ,p_description =>
242: hr_user_acct_utility.g_fnd_user_rec.description
236: hr_user_acct_utility.g_fnd_user_rec.end_date
237: ,p_email_address =>
238: hr_user_acct_utility.g_fnd_user_rec.email_address
239: ,p_fax =>
240: hr_user_acct_utility.g_fnd_user_rec.fax
241: ,p_description =>
242: hr_user_acct_utility.g_fnd_user_rec.description
243: ,p_password_date =>
244: hr_user_acct_utility.g_fnd_user_rec.password_date -- Fix 2288014
238: hr_user_acct_utility.g_fnd_user_rec.email_address
239: ,p_fax =>
240: hr_user_acct_utility.g_fnd_user_rec.fax
241: ,p_description =>
242: hr_user_acct_utility.g_fnd_user_rec.description
243: ,p_password_date =>
244: hr_user_acct_utility.g_fnd_user_rec.password_date -- Fix 2288014
245: ,p_language =>
246: hr_user_acct_utility.g_fnd_user_rec.language
240: hr_user_acct_utility.g_fnd_user_rec.fax
241: ,p_description =>
242: hr_user_acct_utility.g_fnd_user_rec.description
243: ,p_password_date =>
244: hr_user_acct_utility.g_fnd_user_rec.password_date -- Fix 2288014
245: ,p_language =>
246: hr_user_acct_utility.g_fnd_user_rec.language
247: ,p_host_port => null
248: ,p_employee_id =>
242: hr_user_acct_utility.g_fnd_user_rec.description
243: ,p_password_date =>
244: hr_user_acct_utility.g_fnd_user_rec.password_date -- Fix 2288014
245: ,p_language =>
246: hr_user_acct_utility.g_fnd_user_rec.language
247: ,p_host_port => null
248: ,p_employee_id =>
249: hr_user_acct_utility.g_fnd_user_rec.employee_id
250: ,p_customer_id =>
245: ,p_language =>
246: hr_user_acct_utility.g_fnd_user_rec.language
247: ,p_host_port => null
248: ,p_employee_id =>
249: hr_user_acct_utility.g_fnd_user_rec.employee_id
250: ,p_customer_id =>
251: hr_user_acct_utility.g_fnd_user_rec.customer_id
252: ,p_supplier_id =>
253: hr_user_acct_utility.g_fnd_user_rec.supplier_id
247: ,p_host_port => null
248: ,p_employee_id =>
249: hr_user_acct_utility.g_fnd_user_rec.employee_id
250: ,p_customer_id =>
251: hr_user_acct_utility.g_fnd_user_rec.customer_id
252: ,p_supplier_id =>
253: hr_user_acct_utility.g_fnd_user_rec.supplier_id
254: ,p_user_id => l_user_id
255: );
249: hr_user_acct_utility.g_fnd_user_rec.employee_id
250: ,p_customer_id =>
251: hr_user_acct_utility.g_fnd_user_rec.customer_id
252: ,p_supplier_id =>
253: hr_user_acct_utility.g_fnd_user_rec.supplier_id
254: ,p_user_id => l_user_id
255: );
256: --
257: hr_utility.set_location(l_proc, 30);
257: hr_utility.set_location(l_proc, 30);
258: --
259: -- Create the fnd_responsibility record
260: --
261: l_resp_count := hr_user_acct_utility.g_fnd_resp_tbl.count;
262: --
263: IF l_resp_count < 1
264: -- No fnd_user_resp_groups, per_sec_profile_assignments,
265: -- function exclusions or profile option values to insert
274: l_responsibility_id := null;
275: l_user_resp_app_id := null;
276:
277: l_responsibility_key :=
278: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
279: --
280: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_name
281: IS NOT NULL
282: AND
276:
277: l_responsibility_key :=
278: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
279: --
280: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_name
281: IS NOT NULL
282: AND
283: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key IS NOT NULL
284: THEN
279: --
280: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_name
281: IS NOT NULL
282: AND
283: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key IS NOT NULL
284: THEN
285: -- Create a new responsibility,check if using a template responsibility
286: IF hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id
287: IS NOT NULL
282: AND
283: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key IS NOT NULL
284: THEN
285: -- Create a new responsibility,check if using a template responsibility
286: IF hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id
287: IS NOT NULL
288: THEN
289: -- That means we want to create a new responsiblity based on an
290: -- existing responsibility as template. We need to read the
290: -- existing responsibility as template. We need to read the
291: -- template responsibility record first.
292: --
293: l_exist_resp_id :=
294: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id;
295: l_exist_resp_app_id :=
296: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_app_id;
297: --
298: -- read the existing responsibility rec
292: --
293: l_exist_resp_id :=
294: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id;
295: l_exist_resp_app_id :=
296: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_app_id;
297: --
298: -- read the existing responsibility rec
299: --
300: OPEN lc_get_existing_fnd_resp;
340: -- info, the responsibility id is not known yet.
341: --
342: For check_resp_rec in lc_fnd_resp_exists
343: (p_resp_key =>
344: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key)
345: LOOP
346: l_responsibility_id := check_resp_rec.responsibility_id;
347: l_user_resp_app_id := check_resp_rec.application_id;
348: END LOOP;
355: -- Now, move the new responsibility information in the global
356: -- rec to l_fnd_resp_rec work area.
357: --
358: l_fnd_resp_rec.new_resp_name :=
359: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_name;
360: l_responsibility_key :=
361: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
362: l_fnd_resp_rec.new_resp_key :=
363: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
357: --
358: l_fnd_resp_rec.new_resp_name :=
359: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_name;
360: l_responsibility_key :=
361: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
362: l_fnd_resp_rec.new_resp_key :=
363: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
364: l_fnd_resp_rec.new_resp_description :=
365: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_description;
359: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_name;
360: l_responsibility_key :=
361: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
362: l_fnd_resp_rec.new_resp_key :=
363: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
364: l_fnd_resp_rec.new_resp_description :=
365: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_description;
366: --
367: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id <>
361: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
362: l_fnd_resp_rec.new_resp_key :=
363: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
364: l_fnd_resp_rec.new_resp_description :=
365: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_description;
366: --
367: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id <>
368: hr_api.g_number
369: THEN
363: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key;
364: l_fnd_resp_rec.new_resp_description :=
365: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_description;
366: --
367: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id <>
368: hr_api.g_number
369: THEN
370: l_fnd_resp_rec.new_resp_app_id :=
371: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id;
367: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id <>
368: hr_api.g_number
369: THEN
370: l_fnd_resp_rec.new_resp_app_id :=
371: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id;
372: -- Set the application_id for fnd_user_resp_groups to
373: -- the new resp app id
374: l_user_resp_app_id :=
375: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id;
371: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id;
372: -- Set the application_id for fnd_user_resp_groups to
373: -- the new resp app id
374: l_user_resp_app_id :=
375: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id;
376: ELSE
377: -- Set the application_id for fnd_user_resp_groups to
378: -- the template responsibility's app id
379: l_user_resp_app_id := l_fnd_resp_rec.new_resp_app_id;
378: -- the template responsibility's app id
379: l_user_resp_app_id := l_fnd_resp_rec.new_resp_app_id;
380: END IF;
381: --
382: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_start_date <>
383: hr_api.g_date
384: THEN
385: l_fnd_resp_rec.new_resp_start_date :=
386: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_start_date;
382: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_start_date <>
383: hr_api.g_date
384: THEN
385: l_fnd_resp_rec.new_resp_start_date :=
386: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_start_date;
387: END IF;
388: --
389: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_end_date <>
390: hr_api.g_date
385: l_fnd_resp_rec.new_resp_start_date :=
386: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_start_date;
387: END IF;
388: --
389: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_end_date <>
390: hr_api.g_date
391: THEN
392: l_fnd_resp_rec.new_resp_end_date :=
393: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_end_date;
389: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_end_date <>
390: hr_api.g_date
391: THEN
392: l_fnd_resp_rec.new_resp_end_date :=
393: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_end_date;
394: END IF;
395: --
396: IF
397: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_group_name
393: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_end_date;
394: END IF;
395: --
396: IF
397: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_group_name
398: <> hr_api.g_varchar2
399: THEN
400: l_fnd_resp_rec.new_resp_data_group_name :=
401: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_group_name;
397: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_group_name
398: <> hr_api.g_varchar2
399: THEN
400: l_fnd_resp_rec.new_resp_data_group_name :=
401: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_group_name;
402: END IF;
403: --
404: IF
405: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_grp_app_id
401: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_group_name;
402: END IF;
403: --
404: IF
405: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_grp_app_id
406: <> hr_api.g_number
407: THEN
408: l_fnd_resp_rec.new_resp_data_grp_app_id :=
409: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_grp_app_id;
405: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_grp_app_id
406: <> hr_api.g_number
407: THEN
408: l_fnd_resp_rec.new_resp_data_grp_app_id :=
409: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_data_grp_app_id;
410: --
411: END IF;
412: --
413: IF
410: --
411: END IF;
412: --
413: IF
414: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_menu_name
415: <> hr_api.g_varchar2
416: THEN
417: l_fnd_resp_rec.new_resp_menu_name :=
418: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_menu_name;
414: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_menu_name
415: <> hr_api.g_varchar2
416: THEN
417: l_fnd_resp_rec.new_resp_menu_name :=
418: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_menu_name;
419: END IF;
420: --
421: IF
422: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_request_group_name
418: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_menu_name;
419: END IF;
420: --
421: IF
422: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_request_group_name
423: <> hr_api.g_varchar2
424: THEN
425: l_fnd_resp_rec.new_resp_request_group_name :=
426: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_request_group_name;
422: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_request_group_name
423: <> hr_api.g_varchar2
424: THEN
425: l_fnd_resp_rec.new_resp_request_group_name :=
426: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_request_group_name;
427: END IF;
428: --
429: IF
430: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_req_grp_app_id
426: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_request_group_name;
427: END IF;
428: --
429: IF
430: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_req_grp_app_id
431: <> hr_api.g_number
432: THEN
433: l_fnd_resp_rec.new_resp_req_grp_app_id :=
434: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_req_grp_app_id;
430: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_req_grp_app_id
431: <> hr_api.g_number
432: THEN
433: l_fnd_resp_rec.new_resp_req_grp_app_id :=
434: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_req_grp_app_id;
435: END IF;
436: --
437: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_version
438: <> hr_api.g_varchar2
433: l_fnd_resp_rec.new_resp_req_grp_app_id :=
434: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_req_grp_app_id;
435: END IF;
436: --
437: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_version
438: <> hr_api.g_varchar2
439: THEN
440: l_fnd_resp_rec.new_resp_version :=
441: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_version;
437: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_version
438: <> hr_api.g_varchar2
439: THEN
440: l_fnd_resp_rec.new_resp_version :=
441: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_version;
442: END IF;
443: --
444: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_host_name
445: <> hr_api.g_varchar2
440: l_fnd_resp_rec.new_resp_version :=
441: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_version;
442: END IF;
443: --
444: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_host_name
445: <> hr_api.g_varchar2
446: THEN
447: l_fnd_resp_rec.new_resp_web_host_name :=
448: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_host_name;
444: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_host_name
445: <> hr_api.g_varchar2
446: THEN
447: l_fnd_resp_rec.new_resp_web_host_name :=
448: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_host_name;
449: END IF;
450: --
451: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_agent_name
452: <> hr_api.g_varchar2
447: l_fnd_resp_rec.new_resp_web_host_name :=
448: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_host_name;
449: END IF;
450: --
451: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_agent_name
452: <> hr_api.g_varchar2
453: THEN
454: l_fnd_resp_rec.new_resp_web_agent_name :=
455: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_agent_name;
451: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_agent_name
452: <> hr_api.g_varchar2
453: THEN
454: l_fnd_resp_rec.new_resp_web_agent_name :=
455: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_web_agent_name;
456: END IF;
457: --
458: hr_utility.set_location(l_proc, 40);
459: -- **********************************************
488: ELSE
489: -- new resp name is null, no need to create a new responsibility.
490: -- Attach an existing responsibility to the new user.
491: l_responsibility_id :=
492: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id;
493: l_responsibility_key :=
494: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_key;
495: l_user_resp_app_id :=
496: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_app_id;
490: -- Attach an existing responsibility to the new user.
491: l_responsibility_id :=
492: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id;
493: l_responsibility_key :=
494: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_key;
495: l_user_resp_app_id :=
496: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_app_id;
497: END IF;
498: --
492: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id;
493: l_responsibility_key :=
494: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_key;
495: l_user_resp_app_id :=
496: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_app_id;
497: END IF;
498: --
499: l_fnd_resp_rec.user_resp_start_date :=
500: hr_user_acct_utility.g_fnd_resp_tbl(i).user_resp_start_date;
496: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_app_id;
497: END IF;
498: --
499: l_fnd_resp_rec.user_resp_start_date :=
500: hr_user_acct_utility.g_fnd_resp_tbl(i).user_resp_start_date;
501:
502: l_fnd_resp_rec.user_resp_end_date :=
503: hr_user_acct_utility.g_fnd_resp_tbl(i).user_resp_end_date;
504:
499: l_fnd_resp_rec.user_resp_start_date :=
500: hr_user_acct_utility.g_fnd_resp_tbl(i).user_resp_start_date;
501:
502: l_fnd_resp_rec.user_resp_end_date :=
503: hr_user_acct_utility.g_fnd_resp_tbl(i).user_resp_end_date;
504:
505: l_fnd_resp_rec.user_resp_description :=
506: hr_user_acct_utility.g_fnd_resp_tbl(i).user_resp_description;
507:
502: l_fnd_resp_rec.user_resp_end_date :=
503: hr_user_acct_utility.g_fnd_resp_tbl(i).user_resp_end_date;
504:
505: l_fnd_resp_rec.user_resp_description :=
506: hr_user_acct_utility.g_fnd_resp_tbl(i).user_resp_description;
507:
508: l_fnd_resp_rec.sec_group_id :=
509: hr_user_acct_utility.g_fnd_resp_tbl(i).sec_group_id;
510:
505: l_fnd_resp_rec.user_resp_description :=
506: hr_user_acct_utility.g_fnd_resp_tbl(i).user_resp_description;
507:
508: l_fnd_resp_rec.sec_group_id :=
509: hr_user_acct_utility.g_fnd_resp_tbl(i).sec_group_id;
510:
511: l_fnd_resp_rec.sec_profile_id :=
512: hr_user_acct_utility.g_fnd_resp_tbl(i).sec_profile_id;
513: --
508: l_fnd_resp_rec.sec_group_id :=
509: hr_user_acct_utility.g_fnd_resp_tbl(i).sec_group_id;
510:
511: l_fnd_resp_rec.sec_profile_id :=
512: hr_user_acct_utility.g_fnd_resp_tbl(i).sec_profile_id;
513: --
514: -- Get the profile option value for 'ENABLE_SECURITY_GROUPS'
515: -- Use value_specific because you want the value of the resp being
516: -- assigned, not the resp you used to login.
628:
629: hr_utility.set_location(l_proc, 60);
630: --
631: l_resp_func_count :=
632: hr_user_acct_utility.g_fnd_resp_functions_tbl.count;
633: --
634: IF l_resp_func_count < 1
635: THEN
636: goto add_profile_opt_values;
643: -- combining the template responsibility's rules with
644: -- any new rules.
645: --
646: hr_user_acct_internal.build_func_sec_exclusion_rules
647: (p_func_sec_excl_tbl => hr_user_acct_utility.g_fnd_resp_functions_tbl
648: ,p_out_func_sec_excl_tbl => l_out_func_sec_excl_tbl);
649: --
650: l_resp_func_count := l_out_func_sec_excl_tbl.count;
651:
671:
672: hr_utility.set_location(l_proc, 70);
673: --
674: l_prof_opt_val_count :=
675: hr_user_acct_utility.g_fnd_profile_opt_val_tbl.count;
676: --
677: IF l_prof_opt_val_count < 1
678: THEN
679: goto after_process_hook;
691: -- The user id is attached to some responsibilities
692: -- Add profile option values at either the responsibility or user level.
693: -- Check if a new responsibility is created and a template
694: -- responsibility_id is used for creating the new responsibility.
695: -- Loop through the hr_user_acct_utility.g_fnd_resp_tbl table. If
696: -- a new responsibility is created via a template responsibility, we'll
697: -- create profile option values for the new responsibility based on the
698: -- template responsibility.
699: FOR i in 1..l_resp_count
698: -- template responsibility.
699: FOR i in 1..l_resp_count
700: LOOP
701: --
702: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key IS NOT NULL
703: AND
704: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id
705: IS NOT NULL
706: THEN
700: LOOP
701: --
702: IF hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key IS NOT NULL
703: AND
704: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id
705: IS NOT NULL
706: THEN
707: -- New responsibility using an existing resp as a template, we'll
708: -- make a copy of the profile option values from the template resp
708: -- make a copy of the profile option values from the template resp
709: -- for the new responsibility.
710: hr_user_acct_internal.build_resp_profile_val
711: (p_template_resp_id =>
712: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id
713: ,p_template_resp_app_id =>
714: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_app_id
715: ,p_new_resp_key =>
716: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key
710: hr_user_acct_internal.build_resp_profile_val
711: (p_template_resp_id =>
712: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id
713: ,p_template_resp_app_id =>
714: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_app_id
715: ,p_new_resp_key =>
716: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key
717: ,p_new_resp_app_id =>
718: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id
712: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_id
713: ,p_template_resp_app_id =>
714: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_app_id
715: ,p_new_resp_key =>
716: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key
717: ,p_new_resp_app_id =>
718: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id
719: ,p_fnd_profile_opt_val_tbl =>
720: hr_user_acct_utility.g_fnd_profile_opt_val_tbl
714: hr_user_acct_utility.g_fnd_resp_tbl(i).existing_resp_app_id
715: ,p_new_resp_key =>
716: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key
717: ,p_new_resp_app_id =>
718: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id
719: ,p_fnd_profile_opt_val_tbl =>
720: hr_user_acct_utility.g_fnd_profile_opt_val_tbl
721: ,p_out_profile_opt_val_tbl => l_out_profile_opt_val_tbl
722: );
716: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key
717: ,p_new_resp_app_id =>
718: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id
719: ,p_fnd_profile_opt_val_tbl =>
720: hr_user_acct_utility.g_fnd_profile_opt_val_tbl
721: ,p_out_profile_opt_val_tbl => l_out_profile_opt_val_tbl
722: );
723: --
724: l_out_profile_opt_val_count := l_out_profile_opt_val_tbl.count;
723: --
724: l_out_profile_opt_val_count := l_out_profile_opt_val_tbl.count;
725: --
726: OPEN lc_fnd_resp_exists (p_resp_key =>
727: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key);
728: FETCH lc_fnd_resp_exists into l_new_resp_id, l_temp_id;
729: IF lc_fnd_resp_exists%NOTFOUND
730: THEN
731: CLOSE lc_fnd_resp_exists;
732: fnd_message.set_name('FND', 'SQL_NO_DATA_FOUND');
733: fnd_message.set_token('TABLE', 'FND_RESPONSIBILITY');
734: fnd_message.set_token('COLUMN', 'RESPONSIBILITY_KEY');
735: fnd_message.set_token('VALUE',
736: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key);
737: hr_utility.raise_error;
738: ELSE
739: CLOSE lc_fnd_resp_exists;
740: END IF;
766: -- process.
767: l_msg_text := null;
768: fnd_message.set_name('PER', 'HR_PROFILE_VAL_NOT_ADDED');
769: fnd_message.set_token('RESP_KEY',
770: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key);
771: fnd_message.set_token('PROFIE_OPTION_NAME',
772: l_out_profile_opt_val_tbl(j).profile_option_name);
773: fnd_message.set_token('PROFILE_OPTION_VALUE',
774: l_out_profile_opt_val_tbl(j).profile_option_value);
778: -- at the responsibility level
779:
780: END IF; -- end l_out_profile_opt_val_count > 0
781: ELSIF
782: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key IS NOT NULL
783: THEN
784: -- that means existing resp id is null, we'll just attach profile
785: -- option values at the new resp level.
786: hr_user_acct_internal.build_resp_profile_val
786: hr_user_acct_internal.build_resp_profile_val
787: (p_template_resp_id => null
788: ,p_template_resp_app_id => null
789: ,p_new_resp_key =>
790: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key
791: ,p_new_resp_app_id =>
792: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id
793: ,p_fnd_profile_opt_val_tbl =>
794: hr_user_acct_utility.g_fnd_profile_opt_val_tbl
788: ,p_template_resp_app_id => null
789: ,p_new_resp_key =>
790: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key
791: ,p_new_resp_app_id =>
792: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id
793: ,p_fnd_profile_opt_val_tbl =>
794: hr_user_acct_utility.g_fnd_profile_opt_val_tbl
795: ,p_out_profile_opt_val_tbl => l_out_profile_opt_val_tbl
796: );
790: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key
791: ,p_new_resp_app_id =>
792: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_app_id
793: ,p_fnd_profile_opt_val_tbl =>
794: hr_user_acct_utility.g_fnd_profile_opt_val_tbl
795: ,p_out_profile_opt_val_tbl => l_out_profile_opt_val_tbl
796: );
797: --
798: l_out_profile_opt_val_count := l_out_profile_opt_val_tbl.count;
797: --
798: l_out_profile_opt_val_count := l_out_profile_opt_val_tbl.count;
799: --
800: OPEN lc_fnd_resp_exists (p_resp_key =>
801: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key);
802: FETCH lc_fnd_resp_exists into l_new_resp_id, l_temp_id;
803: IF lc_fnd_resp_exists%NOTFOUND
804: THEN
805: CLOSE lc_fnd_resp_exists;
806: fnd_message.set_name('FND', 'SQL_NO_DATA_FOUND');
807: fnd_message.set_token('TABLE', 'FND_RESPONSIBILITY');
808: fnd_message.set_token('COLUMN', 'RESPONSIBILITY_KEY');
809: fnd_message.set_token('VALUE',
810: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key);
811: hr_utility.raise_error;
812: ELSE
813: CLOSE lc_fnd_resp_exists;
814: END IF;
838: -- process.
839: l_msg_text := null;
840: fnd_message.set_name('PER', 'HR_PROFILE_VAL_NOT_ADDED');
841: fnd_message.set_token('RESP_KEY',
842: hr_user_acct_utility.g_fnd_resp_tbl(i).new_resp_key);
843: l_temp :=l_out_profile_opt_val_tbl(j).profile_option_name;
844: fnd_message.set_token('PROFIE_OPTION_NAME', l_temp);
845: --
846: l_temp:=l_out_profile_opt_val_tbl(j).profile_option_value;
852:
853: END IF; -- end l_out_proifile_opt_val_count > 0
854: END IF; -- end new_resp_key is not null
855: --
856: END LOOP; -- end loop of hr_user_acct_utility.g_fnd_resp_tbl
857: --
858: --
859: <
860: --
861: -- Now insert user level profile opt values
862: FOR i in 1..l_prof_opt_val_count
863: LOOP
864: l_profile_value_saved := null;
865: IF hr_user_acct_utility.g_fnd_profile_opt_val_tbl(i).profile_level_name
866: = 'USER'
867: THEN
868: hr_user_acct_internal.create_fnd_profile_values
869: (p_profile_opt_name =>
866: = 'USER'
867: THEN
868: hr_user_acct_internal.create_fnd_profile_values
869: (p_profile_opt_name =>
870: hr_user_acct_utility.g_fnd_profile_opt_val_tbl(i).profile_option_name
871: ,p_profile_opt_value =>
872: hr_user_acct_utility.g_fnd_profile_opt_val_tbl(i).profile_option_value
873: ,p_profile_level_name => 'USER'
874: ,p_profile_level_value =>l_user_id -- Fix 2825757
868: hr_user_acct_internal.create_fnd_profile_values
869: (p_profile_opt_name =>
870: hr_user_acct_utility.g_fnd_profile_opt_val_tbl(i).profile_option_name
871: ,p_profile_opt_value =>
872: hr_user_acct_utility.g_fnd_profile_opt_val_tbl(i).profile_option_value
873: ,p_profile_level_name => 'USER'
874: ,p_profile_level_value =>l_user_id -- Fix 2825757
875: ,p_profile_lvl_val_app_id =>
876: hr_user_acct_utility.g_fnd_profile_opt_val_tbl(i).profile_level_value_app_id
872: hr_user_acct_utility.g_fnd_profile_opt_val_tbl(i).profile_option_value
873: ,p_profile_level_name => 'USER'
874: ,p_profile_level_value =>l_user_id -- Fix 2825757
875: ,p_profile_lvl_val_app_id =>
876: hr_user_acct_utility.g_fnd_profile_opt_val_tbl(i).profile_level_value_app_id
877: ,p_profile_value_saved => l_profile_value_saved
878: );
879: --
880: IF l_profile_value_saved