309: begin
310: loop
311:
312: l_count := l_count + 1;
313: if pay_mag_tape.internal_prm_names(l_count) =
314: 'TRANSFER_PAYROLL_ACTION_ID' then
315: l_payroll_action_id :=
316: to_number(pay_mag_tape.internal_prm_values(l_count));
317: end if;
312: l_count := l_count + 1;
313: if pay_mag_tape.internal_prm_names(l_count) =
314: 'TRANSFER_PAYROLL_ACTION_ID' then
315: l_payroll_action_id :=
316: to_number(pay_mag_tape.internal_prm_values(l_count));
317: end if;
318:
319: if pay_mag_tape.internal_prm_names(l_count) = 'ARCHIVE_ACTION_ID' THEN
320: l_archive_action_id :=
315: l_payroll_action_id :=
316: to_number(pay_mag_tape.internal_prm_values(l_count));
317: end if;
318:
319: if pay_mag_tape.internal_prm_names(l_count) = 'ARCHIVE_ACTION_ID' THEN
320: l_archive_action_id :=
321: to_number(pay_mag_tape.internal_prm_values(l_count));
322: end if;
323:
317: end if;
318:
319: if pay_mag_tape.internal_prm_names(l_count) = 'ARCHIVE_ACTION_ID' THEN
320: l_archive_action_id :=
321: to_number(pay_mag_tape.internal_prm_values(l_count));
322: end if;
323:
324: if pay_mag_tape.internal_prm_names(l_count) = 'FULL_OR_PARTIAL' THEN
325: l_full_or_partial := pay_mag_tape.internal_prm_values(l_count);
320: l_archive_action_id :=
321: to_number(pay_mag_tape.internal_prm_values(l_count));
322: end if;
323:
324: if pay_mag_tape.internal_prm_names(l_count) = 'FULL_OR_PARTIAL' THEN
325: l_full_or_partial := pay_mag_tape.internal_prm_values(l_count);
326: end if;
327:
328: if pay_mag_tape.internal_prm_names(l_count) = 'EMPLOYEE_NAME' THEN
321: to_number(pay_mag_tape.internal_prm_values(l_count));
322: end if;
323:
324: if pay_mag_tape.internal_prm_names(l_count) = 'FULL_OR_PARTIAL' THEN
325: l_full_or_partial := pay_mag_tape.internal_prm_values(l_count);
326: end if;
327:
328: if pay_mag_tape.internal_prm_names(l_count) = 'EMPLOYEE_NAME' THEN
329: l_assignment_id :=
324: if pay_mag_tape.internal_prm_names(l_count) = 'FULL_OR_PARTIAL' THEN
325: l_full_or_partial := pay_mag_tape.internal_prm_values(l_count);
326: end if;
327:
328: if pay_mag_tape.internal_prm_names(l_count) = 'EMPLOYEE_NAME' THEN
329: l_assignment_id :=
330: to_number(pay_mag_tape.internal_prm_values(l_count));
331: end if;
332:
326: end if;
327:
328: if pay_mag_tape.internal_prm_names(l_count) = 'EMPLOYEE_NAME' THEN
329: l_assignment_id :=
330: to_number(pay_mag_tape.internal_prm_values(l_count));
331: end if;
332:
333: hr_utility.set_location(' prm_names (' || l_count || ') : ' ||
334: pay_mag_tape.internal_prm_names(l_count), 10);
330: to_number(pay_mag_tape.internal_prm_values(l_count));
331: end if;
332:
333: hr_utility.set_location(' prm_names (' || l_count || ') : ' ||
334: pay_mag_tape.internal_prm_names(l_count), 10);
335: hr_utility.set_location(' prm_values (' || l_count || ') : ' ||
336: pay_mag_tape.internal_prm_values(l_count), 10);
337:
338: end loop;
332:
333: hr_utility.set_location(' prm_names (' || l_count || ') : ' ||
334: pay_mag_tape.internal_prm_names(l_count), 10);
335: hr_utility.set_location(' prm_values (' || l_count || ') : ' ||
336: pay_mag_tape.internal_prm_values(l_count), 10);
337:
338: end loop;
339: exception
340: when no_data_found then
444: rollback ;
445: raise_application_error(-20001, sqlerrm) ;
446: end ;
447:
448: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
449: pay_mag_tape.internal_prm_values(1) := '2';
450: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
451: pay_mag_tape.internal_prm_values(2) := l_formula_id;
452:
445: raise_application_error(-20001, sqlerrm) ;
446: end ;
447:
448: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
449: pay_mag_tape.internal_prm_values(1) := '2';
450: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
451: pay_mag_tape.internal_prm_values(2) := l_formula_id;
452:
453: hr_utility.set_location('end submit_report', 5);
446: end ;
447:
448: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
449: pay_mag_tape.internal_prm_values(1) := '2';
450: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
451: pay_mag_tape.internal_prm_values(2) := l_formula_id;
452:
453: hr_utility.set_location('end submit_report', 5);
454: --hr_utility.trace_off;
447:
448: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
449: pay_mag_tape.internal_prm_values(1) := '2';
450: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
451: pay_mag_tape.internal_prm_values(2) := l_formula_id;
452:
453: hr_utility.set_location('end submit_report', 5);
454: --hr_utility.trace_off;
455: