[Home] [Help]
33: IS
34: l_proc_name VARCHAR2(100) ;
35: BEGIN
36: l_proc_name := l_package || 'range_code';
37: hr_utility.set_location(l_proc_name, 10);
38: p_sqlstr := 'SELECT DISTINCT person_id
39: FROM per_all_people_f ppf,
40: pay_payroll_actions ppa
41: WHERE ppa.payroll_action_id = :payroll_action_id
40: pay_payroll_actions ppa
41: WHERE ppa.payroll_action_id = :payroll_action_id
42: AND ppa.business_group_id = ppf.business_group_id
43: ORDER BY ppf.person_id';
44: hr_utility.set_location(l_proc_name, 20);
45: END range_cursor;
46: --
47:
48: ----------------------------------------------------------------------------------------------
149:
150: BEGIN
151:
152: l_proc_name := l_package || 'assignment_action_code';
153: hr_utility.set_location(l_proc_name, 10);
154:
155: l_payroll_id := to_number(PAY_NO_PAYPROC_UTILITY.get_parameter(p_payroll_action_id,'PAYROLL_ID'));
156: l_consolidation_set := to_number(PAY_NO_PAYPROC_UTILITY.get_parameter(p_payroll_action_id,'CONSOLIDATION_SET_ID'));
157: l_assignment_set_id :=to_number(PAY_NO_PAYPROC_UTILITY.get_parameter(p_payroll_action_id,'ASSIGNMENT_SET_ID'));
155: l_payroll_id := to_number(PAY_NO_PAYPROC_UTILITY.get_parameter(p_payroll_action_id,'PAYROLL_ID'));
156: l_consolidation_set := to_number(PAY_NO_PAYPROC_UTILITY.get_parameter(p_payroll_action_id,'CONSOLIDATION_SET_ID'));
157: l_assignment_set_id :=to_number(PAY_NO_PAYPROC_UTILITY.get_parameter(p_payroll_action_id,'ASSIGNMENT_SET_ID'));
158:
159: hr_utility.set_location(l_proc_name, 20);
160:
161: FOR rec_asg IN csr_asg(p_payroll_action_id
162: ,p_start_person_id
163: ,p_end_person_id
186: , rec_asg.assignment_action_id);
187: --
188:
189: END LOOP;
190: hr_utility.set_location(l_proc_name, 40);
191:
192: EXCEPTION
193: WHEN OTHERS THEN
194: hr_utility.set_location('Error in assignment action code ',100);
190: hr_utility.set_location(l_proc_name, 40);
191:
192: EXCEPTION
193: WHEN OTHERS THEN
194: hr_utility.set_location('Error in assignment action code ',100);
195: RAISE;
196: END assignment_action_code;
197:
198: -----------------------------------------------------------------------------------------------------------------
422:
423: l_number := to_number(p_sequence);
424:
425: if l_number = 9999 and p_type = 'SERIAL_NUM' then
426: hr_utility.set_message (801, 'PAY_376830_NO_SERIAL_NUM_OVER');
427: hr_utility.raise_error;
428: return '-1';
429: end if;
430:
423: l_number := to_number(p_sequence);
424:
425: if l_number = 9999 and p_type = 'SERIAL_NUM' then
426: hr_utility.set_message (801, 'PAY_376830_NO_SERIAL_NUM_OVER');
427: hr_utility.raise_error;
428: return '-1';
429: end if;
430:
431: if l_number = 9999 and p_type = 'SEQ_CONTROL' then
1212: -- Set retcode to 2, indicating an ERROR to the ConcMgr
1213: retcode := c_error;
1214:
1215: -- Set the application error
1216: hr_utility.set_message (801, 'PAY_376826_NO_DATA_EXC_DIR_MIS');
1217:
1218: -- Return the message to the ConcMgr (This msg will appear in the log file)
1219:
1220: errbuf := hr_utility.get_message;
1216: hr_utility.set_message (801, 'PAY_376826_NO_DATA_EXC_DIR_MIS');
1217:
1218: -- Return the message to the ConcMgr (This msg will appear in the log file)
1219:
1220: errbuf := hr_utility.get_message;
1221:
1222: WHEN UTL_FILE.invalid_operation
1223: -- File could not be opened as requested, perhaps because of operating system permissions
1224: -- Also raised when attempting a write operation on a file opened for read, or a read operation