[Home] [Help]
96: cursor csr_get_unrelated_contacts is
97: select distinct
98: papf.person_id,
99: papf.business_group_id
100: from per_all_people_f papf
101: where not exists
102: (select null
103: from per_all_assignments_f asg
104: where asg.person_id = papf.person_id)
782: ,person_id)
783: select distinct p_security_profile_id, l_req_id, l_prog_id,
784: l_appl_id, l_upd_date, pcr.contact_person_id
785: from per_contact_relationships pcr,
786: per_all_people_f ppl -- per_person_list ppl for bug (6376000/4774264)
787: where ppl.person_id = pcr.person_id
788: and (pcr.business_group_id = p_business_group_id or
789: p_business_group_id is null)
790: -- and ppl.security_profile_id = p_security_profile_id for bug (6376000/4774264)
851: program_application_id, program_id,
852: program_update_date, person_id)
853: select distinct psp.security_profile_id, l_req_id, l_appl_id,
854: l_prog_id, l_upd_date, papf.person_id
855: from per_all_people_f papf,
856: per_security_profiles psp
857: where psp.security_profile_id = p_security_profile_id
858: and (psp.business_group_id = papf.business_group_id or
859: psp.business_group_id is null)
1135: if (instr(UPPER(p_sec_rec.restriction_text),'PERSON.')>0) or
1136: (p_sec_rec.view_all_applicants_flag = 'N'
1137: and (p_sec_rec.view_all_employees_flag <>'Y'
1138: or p_sec_rec.view_all_cwk_flag <>'Y')) then
1139: fnd_dsql.add_text(', per_all_people_f PERSON ');
1140: End if;
1141:
1142: if p_sec_rec.view_all_organizations_flag='N' then
1143: Fnd_dsql.add_text(', per_organization_list ol ');
1184: fnd_dsql.add_text( ' or (PERSON.effective_start_date>= ');
1185: fnd_dsql.add_bind(to_date(to_char(p_effective_date,'DD/MM/YYYY'),'DD/MM/YYYY'));
1186: fnd_dsql.add_text(' AND NOT EXISTS
1187: (SELECT NULL
1188: FROM per_all_people_f papf1
1189: WHERE papf1.person_id = PERSON.person_id
1190: AND papf1.effective_start_date < PERSON.effective_start_date)) ');
1191:
1192: fnd_dsql.add_text(' ) '); -- 5214715
1561: (pspf.view_all_contacts_flag = 'Y' and
1562: pspf.view_all_candidates_flag = 'X')))
1563: /* and ppl.person_id in
1564: (select papf.person_id
1565: from per_all_people_f papf
1566: where papf.person_id = ppl.person_id
1567: and ((p_generation_scope = 'ALL_BUS_GRP' and
1568: papf.business_group_id = p_business_group_id) or
1569: p_generation_scope <> 'ALL_BUS_GRP')) */
1585: (pspf.view_all_contacts_flag = 'Y' and
1586: pspf.view_all_candidates_flag = 'X')))
1587: and ppl.person_id in
1588: (select papf.person_id
1589: from per_all_people_f papf
1590: where papf.person_id = ppl.person_id
1591: and papf.business_group_id = p_business_group_id)
1592: and not exists
1593: (select null
1661: PARAMETERS
1662: l_effective_date - date for which the secure lists are generated.
1663: ========================================================================= */
1664: --
1665: PROCEDURE process_person (p_person_id per_all_people_f.person_id%TYPE,
1666: p_effective_date date,
1667: p_business_group_id number,
1668: p_generation_scope varchar2,
1669: p_who_to_process varchar2)
3107: or l_generation_scope = 'ALL_GLOBAL'
3108: then
3109: hr_utility.set_location(l_proc,20);
3110: sqlstr := 'select distinct per.person_id
3111: from per_all_people_f per
3112: ,pay_payroll_actions ppa
3113: where ppa.payroll_action_id = :payroll_action_id
3114: order by per.person_id';
3115: -- and ppa.effective_date between per.effective_start_date
3119: **scope is ALL_BUS_GRP
3120: */
3121: hr_utility.set_location(l_proc,30);
3122: sqlstr := 'select distinct per.person_id
3123: from per_all_people_f per
3124: ,pay_payroll_actions ppa
3125: where ppa.payroll_action_id = :payroll_action_id
3126: and pay_core_utils.get_parameter(''BUSINESS_GROUP_ID'',
3127: ppa.legislative_parameters) =
3151: stperson in number,
3152: endperson in number,
3153: chunk in number) is
3154:
3155: l_temp_person_id per_all_people_f.person_id%TYPE;
3156: l_lockingactid pay_assignment_actions.assignment_action_id%TYPE;
3157: l_business_group_id number;
3158: l_generation_scope varchar2(20);
3159: l_who_to_proc varchar2(20);
3323: pactid => pactid,
3324: chunk => chunk,
3325: greid => null,
3326: object_id => perrec.person_id,
3327: object_type => 'PER_ALL_PEOPLE_F');
3328: end if;
3329:
3330: if l_temp_person_id <> perrec.person_id then
3331: /*
3338: pactid => pactid,
3339: chunk => chunk,
3340: greid => null,
3341: object_id => perrec.person_id,
3342: object_type => 'PER_ALL_PEOPLE_F');
3343: end if;
3344: end loop;
3345:
3346: ELSE
3360: */
3361: l_temp_person_id := asgrec.person_id;
3362:
3363: -- Bug 3630537
3364: -- Passed person_id/PER_ALL_PEOPLE_F as object_id/object_type, procedure
3365: -- archive_data needs it to process a person.
3366: hr_nonrun_asact.insact(lockingactid => l_lockingactid,
3367: assignid => -1,
3368: pactid => pactid,
3368: pactid => pactid,
3369: chunk => chunk,
3370: greid => null,
3371: object_id => asgrec.person_id,
3372: object_type => 'PER_ALL_PEOPLE_F');
3373: end if;
3374:
3375: if l_temp_person_id <> asgrec.person_id then
3376: /*
3379: */
3380: l_temp_person_id := asgrec.person_id;
3381:
3382: -- Bug 3630537
3383: -- Passed person_id/PER_ALL_PEOPLE_F as object_id/object_type, procedure
3384: -- archive_data needs it to process a person.
3385: hr_nonrun_asact.insact(lockingactid => l_lockingactid,
3386: assignid => -1,
3387: pactid => pactid,
3387: pactid => pactid,
3388: chunk => chunk,
3389: greid => null,
3390: object_id => asgrec.person_id,
3391: object_type => 'PER_ALL_PEOPLE_F');
3392: end if;
3393: end loop;
3394:
3395: END IF;
3438: select ass.object_id
3439: from pay_assignment_actions ass
3440: where ass.assignment_action_id = p_assactid;
3441:
3442: l_person_id per_all_people_f.person_id%TYPE;
3443: l_business_group_id number;
3444: l_generation_scope varchar2(20);
3445: l_who_to_process varchar2(30);
3446: