DBA Data[Home] [Help]

APPS.PAY_GB_BACS_TAPE dependencies on PAY_MAG_TAPE

Line 291: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';

287: --end if;
288: -- end temporary trace AS
289: --
290: -- Reserved positions
291: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
292: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
293: --
294: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
295: -- Initial value

Line 292: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';

288: -- end temporary trace AS
289: --
290: -- Reserved positions
291: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
292: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
293: --
294: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
295: -- Initial value
296: pay_mag_tape.internal_cxt_values(1) := 1;

Line 294: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';

290: -- Reserved positions
291: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
292: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
293: --
294: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
295: -- Initial value
296: pay_mag_tape.internal_cxt_values(1) := 1;
297: --
298: --

Line 296: pay_mag_tape.internal_cxt_values(1) := 1;

292: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
293: --
294: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
295: -- Initial value
296: pay_mag_tape.internal_cxt_values(1) := 1;
297: --
298: --
299: IF NOT bacs_assignments %ISOPEN THEN -- New file
300: hr_utility.set_location('bacsmgtp.new_formula',1);

Line 308: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

304: count_for_block := 0;
305: org_payment_count := 0;
306: block_count := 1;
307: fetch_required := TRUE;
308: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
309: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
310: pay_mag_tape.internal_cxt_values(1) := 3;
311: pay_mag_tape.internal_cxt_values(3) := get_session_date;
312: --

Line 309: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

305: org_payment_count := 0;
306: block_count := 1;
307: fetch_required := TRUE;
308: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
309: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
310: pay_mag_tape.internal_cxt_values(1) := 3;
311: pay_mag_tape.internal_cxt_values(3) := get_session_date;
312: --
313: pay_mag_tape.internal_prm_values(1) := 7;

Line 310: pay_mag_tape.internal_cxt_values(1) := 3;

306: block_count := 1;
307: fetch_required := TRUE;
308: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
309: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
310: pay_mag_tape.internal_cxt_values(1) := 3;
311: pay_mag_tape.internal_cxt_values(3) := get_session_date;
312: --
313: pay_mag_tape.internal_prm_values(1) := 7;
314: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');

Line 311: pay_mag_tape.internal_cxt_values(3) := get_session_date;

307: fetch_required := TRUE;
308: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
309: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
310: pay_mag_tape.internal_cxt_values(1) := 3;
311: pay_mag_tape.internal_cxt_values(3) := get_session_date;
312: --
313: pay_mag_tape.internal_prm_values(1) := 7;
314: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
315: --

Line 313: pay_mag_tape.internal_prm_values(1) := 7;

309: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
310: pay_mag_tape.internal_cxt_values(1) := 3;
311: pay_mag_tape.internal_cxt_values(3) := get_session_date;
312: --
313: pay_mag_tape.internal_prm_values(1) := 7;
314: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
315: --
316: -- AS it looks like we have 3 parms so try this
317: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'

Line 314: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');

310: pay_mag_tape.internal_cxt_values(1) := 3;
311: pay_mag_tape.internal_cxt_values(3) := get_session_date;
312: --
313: pay_mag_tape.internal_prm_values(1) := 7;
314: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
315: --
316: -- AS it looks like we have 3 parms so try this
317: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'
318: then p_payroll_action_id := to_number(

Line 317: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'

313: pay_mag_tape.internal_prm_values(1) := 7;
314: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
315: --
316: -- AS it looks like we have 3 parms so try this
317: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'
318: then p_payroll_action_id := to_number(
319: pay_mag_tape.internal_prm_values(3));
320: end if;
321: hr_utility.set_location('bacsmgtp.payroll_action_id',p_payroll_action_id);

Line 319: pay_mag_tape.internal_prm_values(3));

315: --
316: -- AS it looks like we have 3 parms so try this
317: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'
318: then p_payroll_action_id := to_number(
319: pay_mag_tape.internal_prm_values(3));
320: end if;
321: hr_utility.set_location('bacsmgtp.payroll_action_id',p_payroll_action_id);
322: --
323: expiration_date := get_expiration_date(p_payroll_action_id);

Line 326: pay_mag_tape.internal_cxt_values(2) :=

322: --
323: expiration_date := get_expiration_date(p_payroll_action_id);
324: submission_number := get_submission_number(p_payroll_action_id);
325: process_date := get_process_date(p_payroll_action_id);
326: pay_mag_tape.internal_cxt_values(2) :=
327: get_org_context(p_payroll_action_id);
328: p_previous_payment_id := get_org_context(p_payroll_action_id);
329: --
330: --

Line 334: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';

330: --
331: total_payment := 0;
332: total_payment_footer :=0;
333: final_contra := FALSE;
334: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
335: pay_mag_tape.internal_prm_values(3) := expiration_date;
336: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
337: pay_mag_tape.internal_prm_values(4) := submission_number;
338: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';

Line 335: pay_mag_tape.internal_prm_values(3) := expiration_date;

331: total_payment := 0;
332: total_payment_footer :=0;
333: final_contra := FALSE;
334: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
335: pay_mag_tape.internal_prm_values(3) := expiration_date;
336: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
337: pay_mag_tape.internal_prm_values(4) := submission_number;
338: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
339: pay_mag_tape.internal_prm_values(5) := process_date;

Line 336: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';

332: total_payment_footer :=0;
333: final_contra := FALSE;
334: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
335: pay_mag_tape.internal_prm_values(3) := expiration_date;
336: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
337: pay_mag_tape.internal_prm_values(4) := submission_number;
338: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
339: pay_mag_tape.internal_prm_values(5) := process_date;
340: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';

Line 337: pay_mag_tape.internal_prm_values(4) := submission_number;

333: final_contra := FALSE;
334: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
335: pay_mag_tape.internal_prm_values(3) := expiration_date;
336: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
337: pay_mag_tape.internal_prm_values(4) := submission_number;
338: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
339: pay_mag_tape.internal_prm_values(5) := process_date;
340: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
341: pay_mag_tape.internal_prm_values(6) := '0001';

Line 338: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';

334: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
335: pay_mag_tape.internal_prm_values(3) := expiration_date;
336: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
337: pay_mag_tape.internal_prm_values(4) := submission_number;
338: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
339: pay_mag_tape.internal_prm_values(5) := process_date;
340: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
341: pay_mag_tape.internal_prm_values(6) := '0001';
342: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';

Line 339: pay_mag_tape.internal_prm_values(5) := process_date;

335: pay_mag_tape.internal_prm_values(3) := expiration_date;
336: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
337: pay_mag_tape.internal_prm_values(4) := submission_number;
338: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
339: pay_mag_tape.internal_prm_values(5) := process_date;
340: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
341: pay_mag_tape.internal_prm_values(6) := '0001';
342: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
343: pay_mag_tape.internal_prm_values(7) := get_todays_date;

Line 340: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';

336: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
337: pay_mag_tape.internal_prm_values(4) := submission_number;
338: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
339: pay_mag_tape.internal_prm_values(5) := process_date;
340: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
341: pay_mag_tape.internal_prm_values(6) := '0001';
342: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
343: pay_mag_tape.internal_prm_values(7) := get_todays_date;
344: --

Line 341: pay_mag_tape.internal_prm_values(6) := '0001';

337: pay_mag_tape.internal_prm_values(4) := submission_number;
338: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
339: pay_mag_tape.internal_prm_values(5) := process_date;
340: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
341: pay_mag_tape.internal_prm_values(6) := '0001';
342: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
343: pay_mag_tape.internal_prm_values(7) := get_todays_date;
344: --
345: OPEN bacs_assignments ( p_payroll_action_id);

Line 342: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';

338: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
339: pay_mag_tape.internal_prm_values(5) := process_date;
340: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
341: pay_mag_tape.internal_prm_values(6) := '0001';
342: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
343: pay_mag_tape.internal_prm_values(7) := get_todays_date;
344: --
345: OPEN bacs_assignments ( p_payroll_action_id);
346: --

Line 343: pay_mag_tape.internal_prm_values(7) := get_todays_date;

339: pay_mag_tape.internal_prm_values(5) := process_date;
340: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
341: pay_mag_tape.internal_prm_values(6) := '0001';
342: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
343: pay_mag_tape.internal_prm_values(7) := get_todays_date;
344: --
345: OPEN bacs_assignments ( p_payroll_action_id);
346: --
347: ELSE

Line 363: pay_mag_tape.internal_prm_values(1) := 4;

359: IF bacs_assignments %FOUND THEN
360: IF p_org_payment_method_id = p_previous_payment_id
361: THEN
362: hr_utility.set_location('bacsmgtp.new_formula',3);
363: pay_mag_tape.internal_prm_values(1) := 4;
364: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
365: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
366: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
367: pay_mag_tape.internal_prm_values(3) := p_value * 100;

Line 364: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');

360: IF p_org_payment_method_id = p_previous_payment_id
361: THEN
362: hr_utility.set_location('bacsmgtp.new_formula',3);
363: pay_mag_tape.internal_prm_values(1) := 4;
364: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
365: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
366: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
367: pay_mag_tape.internal_prm_values(3) := p_value * 100;
368: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';

Line 365: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';

361: THEN
362: hr_utility.set_location('bacsmgtp.new_formula',3);
363: pay_mag_tape.internal_prm_values(1) := 4;
364: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
365: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
366: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
367: pay_mag_tape.internal_prm_values(3) := p_value * 100;
368: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
369: pay_mag_tape.internal_prm_values(4) := p_assignment_number;

Line 366: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;

362: hr_utility.set_location('bacsmgtp.new_formula',3);
363: pay_mag_tape.internal_prm_values(1) := 4;
364: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
365: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
366: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
367: pay_mag_tape.internal_prm_values(3) := p_value * 100;
368: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
369: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
370: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

Line 367: pay_mag_tape.internal_prm_values(3) := p_value * 100;

363: pay_mag_tape.internal_prm_values(1) := 4;
364: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
365: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
366: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
367: pay_mag_tape.internal_prm_values(3) := p_value * 100;
368: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
369: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
370: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

Line 368: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';

364: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
365: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
366: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
367: pay_mag_tape.internal_prm_values(3) := p_value * 100;
368: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
369: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
370: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
372: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;

Line 369: pay_mag_tape.internal_prm_values(4) := p_assignment_number;

365: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
366: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
367: pay_mag_tape.internal_prm_values(3) := p_value * 100;
368: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
369: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
370: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
372: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
373: pay_mag_tape.internal_cxt_values(3):= get_session_date;

Line 370: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

366: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
367: pay_mag_tape.internal_prm_values(3) := p_value * 100;
368: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
369: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
370: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
372: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
373: pay_mag_tape.internal_cxt_values(3):= get_session_date;
374: pay_mag_tape.internal_cxt_values(1):= 4;

Line 371: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

367: pay_mag_tape.internal_prm_values(3) := p_value * 100;
368: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
369: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
370: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
372: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
373: pay_mag_tape.internal_cxt_values(3):= get_session_date;
374: pay_mag_tape.internal_cxt_values(1):= 4;
375: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';

Line 372: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;

368: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
369: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
370: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
372: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
373: pay_mag_tape.internal_cxt_values(3):= get_session_date;
374: pay_mag_tape.internal_cxt_values(1):= 4;
375: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
376: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;

Line 373: pay_mag_tape.internal_cxt_values(3):= get_session_date;

369: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
370: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
372: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
373: pay_mag_tape.internal_cxt_values(3):= get_session_date;
374: pay_mag_tape.internal_cxt_values(1):= 4;
375: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
376: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
377: org_payment_count := org_payment_count + 1;

Line 374: pay_mag_tape.internal_cxt_values(1):= 4;

370: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
372: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
373: pay_mag_tape.internal_cxt_values(3):= get_session_date;
374: pay_mag_tape.internal_cxt_values(1):= 4;
375: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
376: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
377: org_payment_count := org_payment_count + 1;
378: total_body_count := total_body_count + 1;

Line 375: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';

371: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
372: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
373: pay_mag_tape.internal_cxt_values(3):= get_session_date;
374: pay_mag_tape.internal_cxt_values(1):= 4;
375: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
376: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
377: org_payment_count := org_payment_count + 1;
378: total_body_count := total_body_count + 1;
379: total_payment := (p_value * 100) + total_payment;

Line 376: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;

372: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
373: pay_mag_tape.internal_cxt_values(3):= get_session_date;
374: pay_mag_tape.internal_cxt_values(1):= 4;
375: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
376: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
377: org_payment_count := org_payment_count + 1;
378: total_body_count := total_body_count + 1;
379: total_payment := (p_value * 100) + total_payment;
380: total_payment_footer := (p_value * 100) + total_payment_footer;

Line 396: pay_mag_tape.internal_prm_values(1) := 5;

392: END IF;
393: --
394: ELSE
395: hr_utility.set_location('bacsmgtp.new_formula',6);
396: pay_mag_tape.internal_prm_values(1) := 5;
397: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
398: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
399: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
400: pay_mag_tape.internal_prm_values(3) := total_payment;

Line 397: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');

393: --
394: ELSE
395: hr_utility.set_location('bacsmgtp.new_formula',6);
396: pay_mag_tape.internal_prm_values(1) := 5;
397: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
398: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
399: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
400: pay_mag_tape.internal_prm_values(3) := total_payment;
401: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';

Line 398: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';

394: ELSE
395: hr_utility.set_location('bacsmgtp.new_formula',6);
396: pay_mag_tape.internal_prm_values(1) := 5;
397: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
398: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
399: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
400: pay_mag_tape.internal_prm_values(3) := total_payment;
401: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
402: pay_mag_tape.internal_prm_values(4) := org_payment_count;

Line 399: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';

395: hr_utility.set_location('bacsmgtp.new_formula',6);
396: pay_mag_tape.internal_prm_values(1) := 5;
397: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
398: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
399: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
400: pay_mag_tape.internal_prm_values(3) := total_payment;
401: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
402: pay_mag_tape.internal_prm_values(4) := org_payment_count;
403: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';

Line 400: pay_mag_tape.internal_prm_values(3) := total_payment;

396: pay_mag_tape.internal_prm_values(1) := 5;
397: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
398: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
399: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
400: pay_mag_tape.internal_prm_values(3) := total_payment;
401: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
402: pay_mag_tape.internal_prm_values(4) := org_payment_count;
403: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
404: pay_mag_tape.internal_prm_values(5) := 'N';

Line 401: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';

397: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
398: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
399: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
400: pay_mag_tape.internal_prm_values(3) := total_payment;
401: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
402: pay_mag_tape.internal_prm_values(4) := org_payment_count;
403: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
404: pay_mag_tape.internal_prm_values(5) := 'N';
405: pay_mag_tape.internal_cxt_values(1) := 3;

Line 402: pay_mag_tape.internal_prm_values(4) := org_payment_count;

398: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
399: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
400: pay_mag_tape.internal_prm_values(3) := total_payment;
401: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
402: pay_mag_tape.internal_prm_values(4) := org_payment_count;
403: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
404: pay_mag_tape.internal_prm_values(5) := 'N';
405: pay_mag_tape.internal_cxt_values(1) := 3;
406: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

Line 403: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';

399: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
400: pay_mag_tape.internal_prm_values(3) := total_payment;
401: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
402: pay_mag_tape.internal_prm_values(4) := org_payment_count;
403: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
404: pay_mag_tape.internal_prm_values(5) := 'N';
405: pay_mag_tape.internal_cxt_values(1) := 3;
406: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
407: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;

Line 404: pay_mag_tape.internal_prm_values(5) := 'N';

400: pay_mag_tape.internal_prm_values(3) := total_payment;
401: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
402: pay_mag_tape.internal_prm_values(4) := org_payment_count;
403: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
404: pay_mag_tape.internal_prm_values(5) := 'N';
405: pay_mag_tape.internal_cxt_values(1) := 3;
406: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
407: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
408: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

Line 405: pay_mag_tape.internal_cxt_values(1) := 3;

401: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
402: pay_mag_tape.internal_prm_values(4) := org_payment_count;
403: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
404: pay_mag_tape.internal_prm_values(5) := 'N';
405: pay_mag_tape.internal_cxt_values(1) := 3;
406: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
407: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
408: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
409: pay_mag_tape.internal_cxt_values(3) := get_session_date;

Line 406: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

402: pay_mag_tape.internal_prm_values(4) := org_payment_count;
403: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
404: pay_mag_tape.internal_prm_values(5) := 'N';
405: pay_mag_tape.internal_cxt_values(1) := 3;
406: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
407: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
408: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
409: pay_mag_tape.internal_cxt_values(3) := get_session_date;
410: total_contra_count := total_contra_count + 1;

Line 407: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;

403: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
404: pay_mag_tape.internal_prm_values(5) := 'N';
405: pay_mag_tape.internal_cxt_values(1) := 3;
406: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
407: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
408: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
409: pay_mag_tape.internal_cxt_values(3) := get_session_date;
410: total_contra_count := total_contra_count + 1;
411: count_for_block :=count_for_block + 1;

Line 408: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

404: pay_mag_tape.internal_prm_values(5) := 'N';
405: pay_mag_tape.internal_cxt_values(1) := 3;
406: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
407: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
408: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
409: pay_mag_tape.internal_cxt_values(3) := get_session_date;
410: total_contra_count := total_contra_count + 1;
411: count_for_block :=count_for_block + 1;
412: p_previous_payment_id := p_org_payment_method_id;

Line 409: pay_mag_tape.internal_cxt_values(3) := get_session_date;

405: pay_mag_tape.internal_cxt_values(1) := 3;
406: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
407: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
408: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
409: pay_mag_tape.internal_cxt_values(3) := get_session_date;
410: total_contra_count := total_contra_count + 1;
411: count_for_block :=count_for_block + 1;
412: p_previous_payment_id := p_org_payment_method_id;
413: org_payment_count := 0;

Line 423: pay_mag_tape.internal_prm_values(1) := 5;

419: -- I need to call the CONTRA record again if it is the
420: -- last call before doing the padding and the footer
421: ELSE
422: IF final_contra = FALSE THEN
423: pay_mag_tape.internal_prm_values(1) := 5;
424: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
425: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
426: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
427: pay_mag_tape.internal_prm_values(3) := total_payment;

Line 424: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');

420: -- last call before doing the padding and the footer
421: ELSE
422: IF final_contra = FALSE THEN
423: pay_mag_tape.internal_prm_values(1) := 5;
424: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
425: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
426: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
427: pay_mag_tape.internal_prm_values(3) := total_payment;
428: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';

Line 425: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';

421: ELSE
422: IF final_contra = FALSE THEN
423: pay_mag_tape.internal_prm_values(1) := 5;
424: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
425: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
426: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
427: pay_mag_tape.internal_prm_values(3) := total_payment;
428: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
429: pay_mag_tape.internal_prm_values(4) := org_payment_count;

Line 426: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';

422: IF final_contra = FALSE THEN
423: pay_mag_tape.internal_prm_values(1) := 5;
424: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
425: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
426: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
427: pay_mag_tape.internal_prm_values(3) := total_payment;
428: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
429: pay_mag_tape.internal_prm_values(4) := org_payment_count;
430: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';

Line 427: pay_mag_tape.internal_prm_values(3) := total_payment;

423: pay_mag_tape.internal_prm_values(1) := 5;
424: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
425: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
426: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
427: pay_mag_tape.internal_prm_values(3) := total_payment;
428: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
429: pay_mag_tape.internal_prm_values(4) := org_payment_count;
430: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
431: pay_mag_tape.internal_prm_values(5) := 'Y';

Line 428: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';

424: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
425: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
426: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
427: pay_mag_tape.internal_prm_values(3) := total_payment;
428: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
429: pay_mag_tape.internal_prm_values(4) := org_payment_count;
430: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
431: pay_mag_tape.internal_prm_values(5) := 'Y';
432: pay_mag_tape.internal_cxt_values(1) := 3;

Line 429: pay_mag_tape.internal_prm_values(4) := org_payment_count;

425: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
426: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
427: pay_mag_tape.internal_prm_values(3) := total_payment;
428: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
429: pay_mag_tape.internal_prm_values(4) := org_payment_count;
430: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
431: pay_mag_tape.internal_prm_values(5) := 'Y';
432: pay_mag_tape.internal_cxt_values(1) := 3;
433: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

Line 430: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';

426: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
427: pay_mag_tape.internal_prm_values(3) := total_payment;
428: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
429: pay_mag_tape.internal_prm_values(4) := org_payment_count;
430: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
431: pay_mag_tape.internal_prm_values(5) := 'Y';
432: pay_mag_tape.internal_cxt_values(1) := 3;
433: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
434: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;

Line 431: pay_mag_tape.internal_prm_values(5) := 'Y';

427: pay_mag_tape.internal_prm_values(3) := total_payment;
428: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
429: pay_mag_tape.internal_prm_values(4) := org_payment_count;
430: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
431: pay_mag_tape.internal_prm_values(5) := 'Y';
432: pay_mag_tape.internal_cxt_values(1) := 3;
433: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
434: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
435: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

Line 432: pay_mag_tape.internal_cxt_values(1) := 3;

428: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
429: pay_mag_tape.internal_prm_values(4) := org_payment_count;
430: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
431: pay_mag_tape.internal_prm_values(5) := 'Y';
432: pay_mag_tape.internal_cxt_values(1) := 3;
433: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
434: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
435: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
436: pay_mag_tape.internal_cxt_values(3) := get_session_date;

Line 433: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

429: pay_mag_tape.internal_prm_values(4) := org_payment_count;
430: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
431: pay_mag_tape.internal_prm_values(5) := 'Y';
432: pay_mag_tape.internal_cxt_values(1) := 3;
433: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
434: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
435: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
436: pay_mag_tape.internal_cxt_values(3) := get_session_date;
437: total_contra_count := total_contra_count + 1;

Line 434: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;

430: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
431: pay_mag_tape.internal_prm_values(5) := 'Y';
432: pay_mag_tape.internal_cxt_values(1) := 3;
433: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
434: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
435: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
436: pay_mag_tape.internal_cxt_values(3) := get_session_date;
437: total_contra_count := total_contra_count + 1;
438: count_for_block :=count_for_block + 1;

Line 435: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

431: pay_mag_tape.internal_prm_values(5) := 'Y';
432: pay_mag_tape.internal_cxt_values(1) := 3;
433: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
434: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
435: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
436: pay_mag_tape.internal_cxt_values(3) := get_session_date;
437: total_contra_count := total_contra_count + 1;
438: count_for_block :=count_for_block + 1;
439: final_contra :=TRUE;

Line 436: pay_mag_tape.internal_cxt_values(3) := get_session_date;

432: pay_mag_tape.internal_cxt_values(1) := 3;
433: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
434: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
435: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
436: pay_mag_tape.internal_cxt_values(3) := get_session_date;
437: total_contra_count := total_contra_count + 1;
438: count_for_block :=count_for_block + 1;
439: final_contra :=TRUE;
440: ELSE

Line 444: pay_mag_tape.internal_prm_values(1) :=2;

440: ELSE
441: hr_utility.set_location('bacsmgtp.new_formula',8);
442: IF count_for_block < 20 then
443: hr_utility.set_location('bacsmgtp.new_formula',9);
444: pay_mag_tape.internal_prm_values(1) :=2;
445: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
446: pay_mag_tape.internal_prm_values(2) :=
447: get_formula_id('BACS_PADDING');
448: count_for_block:= count_for_block + 1;

Line 445: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';

441: hr_utility.set_location('bacsmgtp.new_formula',8);
442: IF count_for_block < 20 then
443: hr_utility.set_location('bacsmgtp.new_formula',9);
444: pay_mag_tape.internal_prm_values(1) :=2;
445: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
446: pay_mag_tape.internal_prm_values(2) :=
447: get_formula_id('BACS_PADDING');
448: count_for_block:= count_for_block + 1;
449: ELSE

Line 446: pay_mag_tape.internal_prm_values(2) :=

442: IF count_for_block < 20 then
443: hr_utility.set_location('bacsmgtp.new_formula',9);
444: pay_mag_tape.internal_prm_values(1) :=2;
445: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
446: pay_mag_tape.internal_prm_values(2) :=
447: get_formula_id('BACS_PADDING');
448: count_for_block:= count_for_block + 1;
449: ELSE
450: -- Padding finished - Now write footer,

Line 453: pay_mag_tape.internal_cxt_values(1) := 3;

449: ELSE
450: -- Padding finished - Now write footer,
451: --
452: hr_utility.set_location('bacsmgtp.new_formula',10);
453: pay_mag_tape.internal_cxt_values(1) := 3;
454: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
455: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
456: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
457: pay_mag_tape.internal_cxt_values(3) := get_session_date;

Line 454: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

450: -- Padding finished - Now write footer,
451: --
452: hr_utility.set_location('bacsmgtp.new_formula',10);
453: pay_mag_tape.internal_cxt_values(1) := 3;
454: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
455: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
456: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
457: pay_mag_tape.internal_cxt_values(3) := get_session_date;
458: pay_mag_tape.internal_prm_values(1) := 6;

Line 455: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;

451: --
452: hr_utility.set_location('bacsmgtp.new_formula',10);
453: pay_mag_tape.internal_cxt_values(1) := 3;
454: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
455: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
456: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
457: pay_mag_tape.internal_cxt_values(3) := get_session_date;
458: pay_mag_tape.internal_prm_values(1) := 6;
459: pay_mag_tape.internal_prm_values(2) :=

Line 456: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

452: hr_utility.set_location('bacsmgtp.new_formula',10);
453: pay_mag_tape.internal_cxt_values(1) := 3;
454: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
455: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
456: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
457: pay_mag_tape.internal_cxt_values(3) := get_session_date;
458: pay_mag_tape.internal_prm_values(1) := 6;
459: pay_mag_tape.internal_prm_values(2) :=
460: get_formula_id('BACS_FOOTER');

Line 457: pay_mag_tape.internal_cxt_values(3) := get_session_date;

453: pay_mag_tape.internal_cxt_values(1) := 3;
454: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
455: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
456: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
457: pay_mag_tape.internal_cxt_values(3) := get_session_date;
458: pay_mag_tape.internal_prm_values(1) := 6;
459: pay_mag_tape.internal_prm_values(2) :=
460: get_formula_id('BACS_FOOTER');
461: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';

Line 458: pay_mag_tape.internal_prm_values(1) := 6;

454: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
455: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
456: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
457: pay_mag_tape.internal_cxt_values(3) := get_session_date;
458: pay_mag_tape.internal_prm_values(1) := 6;
459: pay_mag_tape.internal_prm_values(2) :=
460: get_formula_id('BACS_FOOTER');
461: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
462: pay_mag_tape.internal_prm_names(3) :=

Line 459: pay_mag_tape.internal_prm_values(2) :=

455: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
456: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
457: pay_mag_tape.internal_cxt_values(3) := get_session_date;
458: pay_mag_tape.internal_prm_values(1) := 6;
459: pay_mag_tape.internal_prm_values(2) :=
460: get_formula_id('BACS_FOOTER');
461: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
462: pay_mag_tape.internal_prm_names(3) :=
463: 'TRANSFER_EXPIRATION_DATE';

Line 461: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';

457: pay_mag_tape.internal_cxt_values(3) := get_session_date;
458: pay_mag_tape.internal_prm_values(1) := 6;
459: pay_mag_tape.internal_prm_values(2) :=
460: get_formula_id('BACS_FOOTER');
461: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
462: pay_mag_tape.internal_prm_names(3) :=
463: 'TRANSFER_EXPIRATION_DATE';
464: pay_mag_tape.internal_prm_values(3) := expiration_date;
465: pay_mag_tape.internal_prm_names(4) :=

Line 462: pay_mag_tape.internal_prm_names(3) :=

458: pay_mag_tape.internal_prm_values(1) := 6;
459: pay_mag_tape.internal_prm_values(2) :=
460: get_formula_id('BACS_FOOTER');
461: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
462: pay_mag_tape.internal_prm_names(3) :=
463: 'TRANSFER_EXPIRATION_DATE';
464: pay_mag_tape.internal_prm_values(3) := expiration_date;
465: pay_mag_tape.internal_prm_names(4) :=
466: 'TRANSFER_SUBMISSION_NUMBER';

Line 464: pay_mag_tape.internal_prm_values(3) := expiration_date;

460: get_formula_id('BACS_FOOTER');
461: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
462: pay_mag_tape.internal_prm_names(3) :=
463: 'TRANSFER_EXPIRATION_DATE';
464: pay_mag_tape.internal_prm_values(3) := expiration_date;
465: pay_mag_tape.internal_prm_names(4) :=
466: 'TRANSFER_SUBMISSION_NUMBER';
467: pay_mag_tape.internal_prm_values(4) := submission_number;
468: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';

Line 465: pay_mag_tape.internal_prm_names(4) :=

461: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
462: pay_mag_tape.internal_prm_names(3) :=
463: 'TRANSFER_EXPIRATION_DATE';
464: pay_mag_tape.internal_prm_values(3) := expiration_date;
465: pay_mag_tape.internal_prm_names(4) :=
466: 'TRANSFER_SUBMISSION_NUMBER';
467: pay_mag_tape.internal_prm_values(4) := submission_number;
468: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
469: pay_mag_tape.internal_prm_values(5) := total_body_count;

Line 467: pay_mag_tape.internal_prm_values(4) := submission_number;

463: 'TRANSFER_EXPIRATION_DATE';
464: pay_mag_tape.internal_prm_values(3) := expiration_date;
465: pay_mag_tape.internal_prm_names(4) :=
466: 'TRANSFER_SUBMISSION_NUMBER';
467: pay_mag_tape.internal_prm_values(4) := submission_number;
468: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
469: pay_mag_tape.internal_prm_values(5) := total_body_count;
470: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
471: pay_mag_tape.internal_prm_values(6) := block_count;

Line 468: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';

464: pay_mag_tape.internal_prm_values(3) := expiration_date;
465: pay_mag_tape.internal_prm_names(4) :=
466: 'TRANSFER_SUBMISSION_NUMBER';
467: pay_mag_tape.internal_prm_values(4) := submission_number;
468: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
469: pay_mag_tape.internal_prm_values(5) := total_body_count;
470: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
471: pay_mag_tape.internal_prm_values(6) := block_count;
472: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';

Line 469: pay_mag_tape.internal_prm_values(5) := total_body_count;

465: pay_mag_tape.internal_prm_names(4) :=
466: 'TRANSFER_SUBMISSION_NUMBER';
467: pay_mag_tape.internal_prm_values(4) := submission_number;
468: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
469: pay_mag_tape.internal_prm_values(5) := total_body_count;
470: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
471: pay_mag_tape.internal_prm_values(6) := block_count;
472: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
473: pay_mag_tape.internal_prm_values(7) := get_todays_date;

Line 470: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';

466: 'TRANSFER_SUBMISSION_NUMBER';
467: pay_mag_tape.internal_prm_values(4) := submission_number;
468: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
469: pay_mag_tape.internal_prm_values(5) := total_body_count;
470: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
471: pay_mag_tape.internal_prm_values(6) := block_count;
472: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
473: pay_mag_tape.internal_prm_values(7) := get_todays_date;
474: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';

Line 471: pay_mag_tape.internal_prm_values(6) := block_count;

467: pay_mag_tape.internal_prm_values(4) := submission_number;
468: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
469: pay_mag_tape.internal_prm_values(5) := total_body_count;
470: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
471: pay_mag_tape.internal_prm_values(6) := block_count;
472: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
473: pay_mag_tape.internal_prm_values(7) := get_todays_date;
474: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
475: pay_mag_tape.internal_prm_values(8) := total_payment_footer;

Line 472: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';

468: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
469: pay_mag_tape.internal_prm_values(5) := total_body_count;
470: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
471: pay_mag_tape.internal_prm_values(6) := block_count;
472: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
473: pay_mag_tape.internal_prm_values(7) := get_todays_date;
474: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
475: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
476: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';

Line 473: pay_mag_tape.internal_prm_values(7) := get_todays_date;

469: pay_mag_tape.internal_prm_values(5) := total_body_count;
470: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
471: pay_mag_tape.internal_prm_values(6) := block_count;
472: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
473: pay_mag_tape.internal_prm_values(7) := get_todays_date;
474: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
475: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
476: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
477: pay_mag_tape.internal_prm_values(9) := total_contra_count;

Line 474: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';

470: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
471: pay_mag_tape.internal_prm_values(6) := block_count;
472: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
473: pay_mag_tape.internal_prm_values(7) := get_todays_date;
474: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
475: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
476: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
477: pay_mag_tape.internal_prm_values(9) := total_contra_count;
478: --

Line 475: pay_mag_tape.internal_prm_values(8) := total_payment_footer;

471: pay_mag_tape.internal_prm_values(6) := block_count;
472: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
473: pay_mag_tape.internal_prm_values(7) := get_todays_date;
474: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
475: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
476: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
477: pay_mag_tape.internal_prm_values(9) := total_contra_count;
478: --
479: CLOSE bacs_assignments;

Line 476: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';

472: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
473: pay_mag_tape.internal_prm_values(7) := get_todays_date;
474: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
475: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
476: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
477: pay_mag_tape.internal_prm_values(9) := total_contra_count;
478: --
479: CLOSE bacs_assignments;
480: END IF;

Line 477: pay_mag_tape.internal_prm_values(9) := total_contra_count;

473: pay_mag_tape.internal_prm_values(7) := get_todays_date;
474: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
475: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
476: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
477: pay_mag_tape.internal_prm_values(9) := total_contra_count;
478: --
479: CLOSE bacs_assignments;
480: END IF;
481: --