[Home] [Help]
56:
57: cursor csr_res_addr(p_person_id number,p_effective_date date) is
58: select sta.state_code, cnt.county_code, cty.city_code,
59: sta2.state_code, cnt2.county_code, cty2.city_code
60: from per_addresses adr
61: ,pay_us_states sta
62: ,pay_us_counties cnt
63: ,pay_us_city_names cty
64: ,pay_us_states sta2
86: following cursor */
87: cursor csr_res_addr_no_eff_dt(p_person_id number,p_effective_date date) is
88: select sta.state_code, cnt.county_code, cty.city_code,
89: sta2.state_code, cnt2.county_code, cty2.city_code
90: from per_addresses adr
91: ,pay_us_states sta
92: ,pay_us_counties cnt
93: ,pay_us_city_names cty
94: ,pay_us_states sta2
145: -- reimp - moved csr because its used by more than one proc.
146: --
147: cursor csr_defaulting_met(p_asg_id number,p_ef_date date) is
148: select null
149: from per_assignments_f asg, per_addresses adr
150: where asg.assignment_id = p_asg_id
151: and p_ef_date between asg.effective_start_date
152: and asg.effective_end_date
153: and asg.pay_basis_id is not null
2833: l_temp_ovn pay_us_emp_fed_tax_rules_f.object_version_number%TYPE;
2834: --
2835: l_default_flag varchar2(1) := 'Y';
2836: l_asg_min_start_date per_assignments_f.effective_start_date%TYPE;
2837: l_adr_min_start_date per_addresses.date_from%TYPE;
2838: l_defaulting_date per_assignments_f.effective_start_date%TYPE;
2839:
2840: l_loc_state_code pay_us_states.state_code%TYPE;
2841: l_loc_ovrd_state_code pay_us_states.state_code%TYPE;
2890: and sck.segment1 is not null);
2891: --
2892: cursor csr_adr_defaulting_date is
2893: select min(adr.date_from)
2894: from per_addresses adr
2895: ,per_assignments_f asg
2896: where asg.assignment_id = p_assignment_id
2897: and adr.person_id = asg.person_id
2898: and adr.primary_flag = 'Y';
3327: l_cnt number;
3328: l_assignment_tbl assign_tbl_type;
3329: -- >> 2858888
3330: l_person_id per_all_people_f.person_id%TYPE;
3331: l_adr_primary per_addresses.primary_flag%TYPE;
3332: l_adr_style per_addresses.style%TYPE;
3333: -- <<
3334: l_exit_quietly exception;
3335: l_payroll_id per_all_assignments_f.payroll_id%TYPE;
3328: l_assignment_tbl assign_tbl_type;
3329: -- >> 2858888
3330: l_person_id per_all_people_f.person_id%TYPE;
3331: l_adr_primary per_addresses.primary_flag%TYPE;
3332: l_adr_style per_addresses.style%TYPE;
3333: -- <<
3334: l_exit_quietly exception;
3335: l_payroll_id per_all_assignments_f.payroll_id%TYPE;
3336: l_effective_start_date per_all_assignments_f.effective_start_date%TYPE;
3352:
3353: --
3354: cursor csr_adr_id(p_adr_id number) is
3355: select person_id, primary_flag, style -- #2858888
3356: from per_addresses adr
3357: where adr.address_id = p_adr_id;
3358: --
3359: cursor csr_adr_asg_id(p_adr_id number) is
3360: select asg.assignment_id
3358: --
3359: cursor csr_adr_asg_id(p_adr_id number) is
3360: select asg.assignment_id
3361: from per_assignments_f asg,
3362: per_addresses adr
3363: where asg.person_id = adr.person_id
3364: and p_effective_date between asg.effective_start_date
3365: and asg.effective_end_date
3366: and adr.address_id = p_adr_id;