DBA Data[Home] [Help]

APPS.PAY_GB_EOY_MAGTAPE dependencies on PAY_MAG_TAPE

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

790: -- The initialization of the record type formulae
791: -- and number of parameters
792: BEGIN
793: /* Reserved parameter names */
794: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
795: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
796: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';
797: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
798: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';

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

791: -- and number of parameters
792: BEGIN
793: /* Reserved parameter names */
794: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
795: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
796: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';
797: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
798: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
799: IF p_no = 1 THEN

Line 796: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';

792: BEGIN
793: /* Reserved parameter names */
794: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
795: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
796: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';
797: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
798: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
799: IF p_no = 1 THEN
800: /* Record type 1 */

Line 797: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';

793: /* Reserved parameter names */
794: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
795: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
796: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';
797: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
798: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
799: IF p_no = 1 THEN
800: /* Record type 1 */
801: pay_mag_tape.internal_prm_values(1) := 15;

Line 798: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';

794: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
795: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
796: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';
797: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
798: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
799: IF p_no = 1 THEN
800: /* Record type 1 */
801: pay_mag_tape.internal_prm_values(1) := 15;
802: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD1');

Line 801: pay_mag_tape.internal_prm_values(1) := 15;

797: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
798: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
799: IF p_no = 1 THEN
800: /* Record type 1 */
801: pay_mag_tape.internal_prm_values(1) := 15;
802: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD1');
803: ELSIF p_no = 2 THEN
804: /* Record type 2 */
805: pay_mag_tape.internal_prm_values(1) := 69;

Line 802: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD1');

798: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
799: IF p_no = 1 THEN
800: /* Record type 1 */
801: pay_mag_tape.internal_prm_values(1) := 15;
802: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD1');
803: ELSIF p_no = 2 THEN
804: /* Record type 2 */
805: pay_mag_tape.internal_prm_values(1) := 69;
806: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD2');

Line 805: pay_mag_tape.internal_prm_values(1) := 69;

801: pay_mag_tape.internal_prm_values(1) := 15;
802: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD1');
803: ELSIF p_no = 2 THEN
804: /* Record type 2 */
805: pay_mag_tape.internal_prm_values(1) := 69;
806: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD2');
807: /* Reset the record index to start at the third parameter */
808: ELSIF p_no = 3 THEN
809: /* Sub-header */

Line 806: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD2');

802: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD1');
803: ELSIF p_no = 2 THEN
804: /* Record type 2 */
805: pay_mag_tape.internal_prm_values(1) := 69;
806: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD2');
807: /* Reset the record index to start at the third parameter */
808: ELSIF p_no = 3 THEN
809: /* Sub-header */
810: -- hr_utility.trace('record index is '||to_char(g_record_index));

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

807: /* Reset the record index to start at the third parameter */
808: ELSIF p_no = 3 THEN
809: /* Sub-header */
810: -- hr_utility.trace('record index is '||to_char(g_record_index));
811: pay_mag_tape.internal_prm_values(1) := 7;
812: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD3');
813: ELSIF p_no = 4 THEN
814: /* Permit total */
815: -- hr_utility.trace('record index is '||to_char(g_record_index));

Line 812: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD3');

808: ELSIF p_no = 3 THEN
809: /* Sub-header */
810: -- hr_utility.trace('record index is '||to_char(g_record_index));
811: pay_mag_tape.internal_prm_values(1) := 7;
812: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD3');
813: ELSIF p_no = 4 THEN
814: /* Permit total */
815: -- hr_utility.trace('record index is '||to_char(g_record_index));
816: pay_mag_tape.internal_prm_values(1) := 21; -- Incremented as P35/P14 EOY 2003/2004

Line 816: pay_mag_tape.internal_prm_values(1) := 21; -- Incremented as P35/P14 EOY 2003/2004

812: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD3');
813: ELSIF p_no = 4 THEN
814: /* Permit total */
815: -- hr_utility.trace('record index is '||to_char(g_record_index));
816: pay_mag_tape.internal_prm_values(1) := 21; -- Incremented as P35/P14 EOY 2003/2004
817: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD4');
818: ELSIF p_no = 5 THEN
819: /* End of record */
820: -- hr_utility.trace('record index is '||to_char(g_record_index));

Line 817: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD4');

813: ELSIF p_no = 4 THEN
814: /* Permit total */
815: -- hr_utility.trace('record index is '||to_char(g_record_index));
816: pay_mag_tape.internal_prm_values(1) := 21; -- Incremented as P35/P14 EOY 2003/2004
817: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD4');
818: ELSIF p_no = 5 THEN
819: /* End of record */
820: -- hr_utility.trace('record index is '||to_char(g_record_index));
821: pay_mag_tape.internal_prm_values(1) := 12;

Line 821: pay_mag_tape.internal_prm_values(1) := 12;

817: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD4');
818: ELSIF p_no = 5 THEN
819: /* End of record */
820: -- hr_utility.trace('record index is '||to_char(g_record_index));
821: pay_mag_tape.internal_prm_values(1) := 12;
822: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD5');
823: ELSIF p_no = 6 THEN
824: /* Dummy record */
825: pay_mag_tape.internal_prm_values(1) := 3;

Line 822: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD5');

818: ELSIF p_no = 5 THEN
819: /* End of record */
820: -- hr_utility.trace('record index is '||to_char(g_record_index));
821: pay_mag_tape.internal_prm_values(1) := 12;
822: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD5');
823: ELSIF p_no = 6 THEN
824: /* Dummy record */
825: pay_mag_tape.internal_prm_values(1) := 3;
826: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD6');

Line 825: pay_mag_tape.internal_prm_values(1) := 3;

821: pay_mag_tape.internal_prm_values(1) := 12;
822: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD5');
823: ELSIF p_no = 6 THEN
824: /* Dummy record */
825: pay_mag_tape.internal_prm_values(1) := 3;
826: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD6');
827: ELSIF p_no = 7 THEN
828: pay_mag_tape.internal_prm_values(1) := 6;
829: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD7');

Line 826: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD6');

822: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD5');
823: ELSIF p_no = 6 THEN
824: /* Dummy record */
825: pay_mag_tape.internal_prm_values(1) := 3;
826: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD6');
827: ELSIF p_no = 7 THEN
828: pay_mag_tape.internal_prm_values(1) := 6;
829: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD7');
830: END IF;

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

824: /* Dummy record */
825: pay_mag_tape.internal_prm_values(1) := 3;
826: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD6');
827: ELSIF p_no = 7 THEN
828: pay_mag_tape.internal_prm_values(1) := 6;
829: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD7');
830: END IF;
831: -- Set parameter count to start at transfer_char_errors
832: g_record_index := 6;

Line 829: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD7');

825: pay_mag_tape.internal_prm_values(1) := 3;
826: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD6');
827: ELSIF p_no = 7 THEN
828: pay_mag_tape.internal_prm_values(1) := 6;
829: pay_mag_tape.internal_prm_values(2) := get_formula_id('MAG_RECORD7');
830: END IF;
831: -- Set parameter count to start at transfer_char_errors
832: g_record_index := 6;
833: END;

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

836: -- The initialization of the P14 EDI record type formulae
837: -- and number of parameters
838: BEGIN
839: -- Reserved parameter names
840: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
841: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
842: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';
843: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
844: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';

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

837: -- and number of parameters
838: BEGIN
839: -- Reserved parameter names
840: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
841: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
842: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';
843: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
844: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
845: IF p_no = 1 THEN

Line 842: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';

838: BEGIN
839: -- Reserved parameter names
840: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
841: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
842: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';
843: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
844: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
845: IF p_no = 1 THEN
846: -- Permit Header

Line 843: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';

839: -- Reserved parameter names
840: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
841: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
842: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';
843: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
844: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
845: IF p_no = 1 THEN
846: -- Permit Header
847: pay_mag_tape.internal_prm_values(1) := 15; -- Changed for 4752018

Line 844: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';

840: pay_mag_tape.internal_prm_names(1) := 'NO_OF_PARAMETERS';
841: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
842: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TYPE1_ERRORS';
843: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
844: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
845: IF p_no = 1 THEN
846: -- Permit Header
847: pay_mag_tape.internal_prm_values(1) := 15; -- Changed for 4752018
848: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_HEADER');

Line 847: pay_mag_tape.internal_prm_values(1) := 15; -- Changed for 4752018

843: pay_mag_tape.internal_prm_names(4) := 'TRANSFER_TYPE2_ERRORS';
844: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
845: IF p_no = 1 THEN
846: -- Permit Header
847: pay_mag_tape.internal_prm_values(1) := 15; -- Changed for 4752018
848: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_HEADER');
849: ELSIF p_no = 2 THEN
850: -- Employee Header
851: pay_mag_tape.internal_prm_values(1) := 22; -- Changed for 4752018

Line 848: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_HEADER');

844: pay_mag_tape.internal_prm_names(5) := 'TRANSFER_CHAR_ERRORS';
845: IF p_no = 1 THEN
846: -- Permit Header
847: pay_mag_tape.internal_prm_values(1) := 15; -- Changed for 4752018
848: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_HEADER');
849: ELSIF p_no = 2 THEN
850: -- Employee Header
851: pay_mag_tape.internal_prm_values(1) := 22; -- Changed for 4752018
852: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_HEADER');

Line 851: pay_mag_tape.internal_prm_values(1) := 22; -- Changed for 4752018

847: pay_mag_tape.internal_prm_values(1) := 15; -- Changed for 4752018
848: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_HEADER');
849: ELSIF p_no = 2 THEN
850: -- Employee Header
851: pay_mag_tape.internal_prm_values(1) := 22; -- Changed for 4752018
852: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_HEADER');
853: ELSIF p_no = 3 THEN
854: -- Employee NI details
855: --pay_mag_tape.internal_prm_values(1) := 22; -- Changed for EOY 2006/7

Line 852: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_HEADER');

848: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_HEADER');
849: ELSIF p_no = 2 THEN
850: -- Employee Header
851: pay_mag_tape.internal_prm_values(1) := 22; -- Changed for 4752018
852: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_HEADER');
853: ELSIF p_no = 3 THEN
854: -- Employee NI details
855: --pay_mag_tape.internal_prm_values(1) := 22; -- Changed for EOY 2006/7
856: pay_mag_tape.internal_prm_values(1) := 23; -- Added one more parameter for EOY 07/08

Line 855: --pay_mag_tape.internal_prm_values(1) := 22; -- Changed for EOY 2006/7

851: pay_mag_tape.internal_prm_values(1) := 22; -- Changed for 4752018
852: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_HEADER');
853: ELSIF p_no = 3 THEN
854: -- Employee NI details
855: --pay_mag_tape.internal_prm_values(1) := 22; -- Changed for EOY 2006/7
856: pay_mag_tape.internal_prm_values(1) := 23; -- Added one more parameter for EOY 07/08
857: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_NI_DETAILS');
858: ELSIF p_no = 4 THEN
859: -- Employee Trailer

Line 856: pay_mag_tape.internal_prm_values(1) := 23; -- Added one more parameter for EOY 07/08

852: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_HEADER');
853: ELSIF p_no = 3 THEN
854: -- Employee NI details
855: --pay_mag_tape.internal_prm_values(1) := 22; -- Changed for EOY 2006/7
856: pay_mag_tape.internal_prm_values(1) := 23; -- Added one more parameter for EOY 07/08
857: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_NI_DETAILS');
858: ELSIF p_no = 4 THEN
859: -- Employee Trailer
860: --pay_mag_tape.internal_prm_values(1) := 31; -- Changed for EOY 2006/7

Line 857: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_NI_DETAILS');

853: ELSIF p_no = 3 THEN
854: -- Employee NI details
855: --pay_mag_tape.internal_prm_values(1) := 22; -- Changed for EOY 2006/7
856: pay_mag_tape.internal_prm_values(1) := 23; -- Added one more parameter for EOY 07/08
857: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_NI_DETAILS');
858: ELSIF p_no = 4 THEN
859: -- Employee Trailer
860: --pay_mag_tape.internal_prm_values(1) := 31; -- Changed for EOY 2006/7
861: pay_mag_tape.internal_prm_values(1) := 32; -- Changed for 6281170

Line 860: --pay_mag_tape.internal_prm_values(1) := 31; -- Changed for EOY 2006/7

856: pay_mag_tape.internal_prm_values(1) := 23; -- Added one more parameter for EOY 07/08
857: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_NI_DETAILS');
858: ELSIF p_no = 4 THEN
859: -- Employee Trailer
860: --pay_mag_tape.internal_prm_values(1) := 31; -- Changed for EOY 2006/7
861: pay_mag_tape.internal_prm_values(1) := 32; -- Changed for 6281170
862: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_TRAILER');
863: ELSIF p_no = 5 THEN
864: -- Permit Trailer

Line 861: pay_mag_tape.internal_prm_values(1) := 32; -- Changed for 6281170

857: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_NI_DETAILS');
858: ELSIF p_no = 4 THEN
859: -- Employee Trailer
860: --pay_mag_tape.internal_prm_values(1) := 31; -- Changed for EOY 2006/7
861: pay_mag_tape.internal_prm_values(1) := 32; -- Changed for 6281170
862: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_TRAILER');
863: ELSIF p_no = 5 THEN
864: -- Permit Trailer
865: pay_mag_tape.internal_prm_values(1) := 16; -- Changed for 4752018

Line 862: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_TRAILER');

858: ELSIF p_no = 4 THEN
859: -- Employee Trailer
860: --pay_mag_tape.internal_prm_values(1) := 31; -- Changed for EOY 2006/7
861: pay_mag_tape.internal_prm_values(1) := 32; -- Changed for 6281170
862: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_TRAILER');
863: ELSIF p_no = 5 THEN
864: -- Permit Trailer
865: pay_mag_tape.internal_prm_values(1) := 16; -- Changed for 4752018
866: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_TRAILER');

Line 865: pay_mag_tape.internal_prm_values(1) := 16; -- Changed for 4752018

861: pay_mag_tape.internal_prm_values(1) := 32; -- Changed for 6281170
862: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_TRAILER');
863: ELSIF p_no = 5 THEN
864: -- Permit Trailer
865: pay_mag_tape.internal_prm_values(1) := 16; -- Changed for 4752018
866: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_TRAILER');
867: ELSIF p_no = 6 THEN
868: -- File Trailer
869: pay_mag_tape.internal_prm_values(1) := 11;

Line 866: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_TRAILER');

862: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_EMP_TRAILER');
863: ELSIF p_no = 5 THEN
864: -- Permit Trailer
865: pay_mag_tape.internal_prm_values(1) := 16; -- Changed for 4752018
866: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_TRAILER');
867: ELSIF p_no = 6 THEN
868: -- File Trailer
869: pay_mag_tape.internal_prm_values(1) := 11;
870: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_FILE_TRAILER');

Line 869: pay_mag_tape.internal_prm_values(1) := 11;

865: pay_mag_tape.internal_prm_values(1) := 16; -- Changed for 4752018
866: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_TRAILER');
867: ELSIF p_no = 6 THEN
868: -- File Trailer
869: pay_mag_tape.internal_prm_values(1) := 11;
870: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_FILE_TRAILER');
871: ELSIF p_no = 7 THEN
872: -- Dummy EDI record
873: pay_mag_tape.internal_prm_values(1) := 3;

Line 870: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_FILE_TRAILER');

866: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_PERMIT_TRAILER');
867: ELSIF p_no = 6 THEN
868: -- File Trailer
869: pay_mag_tape.internal_prm_values(1) := 11;
870: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_FILE_TRAILER');
871: ELSIF p_no = 7 THEN
872: -- Dummy EDI record
873: pay_mag_tape.internal_prm_values(1) := 3;
874: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_DUMMY');

Line 873: pay_mag_tape.internal_prm_values(1) := 3;

869: pay_mag_tape.internal_prm_values(1) := 11;
870: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_FILE_TRAILER');
871: ELSIF p_no = 7 THEN
872: -- Dummy EDI record
873: pay_mag_tape.internal_prm_values(1) := 3;
874: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_DUMMY');
875: END IF;
876: -- Set parameter count to start at transfer_char_errors
877: g_record_index := 6;

Line 874: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_DUMMY');

870: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_FILE_TRAILER');
871: ELSIF p_no = 7 THEN
872: -- Dummy EDI record
873: pay_mag_tape.internal_prm_values(1) := 3;
874: pay_mag_tape.internal_prm_values(2) := get_formula_id('PAY_GB_EDI_P14_DUMMY');
875: END IF;
876: -- Set parameter count to start at transfer_char_errors
877: g_record_index := 6;
878: END;

Line 883: pay_mag_tape.internal_prm_names(g_record_index) := p_name;

879: PROCEDURE mag_tape_interface(p_name VARCHAR2
880: ,p_values VARCHAR2) IS
881: /* The interface to the magnetic tape writer process */
882: BEGIN
883: pay_mag_tape.internal_prm_names(g_record_index) := p_name;
884: pay_mag_tape.internal_prm_values(g_record_index) := p_values;
885: /* Inc the parameter table index */
886: g_record_index := g_record_index +1;
887: END;

Line 884: pay_mag_tape.internal_prm_values(g_record_index) := p_values;

880: ,p_values VARCHAR2) IS
881: /* The interface to the magnetic tape writer process */
882: BEGIN
883: pay_mag_tape.internal_prm_names(g_record_index) := p_name;
884: pay_mag_tape.internal_prm_values(g_record_index) := p_values;
885: /* Inc the parameter table index */
886: g_record_index := g_record_index +1;
887: END;
888: --

Line 893: pay_mag_tape.internal_prm_names(g_record_index) := p_name;

889: PROCEDURE mag_tape_interface(p_name VARCHAR2
890: ,p_values NUMBER) IS
891: /* The interface to the magnetic tape writer process */
892: BEGIN
893: pay_mag_tape.internal_prm_names(g_record_index) := p_name;
894: pay_mag_tape.internal_prm_values(g_record_index) := p_values;
895: g_record_index := g_record_index +1;
896: END;
897: --

Line 894: pay_mag_tape.internal_prm_values(g_record_index) := p_values;

890: ,p_values NUMBER) IS
891: /* The interface to the magnetic tape writer process */
892: BEGIN
893: pay_mag_tape.internal_prm_names(g_record_index) := p_name;
894: pay_mag_tape.internal_prm_values(g_record_index) := p_values;
895: g_record_index := g_record_index +1;
896: END;
897: --
898: PROCEDURE p_mag_form_clear(l_tab_index NUMBER) IS

Line 931: hr_utility.trace('no params: '||pay_mag_tape.internal_prm_values(1));

927: mag_tape_init(1);
928: END IF;
929: -- Pass the record fields as paramteres to the mag tape process
930: hr_utility.trace('Record type1 passed eoy_mode '||g_eoy_mode);
931: hr_utility.trace('no params: '||pay_mag_tape.internal_prm_values(1));
932: hr_utility.trace('formula id: '||pay_mag_tape.internal_prm_values(2));
933: hr_utility.trace('type1 errors: '||pay_mag_tape.internal_prm_values(3));
934: hr_utility.trace('type2 errors: '||pay_mag_tape.internal_prm_values(4));
935: hr_utility.trace('char errors: '||pay_mag_tape.internal_prm_values(5));

Line 932: hr_utility.trace('formula id: '||pay_mag_tape.internal_prm_values(2));

928: END IF;
929: -- Pass the record fields as paramteres to the mag tape process
930: hr_utility.trace('Record type1 passed eoy_mode '||g_eoy_mode);
931: hr_utility.trace('no params: '||pay_mag_tape.internal_prm_values(1));
932: hr_utility.trace('formula id: '||pay_mag_tape.internal_prm_values(2));
933: hr_utility.trace('type1 errors: '||pay_mag_tape.internal_prm_values(3));
934: hr_utility.trace('type2 errors: '||pay_mag_tape.internal_prm_values(4));
935: hr_utility.trace('char errors: '||pay_mag_tape.internal_prm_values(5));
936: hr_utility.trace('permit: '||g_new_permit_no);

Line 933: hr_utility.trace('type1 errors: '||pay_mag_tape.internal_prm_values(3));

929: -- Pass the record fields as paramteres to the mag tape process
930: hr_utility.trace('Record type1 passed eoy_mode '||g_eoy_mode);
931: hr_utility.trace('no params: '||pay_mag_tape.internal_prm_values(1));
932: hr_utility.trace('formula id: '||pay_mag_tape.internal_prm_values(2));
933: hr_utility.trace('type1 errors: '||pay_mag_tape.internal_prm_values(3));
934: hr_utility.trace('type2 errors: '||pay_mag_tape.internal_prm_values(4));
935: hr_utility.trace('char errors: '||pay_mag_tape.internal_prm_values(5));
936: hr_utility.trace('permit: '||g_new_permit_no);
937: hr_utility.trace('tax distr ref: '||g_tax_district_ref);

Line 934: hr_utility.trace('type2 errors: '||pay_mag_tape.internal_prm_values(4));

930: hr_utility.trace('Record type1 passed eoy_mode '||g_eoy_mode);
931: hr_utility.trace('no params: '||pay_mag_tape.internal_prm_values(1));
932: hr_utility.trace('formula id: '||pay_mag_tape.internal_prm_values(2));
933: hr_utility.trace('type1 errors: '||pay_mag_tape.internal_prm_values(3));
934: hr_utility.trace('type2 errors: '||pay_mag_tape.internal_prm_values(4));
935: hr_utility.trace('char errors: '||pay_mag_tape.internal_prm_values(5));
936: hr_utility.trace('permit: '||g_new_permit_no);
937: hr_utility.trace('tax distr ref: '||g_tax_district_ref);
938: hr_utility.trace('tax refno: '||g_tax_ref_no);

Line 935: hr_utility.trace('char errors: '||pay_mag_tape.internal_prm_values(5));

931: hr_utility.trace('no params: '||pay_mag_tape.internal_prm_values(1));
932: hr_utility.trace('formula id: '||pay_mag_tape.internal_prm_values(2));
933: hr_utility.trace('type1 errors: '||pay_mag_tape.internal_prm_values(3));
934: hr_utility.trace('type2 errors: '||pay_mag_tape.internal_prm_values(4));
935: hr_utility.trace('char errors: '||pay_mag_tape.internal_prm_values(5));
936: hr_utility.trace('permit: '||g_new_permit_no);
937: hr_utility.trace('tax distr ref: '||g_tax_district_ref);
938: hr_utility.trace('tax refno: '||g_tax_ref_no);
939: -- 4011263: hr_utility.trace('tax dist name: '||g_tax_district_name);

Line 1282: -- pay_mag_tape tables from position 1 onwards. When a row in the names

1278: BEGIN
1279: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',400);
1280: -- This loop is used to obtain all parameter values. The prerequisite to
1281: -- this functioning correctly is that rows are populated in the
1282: -- pay_mag_tape tables from position 1 onwards. When a row in the names
1283: -- table is not found, the loop exits by means of an exception.
1284: -- Also note that if a corresponding value is missing, the loop will exit.
1285: LOOP
1286: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',405);

Line 1289: hr_utility.trace('Name: '||pay_mag_tape.internal_prm_names(l_count));

1285: LOOP
1286: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',405);
1287: l_count := l_count + 1;
1288: hr_utility.trace(to_char(l_count));
1289: hr_utility.trace('Name: '||pay_mag_tape.internal_prm_names(l_count));
1290: hr_utility.trace('Value: '||pay_mag_tape.internal_prm_values(l_count));
1291: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'
1292: THEN
1293: l_payroll_action_id := pay_mag_tape.internal_prm_values(l_count);

Line 1290: hr_utility.trace('Value: '||pay_mag_tape.internal_prm_values(l_count));

1286: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',405);
1287: l_count := l_count + 1;
1288: hr_utility.trace(to_char(l_count));
1289: hr_utility.trace('Name: '||pay_mag_tape.internal_prm_names(l_count));
1290: hr_utility.trace('Value: '||pay_mag_tape.internal_prm_values(l_count));
1291: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'
1292: THEN
1293: l_payroll_action_id := pay_mag_tape.internal_prm_values(l_count);
1294: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'PERMIT' then

Line 1291: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'

1287: l_count := l_count + 1;
1288: hr_utility.trace(to_char(l_count));
1289: hr_utility.trace('Name: '||pay_mag_tape.internal_prm_names(l_count));
1290: hr_utility.trace('Value: '||pay_mag_tape.internal_prm_values(l_count));
1291: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'
1292: THEN
1293: l_payroll_action_id := pay_mag_tape.internal_prm_values(l_count);
1294: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'PERMIT' then
1295: -- p_permit_no := pay_mag_tape.internal_prm_values(l_count);

Line 1293: l_payroll_action_id := pay_mag_tape.internal_prm_values(l_count);

1289: hr_utility.trace('Name: '||pay_mag_tape.internal_prm_names(l_count));
1290: hr_utility.trace('Value: '||pay_mag_tape.internal_prm_values(l_count));
1291: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'
1292: THEN
1293: l_payroll_action_id := pay_mag_tape.internal_prm_values(l_count);
1294: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'PERMIT' then
1295: -- p_permit_no := pay_mag_tape.internal_prm_values(l_count);
1296: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'TAX_DISTRICT_REFERENCE' then
1297: -- p_tax_dist_ref := SUBSTR(pay_mag_tape.internal_prm_values(l_count),1,3);

Line 1294: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'PERMIT' then

1290: hr_utility.trace('Value: '||pay_mag_tape.internal_prm_values(l_count));
1291: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'
1292: THEN
1293: l_payroll_action_id := pay_mag_tape.internal_prm_values(l_count);
1294: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'PERMIT' then
1295: -- p_permit_no := pay_mag_tape.internal_prm_values(l_count);
1296: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'TAX_DISTRICT_REFERENCE' then
1297: -- p_tax_dist_ref := SUBSTR(pay_mag_tape.internal_prm_values(l_count),1,3);
1298: -- p_tax_ref_no := LTRIM(SUBSTR(pay_mag_tape.internal_prm_values(l_count),4), '/');

Line 1295: -- p_permit_no := pay_mag_tape.internal_prm_values(l_count);

1291: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'
1292: THEN
1293: l_payroll_action_id := pay_mag_tape.internal_prm_values(l_count);
1294: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'PERMIT' then
1295: -- p_permit_no := pay_mag_tape.internal_prm_values(l_count);
1296: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'TAX_DISTRICT_REFERENCE' then
1297: -- p_tax_dist_ref := SUBSTR(pay_mag_tape.internal_prm_values(l_count),1,3);
1298: -- p_tax_ref_no := LTRIM(SUBSTR(pay_mag_tape.internal_prm_values(l_count),4), '/');
1299: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TEST' THEN

Line 1296: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'TAX_DISTRICT_REFERENCE' then

1292: THEN
1293: l_payroll_action_id := pay_mag_tape.internal_prm_values(l_count);
1294: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'PERMIT' then
1295: -- p_permit_no := pay_mag_tape.internal_prm_values(l_count);
1296: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'TAX_DISTRICT_REFERENCE' then
1297: -- p_tax_dist_ref := SUBSTR(pay_mag_tape.internal_prm_values(l_count),1,3);
1298: -- p_tax_ref_no := LTRIM(SUBSTR(pay_mag_tape.internal_prm_values(l_count),4), '/');
1299: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TEST' THEN
1300: p_test_indicator := nvl(pay_mag_tape.internal_prm_values(l_count),'N');

Line 1297: -- p_tax_dist_ref := SUBSTR(pay_mag_tape.internal_prm_values(l_count),1,3);

1293: l_payroll_action_id := pay_mag_tape.internal_prm_values(l_count);
1294: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'PERMIT' then
1295: -- p_permit_no := pay_mag_tape.internal_prm_values(l_count);
1296: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'TAX_DISTRICT_REFERENCE' then
1297: -- p_tax_dist_ref := SUBSTR(pay_mag_tape.internal_prm_values(l_count),1,3);
1298: -- p_tax_ref_no := LTRIM(SUBSTR(pay_mag_tape.internal_prm_values(l_count),4), '/');
1299: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TEST' THEN
1300: p_test_indicator := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1301: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'UNIQUE_TEST_ID' THEN

Line 1298: -- p_tax_ref_no := LTRIM(SUBSTR(pay_mag_tape.internal_prm_values(l_count),4), '/');

1294: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'PERMIT' then
1295: -- p_permit_no := pay_mag_tape.internal_prm_values(l_count);
1296: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'TAX_DISTRICT_REFERENCE' then
1297: -- p_tax_dist_ref := SUBSTR(pay_mag_tape.internal_prm_values(l_count),1,3);
1298: -- p_tax_ref_no := LTRIM(SUBSTR(pay_mag_tape.internal_prm_values(l_count),4), '/');
1299: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TEST' THEN
1300: p_test_indicator := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1301: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'UNIQUE_TEST_ID' THEN
1302: p_unique_test_id := nvl(pay_mag_tape.internal_prm_values(l_count),'N');

Line 1299: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TEST' THEN

1295: -- p_permit_no := pay_mag_tape.internal_prm_values(l_count);
1296: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'TAX_DISTRICT_REFERENCE' then
1297: -- p_tax_dist_ref := SUBSTR(pay_mag_tape.internal_prm_values(l_count),1,3);
1298: -- p_tax_ref_no := LTRIM(SUBSTR(pay_mag_tape.internal_prm_values(l_count),4), '/');
1299: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TEST' THEN
1300: p_test_indicator := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1301: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'UNIQUE_TEST_ID' THEN
1302: p_unique_test_id := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1303: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'RETURN_TYPE' THEN

Line 1300: p_test_indicator := nvl(pay_mag_tape.internal_prm_values(l_count),'N');

1296: -- elsif pay_mag_tape.internal_prm_names(l_count) = 'TAX_DISTRICT_REFERENCE' then
1297: -- p_tax_dist_ref := SUBSTR(pay_mag_tape.internal_prm_values(l_count),1,3);
1298: -- p_tax_ref_no := LTRIM(SUBSTR(pay_mag_tape.internal_prm_values(l_count),4), '/');
1299: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TEST' THEN
1300: p_test_indicator := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1301: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'UNIQUE_TEST_ID' THEN
1302: p_unique_test_id := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1303: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'RETURN_TYPE' THEN
1304: p_return_type := nvl(pay_mag_tape.internal_prm_values(l_count),'N');

Line 1301: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'UNIQUE_TEST_ID' THEN

1297: -- p_tax_dist_ref := SUBSTR(pay_mag_tape.internal_prm_values(l_count),1,3);
1298: -- p_tax_ref_no := LTRIM(SUBSTR(pay_mag_tape.internal_prm_values(l_count),4), '/');
1299: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TEST' THEN
1300: p_test_indicator := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1301: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'UNIQUE_TEST_ID' THEN
1302: p_unique_test_id := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1303: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'RETURN_TYPE' THEN
1304: p_return_type := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1305: /* Start 4011263

Line 1302: p_unique_test_id := nvl(pay_mag_tape.internal_prm_values(l_count),'N');

1298: -- p_tax_ref_no := LTRIM(SUBSTR(pay_mag_tape.internal_prm_values(l_count),4), '/');
1299: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TEST' THEN
1300: p_test_indicator := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1301: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'UNIQUE_TEST_ID' THEN
1302: p_unique_test_id := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1303: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'RETURN_TYPE' THEN
1304: p_return_type := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1305: /* Start 4011263
1306: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'URGENT' THEN

Line 1303: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'RETURN_TYPE' THEN

1299: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TEST' THEN
1300: p_test_indicator := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1301: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'UNIQUE_TEST_ID' THEN
1302: p_unique_test_id := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1303: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'RETURN_TYPE' THEN
1304: p_return_type := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1305: /* Start 4011263
1306: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'URGENT' THEN
1307: p_urgent_marker := nvl(pay_mag_tape.internal_prm_values(l_count),'N');

Line 1304: p_return_type := nvl(pay_mag_tape.internal_prm_values(l_count),'N');

1300: p_test_indicator := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1301: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'UNIQUE_TEST_ID' THEN
1302: p_unique_test_id := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1303: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'RETURN_TYPE' THEN
1304: p_return_type := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1305: /* Start 4011263
1306: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'URGENT' THEN
1307: p_urgent_marker := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1308: End 4011263 */

Line 1306: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'URGENT' THEN

1302: p_unique_test_id := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1303: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'RETURN_TYPE' THEN
1304: p_return_type := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1305: /* Start 4011263
1306: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'URGENT' THEN
1307: p_urgent_marker := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1308: End 4011263 */
1309: END IF;
1310: --

Line 1307: p_urgent_marker := nvl(pay_mag_tape.internal_prm_values(l_count),'N');

1303: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'RETURN_TYPE' THEN
1304: p_return_type := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1305: /* Start 4011263
1306: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'URGENT' THEN
1307: p_urgent_marker := nvl(pay_mag_tape.internal_prm_values(l_count),'N');
1308: End 4011263 */
1309: END IF;
1310: --
1311: END LOOP;

Line 1463: pay_mag_tape.internal_prm_values(3) := 0;

1459: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',27);
1460: --
1461: -- First time in so clear the error type counts
1462: --
1463: pay_mag_tape.internal_prm_values(3) := 0;
1464: pay_mag_tape.internal_prm_values(4) := 0;
1465: pay_mag_tape.internal_prm_values(5) := 0;
1466: OPEN header_cur(g_payroll_action_id);
1467: END IF;

Line 1464: pay_mag_tape.internal_prm_values(4) := 0;

1460: --
1461: -- First time in so clear the error type counts
1462: --
1463: pay_mag_tape.internal_prm_values(3) := 0;
1464: pay_mag_tape.internal_prm_values(4) := 0;
1465: pay_mag_tape.internal_prm_values(5) := 0;
1466: OPEN header_cur(g_payroll_action_id);
1467: END IF;
1468: IF NOT(permit_change) THEN

Line 1465: pay_mag_tape.internal_prm_values(5) := 0;

1461: -- First time in so clear the error type counts
1462: --
1463: pay_mag_tape.internal_prm_values(3) := 0;
1464: pay_mag_tape.internal_prm_values(4) := 0;
1465: pay_mag_tape.internal_prm_values(5) := 0;
1466: OPEN header_cur(g_payroll_action_id);
1467: END IF;
1468: IF NOT(permit_change) THEN
1469: -- Get record from EOY table as next record

Line 1483: pay_mag_tape.internal_cxt_names(1) := 'NUMBER_OF_CONTEXT';

1479: -- Call formula to error payroll.
1480: mag_tape_init(7);
1481: mag_tape_interface('L_PAYROLL_ACTION_ID',to_char(g_payroll_action_id));
1482: hr_utility.trace('after mag tape interface calls');
1483: pay_mag_tape.internal_cxt_names(1) := 'NUMBER_OF_CONTEXT';
1484: pay_mag_tape.internal_cxt_values(1) := '2';
1485: pay_mag_tape.internal_cxt_names(2) := 'PAYROLL_ACTION_ID';
1486: pay_mag_tape.internal_cxt_values(2) := to_char(g_payroll_action_id);
1487: hr_utility.trace('after cxt calls: '||pay_mag_tape.internal_cxt_values(2));

Line 1484: pay_mag_tape.internal_cxt_values(1) := '2';

1480: mag_tape_init(7);
1481: mag_tape_interface('L_PAYROLL_ACTION_ID',to_char(g_payroll_action_id));
1482: hr_utility.trace('after mag tape interface calls');
1483: pay_mag_tape.internal_cxt_names(1) := 'NUMBER_OF_CONTEXT';
1484: pay_mag_tape.internal_cxt_values(1) := '2';
1485: pay_mag_tape.internal_cxt_names(2) := 'PAYROLL_ACTION_ID';
1486: pay_mag_tape.internal_cxt_values(2) := to_char(g_payroll_action_id);
1487: hr_utility.trace('after cxt calls: '||pay_mag_tape.internal_cxt_values(2));
1488: ELSE

Line 1485: pay_mag_tape.internal_cxt_names(2) := 'PAYROLL_ACTION_ID';

1481: mag_tape_interface('L_PAYROLL_ACTION_ID',to_char(g_payroll_action_id));
1482: hr_utility.trace('after mag tape interface calls');
1483: pay_mag_tape.internal_cxt_names(1) := 'NUMBER_OF_CONTEXT';
1484: pay_mag_tape.internal_cxt_values(1) := '2';
1485: pay_mag_tape.internal_cxt_names(2) := 'PAYROLL_ACTION_ID';
1486: pay_mag_tape.internal_cxt_values(2) := to_char(g_payroll_action_id);
1487: hr_utility.trace('after cxt calls: '||pay_mag_tape.internal_cxt_values(2));
1488: ELSE
1489: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',28);

Line 1486: pay_mag_tape.internal_cxt_values(2) := to_char(g_payroll_action_id);

1482: hr_utility.trace('after mag tape interface calls');
1483: pay_mag_tape.internal_cxt_names(1) := 'NUMBER_OF_CONTEXT';
1484: pay_mag_tape.internal_cxt_values(1) := '2';
1485: pay_mag_tape.internal_cxt_names(2) := 'PAYROLL_ACTION_ID';
1486: pay_mag_tape.internal_cxt_values(2) := to_char(g_payroll_action_id);
1487: hr_utility.trace('after cxt calls: '||pay_mag_tape.internal_cxt_values(2));
1488: ELSE
1489: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',28);
1490: -- No errors so fetch header info.

Line 1487: hr_utility.trace('after cxt calls: '||pay_mag_tape.internal_cxt_values(2));

1483: pay_mag_tape.internal_cxt_names(1) := 'NUMBER_OF_CONTEXT';
1484: pay_mag_tape.internal_cxt_values(1) := '2';
1485: pay_mag_tape.internal_cxt_names(2) := 'PAYROLL_ACTION_ID';
1486: pay_mag_tape.internal_cxt_values(2) := to_char(g_payroll_action_id);
1487: hr_utility.trace('after cxt calls: '||pay_mag_tape.internal_cxt_values(2));
1488: ELSE
1489: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',28);
1490: -- No errors so fetch header info.
1491: FETCH header_cur INTO g_new_permit_no

Line 2347: l_type2_errors := to_number(pay_mag_tape.internal_prm_values(4));

2343: --
2344: --
2345: submit_recon_report(p_payroll_action_id => g_payroll_action_id,
2346: p_p35_req_id => l_p35_req_id);
2347: l_type2_errors := to_number(pay_mag_tape.internal_prm_values(4));
2348: l_type1_errors := to_number(pay_mag_tape.internal_prm_values(3));
2349: l_char_errors := to_number(pay_mag_tape.internal_prm_values(5));
2350: l_loc_per := to_number(g_tot_rec2)/200; -- Half percent.
2351: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',600);

Line 2348: l_type1_errors := to_number(pay_mag_tape.internal_prm_values(3));

2344: --
2345: submit_recon_report(p_payroll_action_id => g_payroll_action_id,
2346: p_p35_req_id => l_p35_req_id);
2347: l_type2_errors := to_number(pay_mag_tape.internal_prm_values(4));
2348: l_type1_errors := to_number(pay_mag_tape.internal_prm_values(3));
2349: l_char_errors := to_number(pay_mag_tape.internal_prm_values(5));
2350: l_loc_per := to_number(g_tot_rec2)/200; -- Half percent.
2351: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',600);
2352: --

Line 2349: l_char_errors := to_number(pay_mag_tape.internal_prm_values(5));

2345: submit_recon_report(p_payroll_action_id => g_payroll_action_id,
2346: p_p35_req_id => l_p35_req_id);
2347: l_type2_errors := to_number(pay_mag_tape.internal_prm_values(4));
2348: l_type1_errors := to_number(pay_mag_tape.internal_prm_values(3));
2349: l_char_errors := to_number(pay_mag_tape.internal_prm_values(5));
2350: l_loc_per := to_number(g_tot_rec2)/200; -- Half percent.
2351: hr_utility.set_location('pay_gb_eoy_magtape.eoy_control',600);
2352: --
2353: -- Check for type 1 and type 2 errors. Similar to MAG_RECORD5 checks.