73: l_proc VARCHAR2(50) := g_package || 'get_parameters';
74: l_tax_ref VARCHAR2(50);
75: l_count NUMBER;
76: begin
77: hr_utility.set_location ('Entering ' || l_proc, 10);
78: hr_utility.set_location ('Step ' || l_proc, 20);
79: hr_utility.set_location ('p_token_name = ' || p_token_name, 20);
80: open csr_parameter_info (p_payroll_action_id, p_token_name);
81: fetch csr_parameter_info into l_token_value,
74: l_tax_ref VARCHAR2(50);
75: l_count NUMBER;
76: begin
77: hr_utility.set_location ('Entering ' || l_proc, 10);
78: hr_utility.set_location ('Step ' || l_proc, 20);
79: hr_utility.set_location ('p_token_name = ' || p_token_name, 20);
80: open csr_parameter_info (p_payroll_action_id, p_token_name);
81: fetch csr_parameter_info into l_token_value,
82: l_business_group_id,
75: l_count NUMBER;
76: begin
77: hr_utility.set_location ('Entering ' || l_proc, 10);
78: hr_utility.set_location ('Step ' || l_proc, 20);
79: hr_utility.set_location ('p_token_name = ' || p_token_name, 20);
80: open csr_parameter_info (p_payroll_action_id, p_token_name);
81: fetch csr_parameter_info into l_token_value,
82: l_business_group_id,
83: l_request_id,
133: else
134: l_token_value := l_token_value;
135: end if;
136:
137: hr_utility.set_location ('l_token_value = ' || l_token_value, 60);
138: hr_utility.set_location ('Leaving ' || l_proc, 70);
139: return l_token_value;
140: end get_parameters;
141:
134: l_token_value := l_token_value;
135: end if;
136:
137: hr_utility.set_location ('l_token_value = ' || l_token_value, 60);
138: hr_utility.set_location ('Leaving ' || l_proc, 70);
139: return l_token_value;
140: end get_parameters;
141:
142: PROCEDURE range_cursor (
146: IS
147: l_proc CONSTANT VARCHAR2(35) := g_package || 'range_cursor';
148: BEGIN
149: --
150: hr_utility.set_location ('Entering: ' || l_proc, 1);
151: --
152: -- Note: There must be one and only one entry of :payroll_action_id in
153: -- the string, and the statement must be, order by person_id
154: --
158: WHERE ppa.payroll_action_id = :payroll_action_id
159: AND ppa.business_group_id +0= ppf.business_group_id
160: ORDER BY ppf.person_id';
161:
162: hr_utility.set_location ('Leaving ' || l_proc, 20);
163: --
164: END range_cursor;
165:
166: --
206: l_arch_payroll_action_id pay_payroll_actions.payroll_action_id%TYPE;
207: l_tax_ref varchar2(30);
208: BEGIN
209: --
210: hr_utility.set_location ('Entering: ' || l_proc, 1);
211: --
212: l_arch_payroll_action_id := get_parameters (pactid, 'ARCH_PAYROLL_ACTION_ID');
213: l_tax_ref := get_parameters (pactid, 'TAX_REFERENCE');
214:
211: --
212: l_arch_payroll_action_id := get_parameters (pactid, 'ARCH_PAYROLL_ACTION_ID');
213: l_tax_ref := get_parameters (pactid, 'TAX_REFERENCE');
214:
215: hr_utility.set_location ('arch pay action id ' || l_arch_payroll_action_id, 1);
216:
217: --
218: FOR asgrec IN csr_assignments (l_arch_payroll_action_id,l_tax_ref)
219: LOOP
224: INTO l_ass_act_id
225: FROM dual;
226: --
227: -- insert into pay_assignment_actions.
228: hr_utility.set_location ('assignment id ' || asgrec.assignment_id, 1);
229:
230: hr_nonrun_asact.insact (l_ass_act_id, asgrec.assignment_id, pactid, chunk, NULL);
231:
232: END LOOP;
231:
232: END LOOP;
233:
234: --
235: hr_utility.set_location (' Leaving: ' || l_proc, 100);
236: --
237: -- hr_utility.trace_off;
238:
239: END action_creation;
233:
234: --
235: hr_utility.set_location (' Leaving: ' || l_proc, 100);
236: --
237: -- hr_utility.trace_off;
238:
239: END action_creation;
240: --
241: --