DBA Data[Home] [Help]

APPS.PAY_US_NACHA_TAPE dependencies on HR_UTILITY

Line 25: Uses : hr_utility

21:
22: Description : This package holds building blocks used in the generation
23: of nacha Tape.
24:
25: Uses : hr_utility
26:
27: Change List
28: -----------
29: Date Name Vers Bug No Description

Line 454: hr_utility.trace('Entering pay_nacha_tape.get_third_party_details');

450: lv_act_param pay_action_parameters.parameter_value%TYPE;
451: lb_use_new_arch BOOLEAN ;
452:
453: begin
454: hr_utility.trace('Entering pay_nacha_tape.get_third_party_details');
455: hr_utility.trace('p_amount = ' || p_amount);
456: hr_utility.trace('p_ppm_id = ' || p_ppm_id);
457: hr_utility.trace('g_business_group_id := ' || g_business_group_id);
458:

Line 455: hr_utility.trace('p_amount = ' || p_amount);

451: lb_use_new_arch BOOLEAN ;
452:
453: begin
454: hr_utility.trace('Entering pay_nacha_tape.get_third_party_details');
455: hr_utility.trace('p_amount = ' || p_amount);
456: hr_utility.trace('p_ppm_id = ' || p_ppm_id);
457: hr_utility.trace('g_business_group_id := ' || g_business_group_id);
458:
459: open csr_garn_arch;

Line 456: hr_utility.trace('p_ppm_id = ' || p_ppm_id);

452:
453: begin
454: hr_utility.trace('Entering pay_nacha_tape.get_third_party_details');
455: hr_utility.trace('p_amount = ' || p_amount);
456: hr_utility.trace('p_ppm_id = ' || p_ppm_id);
457: hr_utility.trace('g_business_group_id := ' || g_business_group_id);
458:
459: open csr_garn_arch;
460: fetch csr_garn_arch into lv_garn_arch;

Line 457: hr_utility.trace('g_business_group_id := ' || g_business_group_id);

453: begin
454: hr_utility.trace('Entering pay_nacha_tape.get_third_party_details');
455: hr_utility.trace('p_amount = ' || p_amount);
456: hr_utility.trace('p_ppm_id = ' || p_ppm_id);
457: hr_utility.trace('g_business_group_id := ' || g_business_group_id);
458:
459: open csr_garn_arch;
460: fetch csr_garn_arch into lv_garn_arch;
461: if csr_garn_arch%NOTFOUND then

Line 465: hr_utility.trace('lv_garn_arch := ' || lv_garn_arch);

461: if csr_garn_arch%NOTFOUND then
462: lv_garn_arch := 'X';
463: end if;
464: close csr_garn_arch;
465: hr_utility.trace('lv_garn_arch := ' || lv_garn_arch);
466:
467: open csr_action_param;
468: fetch csr_action_param into lv_act_param;
469: if csr_action_param%NOTFOUND then

Line 472: hr_utility.trace('lv_act_param := ' || lv_act_param);

468: fetch csr_action_param into lv_act_param;
469: if csr_action_param%NOTFOUND then
470: lv_act_param := 'X';
471: end if;
472: hr_utility.trace('lv_act_param := ' || lv_act_param);
473:
474: /* Following is the logic to determine what WA Arch is in use
475: BG Upgraded + Action Param 'Y' = New WA Arch
476: BG Upgraded + Action Param 'N' = New WA Arch

Line 500: hr_utility.trace('Open cursor csr_ele_details');

496: else
497: open csr_ele_details_old_arch;
498: end if;
499:
500: hr_utility.trace('Open cursor csr_ele_details');
501:
502: LOOP
503: if lb_use_new_arch then
504:

Line 512: hr_utility.trace('After fetch csr_ele_details_new_arch');

508: lv_med_ind,
509: ld_payment_date,
510: ln_run_result_id;
511:
512: hr_utility.trace('After fetch csr_ele_details_new_arch');
513: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
514: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
515: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
516: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));

Line 513: hr_utility.trace('lv_ref_no := ' || lv_ref_no);

509: ld_payment_date,
510: ln_run_result_id;
511:
512: hr_utility.trace('After fetch csr_ele_details_new_arch');
513: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
514: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
515: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
516: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
517: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);

Line 514: hr_utility.trace('lv_fips_code := ' || lv_fips_code);

510: ln_run_result_id;
511:
512: hr_utility.trace('After fetch csr_ele_details_new_arch');
513: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
514: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
515: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
516: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
517: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);
518:

Line 515: hr_utility.trace('lv_med_ind := ' || lv_med_ind);

511:
512: hr_utility.trace('After fetch csr_ele_details_new_arch');
513: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
514: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
515: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
516: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
517: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);
518:
519: if csr_ele_details_new_arch%notfound then

Line 516: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));

512: hr_utility.trace('After fetch csr_ele_details_new_arch');
513: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
514: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
515: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
516: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
517: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);
518:
519: if csr_ele_details_new_arch%notfound then
520: hr_utility.trace('Not Found csr_ele_details_new_arch');

Line 517: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);

513: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
514: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
515: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
516: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
517: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);
518:
519: if csr_ele_details_new_arch%notfound then
520: hr_utility.trace('Not Found csr_ele_details_new_arch');
521: exit;

Line 520: hr_utility.trace('Not Found csr_ele_details_new_arch');

516: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
517: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);
518:
519: if csr_ele_details_new_arch%notfound then
520: hr_utility.trace('Not Found csr_ele_details_new_arch');
521: exit;
522: end if;
523: else
524:

Line 532: hr_utility.trace('After fetch csr_ele_details_old_arch');

528: lv_med_ind,
529: ld_payment_date,
530: ln_run_result_id;
531:
532: hr_utility.trace('After fetch csr_ele_details_old_arch');
533: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
534: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
535: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
536: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));

Line 533: hr_utility.trace('lv_ref_no := ' || lv_ref_no);

529: ld_payment_date,
530: ln_run_result_id;
531:
532: hr_utility.trace('After fetch csr_ele_details_old_arch');
533: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
534: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
535: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
536: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
537: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);

Line 534: hr_utility.trace('lv_fips_code := ' || lv_fips_code);

530: ln_run_result_id;
531:
532: hr_utility.trace('After fetch csr_ele_details_old_arch');
533: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
534: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
535: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
536: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
537: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);
538:

Line 535: hr_utility.trace('lv_med_ind := ' || lv_med_ind);

531:
532: hr_utility.trace('After fetch csr_ele_details_old_arch');
533: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
534: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
535: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
536: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
537: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);
538:
539: if csr_ele_details_old_arch%notfound then

Line 536: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));

532: hr_utility.trace('After fetch csr_ele_details_old_arch');
533: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
534: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
535: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
536: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
537: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);
538:
539: if csr_ele_details_old_arch%notfound then
540: hr_utility.trace('Not Found csr_ele_details_old_arch');

Line 537: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);

533: hr_utility.trace('lv_ref_no := ' || lv_ref_no);
534: hr_utility.trace('lv_fips_code := ' || lv_fips_code);
535: hr_utility.trace('lv_med_ind := ' || lv_med_ind);
536: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
537: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);
538:
539: if csr_ele_details_old_arch%notfound then
540: hr_utility.trace('Not Found csr_ele_details_old_arch');
541: exit;

Line 540: hr_utility.trace('Not Found csr_ele_details_old_arch');

536: hr_utility.trace('ld_payment_date := ' || TO_CHAR(ld_payment_date));
537: hr_utility.trace('ln_run_result_id := ' || ln_run_result_id);
538:
539: if csr_ele_details_old_arch%notfound then
540: hr_utility.trace('Not Found csr_ele_details_old_arch');
541: exit;
542: end if;
543: end if;
544:

Line 547: hr_utility.trace('g_used_results_tab.EXISTS for := ' || ln_run_result_id);

543: end if;
544:
545: if not (g_used_results_tab.EXISTS(ln_run_result_id)) then
546:
547: hr_utility.trace('g_used_results_tab.EXISTS for := ' || ln_run_result_id);
548:
549: g_used_results_tab(ln_run_result_id) := p_amount;
550: p_payment_date := ld_payment_date;
551: p_ref_no := lv_ref_no;

Line 562: hr_utility.trace('Exiting pay_nacha_tape.get_third_party_details - success');

558: close csr_ele_details_old_arch;
559: end if;
560:
561: --close csr_ele_details;
562: hr_utility.trace('Exiting pay_nacha_tape.get_third_party_details - success');
563: return;
564: end if;
565:
566: end LOOP;

Line 581: hr_utility.trace('Exiting pay_nacha_tape.get_third_part_details - error');

577: end if;
578:
579: -- if we got here then we did not find a element that matches our needs
580: --Changes for Bug 8944172
581: hr_utility.trace('Exiting pay_nacha_tape.get_third_part_details - error');
582: hr_utility.set_message(801,'PAY_GARNISH_ELE_NOT_FOUND');
583: pay_core_utils.push_message(801,'PAY_GARNISH_ELE_NOT_FOUND','P');
584: pay_core_utils.push_token('ASSIGNMENT_ID',g_assignment_id);
585: raise_application_error(-20101, 'Error in pay_us_nacha_tape.get_third_party_details');

Line 582: hr_utility.set_message(801,'PAY_GARNISH_ELE_NOT_FOUND');

578:
579: -- if we got here then we did not find a element that matches our needs
580: --Changes for Bug 8944172
581: hr_utility.trace('Exiting pay_nacha_tape.get_third_part_details - error');
582: hr_utility.set_message(801,'PAY_GARNISH_ELE_NOT_FOUND');
583: pay_core_utils.push_message(801,'PAY_GARNISH_ELE_NOT_FOUND','P');
584: pay_core_utils.push_token('ASSIGNMENT_ID',g_assignment_id);
585: raise_application_error(-20101, 'Error in pay_us_nacha_tape.get_third_party_details');
586: --Changes for Bug 8944172

Line 602: hr_utility.set_location('pay_us_nacha_tape.get_formula_id',1);

598: FUNCTION get_formula_id (p_formula_name varchar2)
599: RETURN varchar2 IS
600: ff_formula_id varchar2(9);
601: BEGIN
602: hr_utility.set_location('pay_us_nacha_tape.get_formula_id',1);
603: --
604: select TO_CHAR(FORMULA_ID) INTO ff_formula_id
605: from FF_FORMULAS_F
606: where g_effective_date between EFFECTIVE_START_DATE and

Line 610: hr_utility.trace('Formula ID : '||ff_formula_id);

606: where g_effective_date between EFFECTIVE_START_DATE and
607: EFFECTIVE_END_DATE
608: and FORMULA_NAME = p_formula_name;
609: --
610: hr_utility.trace('Formula ID : '||ff_formula_id);
611: RETURN ff_formula_id;
612: exception
613: when no_data_found then
614: hr_utility.set_message(801,'FFX37_FORMULA_NOT_FOUND');

Line 614: hr_utility.set_message(801,'FFX37_FORMULA_NOT_FOUND');

610: hr_utility.trace('Formula ID : '||ff_formula_id);
611: RETURN ff_formula_id;
612: exception
613: when no_data_found then
614: hr_utility.set_message(801,'FFX37_FORMULA_NOT_FOUND');
615: hr_utility.set_message_token('1',p_formula_name);
616: hr_utility.raise_error;
617: END get_formula_id;
618: ----

Line 615: hr_utility.set_message_token('1',p_formula_name);

611: RETURN ff_formula_id;
612: exception
613: when no_data_found then
614: hr_utility.set_message(801,'FFX37_FORMULA_NOT_FOUND');
615: hr_utility.set_message_token('1',p_formula_name);
616: hr_utility.raise_error;
617: END get_formula_id;
618: ----
619: ----

Line 616: hr_utility.raise_error;

612: exception
613: when no_data_found then
614: hr_utility.set_message(801,'FFX37_FORMULA_NOT_FOUND');
615: hr_utility.set_message_token('1',p_formula_name);
616: hr_utility.raise_error;
617: END get_formula_id;
618: ----
619: ----
620: --.

Line 635: hr_utility.set_location('pay_us_nacha_tape.get_effective_date',20);

631: FUNCTION get_transfer_param ( p_param_name varchar2 )
632: RETURN Number IS
633: param_value number;
634: BEGIN
635: hr_utility.set_location('pay_us_nacha_tape.get_effective_date',20);
636: IF pay_mag_tape.internal_prm_names(3) = p_param_name
637: THEN
638: param_value := fnd_number.canonical_to_number(pay_mag_tape.internal_prm_values(3));
639: ELSIF pay_mag_tape.internal_prm_names(4) = p_param_name

Line 673: hr_utility.trace('Writing File Header');

669: PROCEDURE write_file_header IS
670:
671: BEGIN
672:
673: hr_utility.trace('Writing File Header');
674: hr_utility.trace('.... Writing File Header Context');
675:
676: pay_mag_tape.internal_cxt_values(1) := '3';
677: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

Line 674: hr_utility.trace('.... Writing File Header Context');

670:
671: BEGIN
672:
673: hr_utility.trace('Writing File Header');
674: hr_utility.trace('.... Writing File Header Context');
675:
676: pay_mag_tape.internal_cxt_values(1) := '3';
677: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
678: pay_mag_tape.internal_cxt_values(2) := g_org_payment_method_id;

Line 682: hr_utility.trace('.... Writing File Header Parameters');

678: pay_mag_tape.internal_cxt_values(2) := g_org_payment_method_id;
679: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
680: pay_mag_tape.internal_cxt_values(3) := fnd_date.date_to_canonical(g_effective_date);
681: --
682: hr_utility.trace('.... Writing File Header Parameters');
683:
684: pay_mag_tape.internal_prm_values(1) := '6';
685: pay_mag_tape.internal_prm_values(2) := g_file_header;
686: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_THIRD_PARTY';

Line 695: hr_utility.trace('Leaving File Header');

691: pay_mag_tape.internal_prm_values(5) := g_date;
692: pay_mag_tape.internal_prm_names(6) := 'CREATION_TIME';
693: pay_mag_tape.internal_prm_values(6) := g_time;
694:
695: hr_utility.trace('Leaving File Header');
696:
697: hr_utility.set_location('run_formula.File_head',6);
698:
699: END; /* end write_file_header */

Line 697: hr_utility.set_location('run_formula.File_head',6);

693: pay_mag_tape.internal_prm_values(6) := g_time;
694:
695: hr_utility.trace('Leaving File Header');
696:
697: hr_utility.set_location('run_formula.File_head',6);
698:
699: END; /* end write_file_header */
700:
701: /******************************************************************

Line 713: hr_utility.trace('Writing Batch Header');

709: PROCEDURE write_batch_header
710: IS
711:
712: BEGIN
713: hr_utility.trace('Writing Batch Header');
714:
715: g_overflow_batch := 'N';
716: hr_utility.trace('.... g_overflow_batch is : '|| g_overflow_batch);
717:

Line 716: hr_utility.trace('.... g_overflow_batch is : '|| g_overflow_batch);

712: BEGIN
713: hr_utility.trace('Writing Batch Header');
714:
715: g_overflow_batch := 'N';
716: hr_utility.trace('.... g_overflow_batch is : '|| g_overflow_batch);
717:
718: -- Bug 3331019
719: if (nvl(hr_general2.get_oracle_db_version, 0) < 10.0) then
720: OPEN csr_assignments (g_legal_company_id,

Line 736: hr_utility.trace('.... Writing Batch Header Context');

732: g_batch_number := g_batch_number + 1;
733:
734: -- Context for NACHA_BATCH_HEADER
735: -- first context is number of contexts
736: hr_utility.trace('.... Writing Batch Header Context');
737:
738: pay_mag_tape.internal_cxt_values(1) := '4';
739: pay_mag_tape.internal_cxt_names(2) := 'TAX_UNIT_ID';
740: pay_mag_tape.internal_cxt_values(2) := TO_CHAR(g_legal_company_id);

Line 749: hr_utility.trace('.... Writing Batch Header Parameters');

745:
746: -- Parameters for NACHA_BATCH_HEADER
747: -- first parameter is number of parameters
748: -- second parameter is formula is
749: hr_utility.trace('.... Writing Batch Header Parameters');
750:
751: pay_mag_tape.internal_prm_values(1) := '8';
752: pay_mag_tape.internal_prm_values(2) := g_batch_header;
753:

Line 779: hr_utility.trace('Leaving Batch Header');

775: pay_mag_tape.internal_prm_values(8) := 'PPD';
776: end if;
777:
778:
779: hr_utility.trace('Leaving Batch Header');
780:
781: END; /* write_batch_header */
782:
783: /******************************************************************

Line 797: hr_utility.trace('Writing Entry Detail');

793: PROCEDURE write_entry_detail IS
794:
795: BEGIN
796:
797: hr_utility.trace('Writing Entry Detail');
798:
799: hr_utility.trace('.... Writing Entry Detail Context');
800: g_count := g_count + 1;
801:

Line 799: hr_utility.trace('.... Writing Entry Detail Context');

795: BEGIN
796:
797: hr_utility.trace('Writing Entry Detail');
798:
799: hr_utility.trace('.... Writing Entry Detail Context');
800: g_count := g_count + 1;
801:
802: -- Context Setup for NACHA_ENTRY_DETAIL
803: -- First context value is number of contexts

Line 822: hr_utility.trace('.... Writing Entry Detail Parameters');

818: -- Parameter Setup for NACHA_ENTRY_DETAIL
819: -- First parameter value is number of parameters
820: -- second parameter value is formula id
821:
822: hr_utility.trace('.... Writing Entry Detail Parameters');
823:
824: pay_mag_tape.internal_prm_values(1) := '11';
825: pay_mag_tape.internal_prm_values(2) := g_entry_detail;
826:

Line 846: hr_utility.set_location('run_formula.Assignment',7);

842:
843: pay_mag_tape.internal_prm_names(11) := 'TEST_FILE';
844: pay_mag_tape.internal_prm_values(11) := g_test_file;
845:
846: hr_utility.set_location('run_formula.Assignment',7);
847: IF g_temp_count = 0 THEN
848: -- If this is the first entry detail of a batch, reset these
849: -- parameters.
850: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_ENTRY_COUNT';

Line 860: hr_utility.set_location('run_formula.Assignment',8);

856: pay_mag_tape.internal_prm_names(9) := 'TRANSFER_ORG_PAY_TOT';
857: pay_mag_tape.internal_prm_values(9) := '0';
858:
859: g_temp_count := 1;
860: hr_utility.set_location('run_formula.Assignment',8);
861: END IF;
862:
863: IF g_csr_org_pay_third_party = 'Y' THEN
864: g_addenda_write := 'Y';

Line 885: hr_utility.trace('Leaving Entry Detail');

881: and b.EFFECTIVE_END_DATE);
882: end if;
883:
884:
885: hr_utility.trace('Leaving Entry Detail');
886:
887: END; /* write_entry_detail */
888:
889: /******************************************************************

Line 903: hr_utility.trace('Writing Addenda');

899: PROCEDURE write_addenda IS
900:
901: BEGIN
902:
903: hr_utility.trace('Writing Addenda');
904:
905: g_addenda_write := 'N';
906:
907: get_third_party_details(

Line 915: hr_utility.trace('.... Writing Addenda Context');

911: v_attach_number,
912: v_fips_code,
913: v_med_ind);
914:
915: hr_utility.trace('.... Writing Addenda Context');
916:
917: -- Context Setup for NACHA_ADDENDA
918: -- First context value is number of Context Values
919:

Line 934: hr_utility.trace('.... Writing Addenda Parameters');

930: pay_mag_tape.internal_cxt_values(6) := g_org_payment_method_id;
931: pay_mag_tape.internal_cxt_names(7) := 'TAX_UNIT_ID';
932: pay_mag_tape.internal_cxt_values(7) := TO_CHAR(g_legal_company_id);
933:
934: hr_utility.trace('.... Writing Addenda Parameters');
935:
936: -- Parameter Setup for NACHA_ADDENDA
937: -- First Parameter Value is number of parameters
938: pay_mag_tape.internal_prm_values(1) := '14';

Line 970: hr_utility.trace('Leaving Addenda');

966: -- we do not change the count till after so we can have the same trace number
967: -- in both entry detail and addenda rec
968:
969: g_addenda_count := g_addenda_count + 1;
970: hr_utility.trace('Leaving Addenda');
971:
972: END; /* write_addenda */
973:
974: /******************************************************************

Line 988: hr_utility.trace('Writing Org Entry Detail');

984: PROCEDURE write_org_entry_detail IS
985:
986: BEGIN
987:
988: hr_utility.trace('Writing Org Entry Detail');
989:
990: If g_nacha_balance_flag = 'Y' then
991:
992: g_count := g_count + 1;

Line 1004: hr_utility.trace('.... Writing Org Entry Detail Context');

1000: end if;
1001:
1002: -- Context Setup for NACHA_ORG_PAY_ENTRY_DETAIL
1003: -- first context is number of context values
1004: hr_utility.trace('.... Writing Org Entry Detail Context');
1005:
1006: pay_mag_tape.internal_cxt_values(1) := '3';
1007: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
1008: pay_mag_tape.internal_cxt_values(2) := g_csr_org_pay_meth_id;

Line 1015: hr_utility.trace('.... Writing Org Entry Detail Parameters');

1011:
1012: -- Parameter Setup for NACHA_ORG_PAY_ENTRY_DETAIL
1013: -- first parameter is number of parameters
1014: -- second parameter is formula is
1015: hr_utility.trace('.... Writing Org Entry Detail Parameters');
1016:
1017: pay_mag_tape.internal_prm_values(1) := '10';
1018: pay_mag_tape.internal_prm_values(2) := g_org_pay_entry_detail;
1019:

Line 1041: hr_utility.set_location('run_formula.org_pay_entry_detail',9);

1037: CLOSE csr_assignments;
1038: else
1039: CLOSE csr_assignments_no_rule;
1040: end if;
1041: hr_utility.set_location('run_formula.org_pay_entry_detail',9);
1042:
1043: hr_utility.trace('Leaving Org Entry Detail');
1044:
1045: END; /* write_org_entry_detail */

Line 1043: hr_utility.trace('Leaving Org Entry Detail');

1039: CLOSE csr_assignments_no_rule;
1040: end if;
1041: hr_utility.set_location('run_formula.org_pay_entry_detail',9);
1042:
1043: hr_utility.trace('Leaving Org Entry Detail');
1044:
1045: END; /* write_org_entry_detail */
1046:
1047:

Line 1061: hr_utility.trace('Writing Batch Control');

1057:
1058: PROCEDURE write_batch_control IS
1059:
1060: BEGIN
1061: hr_utility.trace('Writing Batch Control');
1062:
1063: g_batch_control_write := 'N';
1064:
1065: g_hash := g_hash + get_transfer_param ('TRANSFER_ENTRY_HASH');

Line 1071: hr_utility.trace('.... Writing Batch Control Context');

1067:
1068: -- Context Setup for NACHA_BATCH_CONTROL
1069: -- First context value is number of context values
1070:
1071: hr_utility.trace('.... Writing Batch Control Context');
1072:
1073: pay_mag_tape.internal_cxt_values(1) := '4';
1074: pay_mag_tape.internal_cxt_names(2) := 'TAX_UNIT_ID';
1075: pay_mag_tape.internal_cxt_values(2) := TO_CHAR(g_legal_company_id);

Line 1084: hr_utility.trace('.... Writing Batch Control Parameters');

1080:
1081: -- Parameter Setup for NACHA_BATCH_CONTROL
1082: -- First parameter value is number of parameters
1083:
1084: hr_utility.trace('.... Writing Batch Control Parameters');
1085:
1086: pay_mag_tape.internal_prm_values(1) := '7';
1087: pay_mag_tape.internal_prm_values(2) := g_batch_control;
1088:

Line 1098: hr_utility.set_location('run_formula.Batch_ctrl',9);

1094:
1095: pay_mag_tape.internal_prm_names(7) := 'BATCH_NUMBER';
1096: pay_mag_tape.internal_prm_values(7) := TO_CHAR(g_batch_number);
1097:
1098: hr_utility.set_location('run_formula.Batch_ctrl',9);
1099:
1100: hr_utility.trace('Leaving Batch Control');
1101:
1102: END; /* write_batch_control */

Line 1100: hr_utility.trace('Leaving Batch Control');

1096: pay_mag_tape.internal_prm_values(7) := TO_CHAR(g_batch_number);
1097:
1098: hr_utility.set_location('run_formula.Batch_ctrl',9);
1099:
1100: hr_utility.trace('Leaving Batch Control');
1101:
1102: END; /* write_batch_control */
1103:
1104:

Line 1118: hr_utility.trace('Writing File Control');

1114: PROCEDURE write_file_control IS
1115:
1116: BEGIN
1117:
1118: hr_utility.trace('Writing File Control');
1119:
1120: v_block_count := CEIL(((2 * g_batch_number ) +
1121: g_count + g_addenda_count + 2)/10);
1122: g_pad_count := (v_block_count * 10) -

Line 1126: hr_utility.trace('.... Writing File Control Context');

1122: g_pad_count := (v_block_count * 10) -
1123: ((2 * g_batch_number ) +
1124: g_count + g_addenda_count + 2);
1125:
1126: hr_utility.trace('.... Writing File Control Context');
1127:
1128: -- dscully - added contexts for NACHA_BALANCED_NACHA_FILE DBI
1129: pay_mag_tape.internal_cxt_values(1) := '3';
1130: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';

Line 1135: hr_utility.trace('.... Writing File Control Parameters');

1131: pay_mag_tape.internal_cxt_values(2) := g_org_payment_method_id;
1132: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';
1133: pay_mag_tape.internal_cxt_values(3) := fnd_date.date_to_canonical(g_effective_date);
1134:
1135: hr_utility.trace('.... Writing File Control Parameters');
1136:
1137: pay_mag_tape.internal_prm_values(1) := '8';
1138: pay_mag_tape.internal_prm_values(2) := g_file_control;
1139: pay_mag_tape.internal_prm_names(3) := 'BATCH_NUMBER';

Line 1152: hr_utility.set_location('run_formula.File_Control',11);

1148: pay_mag_tape.internal_prm_values(7) := fnd_number.number_to_canonical(g_amount);
1149: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_PAD_COUNT';
1150: pay_mag_tape.internal_prm_values(8) := TO_CHAR(g_pad_count);
1151: --
1152: hr_utility.set_location('run_formula.File_Control',11);
1153: hr_utility.trace('Leaving File Control');
1154:
1155: END; /* write_file_control */
1156:

Line 1153: hr_utility.trace('Leaving File Control');

1149: pay_mag_tape.internal_prm_names(8) := 'TRANSFER_PAD_COUNT';
1150: pay_mag_tape.internal_prm_values(8) := TO_CHAR(g_pad_count);
1151: --
1152: hr_utility.set_location('run_formula.File_Control',11);
1153: hr_utility.trace('Leaving File Control');
1154:
1155: END; /* write_file_control */
1156:
1157:

Line 1170: hr_utility.trace('Writing Padding');

1166: PROCEDURE write_padding IS
1167:
1168: BEGIN
1169:
1170: hr_utility.trace('Writing Padding');
1171:
1172: hr_utility.trace('.... Writing Padding Context');
1173: pay_mag_tape.internal_cxt_values(1) := '1';
1174:

Line 1172: hr_utility.trace('.... Writing Padding Context');

1168: BEGIN
1169:
1170: hr_utility.trace('Writing Padding');
1171:
1172: hr_utility.trace('.... Writing Padding Context');
1173: pay_mag_tape.internal_cxt_values(1) := '1';
1174:
1175: hr_utility.trace('.... Writing Padding Parameters');
1176:

Line 1175: hr_utility.trace('.... Writing Padding Parameters');

1171:
1172: hr_utility.trace('.... Writing Padding Context');
1173: pay_mag_tape.internal_cxt_values(1) := '1';
1174:
1175: hr_utility.trace('.... Writing Padding Parameters');
1176:
1177: pay_mag_tape.internal_prm_values(1) := '3';
1178: pay_mag_tape.internal_prm_values(2) := g_padding;
1179: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_PAD_COUNT';

Line 1182: hr_utility.set_location('run_formula.padding',12);

1178: pay_mag_tape.internal_prm_values(2) := g_padding;
1179: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_PAD_COUNT';
1180: pay_mag_tape.internal_prm_values(3) := TO_CHAR(g_pad_count);
1181:
1182: hr_utility.set_location('run_formula.padding',12);
1183: IF g_pad_count = 1 THEN
1184: CLOSE csr_nacha_batch;
1185: ELSE
1186: g_pad_count := g_pad_count - 1;

Line 1189: hr_utility.trace('Leaving Padding');

1185: ELSE
1186: g_pad_count := g_pad_count - 1;
1187: END IF;
1188:
1189: hr_utility.trace('Leaving Padding');
1190:
1191: END; /* write_padding */
1192:
1193: /*****************************END of Local Functions ****************/

Line 1197: hr_utility.trace('Entering pay_us_nacha_tape.run_formula');

1193: /*****************************END of Local Functions ****************/
1194:
1195:
1196: BEGIN
1197: hr_utility.trace('Entering pay_us_nacha_tape.run_formula');
1198: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
1199: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
1200: pay_mag_tape.internal_prm_values(1) := '2';
1201:

Line 1204: hr_utility.set_location('pay_us_nacha_tape.run_formula',1);

1200: pay_mag_tape.internal_prm_values(1) := '2';
1201:
1202: pay_mag_tape.internal_cxt_names(1) := 'NUMBER_OF_CONTEXT';
1203: pay_mag_tape.internal_cxt_values(1) := '1';
1204: hr_utility.set_location('pay_us_nacha_tape.run_formula',1);
1205:
1206: hr_utility.set_location ('run_formula loop',1);
1207:
1208: --Checking If the transaction is IAT

Line 1206: hr_utility.set_location ('run_formula loop',1);

1202: pay_mag_tape.internal_cxt_names(1) := 'NUMBER_OF_CONTEXT';
1203: pay_mag_tape.internal_cxt_values(1) := '1';
1204: hr_utility.set_location('pay_us_nacha_tape.run_formula',1);
1205:
1206: hr_utility.set_location ('run_formula loop',1);
1207:
1208: --Checking If the transaction is IAT
1209: IF g_foreign_transact = 'Y' then
1210: --Call the new package for IAT

Line 1225: hr_utility.set_location('run_formula.Init',5);

1221: /****************Level 1.1 The first major if clause ***************/
1222: IF NOT csr_nacha_batch%ISOPEN and g_business_group_id is NULL THEN
1223: /* main */
1224:
1225: hr_utility.set_location('run_formula.Init',5);
1226: g_payroll_action_id := fnd_number.canonical_to_number(
1227: pay_mag_tape.internal_prm_values(3));
1228:
1229: /* Select all the relevent information using payroll action id */

Line 1251: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');

1247: and opm.ORG_PAYMENT_METHOD_ID = ppa.org_payment_method_id
1248: and ppa.effective_date between opm.EFFECTIVE_START_DATE
1249: and opm.EFFECTIVE_END_DATE;
1250: if SQL%NOTFOUND then
1251: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1252: hr_utility.set_message_token('PROCEDURE','pay_us_nacha_tape');
1253: hr_utility.set_message_token('STEP','1');
1254: hr_utility.raise_error;
1255: end if;

Line 1252: hr_utility.set_message_token('PROCEDURE','pay_us_nacha_tape');

1248: and ppa.effective_date between opm.EFFECTIVE_START_DATE
1249: and opm.EFFECTIVE_END_DATE;
1250: if SQL%NOTFOUND then
1251: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1252: hr_utility.set_message_token('PROCEDURE','pay_us_nacha_tape');
1253: hr_utility.set_message_token('STEP','1');
1254: hr_utility.raise_error;
1255: end if;
1256:

Line 1253: hr_utility.set_message_token('STEP','1');

1249: and opm.EFFECTIVE_END_DATE;
1250: if SQL%NOTFOUND then
1251: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1252: hr_utility.set_message_token('PROCEDURE','pay_us_nacha_tape');
1253: hr_utility.set_message_token('STEP','1');
1254: hr_utility.raise_error;
1255: end if;
1256:
1257: /* Set The default to Zero */

Line 1254: hr_utility.raise_error;

1250: if SQL%NOTFOUND then
1251: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1252: hr_utility.set_message_token('PROCEDURE','pay_us_nacha_tape');
1253: hr_utility.set_message_token('STEP','1');
1254: hr_utility.raise_error;
1255: end if;
1256:
1257: /* Set The default to Zero */
1258: g_file_id_modifier := '0';

Line 1287: hr_utility.trace('g_foreign_transact: ' || g_foreign_transact);

1283: end if;
1284:
1285: end if;
1286:
1287: hr_utility.trace('g_foreign_transact: ' || g_foreign_transact);
1288:
1289: --Checking If the transaction is IAT
1290: IF g_foreign_transact = 'Y' then
1291: --Call the new package for IAT

Line 1333: hr_utility.trace('g_org_payment_method_id = ' ||

1329: CLOSE csr_org_flex_info;
1330: END IF;
1331:
1332: IF g_org_payment_method_id is not null THEN
1333: hr_utility.trace('g_org_payment_method_id = ' ||
1334: g_org_payment_method_id);
1335: hr_utility.trace('g_csr_org_pay_third_party = ' ||
1336: g_csr_org_pay_third_party);
1337: write_file_header;

Line 1335: hr_utility.trace('g_csr_org_pay_third_party = ' ||

1331:
1332: IF g_org_payment_method_id is not null THEN
1333: hr_utility.trace('g_org_payment_method_id = ' ||
1334: g_org_payment_method_id);
1335: hr_utility.trace('g_csr_org_pay_third_party = ' ||
1336: g_csr_org_pay_third_party);
1337: write_file_header;
1338: ELSE
1339: hr_utility.set_message(801, 'HR_7711_SCL_FLEX_NOT_FOUND');

Line 1339: hr_utility.set_message(801, 'HR_7711_SCL_FLEX_NOT_FOUND');

1335: hr_utility.trace('g_csr_org_pay_third_party = ' ||
1336: g_csr_org_pay_third_party);
1337: write_file_header;
1338: ELSE
1339: hr_utility.set_message(801, 'HR_7711_SCL_FLEX_NOT_FOUND');
1340: hr_utility.raise_error;
1341: END IF;
1342:
1343: OPEN csr_nacha_batch(g_business_group_id,g_payroll_action_id);

Line 1340: hr_utility.raise_error;

1336: g_csr_org_pay_third_party);
1337: write_file_header;
1338: ELSE
1339: hr_utility.set_message(801, 'HR_7711_SCL_FLEX_NOT_FOUND');
1340: hr_utility.raise_error;
1341: END IF;
1342:
1343: OPEN csr_nacha_batch(g_business_group_id,g_payroll_action_id);
1344:

Line 1350: hr_utility.set_location ('run_formula loop',2);

1346:
1347: /****************Level 1.2 The second major else if clause ***************/
1348: ELSE /* main */
1349:
1350: hr_utility.set_location ('run_formula loop',2);
1351:
1352: IF g_addenda_write = 'Y' THEN
1353:
1354: write_addenda;

Line 1370: hr_utility.set_message(801,'PAY_US_PAYMENT_OVERFLOW');

1366: IF csr_assignments%FOUND THEN
1367:
1368:
1369: IF v_amount > 99999999.99 THEN
1370: hr_utility.set_message(801,'PAY_US_PAYMENT_OVERFLOW');
1371: pay_core_utils.push_message(801,'PAY_US_PAYMENT_OVERFLOW','P');
1372: pay_core_utils.push_token('ASSIGNMENT_NO',g_assignment_id);
1373: raise_application_error(-20101, 'Error in pay_us_nacha_tape.run_formula');
1374:

Line 1380: hr_utility.trace('G_OVERFLOW_AMOUNT is : '|| g_overflow_amount);

1376:
1377:
1378: g_overflow_amount := g_overflow_amount + v_amount;
1379:
1380: hr_utility.trace('G_OVERFLOW_AMOUNT is : '|| g_overflow_amount);
1381: hr_utility.trace('G_ROWID value is : '|| g_rowid);
1382:
1383: if g_overflow_amount > 99999999.99 then
1384: g_overflow_amount := 0;

Line 1381: hr_utility.trace('G_ROWID value is : '|| g_rowid);

1377:
1378: g_overflow_amount := g_overflow_amount + v_amount;
1379:
1380: hr_utility.trace('G_OVERFLOW_AMOUNT is : '|| g_overflow_amount);
1381: hr_utility.trace('G_ROWID value is : '|| g_rowid);
1382:
1383: if g_overflow_amount > 99999999.99 then
1384: g_overflow_amount := 0;
1385: g_overflow_flag := 'Y';

Line 1405: hr_utility.set_message(801,'PAY_US_PAYMENT_OVERFLOW');

1401:
1402: g_overflow_amount := g_overflow_amount + v_amount;
1403:
1404: IF v_amount > 99999999.99 THEN
1405: hr_utility.set_message(801,'PAY_US_PAYMENT_OVERFLOW');
1406: pay_core_utils.push_message(801,'PAY_US_PAYMENT_OVERFLOW','P');
1407: pay_core_utils.push_token('ASSIGNMENT_NO',g_assignment_id);
1408: raise_application_error(-20101, 'Error in pay_us_nacha_tape.run_formula');
1409: END IF;

Line 1411: hr_utility.trace('G_OVERFLOW_AMOUNT is : '|| g_overflow_amount);

1407: pay_core_utils.push_token('ASSIGNMENT_NO',g_assignment_id);
1408: raise_application_error(-20101, 'Error in pay_us_nacha_tape.run_formula');
1409: END IF;
1410:
1411: hr_utility.trace('G_OVERFLOW_AMOUNT is : '|| g_overflow_amount);
1412: hr_utility.trace('G_ROWID value is : '|| g_rowid);
1413:
1414: if g_overflow_amount > 99999999.99 then
1415: g_overflow_amount := 0;

Line 1412: hr_utility.trace('G_ROWID value is : '|| g_rowid);

1408: raise_application_error(-20101, 'Error in pay_us_nacha_tape.run_formula');
1409: END IF;
1410:
1411: hr_utility.trace('G_OVERFLOW_AMOUNT is : '|| g_overflow_amount);
1412: hr_utility.trace('G_ROWID value is : '|| g_rowid);
1413:
1414: if g_overflow_amount > 99999999.99 then
1415: g_overflow_amount := 0;
1416: g_overflow_flag := 'Y';

Line 1433: hr_utility.trace('g_overflow_batch flag is : '|| g_overflow_batch);

1429: /****************Level 1.3 The third major else if clause ***************/
1430:
1431: ELSE /* g_addenda_write = 'Y' */
1432:
1433: hr_utility.trace('g_overflow_batch flag is : '|| g_overflow_batch);
1434:
1435: IF g_overflow_batch = 'Y' then
1436: write_batch_header;
1437: ELSE /* g_overflow_batch */

Line 1446: hr_utility.trace('b4 g_legal_company_id is : ' || g_legal_company_id);

1442: g_nacha_balance_flag;
1443: IF csr_nacha_batch %FOUND THEN
1444:
1445: /* to reset rowid when GRE changes. Bug 1967949 */
1446: hr_utility.trace('b4 g_legal_company_id is : ' || g_legal_company_id);
1447: hr_utility.trace('b4 g_reset_greid is : ' || g_reset_greid);
1448: hr_utility.trace('b4 g_rowid is : ' || g_rowid);
1449:
1450: IF g_reset_greid <> g_legal_company_id then

Line 1447: hr_utility.trace('b4 g_reset_greid is : ' || g_reset_greid);

1443: IF csr_nacha_batch %FOUND THEN
1444:
1445: /* to reset rowid when GRE changes. Bug 1967949 */
1446: hr_utility.trace('b4 g_legal_company_id is : ' || g_legal_company_id);
1447: hr_utility.trace('b4 g_reset_greid is : ' || g_reset_greid);
1448: hr_utility.trace('b4 g_rowid is : ' || g_rowid);
1449:
1450: IF g_reset_greid <> g_legal_company_id then
1451:

Line 1448: hr_utility.trace('b4 g_rowid is : ' || g_rowid);

1444:
1445: /* to reset rowid when GRE changes. Bug 1967949 */
1446: hr_utility.trace('b4 g_legal_company_id is : ' || g_legal_company_id);
1447: hr_utility.trace('b4 g_reset_greid is : ' || g_reset_greid);
1448: hr_utility.trace('b4 g_rowid is : ' || g_rowid);
1449:
1450: IF g_reset_greid <> g_legal_company_id then
1451:
1452: g_rowid := null;

Line 1457: hr_utility.trace('a4 g_legal_company_id is : ' || g_legal_company_id);

1453: g_reset_greid := g_legal_company_id;
1454:
1455: END IF;
1456:
1457: hr_utility.trace('a4 g_legal_company_id is : ' || g_legal_company_id);
1458: hr_utility.trace('a4 g_reset_greid is : ' || g_reset_greid);
1459: hr_utility.trace('a4 g_rowid is : ' || g_rowid);
1460:
1461: /* to reset rowid when GRE changes. Bug 1967949 */

Line 1458: hr_utility.trace('a4 g_reset_greid is : ' || g_reset_greid);

1454:
1455: END IF;
1456:
1457: hr_utility.trace('a4 g_legal_company_id is : ' || g_legal_company_id);
1458: hr_utility.trace('a4 g_reset_greid is : ' || g_reset_greid);
1459: hr_utility.trace('a4 g_rowid is : ' || g_rowid);
1460:
1461: /* to reset rowid when GRE changes. Bug 1967949 */
1462:

Line 1459: hr_utility.trace('a4 g_rowid is : ' || g_rowid);

1455: END IF;
1456:
1457: hr_utility.trace('a4 g_legal_company_id is : ' || g_legal_company_id);
1458: hr_utility.trace('a4 g_reset_greid is : ' || g_reset_greid);
1459: hr_utility.trace('a4 g_rowid is : ' || g_rowid);
1460:
1461: /* to reset rowid when GRE changes. Bug 1967949 */
1462:
1463:

Line 1738: -- hr_utility.trace_on(null, 'NACHA');

1734:
1735: END f_get_batch_transact_ident;
1736:
1737: --BEGIN
1738: -- hr_utility.trace_on(null, 'NACHA');
1739: END pay_us_nacha_tape;