[Home] [Help]
242:
243: -- Bug 3855544
244:
245: cursor c_get_user(p_usr_id NUMBER) is
246: select user_name from fnd_user
247: where user_id=p_usr_id;
248:
249: begin
250: -- Bug 3390666
247: where user_id=p_usr_id;
248:
249: begin
250: -- Bug 3390666
251: -- Fetch the role from wf table instead of fnd_user table.
252: wf_directory.GetUserName(p_orig_system => 'PER',
253: p_orig_system_id => p_person_id,
254: p_name => l_name,
255: p_display_name => l_display_name);
815: l_tc_bb_id hxc_time_building_blocks.time_building_block_id%type;
816: l_tc_bb_ovn hxc_time_building_blocks.time_building_block_id%type;
817: l_ap_bb_id hxc_time_building_blocks.time_building_block_id%type;
818: l_ap_bb_ovn hxc_time_building_blocks.time_building_block_id%type;
819: l_login fnd_user.user_name%type;
820: l_resource_id hxc_time_building_blocks.resource_id%TYPE;
821: l_tc_start_time hxc_time_building_blocks.start_time%TYPE;
822: l_tc_stop_time hxc_time_building_blocks.stop_time%TYPE;
823: l_approval_mechanism hxc_approval_comps.approval_mechanism%TYPE;
1115: p_itemtype in varchar2
1116: ,p_itemkey in varchar2
1117: )
1118: IS
1119: l_employee_id fnd_user.employee_id%TYPE;
1120: l_real_approver VARCHAR2(500);
1121: l_appr_ss_login VARCHAR2(100);
1122:
1123: BEGIN
1139: );
1140:
1141: -- Bug 8783079
1142: /* The real approver's self service login can be got in 2 ways
1143: 1. Directly query on FND_USER using the employee_id of the real approver (l_real_approver) through a
1144: query involving per_all_people_f and fnd_user
1145: 2. From wf attribute APR_SS_LOGIN which already has the approver's self-service logn
1146:
1147: We go by method 2
1140:
1141: -- Bug 8783079
1142: /* The real approver's self service login can be got in 2 ways
1143: 1. Directly query on FND_USER using the employee_id of the real approver (l_real_approver) through a
1144: query involving per_all_people_f and fnd_user
1145: 2. From wf attribute APR_SS_LOGIN which already has the approver's self-service logn
1146:
1147: We go by method 2
1148: */
1941: l_proc constant varchar2(61) := g_pkg || '.' || 'person_approval';
1942: l_effective_end_date date;
1943: l_effective_start_date date;
1944: l_apr_person_id per_all_assignments_f.person_id%type;
1945: l_login fnd_user.user_name%type;
1946: --
1947: -- Bug 4153585
1948: -- Increased size for translation
1949: l_title varchar2(4000);
2339: l_person_id per_all_assignments_f.person_id%type;
2340: --
2341: l_supervisor_id per_all_assignments_f.supervisor_id%type;
2342: l_next_supervisor_id per_all_assignments_f.supervisor_id%type;
2343: l_login fnd_user.user_name%type;
2344: l_ap_bbid hxc_time_building_blocks.time_building_block_id%type;
2345: l_ap_bbovn hxc_time_building_blocks.time_building_block_id%type;
2346:
2347:
3190: raise;
3191: end is_final_apr;
3192:
3193:
3194: -- Added new procedure to check if Timecard owner is active in fnd_user as on Sysdate
3195: -- for bug 8594271
3196: procedure check_user_exists(
3197: p_itemtype in varchar2,
3198: p_itemkey in varchar2,
3200: p_funcmode in varchar2,
3201: p_result in out nocopy varchar2)
3202: is
3203: l_proc varchar2(100);
3204: l_tc_user_name fnd_user.user_name%TYPE;
3205: l_count NUMBER;
3206:
3207: begin
3208:
3218: itemkey => p_itemkey,
3219: aname => 'TC_OWNER_SS_LOGIN');
3220:
3221: select count(*) into l_count
3222: from fnd_user
3223: where user_name = l_tc_user_name
3224: and TRUNC(sysdate) between TRUNC(start_date) and NVL(TRUNC(end_date), TRUNC(sysdate));
3225:
3226: if l_count = 0 then