DBA Data[Home] [Help]

APPS.PAY_GB_BACS_TAPE dependencies on PAY_MAG_TAPE

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

282: --end if;
283: -- end temporary trace AS
284: --
285: -- Reserved positions
286: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
287: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
288: --
289: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
290: -- Initial value

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

283: -- end temporary trace AS
284: --
285: -- Reserved positions
286: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
287: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
288: --
289: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
290: -- Initial value
291: pay_mag_tape.internal_cxt_values(1) := 1;

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

285: -- Reserved positions
286: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
287: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
288: --
289: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
290: -- Initial value
291: pay_mag_tape.internal_cxt_values(1) := 1;
292: --
293: --

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

287: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
288: --
289: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
290: -- Initial value
291: pay_mag_tape.internal_cxt_values(1) := 1;
292: --
293: --
294: IF NOT bacs_assignments %ISOPEN THEN -- New file
295: hr_utility.set_location('bacsmgtp.new_formula',1);

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

299: count_for_block := 0;
300: org_payment_count := 0;
301: block_count := 1;
302: fetch_required := TRUE;
303: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
304: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
305: pay_mag_tape.internal_cxt_values(1) := 3;
306: pay_mag_tape.internal_cxt_values(3) := get_session_date;
307: --

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

300: org_payment_count := 0;
301: block_count := 1;
302: fetch_required := TRUE;
303: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
304: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
305: pay_mag_tape.internal_cxt_values(1) := 3;
306: pay_mag_tape.internal_cxt_values(3) := get_session_date;
307: --
308: pay_mag_tape.internal_prm_values(1) := 7;

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

301: block_count := 1;
302: fetch_required := TRUE;
303: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
304: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
305: pay_mag_tape.internal_cxt_values(1) := 3;
306: pay_mag_tape.internal_cxt_values(3) := get_session_date;
307: --
308: pay_mag_tape.internal_prm_values(1) := 7;
309: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');

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

302: fetch_required := TRUE;
303: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
304: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
305: pay_mag_tape.internal_cxt_values(1) := 3;
306: pay_mag_tape.internal_cxt_values(3) := get_session_date;
307: --
308: pay_mag_tape.internal_prm_values(1) := 7;
309: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
310: --

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

304: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
305: pay_mag_tape.internal_cxt_values(1) := 3;
306: pay_mag_tape.internal_cxt_values(3) := get_session_date;
307: --
308: pay_mag_tape.internal_prm_values(1) := 7;
309: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
310: --
311: -- AS it looks like we have 3 parms so try this
312: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'

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

305: pay_mag_tape.internal_cxt_values(1) := 3;
306: pay_mag_tape.internal_cxt_values(3) := get_session_date;
307: --
308: pay_mag_tape.internal_prm_values(1) := 7;
309: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
310: --
311: -- AS it looks like we have 3 parms so try this
312: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'
313: then p_payroll_action_id := to_number(

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

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

Line 314: pay_mag_tape.internal_prm_values(3));

310: --
311: -- AS it looks like we have 3 parms so try this
312: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'
313: then p_payroll_action_id := to_number(
314: pay_mag_tape.internal_prm_values(3));
315: end if;
316: hr_utility.set_location('bacsmgtp.payroll_action_id',p_payroll_action_id);
317: --
318: expiration_date := get_expiration_date(p_payroll_action_id);

Line 321: pay_mag_tape.internal_cxt_values(2) :=

317: --
318: expiration_date := get_expiration_date(p_payroll_action_id);
319: submission_number := get_submission_number(p_payroll_action_id);
320: process_date := get_process_date(p_payroll_action_id);
321: pay_mag_tape.internal_cxt_values(2) :=
322: get_org_context(p_payroll_action_id);
323: p_previous_payment_id := get_org_context(p_payroll_action_id);
324: --
325: --

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

325: --
326: total_payment := 0;
327: total_payment_footer :=0;
328: final_contra := FALSE;
329: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
330: pay_mag_tape.internal_prm_values(3) := expiration_date;
331: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
332: pay_mag_tape.internal_prm_values(4) := submission_number;
333: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';

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

326: total_payment := 0;
327: total_payment_footer :=0;
328: final_contra := FALSE;
329: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
330: pay_mag_tape.internal_prm_values(3) := expiration_date;
331: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
332: pay_mag_tape.internal_prm_values(4) := submission_number;
333: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
334: pay_mag_tape.internal_prm_values(5) := process_date;

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

327: total_payment_footer :=0;
328: final_contra := FALSE;
329: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
330: pay_mag_tape.internal_prm_values(3) := expiration_date;
331: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
332: pay_mag_tape.internal_prm_values(4) := submission_number;
333: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
334: pay_mag_tape.internal_prm_values(5) := process_date;
335: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';

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

328: final_contra := FALSE;
329: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
330: pay_mag_tape.internal_prm_values(3) := expiration_date;
331: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
332: pay_mag_tape.internal_prm_values(4) := submission_number;
333: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
334: pay_mag_tape.internal_prm_values(5) := process_date;
335: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
336: pay_mag_tape.internal_prm_values(6) := '0001';

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

329: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
330: pay_mag_tape.internal_prm_values(3) := expiration_date;
331: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
332: pay_mag_tape.internal_prm_values(4) := submission_number;
333: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
334: pay_mag_tape.internal_prm_values(5) := process_date;
335: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
336: pay_mag_tape.internal_prm_values(6) := '0001';
337: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';

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

330: pay_mag_tape.internal_prm_values(3) := expiration_date;
331: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
332: pay_mag_tape.internal_prm_values(4) := submission_number;
333: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
334: pay_mag_tape.internal_prm_values(5) := process_date;
335: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
336: pay_mag_tape.internal_prm_values(6) := '0001';
337: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
338: pay_mag_tape.internal_prm_values(7) := get_todays_date;

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

331: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
332: pay_mag_tape.internal_prm_values(4) := submission_number;
333: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
334: pay_mag_tape.internal_prm_values(5) := process_date;
335: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
336: pay_mag_tape.internal_prm_values(6) := '0001';
337: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
338: pay_mag_tape.internal_prm_values(7) := get_todays_date;
339: --

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

332: pay_mag_tape.internal_prm_values(4) := submission_number;
333: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
334: pay_mag_tape.internal_prm_values(5) := process_date;
335: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
336: pay_mag_tape.internal_prm_values(6) := '0001';
337: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
338: pay_mag_tape.internal_prm_values(7) := get_todays_date;
339: --
340: OPEN bacs_assignments ( p_payroll_action_id);

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

333: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
334: pay_mag_tape.internal_prm_values(5) := process_date;
335: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
336: pay_mag_tape.internal_prm_values(6) := '0001';
337: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
338: pay_mag_tape.internal_prm_values(7) := get_todays_date;
339: --
340: OPEN bacs_assignments ( p_payroll_action_id);
341: --

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

334: pay_mag_tape.internal_prm_values(5) := process_date;
335: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
336: pay_mag_tape.internal_prm_values(6) := '0001';
337: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
338: pay_mag_tape.internal_prm_values(7) := get_todays_date;
339: --
340: OPEN bacs_assignments ( p_payroll_action_id);
341: --
342: ELSE

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

354: IF bacs_assignments %FOUND THEN
355: IF p_org_payment_method_id = p_previous_payment_id
356: THEN
357: hr_utility.set_location('bacsmgtp.new_formula',3);
358: pay_mag_tape.internal_prm_values(1) := 4;
359: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
360: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
361: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
362: pay_mag_tape.internal_prm_values(3) := p_value * 100;

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

355: IF p_org_payment_method_id = p_previous_payment_id
356: THEN
357: hr_utility.set_location('bacsmgtp.new_formula',3);
358: pay_mag_tape.internal_prm_values(1) := 4;
359: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
360: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
361: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
362: pay_mag_tape.internal_prm_values(3) := p_value * 100;
363: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';

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

356: THEN
357: hr_utility.set_location('bacsmgtp.new_formula',3);
358: pay_mag_tape.internal_prm_values(1) := 4;
359: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
360: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
361: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
362: pay_mag_tape.internal_prm_values(3) := p_value * 100;
363: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
364: pay_mag_tape.internal_prm_values(4) := p_assignment_number;

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

357: hr_utility.set_location('bacsmgtp.new_formula',3);
358: pay_mag_tape.internal_prm_values(1) := 4;
359: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
360: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
361: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
362: pay_mag_tape.internal_prm_values(3) := p_value * 100;
363: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
364: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
365: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

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

358: pay_mag_tape.internal_prm_values(1) := 4;
359: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
360: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
361: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
362: pay_mag_tape.internal_prm_values(3) := p_value * 100;
363: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
364: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
365: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

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

359: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
360: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
361: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
362: pay_mag_tape.internal_prm_values(3) := p_value * 100;
363: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
364: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
365: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;

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

360: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
361: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
362: pay_mag_tape.internal_prm_values(3) := p_value * 100;
363: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
364: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
365: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
368: pay_mag_tape.internal_cxt_values(3):= get_session_date;

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

361: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
362: pay_mag_tape.internal_prm_values(3) := p_value * 100;
363: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
364: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
365: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
368: pay_mag_tape.internal_cxt_values(3):= get_session_date;
369: pay_mag_tape.internal_cxt_values(1):= 4;

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

362: pay_mag_tape.internal_prm_values(3) := p_value * 100;
363: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
364: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
365: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
368: pay_mag_tape.internal_cxt_values(3):= get_session_date;
369: pay_mag_tape.internal_cxt_values(1):= 4;
370: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';

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

363: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
364: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
365: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
368: pay_mag_tape.internal_cxt_values(3):= get_session_date;
369: pay_mag_tape.internal_cxt_values(1):= 4;
370: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;

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

364: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
365: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
368: pay_mag_tape.internal_cxt_values(3):= get_session_date;
369: pay_mag_tape.internal_cxt_values(1):= 4;
370: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
372: org_payment_count := org_payment_count + 1;

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

365: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
368: pay_mag_tape.internal_cxt_values(3):= get_session_date;
369: pay_mag_tape.internal_cxt_values(1):= 4;
370: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
372: org_payment_count := org_payment_count + 1;
373: total_body_count := total_body_count + 1;

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

366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
368: pay_mag_tape.internal_cxt_values(3):= get_session_date;
369: pay_mag_tape.internal_cxt_values(1):= 4;
370: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
372: org_payment_count := org_payment_count + 1;
373: total_body_count := total_body_count + 1;
374: total_payment := (p_value * 100) + total_payment;

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

367: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
368: pay_mag_tape.internal_cxt_values(3):= get_session_date;
369: pay_mag_tape.internal_cxt_values(1):= 4;
370: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
371: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
372: org_payment_count := org_payment_count + 1;
373: total_body_count := total_body_count + 1;
374: total_payment := (p_value * 100) + total_payment;
375: total_payment_footer := (p_value * 100) + total_payment_footer;

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

387: END IF;
388: --
389: ELSE
390: hr_utility.set_location('bacsmgtp.new_formula',6);
391: pay_mag_tape.internal_prm_values(1) := 5;
392: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
393: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
394: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
395: pay_mag_tape.internal_prm_values(3) := total_payment;

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

388: --
389: ELSE
390: hr_utility.set_location('bacsmgtp.new_formula',6);
391: pay_mag_tape.internal_prm_values(1) := 5;
392: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
393: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
394: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
395: pay_mag_tape.internal_prm_values(3) := total_payment;
396: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';

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

389: ELSE
390: hr_utility.set_location('bacsmgtp.new_formula',6);
391: pay_mag_tape.internal_prm_values(1) := 5;
392: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
393: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
394: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
395: pay_mag_tape.internal_prm_values(3) := total_payment;
396: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
397: pay_mag_tape.internal_prm_values(4) := org_payment_count;

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

390: hr_utility.set_location('bacsmgtp.new_formula',6);
391: pay_mag_tape.internal_prm_values(1) := 5;
392: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
393: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
394: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
395: pay_mag_tape.internal_prm_values(3) := total_payment;
396: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
397: pay_mag_tape.internal_prm_values(4) := org_payment_count;
398: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';

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

391: pay_mag_tape.internal_prm_values(1) := 5;
392: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
393: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
394: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
395: pay_mag_tape.internal_prm_values(3) := total_payment;
396: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
397: pay_mag_tape.internal_prm_values(4) := org_payment_count;
398: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
399: pay_mag_tape.internal_prm_values(5) := 'N';

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

392: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
393: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
394: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
395: pay_mag_tape.internal_prm_values(3) := total_payment;
396: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
397: pay_mag_tape.internal_prm_values(4) := org_payment_count;
398: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
399: pay_mag_tape.internal_prm_values(5) := 'N';
400: pay_mag_tape.internal_cxt_values(1) := 3;

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

393: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
394: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
395: pay_mag_tape.internal_prm_values(3) := total_payment;
396: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
397: pay_mag_tape.internal_prm_values(4) := org_payment_count;
398: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
399: pay_mag_tape.internal_prm_values(5) := 'N';
400: pay_mag_tape.internal_cxt_values(1) := 3;
401: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

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

394: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
395: pay_mag_tape.internal_prm_values(3) := total_payment;
396: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
397: pay_mag_tape.internal_prm_values(4) := org_payment_count;
398: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
399: pay_mag_tape.internal_prm_values(5) := 'N';
400: pay_mag_tape.internal_cxt_values(1) := 3;
401: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
402: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;

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

395: pay_mag_tape.internal_prm_values(3) := total_payment;
396: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
397: pay_mag_tape.internal_prm_values(4) := org_payment_count;
398: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
399: pay_mag_tape.internal_prm_values(5) := 'N';
400: pay_mag_tape.internal_cxt_values(1) := 3;
401: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
402: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
403: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

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

396: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
397: pay_mag_tape.internal_prm_values(4) := org_payment_count;
398: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
399: pay_mag_tape.internal_prm_values(5) := 'N';
400: pay_mag_tape.internal_cxt_values(1) := 3;
401: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
402: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
403: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
404: pay_mag_tape.internal_cxt_values(3) := get_session_date;

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

397: pay_mag_tape.internal_prm_values(4) := org_payment_count;
398: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
399: pay_mag_tape.internal_prm_values(5) := 'N';
400: pay_mag_tape.internal_cxt_values(1) := 3;
401: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
402: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
403: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
404: pay_mag_tape.internal_cxt_values(3) := get_session_date;
405: total_contra_count := total_contra_count + 1;

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

398: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
399: pay_mag_tape.internal_prm_values(5) := 'N';
400: pay_mag_tape.internal_cxt_values(1) := 3;
401: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
402: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
403: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
404: pay_mag_tape.internal_cxt_values(3) := get_session_date;
405: total_contra_count := total_contra_count + 1;
406: count_for_block :=count_for_block + 1;

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

399: pay_mag_tape.internal_prm_values(5) := 'N';
400: pay_mag_tape.internal_cxt_values(1) := 3;
401: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
402: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
403: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
404: pay_mag_tape.internal_cxt_values(3) := get_session_date;
405: total_contra_count := total_contra_count + 1;
406: count_for_block :=count_for_block + 1;
407: p_previous_payment_id := p_org_payment_method_id;

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

400: pay_mag_tape.internal_cxt_values(1) := 3;
401: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
402: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
403: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
404: pay_mag_tape.internal_cxt_values(3) := get_session_date;
405: total_contra_count := total_contra_count + 1;
406: count_for_block :=count_for_block + 1;
407: p_previous_payment_id := p_org_payment_method_id;
408: org_payment_count := 0;

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

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

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

415: -- last call before doing the padding and the footer
416: ELSE
417: IF final_contra = FALSE THEN
418: pay_mag_tape.internal_prm_values(1) := 5;
419: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
420: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
421: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
422: pay_mag_tape.internal_prm_values(3) := total_payment;
423: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';

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

416: ELSE
417: IF final_contra = FALSE THEN
418: pay_mag_tape.internal_prm_values(1) := 5;
419: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
420: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
421: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
422: pay_mag_tape.internal_prm_values(3) := total_payment;
423: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
424: pay_mag_tape.internal_prm_values(4) := org_payment_count;

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

417: IF final_contra = FALSE THEN
418: pay_mag_tape.internal_prm_values(1) := 5;
419: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
420: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
421: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
422: pay_mag_tape.internal_prm_values(3) := total_payment;
423: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
424: pay_mag_tape.internal_prm_values(4) := org_payment_count;
425: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';

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

418: pay_mag_tape.internal_prm_values(1) := 5;
419: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
420: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
421: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
422: pay_mag_tape.internal_prm_values(3) := total_payment;
423: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
424: pay_mag_tape.internal_prm_values(4) := org_payment_count;
425: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
426: pay_mag_tape.internal_prm_values(5) := 'Y';

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

419: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
420: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
421: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
422: pay_mag_tape.internal_prm_values(3) := total_payment;
423: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
424: pay_mag_tape.internal_prm_values(4) := org_payment_count;
425: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
426: pay_mag_tape.internal_prm_values(5) := 'Y';
427: pay_mag_tape.internal_cxt_values(1) := 3;

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

420: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
421: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
422: pay_mag_tape.internal_prm_values(3) := total_payment;
423: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
424: pay_mag_tape.internal_prm_values(4) := org_payment_count;
425: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
426: pay_mag_tape.internal_prm_values(5) := 'Y';
427: pay_mag_tape.internal_cxt_values(1) := 3;
428: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

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

421: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
422: pay_mag_tape.internal_prm_values(3) := total_payment;
423: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
424: pay_mag_tape.internal_prm_values(4) := org_payment_count;
425: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
426: pay_mag_tape.internal_prm_values(5) := 'Y';
427: pay_mag_tape.internal_cxt_values(1) := 3;
428: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
429: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;

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

422: pay_mag_tape.internal_prm_values(3) := total_payment;
423: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
424: pay_mag_tape.internal_prm_values(4) := org_payment_count;
425: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
426: pay_mag_tape.internal_prm_values(5) := 'Y';
427: pay_mag_tape.internal_cxt_values(1) := 3;
428: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
429: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
430: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

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

423: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
424: pay_mag_tape.internal_prm_values(4) := org_payment_count;
425: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
426: pay_mag_tape.internal_prm_values(5) := 'Y';
427: pay_mag_tape.internal_cxt_values(1) := 3;
428: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
429: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
430: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
431: pay_mag_tape.internal_cxt_values(3) := get_session_date;

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

424: pay_mag_tape.internal_prm_values(4) := org_payment_count;
425: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
426: pay_mag_tape.internal_prm_values(5) := 'Y';
427: pay_mag_tape.internal_cxt_values(1) := 3;
428: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
429: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
430: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
431: pay_mag_tape.internal_cxt_values(3) := get_session_date;
432: total_contra_count := total_contra_count + 1;

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

425: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
426: pay_mag_tape.internal_prm_values(5) := 'Y';
427: pay_mag_tape.internal_cxt_values(1) := 3;
428: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
429: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
430: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
431: pay_mag_tape.internal_cxt_values(3) := get_session_date;
432: total_contra_count := total_contra_count + 1;
433: count_for_block :=count_for_block + 1;

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

426: pay_mag_tape.internal_prm_values(5) := 'Y';
427: pay_mag_tape.internal_cxt_values(1) := 3;
428: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
429: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
430: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
431: pay_mag_tape.internal_cxt_values(3) := get_session_date;
432: total_contra_count := total_contra_count + 1;
433: count_for_block :=count_for_block + 1;
434: final_contra :=TRUE;

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

427: pay_mag_tape.internal_cxt_values(1) := 3;
428: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
429: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
430: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
431: pay_mag_tape.internal_cxt_values(3) := get_session_date;
432: total_contra_count := total_contra_count + 1;
433: count_for_block :=count_for_block + 1;
434: final_contra :=TRUE;
435: ELSE

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

435: ELSE
436: hr_utility.set_location('bacsmgtp.new_formula',8);
437: IF count_for_block < 20 then
438: hr_utility.set_location('bacsmgtp.new_formula',9);
439: pay_mag_tape.internal_prm_values(1) :=2;
440: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
441: pay_mag_tape.internal_prm_values(2) :=
442: get_formula_id('BACS_PADDING');
443: count_for_block:= count_for_block + 1;

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

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

Line 441: pay_mag_tape.internal_prm_values(2) :=

437: IF count_for_block < 20 then
438: hr_utility.set_location('bacsmgtp.new_formula',9);
439: pay_mag_tape.internal_prm_values(1) :=2;
440: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
441: pay_mag_tape.internal_prm_values(2) :=
442: get_formula_id('BACS_PADDING');
443: count_for_block:= count_for_block + 1;
444: ELSE
445: -- Padding finished - Now write footer,

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

444: ELSE
445: -- Padding finished - Now write footer,
446: --
447: hr_utility.set_location('bacsmgtp.new_formula',10);
448: pay_mag_tape.internal_cxt_values(1) := 3;
449: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
450: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
451: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
452: pay_mag_tape.internal_cxt_values(3) := get_session_date;

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

445: -- Padding finished - Now write footer,
446: --
447: hr_utility.set_location('bacsmgtp.new_formula',10);
448: pay_mag_tape.internal_cxt_values(1) := 3;
449: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
450: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
451: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
452: pay_mag_tape.internal_cxt_values(3) := get_session_date;
453: pay_mag_tape.internal_prm_values(1) := 6;

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

446: --
447: hr_utility.set_location('bacsmgtp.new_formula',10);
448: pay_mag_tape.internal_cxt_values(1) := 3;
449: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
450: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
451: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
452: pay_mag_tape.internal_cxt_values(3) := get_session_date;
453: pay_mag_tape.internal_prm_values(1) := 6;
454: pay_mag_tape.internal_prm_values(2) :=

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

447: hr_utility.set_location('bacsmgtp.new_formula',10);
448: pay_mag_tape.internal_cxt_values(1) := 3;
449: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
450: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
451: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
452: pay_mag_tape.internal_cxt_values(3) := get_session_date;
453: pay_mag_tape.internal_prm_values(1) := 6;
454: pay_mag_tape.internal_prm_values(2) :=
455: get_formula_id('BACS_FOOTER');

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

448: pay_mag_tape.internal_cxt_values(1) := 3;
449: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
450: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
451: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
452: pay_mag_tape.internal_cxt_values(3) := get_session_date;
453: pay_mag_tape.internal_prm_values(1) := 6;
454: pay_mag_tape.internal_prm_values(2) :=
455: get_formula_id('BACS_FOOTER');
456: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';

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

449: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
450: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
451: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
452: pay_mag_tape.internal_cxt_values(3) := get_session_date;
453: pay_mag_tape.internal_prm_values(1) := 6;
454: pay_mag_tape.internal_prm_values(2) :=
455: get_formula_id('BACS_FOOTER');
456: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
457: pay_mag_tape.internal_prm_names(3) :=

Line 454: pay_mag_tape.internal_prm_values(2) :=

450: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
451: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
452: pay_mag_tape.internal_cxt_values(3) := get_session_date;
453: pay_mag_tape.internal_prm_values(1) := 6;
454: pay_mag_tape.internal_prm_values(2) :=
455: get_formula_id('BACS_FOOTER');
456: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
457: pay_mag_tape.internal_prm_names(3) :=
458: 'TRANSFER_EXPIRATION_DATE';

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

452: pay_mag_tape.internal_cxt_values(3) := get_session_date;
453: pay_mag_tape.internal_prm_values(1) := 6;
454: pay_mag_tape.internal_prm_values(2) :=
455: get_formula_id('BACS_FOOTER');
456: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
457: pay_mag_tape.internal_prm_names(3) :=
458: 'TRANSFER_EXPIRATION_DATE';
459: pay_mag_tape.internal_prm_values(3) := expiration_date;
460: pay_mag_tape.internal_prm_names(4) :=

Line 457: pay_mag_tape.internal_prm_names(3) :=

453: pay_mag_tape.internal_prm_values(1) := 6;
454: pay_mag_tape.internal_prm_values(2) :=
455: get_formula_id('BACS_FOOTER');
456: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
457: pay_mag_tape.internal_prm_names(3) :=
458: 'TRANSFER_EXPIRATION_DATE';
459: pay_mag_tape.internal_prm_values(3) := expiration_date;
460: pay_mag_tape.internal_prm_names(4) :=
461: 'TRANSFER_SUBMISSION_NUMBER';

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

455: get_formula_id('BACS_FOOTER');
456: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
457: pay_mag_tape.internal_prm_names(3) :=
458: 'TRANSFER_EXPIRATION_DATE';
459: pay_mag_tape.internal_prm_values(3) := expiration_date;
460: pay_mag_tape.internal_prm_names(4) :=
461: 'TRANSFER_SUBMISSION_NUMBER';
462: pay_mag_tape.internal_prm_values(4) := submission_number;
463: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';

Line 460: pay_mag_tape.internal_prm_names(4) :=

456: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
457: pay_mag_tape.internal_prm_names(3) :=
458: 'TRANSFER_EXPIRATION_DATE';
459: pay_mag_tape.internal_prm_values(3) := expiration_date;
460: pay_mag_tape.internal_prm_names(4) :=
461: 'TRANSFER_SUBMISSION_NUMBER';
462: pay_mag_tape.internal_prm_values(4) := submission_number;
463: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
464: pay_mag_tape.internal_prm_values(5) := total_body_count;

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

458: 'TRANSFER_EXPIRATION_DATE';
459: pay_mag_tape.internal_prm_values(3) := expiration_date;
460: pay_mag_tape.internal_prm_names(4) :=
461: 'TRANSFER_SUBMISSION_NUMBER';
462: pay_mag_tape.internal_prm_values(4) := submission_number;
463: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
464: pay_mag_tape.internal_prm_values(5) := total_body_count;
465: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
466: pay_mag_tape.internal_prm_values(6) := block_count;

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

459: pay_mag_tape.internal_prm_values(3) := expiration_date;
460: pay_mag_tape.internal_prm_names(4) :=
461: 'TRANSFER_SUBMISSION_NUMBER';
462: pay_mag_tape.internal_prm_values(4) := submission_number;
463: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
464: pay_mag_tape.internal_prm_values(5) := total_body_count;
465: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
466: pay_mag_tape.internal_prm_values(6) := block_count;
467: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';

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

460: pay_mag_tape.internal_prm_names(4) :=
461: 'TRANSFER_SUBMISSION_NUMBER';
462: pay_mag_tape.internal_prm_values(4) := submission_number;
463: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
464: pay_mag_tape.internal_prm_values(5) := total_body_count;
465: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
466: pay_mag_tape.internal_prm_values(6) := block_count;
467: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
468: pay_mag_tape.internal_prm_values(7) := get_todays_date;

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

461: 'TRANSFER_SUBMISSION_NUMBER';
462: pay_mag_tape.internal_prm_values(4) := submission_number;
463: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
464: pay_mag_tape.internal_prm_values(5) := total_body_count;
465: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
466: pay_mag_tape.internal_prm_values(6) := block_count;
467: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
468: pay_mag_tape.internal_prm_values(7) := get_todays_date;
469: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';

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

462: pay_mag_tape.internal_prm_values(4) := submission_number;
463: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
464: pay_mag_tape.internal_prm_values(5) := total_body_count;
465: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
466: pay_mag_tape.internal_prm_values(6) := block_count;
467: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
468: pay_mag_tape.internal_prm_values(7) := get_todays_date;
469: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
470: pay_mag_tape.internal_prm_values(8) := total_payment_footer;

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

463: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
464: pay_mag_tape.internal_prm_values(5) := total_body_count;
465: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
466: pay_mag_tape.internal_prm_values(6) := block_count;
467: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
468: pay_mag_tape.internal_prm_values(7) := get_todays_date;
469: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
470: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
471: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';

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

464: pay_mag_tape.internal_prm_values(5) := total_body_count;
465: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
466: pay_mag_tape.internal_prm_values(6) := block_count;
467: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
468: pay_mag_tape.internal_prm_values(7) := get_todays_date;
469: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
470: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
471: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
472: pay_mag_tape.internal_prm_values(9) := total_contra_count;

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

465: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
466: pay_mag_tape.internal_prm_values(6) := block_count;
467: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
468: pay_mag_tape.internal_prm_values(7) := get_todays_date;
469: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
470: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
471: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
472: pay_mag_tape.internal_prm_values(9) := total_contra_count;
473: --

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

466: pay_mag_tape.internal_prm_values(6) := block_count;
467: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
468: pay_mag_tape.internal_prm_values(7) := get_todays_date;
469: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
470: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
471: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
472: pay_mag_tape.internal_prm_values(9) := total_contra_count;
473: --
474: CLOSE bacs_assignments;

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

467: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
468: pay_mag_tape.internal_prm_values(7) := get_todays_date;
469: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
470: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
471: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
472: pay_mag_tape.internal_prm_values(9) := total_contra_count;
473: --
474: CLOSE bacs_assignments;
475: END IF;

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

468: pay_mag_tape.internal_prm_values(7) := get_todays_date;
469: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
470: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
471: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
472: pay_mag_tape.internal_prm_values(9) := total_contra_count;
473: --
474: CLOSE bacs_assignments;
475: END IF;
476: --