DBA Data[Home] [Help]

APPS.PAY_JP_ZENGIN_TAPE dependencies on PAY_MAG_TAPE

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

245: --end if;
246: -- end temporary trace AS
247: --
248: -- Reserved positions
249: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
250: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
251: --
252: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
253: -- Initial value

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

246: -- end temporary trace AS
247: --
248: -- Reserved positions
249: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
250: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
251: --
252: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
253: -- Initial value
254: pay_mag_tape.internal_cxt_values(1) := 1;

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

248: -- Reserved positions
249: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
250: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
251: --
252: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
253: -- Initial value
254: pay_mag_tape.internal_cxt_values(1) := 1;
255: --
256: --

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

250: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
251: --
252: pay_mag_tape.internal_cxt_names(1) := 'Number_of_contexts';
253: -- Initial value
254: pay_mag_tape.internal_cxt_values(1) := 1;
255: --
256: --
257: IF NOT bacs_assignments %ISOPEN THEN -- New file
258: hr_utility.set_location('bacsmgtp.new_formula',1);

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

262: count_for_block := 0;
263: org_payment_count := 0;
264: block_count := 1;
265: fetch_required := TRUE;
266: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
267: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
268: pay_mag_tape.internal_cxt_values(1) := 3;
269: pay_mag_tape.internal_cxt_values(3) := get_session_date;
270: --

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

263: org_payment_count := 0;
264: block_count := 1;
265: fetch_required := TRUE;
266: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
267: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
268: pay_mag_tape.internal_cxt_values(1) := 3;
269: pay_mag_tape.internal_cxt_values(3) := get_session_date;
270: --
271: pay_mag_tape.internal_prm_values(1) := 7;

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

264: block_count := 1;
265: fetch_required := TRUE;
266: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
267: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
268: pay_mag_tape.internal_cxt_values(1) := 3;
269: pay_mag_tape.internal_cxt_values(3) := get_session_date;
270: --
271: pay_mag_tape.internal_prm_values(1) := 7;
272: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');

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

265: fetch_required := TRUE;
266: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
267: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
268: pay_mag_tape.internal_cxt_values(1) := 3;
269: pay_mag_tape.internal_cxt_values(3) := get_session_date;
270: --
271: pay_mag_tape.internal_prm_values(1) := 7;
272: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
273: --

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

267: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
268: pay_mag_tape.internal_cxt_values(1) := 3;
269: pay_mag_tape.internal_cxt_values(3) := get_session_date;
270: --
271: pay_mag_tape.internal_prm_values(1) := 7;
272: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
273: --
274: -- AS it looks like we have 3 parms so try this
275: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'

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

268: pay_mag_tape.internal_cxt_values(1) := 3;
269: pay_mag_tape.internal_cxt_values(3) := get_session_date;
270: --
271: pay_mag_tape.internal_prm_values(1) := 7;
272: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
273: --
274: -- AS it looks like we have 3 parms so try this
275: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'
276: then p_payroll_action_id := to_number(

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

271: pay_mag_tape.internal_prm_values(1) := 7;
272: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_HEADER');
273: --
274: -- AS it looks like we have 3 parms so try this
275: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'
276: then p_payroll_action_id := to_number(
277: pay_mag_tape.internal_prm_values(3));
278: end if;
279: hr_utility.set_location('bacsmgtp.payroll_action_id',p_payroll_action_id);

Line 277: pay_mag_tape.internal_prm_values(3));

273: --
274: -- AS it looks like we have 3 parms so try this
275: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'
276: then p_payroll_action_id := to_number(
277: pay_mag_tape.internal_prm_values(3));
278: end if;
279: hr_utility.set_location('bacsmgtp.payroll_action_id',p_payroll_action_id);
280: --
281: expiration_date := get_expiration_date(p_payroll_action_id);

Line 284: pay_mag_tape.internal_cxt_values(2) :=

280: --
281: expiration_date := get_expiration_date(p_payroll_action_id);
282: submission_number := get_submission_number(p_payroll_action_id);
283: process_date := get_process_date(p_payroll_action_id);
284: pay_mag_tape.internal_cxt_values(2) :=
285: get_org_context(p_payroll_action_id);
286: p_previous_payment_id := get_org_context(p_payroll_action_id);
287: --
288: --

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

288: --
289: total_payment := 0;
290: total_payment_footer :=0;
291: final_contra := FALSE;
292: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
293: pay_mag_tape.internal_prm_values(3) := expiration_date;
294: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
295: pay_mag_tape.internal_prm_values(4) := submission_number;
296: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';

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

289: total_payment := 0;
290: total_payment_footer :=0;
291: final_contra := FALSE;
292: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
293: pay_mag_tape.internal_prm_values(3) := expiration_date;
294: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
295: pay_mag_tape.internal_prm_values(4) := submission_number;
296: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
297: pay_mag_tape.internal_prm_values(5) := process_date;

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

290: total_payment_footer :=0;
291: final_contra := FALSE;
292: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
293: pay_mag_tape.internal_prm_values(3) := expiration_date;
294: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
295: pay_mag_tape.internal_prm_values(4) := submission_number;
296: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
297: pay_mag_tape.internal_prm_values(5) := process_date;
298: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';

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

291: final_contra := FALSE;
292: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
293: pay_mag_tape.internal_prm_values(3) := expiration_date;
294: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
295: pay_mag_tape.internal_prm_values(4) := submission_number;
296: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
297: pay_mag_tape.internal_prm_values(5) := process_date;
298: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
299: pay_mag_tape.internal_prm_values(6) := '0001';

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

292: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_EXPIRATION_DATE';
293: pay_mag_tape.internal_prm_values(3) := expiration_date;
294: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
295: pay_mag_tape.internal_prm_values(4) := submission_number;
296: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
297: pay_mag_tape.internal_prm_values(5) := process_date;
298: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
299: pay_mag_tape.internal_prm_values(6) := '0001';
300: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';

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

293: pay_mag_tape.internal_prm_values(3) := expiration_date;
294: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
295: pay_mag_tape.internal_prm_values(4) := submission_number;
296: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
297: pay_mag_tape.internal_prm_values(5) := process_date;
298: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
299: pay_mag_tape.internal_prm_values(6) := '0001';
300: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
301: pay_mag_tape.internal_prm_values(7) := get_todays_date;

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

294: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_SUBMISSION_NUMBER';
295: pay_mag_tape.internal_prm_values(4) := submission_number;
296: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
297: pay_mag_tape.internal_prm_values(5) := process_date;
298: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
299: pay_mag_tape.internal_prm_values(6) := '0001';
300: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
301: pay_mag_tape.internal_prm_values(7) := get_todays_date;
302: --

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

295: pay_mag_tape.internal_prm_values(4) := submission_number;
296: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
297: pay_mag_tape.internal_prm_values(5) := process_date;
298: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
299: pay_mag_tape.internal_prm_values(6) := '0001';
300: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
301: pay_mag_tape.internal_prm_values(7) := get_todays_date;
302: --
303: OPEN bacs_assignments ( p_payroll_action_id);

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

296: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BACS_PROCESS_DATE';
297: pay_mag_tape.internal_prm_values(5) := process_date;
298: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
299: pay_mag_tape.internal_prm_values(6) := '0001';
300: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
301: pay_mag_tape.internal_prm_values(7) := get_todays_date;
302: --
303: OPEN bacs_assignments ( p_payroll_action_id);
304: --

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

297: pay_mag_tape.internal_prm_values(5) := process_date;
298: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_SELECT_COUNT';
299: pay_mag_tape.internal_prm_values(6) := '0001';
300: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
301: pay_mag_tape.internal_prm_values(7) := get_todays_date;
302: --
303: OPEN bacs_assignments ( p_payroll_action_id);
304: --
305: ELSE

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

317: IF bacs_assignments %FOUND THEN
318: IF p_org_payment_method_id = p_previous_payment_id
319: THEN
320: hr_utility.set_location('bacsmgtp.new_formula',3);
321: pay_mag_tape.internal_prm_values(1) := 4;
322: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
323: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
324: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
325: pay_mag_tape.internal_prm_values(3) := p_value * 100;

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

318: IF p_org_payment_method_id = p_previous_payment_id
319: THEN
320: hr_utility.set_location('bacsmgtp.new_formula',3);
321: pay_mag_tape.internal_prm_values(1) := 4;
322: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
323: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
324: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
325: pay_mag_tape.internal_prm_values(3) := p_value * 100;
326: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';

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

319: THEN
320: hr_utility.set_location('bacsmgtp.new_formula',3);
321: pay_mag_tape.internal_prm_values(1) := 4;
322: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
323: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
324: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
325: pay_mag_tape.internal_prm_values(3) := p_value * 100;
326: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
327: pay_mag_tape.internal_prm_values(4) := p_assignment_number;

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

320: hr_utility.set_location('bacsmgtp.new_formula',3);
321: pay_mag_tape.internal_prm_values(1) := 4;
322: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
323: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
324: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
325: pay_mag_tape.internal_prm_values(3) := p_value * 100;
326: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
327: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
328: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

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

321: pay_mag_tape.internal_prm_values(1) := 4;
322: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
323: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
324: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
325: pay_mag_tape.internal_prm_values(3) := p_value * 100;
326: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
327: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
328: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
329: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

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

322: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
323: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
324: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
325: pay_mag_tape.internal_prm_values(3) := p_value * 100;
326: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
327: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
328: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
329: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
330: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;

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

323: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
324: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
325: pay_mag_tape.internal_prm_values(3) := p_value * 100;
326: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
327: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
328: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
329: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
330: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
331: pay_mag_tape.internal_cxt_values(3):= get_session_date;

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

324: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;
325: pay_mag_tape.internal_prm_values(3) := p_value * 100;
326: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
327: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
328: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
329: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
330: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
331: pay_mag_tape.internal_cxt_values(3):= get_session_date;
332: pay_mag_tape.internal_cxt_values(1):= 4;

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

325: pay_mag_tape.internal_prm_values(3) := p_value * 100;
326: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
327: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
328: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
329: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
330: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
331: pay_mag_tape.internal_cxt_values(3):= get_session_date;
332: pay_mag_tape.internal_cxt_values(1):= 4;
333: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';

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

326: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ASSIGN_NO';
327: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
328: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
329: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
330: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
331: pay_mag_tape.internal_cxt_values(3):= get_session_date;
332: pay_mag_tape.internal_cxt_values(1):= 4;
333: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
334: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;

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

327: pay_mag_tape.internal_prm_values(4) := p_assignment_number;
328: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
329: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
330: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
331: pay_mag_tape.internal_cxt_values(3):= get_session_date;
332: pay_mag_tape.internal_cxt_values(1):= 4;
333: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
334: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
335: org_payment_count := org_payment_count + 1;

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

328: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
329: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
330: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
331: pay_mag_tape.internal_cxt_values(3):= get_session_date;
332: pay_mag_tape.internal_cxt_values(1):= 4;
333: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
334: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
335: org_payment_count := org_payment_count + 1;
336: total_body_count := total_body_count + 1;

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

329: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
330: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
331: pay_mag_tape.internal_cxt_values(3):= get_session_date;
332: pay_mag_tape.internal_cxt_values(1):= 4;
333: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
334: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
335: org_payment_count := org_payment_count + 1;
336: total_body_count := total_body_count + 1;
337: total_payment := (p_value * 100) + total_payment;

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

330: pay_mag_tape.internal_cxt_values(2):= p_org_payment_method_id;
331: pay_mag_tape.internal_cxt_values(3):= get_session_date;
332: pay_mag_tape.internal_cxt_values(1):= 4;
333: pay_mag_tape.internal_cxt_names(4) := 'PER_PAY_METHOD_ID';
334: pay_mag_tape.internal_cxt_values(4):= p_personal_payment_method_id;
335: org_payment_count := org_payment_count + 1;
336: total_body_count := total_body_count + 1;
337: total_payment := (p_value * 100) + total_payment;
338: total_payment_footer := (p_value * 100) + total_payment_footer;

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

350: END IF;
351: --
352: ELSE
353: hr_utility.set_location('bacsmgtp.new_formula',6);
354: pay_mag_tape.internal_prm_values(1) := 5;
355: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
356: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
357: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
358: pay_mag_tape.internal_prm_values(3) := total_payment;

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

351: --
352: ELSE
353: hr_utility.set_location('bacsmgtp.new_formula',6);
354: pay_mag_tape.internal_prm_values(1) := 5;
355: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
356: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
357: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
358: pay_mag_tape.internal_prm_values(3) := total_payment;
359: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';

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

352: ELSE
353: hr_utility.set_location('bacsmgtp.new_formula',6);
354: pay_mag_tape.internal_prm_values(1) := 5;
355: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
356: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
357: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
358: pay_mag_tape.internal_prm_values(3) := total_payment;
359: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
360: pay_mag_tape.internal_prm_values(4) := org_payment_count;

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

353: hr_utility.set_location('bacsmgtp.new_formula',6);
354: pay_mag_tape.internal_prm_values(1) := 5;
355: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
356: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
357: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
358: pay_mag_tape.internal_prm_values(3) := total_payment;
359: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
360: pay_mag_tape.internal_prm_values(4) := org_payment_count;
361: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';

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

354: pay_mag_tape.internal_prm_values(1) := 5;
355: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
356: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
357: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
358: pay_mag_tape.internal_prm_values(3) := total_payment;
359: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
360: pay_mag_tape.internal_prm_values(4) := org_payment_count;
361: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
362: pay_mag_tape.internal_prm_values(5) := 'N';

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

355: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
356: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
357: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
358: pay_mag_tape.internal_prm_values(3) := total_payment;
359: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
360: pay_mag_tape.internal_prm_values(4) := org_payment_count;
361: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
362: pay_mag_tape.internal_prm_values(5) := 'N';
363: pay_mag_tape.internal_cxt_values(1) := 3;

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

356: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
357: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
358: pay_mag_tape.internal_prm_values(3) := total_payment;
359: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
360: pay_mag_tape.internal_prm_values(4) := org_payment_count;
361: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
362: pay_mag_tape.internal_prm_values(5) := 'N';
363: pay_mag_tape.internal_cxt_values(1) := 3;
364: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

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

357: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
358: pay_mag_tape.internal_prm_values(3) := total_payment;
359: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
360: pay_mag_tape.internal_prm_values(4) := org_payment_count;
361: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
362: pay_mag_tape.internal_prm_values(5) := 'N';
363: pay_mag_tape.internal_cxt_values(1) := 3;
364: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
365: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;

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

358: pay_mag_tape.internal_prm_values(3) := total_payment;
359: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
360: pay_mag_tape.internal_prm_values(4) := org_payment_count;
361: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
362: pay_mag_tape.internal_prm_values(5) := 'N';
363: pay_mag_tape.internal_cxt_values(1) := 3;
364: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
365: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

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

359: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
360: pay_mag_tape.internal_prm_values(4) := org_payment_count;
361: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
362: pay_mag_tape.internal_prm_values(5) := 'N';
363: pay_mag_tape.internal_cxt_values(1) := 3;
364: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
365: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(3) := get_session_date;

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

360: pay_mag_tape.internal_prm_values(4) := org_payment_count;
361: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
362: pay_mag_tape.internal_prm_values(5) := 'N';
363: pay_mag_tape.internal_cxt_values(1) := 3;
364: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
365: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(3) := get_session_date;
368: total_contra_count := total_contra_count + 1;

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

361: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
362: pay_mag_tape.internal_prm_values(5) := 'N';
363: pay_mag_tape.internal_cxt_values(1) := 3;
364: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
365: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(3) := get_session_date;
368: total_contra_count := total_contra_count + 1;
369: count_for_block :=count_for_block + 1;

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

362: pay_mag_tape.internal_prm_values(5) := 'N';
363: pay_mag_tape.internal_cxt_values(1) := 3;
364: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
365: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(3) := get_session_date;
368: total_contra_count := total_contra_count + 1;
369: count_for_block :=count_for_block + 1;
370: p_previous_payment_id := p_org_payment_method_id;

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

363: pay_mag_tape.internal_cxt_values(1) := 3;
364: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
365: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
366: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
367: pay_mag_tape.internal_cxt_values(3) := get_session_date;
368: total_contra_count := total_contra_count + 1;
369: count_for_block :=count_for_block + 1;
370: p_previous_payment_id := p_org_payment_method_id;
371: org_payment_count := 0;

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

377: -- I need to call the CONTRA record again if it is the
378: -- last call before doing the padding and the footer
379: ELSE
380: IF final_contra = FALSE THEN
381: pay_mag_tape.internal_prm_values(1) := 5;
382: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
383: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
384: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
385: pay_mag_tape.internal_prm_values(3) := total_payment;

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

378: -- last call before doing the padding and the footer
379: ELSE
380: IF final_contra = FALSE THEN
381: pay_mag_tape.internal_prm_values(1) := 5;
382: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
383: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
384: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
385: pay_mag_tape.internal_prm_values(3) := total_payment;
386: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';

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

379: ELSE
380: IF final_contra = FALSE THEN
381: pay_mag_tape.internal_prm_values(1) := 5;
382: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
383: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
384: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
385: pay_mag_tape.internal_prm_values(3) := total_payment;
386: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
387: pay_mag_tape.internal_prm_values(4) := org_payment_count;

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

380: IF final_contra = FALSE THEN
381: pay_mag_tape.internal_prm_values(1) := 5;
382: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
383: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
384: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
385: pay_mag_tape.internal_prm_values(3) := total_payment;
386: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
387: pay_mag_tape.internal_prm_values(4) := org_payment_count;
388: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';

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

381: pay_mag_tape.internal_prm_values(1) := 5;
382: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
383: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
384: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
385: pay_mag_tape.internal_prm_values(3) := total_payment;
386: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
387: pay_mag_tape.internal_prm_values(4) := org_payment_count;
388: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
389: pay_mag_tape.internal_prm_values(5) := 'Y';

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

382: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
383: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
384: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
385: pay_mag_tape.internal_prm_values(3) := total_payment;
386: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
387: pay_mag_tape.internal_prm_values(4) := org_payment_count;
388: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
389: pay_mag_tape.internal_prm_values(5) := 'Y';
390: pay_mag_tape.internal_cxt_values(1) := 3;

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

383: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
384: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
385: pay_mag_tape.internal_prm_values(3) := total_payment;
386: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
387: pay_mag_tape.internal_prm_values(4) := org_payment_count;
388: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
389: pay_mag_tape.internal_prm_values(5) := 'Y';
390: pay_mag_tape.internal_cxt_values(1) := 3;
391: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

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

384: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';
385: pay_mag_tape.internal_prm_values(3) := total_payment;
386: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
387: pay_mag_tape.internal_prm_values(4) := org_payment_count;
388: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
389: pay_mag_tape.internal_prm_values(5) := 'Y';
390: pay_mag_tape.internal_cxt_values(1) := 3;
391: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
392: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;

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

385: pay_mag_tape.internal_prm_values(3) := total_payment;
386: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
387: pay_mag_tape.internal_prm_values(4) := org_payment_count;
388: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
389: pay_mag_tape.internal_prm_values(5) := 'Y';
390: pay_mag_tape.internal_cxt_values(1) := 3;
391: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
392: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
393: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';

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

386: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_PAYMENT_COUNT';
387: pay_mag_tape.internal_prm_values(4) := org_payment_count;
388: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
389: pay_mag_tape.internal_prm_values(5) := 'Y';
390: pay_mag_tape.internal_cxt_values(1) := 3;
391: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
392: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
393: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
394: pay_mag_tape.internal_cxt_values(3) := get_session_date;

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

387: pay_mag_tape.internal_prm_values(4) := org_payment_count;
388: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
389: pay_mag_tape.internal_prm_values(5) := 'Y';
390: pay_mag_tape.internal_cxt_values(1) := 3;
391: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
392: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
393: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
394: pay_mag_tape.internal_cxt_values(3) := get_session_date;
395: total_contra_count := total_contra_count + 1;

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

388: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_LAST_CONTRA';
389: pay_mag_tape.internal_prm_values(5) := 'Y';
390: pay_mag_tape.internal_cxt_values(1) := 3;
391: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
392: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
393: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
394: pay_mag_tape.internal_cxt_values(3) := get_session_date;
395: total_contra_count := total_contra_count + 1;
396: count_for_block :=count_for_block + 1;

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

389: pay_mag_tape.internal_prm_values(5) := 'Y';
390: pay_mag_tape.internal_cxt_values(1) := 3;
391: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
392: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
393: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
394: pay_mag_tape.internal_cxt_values(3) := get_session_date;
395: total_contra_count := total_contra_count + 1;
396: count_for_block :=count_for_block + 1;
397: final_contra :=TRUE;

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

390: pay_mag_tape.internal_cxt_values(1) := 3;
391: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
392: pay_mag_tape.internal_cxt_values(2) := p_previous_payment_id;
393: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
394: pay_mag_tape.internal_cxt_values(3) := get_session_date;
395: total_contra_count := total_contra_count + 1;
396: count_for_block :=count_for_block + 1;
397: final_contra :=TRUE;
398: ELSE

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

398: ELSE
399: hr_utility.set_location('bacsmgtp.new_formula',8);
400: IF count_for_block < 20 then
401: hr_utility.set_location('bacsmgtp.new_formula',9);
402: pay_mag_tape.internal_prm_values(1) :=2;
403: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
404: pay_mag_tape.internal_prm_values(2) :=
405: get_formula_id('BACS_PADDING');
406: count_for_block:= count_for_block + 1;

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

399: hr_utility.set_location('bacsmgtp.new_formula',8);
400: IF count_for_block < 20 then
401: hr_utility.set_location('bacsmgtp.new_formula',9);
402: pay_mag_tape.internal_prm_values(1) :=2;
403: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
404: pay_mag_tape.internal_prm_values(2) :=
405: get_formula_id('BACS_PADDING');
406: count_for_block:= count_for_block + 1;
407: ELSE

Line 404: pay_mag_tape.internal_prm_values(2) :=

400: IF count_for_block < 20 then
401: hr_utility.set_location('bacsmgtp.new_formula',9);
402: pay_mag_tape.internal_prm_values(1) :=2;
403: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
404: pay_mag_tape.internal_prm_values(2) :=
405: get_formula_id('BACS_PADDING');
406: count_for_block:= count_for_block + 1;
407: ELSE
408: -- Padding finished - Now write footer,

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

407: ELSE
408: -- Padding finished - Now write footer,
409: --
410: hr_utility.set_location('bacsmgtp.new_formula',10);
411: pay_mag_tape.internal_cxt_values(1) := 3;
412: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
413: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
414: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
415: pay_mag_tape.internal_cxt_values(3) := get_session_date;

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

408: -- Padding finished - Now write footer,
409: --
410: hr_utility.set_location('bacsmgtp.new_formula',10);
411: pay_mag_tape.internal_cxt_values(1) := 3;
412: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
413: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
414: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
415: pay_mag_tape.internal_cxt_values(3) := get_session_date;
416: pay_mag_tape.internal_prm_values(1) := 6;

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

409: --
410: hr_utility.set_location('bacsmgtp.new_formula',10);
411: pay_mag_tape.internal_cxt_values(1) := 3;
412: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
413: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
414: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
415: pay_mag_tape.internal_cxt_values(3) := get_session_date;
416: pay_mag_tape.internal_prm_values(1) := 6;
417: pay_mag_tape.internal_prm_values(2) :=

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

410: hr_utility.set_location('bacsmgtp.new_formula',10);
411: pay_mag_tape.internal_cxt_values(1) := 3;
412: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
413: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
414: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
415: pay_mag_tape.internal_cxt_values(3) := get_session_date;
416: pay_mag_tape.internal_prm_values(1) := 6;
417: pay_mag_tape.internal_prm_values(2) :=
418: get_formula_id('BACS_FOOTER');

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

411: pay_mag_tape.internal_cxt_values(1) := 3;
412: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
413: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
414: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
415: pay_mag_tape.internal_cxt_values(3) := get_session_date;
416: pay_mag_tape.internal_prm_values(1) := 6;
417: pay_mag_tape.internal_prm_values(2) :=
418: get_formula_id('BACS_FOOTER');
419: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';

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

412: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
413: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
414: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
415: pay_mag_tape.internal_cxt_values(3) := get_session_date;
416: pay_mag_tape.internal_prm_values(1) := 6;
417: pay_mag_tape.internal_prm_values(2) :=
418: get_formula_id('BACS_FOOTER');
419: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
420: pay_mag_tape.internal_prm_names(3) :=

Line 417: pay_mag_tape.internal_prm_values(2) :=

413: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
414: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
415: pay_mag_tape.internal_cxt_values(3) := get_session_date;
416: pay_mag_tape.internal_prm_values(1) := 6;
417: pay_mag_tape.internal_prm_values(2) :=
418: get_formula_id('BACS_FOOTER');
419: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
420: pay_mag_tape.internal_prm_names(3) :=
421: 'TRANSFER_EXPIRATION_DATE';

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

415: pay_mag_tape.internal_cxt_values(3) := get_session_date;
416: pay_mag_tape.internal_prm_values(1) := 6;
417: pay_mag_tape.internal_prm_values(2) :=
418: get_formula_id('BACS_FOOTER');
419: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
420: pay_mag_tape.internal_prm_names(3) :=
421: 'TRANSFER_EXPIRATION_DATE';
422: pay_mag_tape.internal_prm_values(3) := expiration_date;
423: pay_mag_tape.internal_prm_names(4) :=

Line 420: pay_mag_tape.internal_prm_names(3) :=

416: pay_mag_tape.internal_prm_values(1) := 6;
417: pay_mag_tape.internal_prm_values(2) :=
418: get_formula_id('BACS_FOOTER');
419: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
420: pay_mag_tape.internal_prm_names(3) :=
421: 'TRANSFER_EXPIRATION_DATE';
422: pay_mag_tape.internal_prm_values(3) := expiration_date;
423: pay_mag_tape.internal_prm_names(4) :=
424: 'TRANSFER_SUBMISSION_NUMBER';

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

418: get_formula_id('BACS_FOOTER');
419: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
420: pay_mag_tape.internal_prm_names(3) :=
421: 'TRANSFER_EXPIRATION_DATE';
422: pay_mag_tape.internal_prm_values(3) := expiration_date;
423: pay_mag_tape.internal_prm_names(4) :=
424: 'TRANSFER_SUBMISSION_NUMBER';
425: pay_mag_tape.internal_prm_values(4) := submission_number;
426: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';

Line 423: pay_mag_tape.internal_prm_names(4) :=

419: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
420: pay_mag_tape.internal_prm_names(3) :=
421: 'TRANSFER_EXPIRATION_DATE';
422: pay_mag_tape.internal_prm_values(3) := expiration_date;
423: pay_mag_tape.internal_prm_names(4) :=
424: 'TRANSFER_SUBMISSION_NUMBER';
425: pay_mag_tape.internal_prm_values(4) := submission_number;
426: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
427: pay_mag_tape.internal_prm_values(5) := total_body_count;

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

421: 'TRANSFER_EXPIRATION_DATE';
422: pay_mag_tape.internal_prm_values(3) := expiration_date;
423: pay_mag_tape.internal_prm_names(4) :=
424: 'TRANSFER_SUBMISSION_NUMBER';
425: pay_mag_tape.internal_prm_values(4) := submission_number;
426: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
427: pay_mag_tape.internal_prm_values(5) := total_body_count;
428: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
429: pay_mag_tape.internal_prm_values(6) := block_count;

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

422: pay_mag_tape.internal_prm_values(3) := expiration_date;
423: pay_mag_tape.internal_prm_names(4) :=
424: 'TRANSFER_SUBMISSION_NUMBER';
425: pay_mag_tape.internal_prm_values(4) := submission_number;
426: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
427: pay_mag_tape.internal_prm_values(5) := total_body_count;
428: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
429: pay_mag_tape.internal_prm_values(6) := block_count;
430: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';

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

423: pay_mag_tape.internal_prm_names(4) :=
424: 'TRANSFER_SUBMISSION_NUMBER';
425: pay_mag_tape.internal_prm_values(4) := submission_number;
426: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
427: pay_mag_tape.internal_prm_values(5) := total_body_count;
428: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
429: pay_mag_tape.internal_prm_values(6) := block_count;
430: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
431: pay_mag_tape.internal_prm_values(7) := get_todays_date;

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

424: 'TRANSFER_SUBMISSION_NUMBER';
425: pay_mag_tape.internal_prm_values(4) := submission_number;
426: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
427: pay_mag_tape.internal_prm_values(5) := total_body_count;
428: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
429: pay_mag_tape.internal_prm_values(6) := block_count;
430: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
431: pay_mag_tape.internal_prm_values(7) := get_todays_date;
432: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';

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

425: pay_mag_tape.internal_prm_values(4) := submission_number;
426: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
427: pay_mag_tape.internal_prm_values(5) := total_body_count;
428: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
429: pay_mag_tape.internal_prm_values(6) := block_count;
430: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
431: pay_mag_tape.internal_prm_values(7) := get_todays_date;
432: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
433: pay_mag_tape.internal_prm_values(8) := total_payment_footer;

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

426: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_BODY_COUNT';
427: pay_mag_tape.internal_prm_values(5) := total_body_count;
428: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
429: pay_mag_tape.internal_prm_values(6) := block_count;
430: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
431: pay_mag_tape.internal_prm_values(7) := get_todays_date;
432: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
433: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
434: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';

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

427: pay_mag_tape.internal_prm_values(5) := total_body_count;
428: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
429: pay_mag_tape.internal_prm_values(6) := block_count;
430: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
431: pay_mag_tape.internal_prm_values(7) := get_todays_date;
432: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
433: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
434: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
435: pay_mag_tape.internal_prm_values(9) := total_contra_count;

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

428: pay_mag_tape.internal_prm_names(6) := 'TRANSFER_BLOCK_COUNT';
429: pay_mag_tape.internal_prm_values(6) := block_count;
430: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
431: pay_mag_tape.internal_prm_values(7) := get_todays_date;
432: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
433: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
434: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
435: pay_mag_tape.internal_prm_values(9) := total_contra_count;
436: --

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

429: pay_mag_tape.internal_prm_values(6) := block_count;
430: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
431: pay_mag_tape.internal_prm_values(7) := get_todays_date;
432: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
433: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
434: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
435: pay_mag_tape.internal_prm_values(9) := total_contra_count;
436: --
437: CLOSE bacs_assignments;

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

430: pay_mag_tape.internal_prm_names(7) := 'TRANSFER_TODAYS_DATE';
431: pay_mag_tape.internal_prm_values(7) := get_todays_date;
432: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
433: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
434: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
435: pay_mag_tape.internal_prm_values(9) := total_contra_count;
436: --
437: CLOSE bacs_assignments;
438: END IF;

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

431: pay_mag_tape.internal_prm_values(7) := get_todays_date;
432: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_TOTAL_PAYMENT';
433: pay_mag_tape.internal_prm_values(8) := total_payment_footer;
434: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_CONTRA_COUNT';
435: pay_mag_tape.internal_prm_values(9) := total_contra_count;
436: --
437: CLOSE bacs_assignments;
438: END IF;
439: --