234: information thro' the
235: package and not thro' the formula.
236: 15-AUG-2002 asasthan 115.40 2200920 Changed Range Cursor to go off
237: tax_unit_id of
238: pay_assignment_actions and not
239: hr_soft_coding_keyflex
240: 2503639 Archiving Territory Balances
241: with Dimension of PER_GRE_YTD
242: and not PER_JD_GRE_YTD.
242: and not PER_JD_GRE_YTD.
243: 18-JUN-2002 ahanda 115.39 2412644 Correct Hint Syntax.
244: 01-APR-2002 asasthan 115.38 2249870 modified Index Hint addded in
245: 115.36 to use
246: PAY_ASSIGNMENT_ACTIONS_N51 instead
247: of PAY_ASSIGNMENT_ACTIONS_N1
248: 22-JAN-2002 jgoswami 115.37 added checkfile command
249: 28-DEC-2001 jgoswami 115.36 2161771 Added Index Hint in exist part of
250: the sql statement for c_eoy_gre in
243: 18-JUN-2002 ahanda 115.39 2412644 Correct Hint Syntax.
244: 01-APR-2002 asasthan 115.38 2249870 modified Index Hint addded in
245: 115.36 to use
246: PAY_ASSIGNMENT_ACTIONS_N51 instead
247: of PAY_ASSIGNMENT_ACTIONS_N1
248: 22-JAN-2002 jgoswami 115.37 added checkfile command
249: 28-DEC-2001 jgoswami 115.36 2161771 Added Index Hint in exist part of
250: the sql statement for c_eoy_gre in
251: eoy_action_creation procedure.
350: 30-dec-1998 vmehta 40.20 709641 Look at SUI_ER_SUBJ_WHABLE instead of SUI_ER_GROSS
351: for picking up people for SQWL . This makes sure
352: that only people with SUI wages are picked up.
353: 27-dec-1998 vmehta 40.19 Corrected the cursor in action creation to get the
354: tax_unit_name from pay_assignment_actions.
355: 21-DEC-1998 achauhan 40.18 Changed the cursor in action creation to get the
356: assignments from the pay_assignment_actions table.
357:
358: 08-DEC-1998 vmehta 40.17 Removed grouping by on assignment_id while creating
352: that only people with SUI wages are picked up.
353: 27-dec-1998 vmehta 40.19 Corrected the cursor in action creation to get the
354: tax_unit_name from pay_assignment_actions.
355: 21-DEC-1998 achauhan 40.18 Changed the cursor in action creation to get the
356: assignments from the pay_assignment_actions table.
357:
358: 08-DEC-1998 vmehta 40.17 Removed grouping by on assignment_id while creating
359: assignment_ids
360: 08-DEC-1998 nbristow 40.16 Updated the c_state cursor to use
1429: l_eoy_tax_unit_id number;
1430: l_effective_date date;
1431: l_bus_group_id number;
1432:
1433: l_primary_asg pay_assignment_actions.assignment_id%type;
1434: l_bal_aaid pay_assignment_actions.assignment_action_id%type;
1435:
1436: /* Variables used to check if RANGE_PERSON_ID is enabled */
1437: l_range_person BOOLEAN;
1430: l_effective_date date;
1431: l_bus_group_id number;
1432:
1433: l_primary_asg pay_assignment_actions.assignment_id%type;
1434: l_bal_aaid pay_assignment_actions.assignment_action_id%type;
1435:
1436: /* Variables used to check if RANGE_PERSON_ID is enabled */
1437: l_range_person BOOLEAN;
1438:
1467: ASG.person_id person_id
1468: FROM per_all_assignments_f ASG,
1469: pay_all_payrolls_f PPY
1470: WHERE exists
1471: (select /*+ INDEX(paa PAY_ASSIGNMENT_ACTIONS_N51)
1472: INDEX(ppa PAY_PAYROLL_ACTIONS_PK) */
1473: 'x'
1474: from pay_payroll_actions ppa,
1475: pay_assignment_actions paa
1471: (select /*+ INDEX(paa PAY_ASSIGNMENT_ACTIONS_N51)
1472: INDEX(ppa PAY_PAYROLL_ACTIONS_PK) */
1473: 'x'
1474: from pay_payroll_actions ppa,
1475: pay_assignment_actions paa
1476: where ppa.effective_date between cp_period_start
1477: and cp_period_end
1478: and ppa.action_type in ('R','Q','V','B','I')
1479: and ppa.action_status = 'C'
1500: from pay_population_ranges ppr,
1501: per_all_assignments_f asg,
1502: pay_all_payrolls_f ppy
1503: where exists
1504: (select /*+ INDEX(paa PAY_ASSIGNMENT_ACTIONS_N51)
1505: INDEX(ppa PAY_PAYROLL_ACTIONS_PK) */
1506: 'x'
1507: from pay_payroll_actions ppa,
1508: pay_assignment_actions paa
1504: (select /*+ INDEX(paa PAY_ASSIGNMENT_ACTIONS_N51)
1505: INDEX(ppa PAY_PAYROLL_ACTIONS_PK) */
1506: 'x'
1507: from pay_payroll_actions ppa,
1508: pay_assignment_actions paa
1509: where ppa.effective_date between cp_period_start
1510: and cp_period_end
1511: and ppa.action_type in ('R','Q','V','B','I')
1512: and ppa.action_status = 'C'
1553: ,cp_period_start in date
1554: ,cp_period_end in date) IS
1555: select fnd_number.canonical_to_number(substr(max(lpad(paa.action_sequence,15,'0')
1556: ||lpad(paa.assignment_action_id,15,'0')),16))
1557: from pay_assignment_actions paa,
1558: per_all_assignments_f paf,
1559: pay_payroll_actions ppa,
1560: pay_action_classifications pac
1561: where paf.person_id = cp_person_id
1755: end if;
1756:
1757: /* Create the assignment action to represnt the person / tax unit
1758: combination. */
1759: select pay_assignment_actions_s.nextval
1760: into lockingactid
1761: from dual;
1762:
1763: /* Insert into pay_assignment_actions. */
1759: select pay_assignment_actions_s.nextval
1760: into lockingactid
1761: from dual;
1762:
1763: /* Insert into pay_assignment_actions. */
1764: hr_utility.trace('creating asg action');
1765:
1766: hr_nonrun_asact.insact(lockingactid,l_primary_asg,
1767: pactid,chunk,l_tax_unit_id);
1771: to do an additional checking against the assignment
1772: table */
1773: hr_utility.trace('updating asg action');
1774:
1775: update pay_assignment_actions aa
1776: set aa.serial_number = to_char(l_person_id)
1777: where aa.assignment_action_id = lockingactid;
1778:
1779: end if; /* l_value <> 0 */
3132: ln_year NUMBER := 0;
3133:
3134: cursor c_get_min_chunk is
3135: select min(paa.chunk_number)
3136: from pay_assignment_actions paa
3137: where paa.payroll_action_id = p_payroll_action_id;
3138:
3139:
3140: begin
3542: */
3543:
3544: procedure eoy_archive_data(p_assactid in number, p_effective_date in date) is
3545:
3546: l_aaid pay_assignment_actions.assignment_action_id%type;
3547: l_aaseq pay_assignment_actions.action_sequence%type;
3548: l_asgid pay_assignment_actions.assignment_id%type;
3549: l_date_earned date;
3550: l_taxunitid pay_assignment_actions.tax_unit_id%type;
3543:
3544: procedure eoy_archive_data(p_assactid in number, p_effective_date in date) is
3545:
3546: l_aaid pay_assignment_actions.assignment_action_id%type;
3547: l_aaseq pay_assignment_actions.action_sequence%type;
3548: l_asgid pay_assignment_actions.assignment_id%type;
3549: l_date_earned date;
3550: l_taxunitid pay_assignment_actions.tax_unit_id%type;
3551: l_year_start date;
3544: procedure eoy_archive_data(p_assactid in number, p_effective_date in date) is
3545:
3546: l_aaid pay_assignment_actions.assignment_action_id%type;
3547: l_aaseq pay_assignment_actions.action_sequence%type;
3548: l_asgid pay_assignment_actions.assignment_id%type;
3549: l_date_earned date;
3550: l_taxunitid pay_assignment_actions.tax_unit_id%type;
3551: l_year_start date;
3552: l_year_end date;
3546: l_aaid pay_assignment_actions.assignment_action_id%type;
3547: l_aaseq pay_assignment_actions.action_sequence%type;
3548: l_asgid pay_assignment_actions.assignment_id%type;
3549: l_date_earned date;
3550: l_taxunitid pay_assignment_actions.tax_unit_id%type;
3551: l_year_start date;
3552: l_year_end date;
3553: l_context_no number := 60;
3554: l_count number := 0;
3743: -- associated with Maximum Action Sequence
3744: CURSOR c_get_latest_asg(p_person_id number ) IS
3745: select fnd_number.canonical_to_number(substr(max(lpad(paa.action_sequence,15,'0')
3746: ||lpad(paa.assignment_action_id,15,'0')),16))
3747: from pay_assignment_actions paa,
3748: per_all_assignments_f paf,
3749: pay_payroll_actions ppa,
3750: pay_action_classifications pac
3751: where paf.person_id = p_person_id
3833: CURSOR c_prior_def_yr_roth(cp_asg_act_id IN NUMBER
3834: ,cp_asg_id IN NUMBER
3835: ,cp_ele_info1 IN VARCHAR2) IS
3836: SELECT TARGET.result_value
3837: FROM pay_assignment_actions BAL_ASSACT
3838: , pay_payroll_actions BACT
3839: , per_all_assignments_f ASS
3840: , pay_assignment_actions ASSACT
3841: , pay_payroll_actions PACT
3836: SELECT TARGET.result_value
3837: FROM pay_assignment_actions BAL_ASSACT
3838: , pay_payroll_actions BACT
3839: , per_all_assignments_f ASS
3840: , pay_assignment_actions ASSACT
3841: , pay_payroll_actions PACT
3842: , pay_run_results RR
3843: , pay_run_result_values TARGET
3844: , pay_input_values_f PIV
3900: cursor c_get_business_group_id(cp_assignment_action_id number)
3901: is
3902: select business_group_id
3903: from pay_payroll_actions ppa,
3904: pay_assignment_actions paa
3905: where ppa.payroll_action_id = paa.payroll_action_id
3906: and paa.assignment_action_id = cp_assignment_action_id;
3907:
3908: begin
3928: l_taxunitid,
3929: l_chunk,
3930: l_payroll_action_id,
3931: l_person_id
3932: FROM pay_assignment_actions aa
3933: WHERE aa.assignment_action_id = p_assactid;
3934:
3935: /* If the chunk of the assignment is same as the minimun chunk
3936: for the payroll_action_id and the gre data has not yet been