1687: hr_utility.set_location(' Leaving: '||l_proc,50);
1688: fnd_file.put_line(fnd_file.log,
1689: substr('Error in rangecode '||sqlerrm(sqlcode),1,80));
1690: -- Return cursor that selects no rows
1691: sqlstr := 'select 1 from dual where to_char(:payroll_action_id) = dummy';
1692: END range_cursor;
1693: --
1694: --
1695: PROCEDURE action_creation(pactid IN NUMBER,
2131: hr_utility.set_location(l_proc,20);
2132: -- insert an action
2133: SELECT pay_assignment_actions_s.nextval
2134: INTO l_actid
2135: FROM dual;
2136: --
2137: hr_nonrun_asact.insact(l_actid,rec_assignment.assignment_id,
2138: pactid,chunk,NULL);
2139: -- archive the effective end date
3327: AND per.effective_end_date;
3328: --
3329: cursor csr_director(p_person_id NUMBER) IS
3330: SELECT 'D'
3331: FROM dual
3332: WHERE EXISTS (SELECT '1'
3333: FROM per_all_people_f per
3334: WHERE p_person_id = per.person_id
3335: AND per.effective_start_date <= g_end_year
3788: p_reportable NUMBER,
3789: p_ni_cat VARCHAR2,
3790: p_scon VARCHAR2 DEFAULT NULL,
3791: p_actid NUMBER DEFAULT NULL) IS
3792: -- Procedure used to archive an individual NI balance value for a given
3793: -- NI Category and (where necessary) SCON.
3794: --
3795: -- The p_reportable parameter indicates that the value is reportable ie.
3796: -- to be included in the P35 tape submission. This is necessary for
3973: p_ees_rebate NUMBER DEFAULT NULL,
3974: p_scon VARCHAR2 DEFAULT NULL) IS
3975: -- Procedure used to archive a 'row' of balance values for a given
3976: -- NI Category and (where necessary) SCON.
3977: -- It archives the values individually by calling archive_ni_value.
3978: --
3979: -- This procedure performs NI Multiple Assignment Logic (Pt. II)
3980: -- which will archive a reportable set of values if the asg is a single asg.
3981: -- If the the asg is a multi-asg, a non-reportable set of values will be
6099: to_date('31/12/4712','DD/MM/YYYY'),
6100: p_archive_type,
6101: 'N',
6102: NULL
6103: FROM sys.dual WHERE NOT EXISTS
6104: (SELECT 1 FROM pay_report_format_items_f
6105: WHERE report_type = 'EOY'
6106: AND report_qualifier = 'GB'
6107: AND user_entity_id = l_user_entity_id
6128: to_date('31/12/4712','DD/MM/YYYY'),
6129: p_archive_type,
6130: 'N',
6131: NULL
6132: FROM sys.dual WHERE NOT EXISTS
6133: (SELECT 1 FROM pay_report_format_items_f
6134: WHERE report_type = 'EOY'
6135: AND report_qualifier = 'GB'
6136: AND user_entity_id = l_user_entity_id