[Home] [Help]
445: l_request_id := FND_GLOBAL.CONC_REQUEST_ID;
446: retcode := 1;
447: -- Bug 5724436, the audit report will be called only in mode="Validate"
448: IF p_validate_mode <> 'IE_VALIDATE' THEN
449: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11, ' ')||lpad('Works Number',15,' ')||lpad('Status',30,' ')); --4878630
450: fnd_file.put_line(fnd_file.output,lpad('----------',11, ' ')||lpad('------------',15,' ')||lpad('------',30,' '));
451: ELSE
452: -- bug 5724436
453: -- This is called only once to set the report fields.
446: retcode := 1;
447: -- Bug 5724436, the audit report will be called only in mode="Validate"
448: IF p_validate_mode <> 'IE_VALIDATE' THEN
449: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11, ' ')||lpad('Works Number',15,' ')||lpad('Status',30,' ')); --4878630
450: fnd_file.put_line(fnd_file.output,lpad('----------',11, ' ')||lpad('------------',15,' ')||lpad('------',30,' '));
451: ELSE
452: -- bug 5724436
453: -- This is called only once to set the report fields.
454: fnd_file.put_line(fnd_file.output,'Index');
450: fnd_file.put_line(fnd_file.output,lpad('----------',11, ' ')||lpad('------------',15,' ')||lpad('------',30,' '));
451: ELSE
452: -- bug 5724436
453: -- This is called only once to set the report fields.
454: fnd_file.put_line(fnd_file.output,'Index');
455: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
456: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
457: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
458: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
451: ELSE
452: -- bug 5724436
453: -- This is called only once to set the report fields.
454: fnd_file.put_line(fnd_file.output,'Index');
455: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
456: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
457: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
458: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
459: fnd_file.put_line(fnd_file.output,'U :- USC Exemption Flag');
452: -- bug 5724436
453: -- This is called only once to set the report fields.
454: fnd_file.put_line(fnd_file.output,'Index');
455: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
456: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
457: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
458: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
459: fnd_file.put_line(fnd_file.output,'U :- USC Exemption Flag');
460: fnd_file.put_line(fnd_file.output,' ');
453: -- This is called only once to set the report fields.
454: fnd_file.put_line(fnd_file.output,'Index');
455: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
456: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
457: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
458: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
459: fnd_file.put_line(fnd_file.output,'U :- USC Exemption Flag');
460: fnd_file.put_line(fnd_file.output,' ');
461:
454: fnd_file.put_line(fnd_file.output,'Index');
455: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
456: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
457: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
458: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
459: fnd_file.put_line(fnd_file.output,'U :- USC Exemption Flag');
460: fnd_file.put_line(fnd_file.output,' ');
461:
462: fnd_file.put_line(fnd_file.output,lpad('PAYE, USC Details in Oracle Payroll',70,' ')||lpad('PAYE, USC Details from Revenue',191,' '));
455: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
456: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
457: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
458: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
459: fnd_file.put_line(fnd_file.output,'U :- USC Exemption Flag');
460: fnd_file.put_line(fnd_file.output,' ');
461:
462: fnd_file.put_line(fnd_file.output,lpad('PAYE, USC Details in Oracle Payroll',70,' ')||lpad('PAYE, USC Details from Revenue',191,' '));
463: fnd_file.put_line(fnd_file.output,lpad('===================================',70,' ')||lpad('==============================',191,' '));
456: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
457: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
458: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
459: fnd_file.put_line(fnd_file.output,'U :- USC Exemption Flag');
460: fnd_file.put_line(fnd_file.output,' ');
461:
462: fnd_file.put_line(fnd_file.output,lpad('PAYE, USC Details in Oracle Payroll',70,' ')||lpad('PAYE, USC Details from Revenue',191,' '));
463: fnd_file.put_line(fnd_file.output,lpad('===================================',70,' ')||lpad('==============================',191,' '));
464: fnd_file.put_line(fnd_file.output,' ');
458: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
459: fnd_file.put_line(fnd_file.output,'U :- USC Exemption Flag');
460: fnd_file.put_line(fnd_file.output,' ');
461:
462: fnd_file.put_line(fnd_file.output,lpad('PAYE, USC Details in Oracle Payroll',70,' ')||lpad('PAYE, USC Details from Revenue',191,' '));
463: fnd_file.put_line(fnd_file.output,lpad('===================================',70,' ')||lpad('==============================',191,' '));
464: fnd_file.put_line(fnd_file.output,' ');
465: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11,' ')
466: -- for previous PAYE Details
459: fnd_file.put_line(fnd_file.output,'U :- USC Exemption Flag');
460: fnd_file.put_line(fnd_file.output,' ');
461:
462: fnd_file.put_line(fnd_file.output,lpad('PAYE, USC Details in Oracle Payroll',70,' ')||lpad('PAYE, USC Details from Revenue',191,' '));
463: fnd_file.put_line(fnd_file.output,lpad('===================================',70,' ')||lpad('==============================',191,' '));
464: fnd_file.put_line(fnd_file.output,' ');
465: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11,' ')
466: -- for previous PAYE Details
467: || lpad('Works',13,' ')
460: fnd_file.put_line(fnd_file.output,' ');
461:
462: fnd_file.put_line(fnd_file.output,lpad('PAYE, USC Details in Oracle Payroll',70,' ')||lpad('PAYE, USC Details from Revenue',191,' '));
463: fnd_file.put_line(fnd_file.output,lpad('===================================',70,' ')||lpad('==============================',191,' '));
464: fnd_file.put_line(fnd_file.output,' ');
465: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11,' ')
466: -- for previous PAYE Details
467: || lpad('Works',13,' ')
468: || lpad('Last Name',16,' ')
461:
462: fnd_file.put_line(fnd_file.output,lpad('PAYE, USC Details in Oracle Payroll',70,' ')||lpad('PAYE, USC Details from Revenue',191,' '));
463: fnd_file.put_line(fnd_file.output,lpad('===================================',70,' ')||lpad('==============================',191,' '));
464: fnd_file.put_line(fnd_file.output,' ');
465: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11,' ')
466: -- for previous PAYE Details
467: || lpad('Works',13,' ')
468: || lpad('Last Name',16,' ')
469: || lpad('I',3,' ')||lpad('F',3,' ')
485: ||lpad('Tot USC',14,' ')||lpad('Tot USC',13,' ')
486: || lpad('USC',7,' ')||lpad('USC',7,' ')||lpad('USC',7,' ')
487: );
488:
489: fnd_file.put_line(fnd_file.output, lpad('Number',24,' ')
490: || lpad('Cutoff',30,' ')||lpad('Credit',9,' ')
491: || lpad('Cutoff',10,' ')||lpad('Credit',10,' ')
492: || lpad('Date',10,' ')||lpad('to Date',15,' ')
493: || lpad('to Date',12,' ')||lpad('Cutoff1',24,' ')||lpad('Cutoff1',9,' ')||lpad('Cutoff2',9,' ')||lpad('Cutoff2',9,' ')
502: ||lpad('pay to Date',14,' ')||lpad('Tax to Date',13,' ')
503: || lpad('Rate1',7,' ')||lpad('Rate2',7,' ')||lpad('Rate3',7,' ')
504: );
505:
506: fnd_file.put_line(fnd_file.output,lpad('----------',11,' ')
507: -- for previous PAYE Details
508: || lpad('----------',13,' ')
509: || lpad('---------',16,' ')
510: || lpad('-',3,' ')||lpad('-',3,' ')
556: --end of bug 6376140
557:
558:
559: -- Bug 6929566 Start
560: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_date is ' || r_pay.cert_date);
561: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_start_date is ' || r_pay.cert_start_date);
562: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_end_date is ' || r_pay.cert_end_date);
563: IF r_pay.cert_date < r_pay.cert_start_date THEN
564: l_effective_date := r_pay.cert_start_date;
557:
558:
559: -- Bug 6929566 Start
560: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_date is ' || r_pay.cert_date);
561: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_start_date is ' || r_pay.cert_start_date);
562: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_end_date is ' || r_pay.cert_end_date);
563: IF r_pay.cert_date < r_pay.cert_start_date THEN
564: l_effective_date := r_pay.cert_start_date;
565: ELSIF r_pay.cert_date >= r_pay.cert_start_date THEN
558:
559: -- Bug 6929566 Start
560: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_date is ' || r_pay.cert_date);
561: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_start_date is ' || r_pay.cert_start_date);
562: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_end_date is ' || r_pay.cert_end_date);
563: IF r_pay.cert_date < r_pay.cert_start_date THEN
564: l_effective_date := r_pay.cert_start_date;
565: ELSIF r_pay.cert_date >= r_pay.cert_start_date THEN
566: l_effective_date := r_pay.cert_date;
564: l_effective_date := r_pay.cert_start_date;
565: ELSIF r_pay.cert_date >= r_pay.cert_start_date THEN
566: l_effective_date := r_pay.cert_date;
567: END IF;
568: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'l_effective_date is ' || l_effective_date);
569: --
570: -- Bug 6929566 End
571:
572: --FOR r_pay IN c_pay
591: --ppsno_cnt := ppsno_cnt+1;
592: IF l_pps_number_hr IS NOT NULL THEN
593: ppsno_cnt := ppsno_cnt+1;
594: l_pps_number(ppsno_cnt) :=r_pay.pps_number_hr;
595: --fnd_file.put_line(l_pps_number(ppsno_cnt));
596: hr_utility.set_location('PPS Number..'||l_pps_number_hr,420);
597: -- checks for standard rate tax to be mandatory
598: IF l_std_rate_of_tax IS NULL THEN
599: raise std_rate_of_tax_is_null;
864: WHERE pps_number = r_pay.pps_number_int;
865: END IF;
866: hr_utility.set_location('Assignment Number..'||r_pay.employee_no_int,107);
867: IF p_validate_mode <> 'IE_VALIDATE' THEN
868: fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Success');
869: ELSE
870: IF g_validate_count =1 then
871: hr_utility.set_location('PPS Number..Second check'||l_pps_number_hr,841);
872: hr_utility.set_location('Assignment Number..'||r_pay.employee_no_int,108);
997: --13359423
998:
999: END IF;
1000: -- print the values.
1001: fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')
1002: -- for previous PAYE Details
1003: || lpad(substr(r_pay.employee_no_int,1,12),13,' ')
1004: || lpad(substr(r_pay.last_name_hr,1,15),16,' ')
1005: || lpad(pay_ie_paye_pkg.decode_value_char(r_paye_details.tax_basis='IE_WEEK1_MONTH1','1','0'),3,' ')
1039: -- Bug Fix 3500192
1040: -- WHEN name_not_equal THEN
1041: -- l_error := SQLERRM;
1042: -- retcode := 1;
1043: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
1044: -- FND_FILE.PUT_LINE(fnd_file.log, 'The first name and last name in the interface body table does not match
1045: -- the first and last name in the payroll tables');
1046: --
1047: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
1040: -- WHEN name_not_equal THEN
1041: -- l_error := SQLERRM;
1042: -- retcode := 1;
1043: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
1044: -- FND_FILE.PUT_LINE(fnd_file.log, 'The first name and last name in the interface body table does not match
1045: -- the first and last name in the payroll tables');
1046: --
1047: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
1048: -- FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1043: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
1044: -- FND_FILE.PUT_LINE(fnd_file.log, 'The first name and last name in the interface body table does not match
1045: -- the first and last name in the payroll tables');
1046: --
1047: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
1048: -- FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1049: -- r_pay.employee_no_hr ||', '||
1050: -- r_pay.last_name_hr ||' '||
1051: -- r_pay.first_name_hr ||', '||
1044: -- FND_FILE.PUT_LINE(fnd_file.log, 'The first name and last name in the interface body table does not match
1045: -- the first and last name in the payroll tables');
1046: --
1047: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
1048: -- FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1049: -- r_pay.employee_no_hr ||', '||
1050: -- r_pay.last_name_hr ||' '||
1051: -- r_pay.first_name_hr ||', '||
1052: -- r_pay.last_name_int ||' '||
1078: --
1079: -- WHEN same_day THEN
1080: -- l_error := SQLERRM;
1081: -- retcode := 1;
1082: -- FND_FILE.PUT_LINE(fnd_file.log, 'This record has already been updated today with changes to the
1083: -- PAY_IE_PAYE_DETAILS_F table');
1084: --
1085: --
1086: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
1082: -- FND_FILE.PUT_LINE(fnd_file.log, 'This record has already been updated today with changes to the
1083: -- PAY_IE_PAYE_DETAILS_F table');
1084: --
1085: --
1086: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
1087: -- FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1088: -- r_pay.employee_no_hr ||', '||
1089: -- r_pay.last_name_hr ||' '||
1090: -- r_pay.first_name_hr ||', '||
1083: -- PAY_IE_PAYE_DETAILS_F table');
1084: --
1085: --
1086: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
1087: -- FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1088: -- r_pay.employee_no_hr ||', '||
1089: -- r_pay.last_name_hr ||' '||
1090: -- r_pay.first_name_hr ||', '||
1091: -- r_pay.ppd_effective_start_date ||', '||
1116:
1117: /*WHEN future_day THEN
1118: l_error := SQLERRM;
1119: retcode := 1;
1120: FND_FILE.PUT_LINE(fnd_file.log, 'This record has been updated to a future date');
1121:
1122: FND_FILE.NEW_LINE(fnd_file.log, 1);
1123: FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1124: r_pay.employee_no_hr ||', '||
1118: l_error := SQLERRM;
1119: retcode := 1;
1120: FND_FILE.PUT_LINE(fnd_file.log, 'This record has been updated to a future date');
1121:
1122: FND_FILE.NEW_LINE(fnd_file.log, 1);
1123: FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1124: r_pay.employee_no_hr ||', '||
1125: r_pay.last_name_hr ||' '||
1126: r_pay.first_name_hr ||', '||
1119: retcode := 1;
1120: FND_FILE.PUT_LINE(fnd_file.log, 'This record has been updated to a future date');
1121:
1122: FND_FILE.NEW_LINE(fnd_file.log, 1);
1123: FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1124: r_pay.employee_no_hr ||', '||
1125: r_pay.last_name_hr ||' '||
1126: r_pay.first_name_hr ||', '||
1127: r_pay.payroll_name_hr
1150:
1151: WHEN std_rate_of_tax_is_null THEN
1152: l_error := 'Standard Rate of Tax cannot be Null';--SQLERRM;
1153: retcode := 1;
1154: FND_FILE.PUT_LINE(fnd_file.log, 'Standard Rate of Tax cannot be Null');
1155:
1156: FND_FILE.NEW_LINE(fnd_file.log, 1);
1157: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1158: r_pay.employee_no_hr ||', '||
1152: l_error := 'Standard Rate of Tax cannot be Null';--SQLERRM;
1153: retcode := 1;
1154: FND_FILE.PUT_LINE(fnd_file.log, 'Standard Rate of Tax cannot be Null');
1155:
1156: FND_FILE.NEW_LINE(fnd_file.log, 1);
1157: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1158: r_pay.employee_no_hr ||', '||
1159: r_pay.last_name_hr ||' '||
1160: r_pay.first_name_hr ||', '||
1153: retcode := 1;
1154: FND_FILE.PUT_LINE(fnd_file.log, 'Standard Rate of Tax cannot be Null');
1155:
1156: FND_FILE.NEW_LINE(fnd_file.log, 1);
1157: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1158: r_pay.employee_no_hr ||', '||
1159: r_pay.last_name_hr ||' '||
1160: r_pay.first_name_hr ||', '||
1161: r_pay.payroll_name_hr
1165: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
1166: l_err_tab(err_cnt).p_err_msg := 'Failed : Standard Rate of Tax cannot be Null';
1167: err_cnt := err_cnt + 1;
1168: --ELSE
1169: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : Standard Rate of Tax cannot be Null');
1170: --END IF;
1171: -- The exception details are written to an error table
1172:
1173: INSERT INTO pay_ie_tax_error ( pps_number
1192:
1193: WHEN higher_rate_of_tax_is_null THEN
1194: l_error := 'Higher Rate of Tax cannot be Null';--SQLERRM;
1195: retcode := 1;
1196: FND_FILE.PUT_LINE(fnd_file.log, 'Higher Rate of Tax cannot be Null');
1197:
1198: FND_FILE.NEW_LINE(fnd_file.log, 1);
1199: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1200: r_pay.employee_no_hr ||', '||
1194: l_error := 'Higher Rate of Tax cannot be Null';--SQLERRM;
1195: retcode := 1;
1196: FND_FILE.PUT_LINE(fnd_file.log, 'Higher Rate of Tax cannot be Null');
1197:
1198: FND_FILE.NEW_LINE(fnd_file.log, 1);
1199: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1200: r_pay.employee_no_hr ||', '||
1201: r_pay.last_name_hr ||' '||
1202: r_pay.first_name_hr ||', '||
1195: retcode := 1;
1196: FND_FILE.PUT_LINE(fnd_file.log, 'Higher Rate of Tax cannot be Null');
1197:
1198: FND_FILE.NEW_LINE(fnd_file.log, 1);
1199: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1200: r_pay.employee_no_hr ||', '||
1201: r_pay.last_name_hr ||' '||
1202: r_pay.first_name_hr ||', '||
1203: r_pay.payroll_name_hr
1208: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
1209: l_err_tab(err_cnt).p_err_msg := 'Failed : Higher Rate of Tax cannot be Null';
1210: err_cnt := err_cnt + 1;
1211: --ELSE
1212: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : Higher Rate of Tax cannot be Null');
1213: --END IF;
1214:
1215: -- The exception details are written to an error table
1216: INSERT INTO pay_ie_tax_error ( pps_number
1236: WHEN exemption_is_null THEN
1237:
1238: l_error := 'Exemption Indicator cannot be Null';--SQLERRM;
1239: retcode := 1;
1240: FND_FILE.PUT_LINE(fnd_file.log, 'Exemption Indicator cannot be Null');
1241:
1242: FND_FILE.NEW_LINE(fnd_file.log, 1);
1243: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1244: r_pay.employee_no_hr ||', '||
1238: l_error := 'Exemption Indicator cannot be Null';--SQLERRM;
1239: retcode := 1;
1240: FND_FILE.PUT_LINE(fnd_file.log, 'Exemption Indicator cannot be Null');
1241:
1242: FND_FILE.NEW_LINE(fnd_file.log, 1);
1243: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1244: r_pay.employee_no_hr ||', '||
1245: r_pay.last_name_hr ||' '||
1246: r_pay.first_name_hr ||', '||
1239: retcode := 1;
1240: FND_FILE.PUT_LINE(fnd_file.log, 'Exemption Indicator cannot be Null');
1241:
1242: FND_FILE.NEW_LINE(fnd_file.log, 1);
1243: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1244: r_pay.employee_no_hr ||', '||
1245: r_pay.last_name_hr ||' '||
1246: r_pay.first_name_hr ||', '||
1247: r_pay.payroll_name_hr
1252: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
1253: l_err_tab(err_cnt).p_err_msg := 'Failed : Exemption Indicator cannot be Null';
1254: err_cnt := err_cnt + 1;
1255: --ELSE
1256: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : Exemption Indicator cannot be Null');
1257: --END IF;
1258:
1259: -- The exception details are written to an error table
1260: INSERT INTO pay_ie_tax_error ( pps_number
1279:
1280: WHEN exemption_mismatch THEN
1281: l_error := 'The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%';--SQLERRM;
1282: retcode := 1;
1283: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%');
1284:
1285: FND_FILE.NEW_LINE(fnd_file.log, 1);
1286: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1287: r_pay.employee_no_hr ||', '||
1281: l_error := 'The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%';--SQLERRM;
1282: retcode := 1;
1283: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%');
1284:
1285: FND_FILE.NEW_LINE(fnd_file.log, 1);
1286: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1287: r_pay.employee_no_hr ||', '||
1288: r_pay.last_name_hr ||' '||
1289: r_pay.first_name_hr ||', '||
1282: retcode := 1;
1283: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%');
1284:
1285: FND_FILE.NEW_LINE(fnd_file.log, 1);
1286: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1287: r_pay.employee_no_hr ||', '||
1288: r_pay.last_name_hr ||' '||
1289: r_pay.first_name_hr ||', '||
1290: r_pay.payroll_name_hr
1295: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
1296: l_err_tab(err_cnt).p_err_msg := 'Failed : The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%';
1297: err_cnt := err_cnt + 1;
1298: --ELSE
1299: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%');
1300: --END IF;
1301:
1302: -- The exception details are written to an error table
1303: INSERT INTO pay_ie_tax_error ( pps_number
1322:
1323: WHEN normal_tax_mismatch THEN
1324: l_error := 'The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%';--SQLERRM;
1325: retcode := 1;
1326: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%');
1327:
1328: FND_FILE.NEW_LINE(fnd_file.log, 1);
1329: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1330: r_pay.employee_no_hr ||', '||
1324: l_error := 'The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%';--SQLERRM;
1325: retcode := 1;
1326: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%');
1327:
1328: FND_FILE.NEW_LINE(fnd_file.log, 1);
1329: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1330: r_pay.employee_no_hr ||', '||
1331: r_pay.last_name_hr ||' '||
1332: r_pay.first_name_hr ||', '||
1325: retcode := 1;
1326: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%');
1327:
1328: FND_FILE.NEW_LINE(fnd_file.log, 1);
1329: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1330: r_pay.employee_no_hr ||', '||
1331: r_pay.last_name_hr ||' '||
1332: r_pay.first_name_hr ||', '||
1333: r_pay.payroll_name_hr
1338: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
1339: l_err_tab(err_cnt).p_err_msg := 'Failed : The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%';
1340: err_cnt := err_cnt + 1;
1341: --ELSE
1342: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%');
1343: --END IF;
1344:
1345: -- The exception details are written to an error table
1346: INSERT INTO pay_ie_tax_error ( pps_number
1365:
1366: WHEN pay_to_date THEN
1367: l_error := 'Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis.';--SQLERRM;
1368: retcode := 1;
1369: FND_FILE.PUT_LINE(fnd_file.log, 'Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis.');
1370:
1371: FND_FILE.NEW_LINE(fnd_file.log, 1);
1372: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1373: r_pay.employee_no_hr ||', '||
1367: l_error := 'Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis.';--SQLERRM;
1368: retcode := 1;
1369: FND_FILE.PUT_LINE(fnd_file.log, 'Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis.');
1370:
1371: FND_FILE.NEW_LINE(fnd_file.log, 1);
1372: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1373: r_pay.employee_no_hr ||', '||
1374: r_pay.last_name_hr ||' '||
1375: r_pay.first_name_hr ||', '||
1368: retcode := 1;
1369: FND_FILE.PUT_LINE(fnd_file.log, 'Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis.');
1370:
1371: FND_FILE.NEW_LINE(fnd_file.log, 1);
1372: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1373: r_pay.employee_no_hr ||', '||
1374: r_pay.last_name_hr ||' '||
1375: r_pay.first_name_hr ||', '||
1376: r_pay.payroll_name_hr
1381: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
1382: l_err_tab(err_cnt).p_err_msg := 'Failed : Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis';
1383: err_cnt := err_cnt + 1;
1384: --ELSE
1385: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis');
1386: --END IF;
1387:
1388: -- The exception details are written to an error table
1389: INSERT INTO pay_ie_tax_error ( pps_number
1420: WHERE pps_number = r_pay.pps_number_int;
1421: END IF;
1422: -- The following command will be used to output the exception details to an output file:
1423:
1424: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
1425: r_pay.pps_number_int ||', '||
1426: r_pay.employee_no_hr ||', '||
1427: r_pay.pps_number_int ||', '||
1428: r_pay.last_name_hr ||' '||
1436: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
1437: l_err_tab(err_cnt).p_err_msg := 'Failed : '||l_error;
1438: err_cnt := err_cnt + 1;
1439: --ELSE
1440: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : '||l_error);
1441: --END IF;
1442: -- The exception details are written to an error table
1443:
1444: INSERT INTO pay_ie_tax_error ( pps_number
1470:
1471: IF l_err_tab.COUNT <> 0 then
1472: for i in l_err_tab.first..l_err_tab.last
1473: loop
1474: fnd_file.put_line(fnd_file.output,lpad(l_err_tab(i).p_pps_number,11,' ')||lpad(l_err_tab(i).p_works_number,13,' ')||lpad(' ',20,' ')||l_err_tab(i).p_err_msg);
1475: end loop;
1476: END IF;
1477: --bug 6376140
1478: /* for i in csr_skipped_asg
1476: END IF;
1477: --bug 6376140
1478: /* for i in csr_skipped_asg
1479: loop
1480: fnd_file.put_line(fnd_file.output,lpad(i.pps_number,11,' ')||lpad(i.works_number,13,' ')||lpad(' ',20,' ') || 'Please check the employee''s works number and/or PPS number');
1481: end loop;
1482: */
1483: FOR i in csr_skipped_assignments
1484: LOOP
1495: IF flag='N' THEN
1496: -- open check_pps(i.pps_number);
1497: -- FETCH check_pps INTO p_check_pps
1498: -- if check_pps%found then
1499: fnd_file.put_line(fnd_file.output,lpad(i.pps_number,11,' ')||lpad(substr(nvl(i.works_number,' '),1,12),13,' ')
1500: || lpad(substr(nvl(i.last_name,' '),1,20),16,' ')||lpad(substr(nvl(i.first_name,' '),1,20),16,' ')||' Please check the employee''s PPS number/works number');
1501: -- else
1502: -- else
1503: --fnd_file.put_line(fnd_file.output,lpad(i.pps_number,11,' ')||'Please check the employee''s PPS number');
1499: fnd_file.put_line(fnd_file.output,lpad(i.pps_number,11,' ')||lpad(substr(nvl(i.works_number,' '),1,12),13,' ')
1500: || lpad(substr(nvl(i.last_name,' '),1,20),16,' ')||lpad(substr(nvl(i.first_name,' '),1,20),16,' ')||' Please check the employee''s PPS number/works number');
1501: -- else
1502: -- else
1503: --fnd_file.put_line(fnd_file.output,lpad(i.pps_number,11,' ')||'Please check the employee''s PPS number');
1504: -- end if;
1505: -- close check_pps;
1506: END IF;
1507: END LOOP;
1526: EXCEPTION
1527: WHEN NO_DATA_FOUND THEN
1528: l_error := SQLERRM;
1529: retcode := 1;
1530: FND_FILE.PUT_LINE(fnd_file.log, 'No data found');
1531:
1532: INSERT INTO pay_ie_tax_error ( pps_number
1533: , employee_number
1534: , full_name
1557: l_error := SQLERRM;
1558: retcode := 2;
1559: /* The following command will be used to output the exception details to an output file*/
1560:
1561: /*FND_FILE.PUT_LINE(fnd_file.output, l_pps_number_hr ||', '||
1562: l_pps_number_int ||', '||
1563: l_employee_number_hr ||', '||
1564: l_employee_number_int ||', '||
1565: l_last_name_hr ||' '||l_first_name_hr ||', '||
1572: l_err_tab(err_cnt).p_works_number := substr(l_employee_number_int,1,12);
1573: l_err_tab(err_cnt).p_err_msg := 'Failed : OTHER in Main..'||l_error;
1574: err_cnt := err_cnt + 1;
1575: --ELSE
1576: -- fnd_file.put_line(fnd_file.output,lpad(l_pps_number_int,20,' ')||lpad(substr(l_employee_number_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : OTHER in Main..'||l_error);
1577: --END IF;
1578: /* The exception details are written to an error table */
1579: INSERT INTO pay_ie_tax_error ( pps_number
1580: , employee_number
1730: commit;
1731: end if;
1732: exception
1733: when others then
1734: FND_FILE.PUT_LINE(fnd_file.log,'Error occured while deleting exisiting rows in PAY_IE_TAX_ERROR table.');
1735: end;
1736:
1737: OPEN c_body;
1738: FETCH c_body into BodyRec;
1818: --
1819: )
1820: THEN
1821: retcode := 0;
1822: fnd_file.put_line( fnd_file.log, 'FND - CONC-COMPLETION TEXT:NORMAL');
1823:
1824: update pay_ie_tax_body_interface
1825: set process_flag = 'Y'
1826: where EMPLOYER_NUMBER = p_employer_number;
1836: EXCEPTION
1837: WHEN NO_DATA_FOUND THEN
1838: l_error := SQLERRM;
1839: retcode := 2;
1840: FND_FILE.PUT_LINE(fnd_file.log,'No data found');
1841: WHEN unequal_value THEN
1842: errbuf := fnd_message.get;
1843: l_error_stack := errbuf;
1844: l_error := SQLERRM;
1843: l_error_stack := errbuf;
1844: l_error := SQLERRM;
1845: retcode := 2;
1846: IF l_count_mth_taxcredit <> l_count_emp_recno THEN
1847: FND_FILE.NEW_LINE(fnd_file.log, 1);
1848: FND_FILE.PUT_LINE(fnd_file.log,
1849: 'The total number of record in pay_ie_tax_body_interface is '
1850: || TO_CHAR (l_count_mth_taxcredit));
1851: FND_FILE.PUT_LINE (fnd_file.log,
1844: l_error := SQLERRM;
1845: retcode := 2;
1846: IF l_count_mth_taxcredit <> l_count_emp_recno THEN
1847: FND_FILE.NEW_LINE(fnd_file.log, 1);
1848: FND_FILE.PUT_LINE(fnd_file.log,
1849: 'The total number of record in pay_ie_tax_body_interface is '
1850: || TO_CHAR (l_count_mth_taxcredit));
1851: FND_FILE.PUT_LINE (fnd_file.log,
1852: 'The value in pay_ie_tax_trailer_interface.record_no is '
1847: FND_FILE.NEW_LINE(fnd_file.log, 1);
1848: FND_FILE.PUT_LINE(fnd_file.log,
1849: 'The total number of record in pay_ie_tax_body_interface is '
1850: || TO_CHAR (l_count_mth_taxcredit));
1851: FND_FILE.PUT_LINE (fnd_file.log,
1852: 'The value in pay_ie_tax_trailer_interface.record_no is '
1853: || TO_CHAR(l_count_emp_recno));
1854: FND_FILE.PUT_LINE(fnd_file.log,
1855: 'Error - Retcode = 2, total number of record in pay_ie_tax_body_interface');
1850: || TO_CHAR (l_count_mth_taxcredit));
1851: FND_FILE.PUT_LINE (fnd_file.log,
1852: 'The value in pay_ie_tax_trailer_interface.record_no is '
1853: || TO_CHAR(l_count_emp_recno));
1854: FND_FILE.PUT_LINE(fnd_file.log,
1855: 'Error - Retcode = 2, total number of record in pay_ie_tax_body_interface');
1856: FND_FILE.PUT_LINE(fnd_file.log,
1857: 'does not match the value in pay_ie_tax_trailer_interface.record_no');
1858: END IF;
1852: 'The value in pay_ie_tax_trailer_interface.record_no is '
1853: || TO_CHAR(l_count_emp_recno));
1854: FND_FILE.PUT_LINE(fnd_file.log,
1855: 'Error - Retcode = 2, total number of record in pay_ie_tax_body_interface');
1856: FND_FILE.PUT_LINE(fnd_file.log,
1857: 'does not match the value in pay_ie_tax_trailer_interface.record_no');
1858: END IF;
1859:
1860: IF l_sum_mth_rate_cutoff <> l_total_mth_cutoff THEN
1857: 'does not match the value in pay_ie_tax_trailer_interface.record_no');
1858: END IF;
1859:
1860: IF l_sum_mth_rate_cutoff <> l_total_mth_cutoff THEN
1861: FND_FILE.NEW_LINE(fnd_file.log, 1);
1862: FND_FILE.PUT_LINE(fnd_file.log,
1863: 'The sum of pay_ie_tax_body_interface.mth_rate_cutoff is '
1864: || TO_CHAR (l_sum_mth_rate_cutoff));
1865: FND_FILE.PUT_LINE (fnd_file.log,
1858: END IF;
1859:
1860: IF l_sum_mth_rate_cutoff <> l_total_mth_cutoff THEN
1861: FND_FILE.NEW_LINE(fnd_file.log, 1);
1862: FND_FILE.PUT_LINE(fnd_file.log,
1863: 'The sum of pay_ie_tax_body_interface.mth_rate_cutoff is '
1864: || TO_CHAR (l_sum_mth_rate_cutoff));
1865: FND_FILE.PUT_LINE (fnd_file.log,
1866: 'The total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff is '
1861: FND_FILE.NEW_LINE(fnd_file.log, 1);
1862: FND_FILE.PUT_LINE(fnd_file.log,
1863: 'The sum of pay_ie_tax_body_interface.mth_rate_cutoff is '
1864: || TO_CHAR (l_sum_mth_rate_cutoff));
1865: FND_FILE.PUT_LINE (fnd_file.log,
1866: 'The total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff is '
1867: || TO_CHAR(l_total_mth_cutoff));
1868: FND_FILE.PUT_LINE(fnd_file.log,
1869: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_rate_cutoff');
1864: || TO_CHAR (l_sum_mth_rate_cutoff));
1865: FND_FILE.PUT_LINE (fnd_file.log,
1866: 'The total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff is '
1867: || TO_CHAR(l_total_mth_cutoff));
1868: FND_FILE.PUT_LINE(fnd_file.log,
1869: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_rate_cutoff');
1870: FND_FILE.PUT_LINE(fnd_file.log,
1871: 'does not match the total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff');
1872: END IF;
1866: 'The total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff is '
1867: || TO_CHAR(l_total_mth_cutoff));
1868: FND_FILE.PUT_LINE(fnd_file.log,
1869: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_rate_cutoff');
1870: FND_FILE.PUT_LINE(fnd_file.log,
1871: 'does not match the total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff');
1872: END IF;
1873: IF l_sum_wk_rate_cutoff <> l_total_wk_cutoff THEN
1874: FND_FILE.NEW_LINE(fnd_file.log, 1);
1870: FND_FILE.PUT_LINE(fnd_file.log,
1871: 'does not match the total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff');
1872: END IF;
1873: IF l_sum_wk_rate_cutoff <> l_total_wk_cutoff THEN
1874: FND_FILE.NEW_LINE(fnd_file.log, 1);
1875: FND_FILE.PUT_LINE(fnd_file.log,
1876: 'The sum of pay_ie_tax_body_interface.wk_rate_cutoff is '
1877: || TO_CHAR(l_sum_wk_rate_cutoff));
1878: FND_FILE.PUT_LINE(fnd_file.log,
1871: 'does not match the total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff');
1872: END IF;
1873: IF l_sum_wk_rate_cutoff <> l_total_wk_cutoff THEN
1874: FND_FILE.NEW_LINE(fnd_file.log, 1);
1875: FND_FILE.PUT_LINE(fnd_file.log,
1876: 'The sum of pay_ie_tax_body_interface.wk_rate_cutoff is '
1877: || TO_CHAR(l_sum_wk_rate_cutoff));
1878: FND_FILE.PUT_LINE(fnd_file.log,
1879: 'The total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff is '
1874: FND_FILE.NEW_LINE(fnd_file.log, 1);
1875: FND_FILE.PUT_LINE(fnd_file.log,
1876: 'The sum of pay_ie_tax_body_interface.wk_rate_cutoff is '
1877: || TO_CHAR(l_sum_wk_rate_cutoff));
1878: FND_FILE.PUT_LINE(fnd_file.log,
1879: 'The total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff is '
1880: || TO_CHAR(l_total_wk_cutoff));
1881: FND_FILE.PUT_LINE(fnd_file.log,
1882: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.wk_rate_cutoff');
1877: || TO_CHAR(l_sum_wk_rate_cutoff));
1878: FND_FILE.PUT_LINE(fnd_file.log,
1879: 'The total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff is '
1880: || TO_CHAR(l_total_wk_cutoff));
1881: FND_FILE.PUT_LINE(fnd_file.log,
1882: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.wk_rate_cutoff');
1883: FND_FILE.PUT_LINE(fnd_file.log,
1884: 'does not match the the total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff');
1885: END IF;
1879: 'The total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff is '
1880: || TO_CHAR(l_total_wk_cutoff));
1881: FND_FILE.PUT_LINE(fnd_file.log,
1882: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.wk_rate_cutoff');
1883: FND_FILE.PUT_LINE(fnd_file.log,
1884: 'does not match the the total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff');
1885: END IF;
1886: IF l_sum_mth_tax_credit <> l_total_mth_credit THEN
1887: FND_FILE.NEW_LINE(fnd_file.log, 1);
1883: FND_FILE.PUT_LINE(fnd_file.log,
1884: 'does not match the the total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff');
1885: END IF;
1886: IF l_sum_mth_tax_credit <> l_total_mth_credit THEN
1887: FND_FILE.NEW_LINE(fnd_file.log, 1);
1888: FND_FILE.PUT_LINE(fnd_file.log,
1889: 'The sum of pay_ie_tax_body_interface.mth_tax_credit is '
1890: || TO_CHAR(l_sum_mth_tax_credit));
1891: FND_FILE.PUT_LINE(fnd_file.log,
1884: 'does not match the the total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff');
1885: END IF;
1886: IF l_sum_mth_tax_credit <> l_total_mth_credit THEN
1887: FND_FILE.NEW_LINE(fnd_file.log, 1);
1888: FND_FILE.PUT_LINE(fnd_file.log,
1889: 'The sum of pay_ie_tax_body_interface.mth_tax_credit is '
1890: || TO_CHAR(l_sum_mth_tax_credit));
1891: FND_FILE.PUT_LINE(fnd_file.log,
1892: 'The total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit is '
1887: FND_FILE.NEW_LINE(fnd_file.log, 1);
1888: FND_FILE.PUT_LINE(fnd_file.log,
1889: 'The sum of pay_ie_tax_body_interface.mth_tax_credit is '
1890: || TO_CHAR(l_sum_mth_tax_credit));
1891: FND_FILE.PUT_LINE(fnd_file.log,
1892: 'The total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit is '
1893: || TO_CHAR(l_total_mth_credit));
1894: FND_FILE.PUT_LINE(fnd_file.log,
1895: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_tax_credit');
1890: || TO_CHAR(l_sum_mth_tax_credit));
1891: FND_FILE.PUT_LINE(fnd_file.log,
1892: 'The total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit is '
1893: || TO_CHAR(l_total_mth_credit));
1894: FND_FILE.PUT_LINE(fnd_file.log,
1895: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_tax_credit');
1896: FND_FILE.PUT_LINE(fnd_file.log,
1897: 'does not match the total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit');
1898: END IF;
1892: 'The total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit is '
1893: || TO_CHAR(l_total_mth_credit));
1894: FND_FILE.PUT_LINE(fnd_file.log,
1895: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_tax_credit');
1896: FND_FILE.PUT_LINE(fnd_file.log,
1897: 'does not match the total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit');
1898: END IF;
1899: IF BodyRec.sum_wk_tax_credit <> TrailRec.total_wk_credit THEN
1900: FND_FILE.NEW_LINE(fnd_file.log, 1);
1896: FND_FILE.PUT_LINE(fnd_file.log,
1897: 'does not match the total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit');
1898: END IF;
1899: IF BodyRec.sum_wk_tax_credit <> TrailRec.total_wk_credit THEN
1900: FND_FILE.NEW_LINE(fnd_file.log, 1);
1901: FND_FILE.PUT_LINE(fnd_file.log,
1902: 'The sum of pay_ie_tax_body_interface.wk_tax_credit is '
1903: || TO_CHAR(l_sum_wk_tax_credit));
1904: FND_FILE.PUT_LINE(fnd_file.log,
1897: 'does not match the total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit');
1898: END IF;
1899: IF BodyRec.sum_wk_tax_credit <> TrailRec.total_wk_credit THEN
1900: FND_FILE.NEW_LINE(fnd_file.log, 1);
1901: FND_FILE.PUT_LINE(fnd_file.log,
1902: 'The sum of pay_ie_tax_body_interface.wk_tax_credit is '
1903: || TO_CHAR(l_sum_wk_tax_credit));
1904: FND_FILE.PUT_LINE(fnd_file.log,
1905: 'The total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit is '
1900: FND_FILE.NEW_LINE(fnd_file.log, 1);
1901: FND_FILE.PUT_LINE(fnd_file.log,
1902: 'The sum of pay_ie_tax_body_interface.wk_tax_credit is '
1903: || TO_CHAR(l_sum_wk_tax_credit));
1904: FND_FILE.PUT_LINE(fnd_file.log,
1905: 'The total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit is '
1906: || TO_CHAR(l_total_wk_credit));
1907: FND_FILE.PUT_LINE(fnd_file.log,
1908: 'Error - Retcode = 2 because the sum of pay_ie_tax_body_interface.wk_tax_credit');
1903: || TO_CHAR(l_sum_wk_tax_credit));
1904: FND_FILE.PUT_LINE(fnd_file.log,
1905: 'The total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit is '
1906: || TO_CHAR(l_total_wk_credit));
1907: FND_FILE.PUT_LINE(fnd_file.log,
1908: 'Error - Retcode = 2 because the sum of pay_ie_tax_body_interface.wk_tax_credit');
1909: FND_FILE.PUT_LINE(fnd_file.log,
1910: 'does not match the total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit');
1911: END IF;
1905: 'The total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit is '
1906: || TO_CHAR(l_total_wk_credit));
1907: FND_FILE.PUT_LINE(fnd_file.log,
1908: 'Error - Retcode = 2 because the sum of pay_ie_tax_body_interface.wk_tax_credit');
1909: FND_FILE.PUT_LINE(fnd_file.log,
1910: 'does not match the total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit');
1911: END IF;
1912:
1913: --
1911: END IF;
1912:
1913: --
1914: IF l_total_YEARLY_TAX_CRED <> l_sum_YRLY_TAX_CRED THEN
1915: FND_FILE.NEW_LINE(fnd_file.log, 1);
1916: FND_FILE.PUT_LINE(fnd_file.log,
1917: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_cred '
1918: || TO_CHAR(l_sum_YRLY_TAX_CRED));
1919: FND_FILE.PUT_LINE(fnd_file.log,
1912:
1913: --
1914: IF l_total_YEARLY_TAX_CRED <> l_sum_YRLY_TAX_CRED THEN
1915: FND_FILE.NEW_LINE(fnd_file.log, 1);
1916: FND_FILE.PUT_LINE(fnd_file.log,
1917: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_cred '
1918: || TO_CHAR(l_sum_YRLY_TAX_CRED));
1919: FND_FILE.PUT_LINE(fnd_file.log,
1920: 'The total yearly tax credit in pay_ie_tax_trailer_interface.tc_tot_yearly_tax_cred is '
1915: FND_FILE.NEW_LINE(fnd_file.log, 1);
1916: FND_FILE.PUT_LINE(fnd_file.log,
1917: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_cred '
1918: || TO_CHAR(l_sum_YRLY_TAX_CRED));
1919: FND_FILE.PUT_LINE(fnd_file.log,
1920: 'The total yearly tax credit in pay_ie_tax_trailer_interface.tc_tot_yearly_tax_cred is '
1921: || TO_CHAR(l_total_YEARLY_TAX_CRED));
1922: FND_FILE.PUT_LINE(fnd_file.log,
1923: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_cred');
1918: || TO_CHAR(l_sum_YRLY_TAX_CRED));
1919: FND_FILE.PUT_LINE(fnd_file.log,
1920: 'The total yearly tax credit in pay_ie_tax_trailer_interface.tc_tot_yearly_tax_cred is '
1921: || TO_CHAR(l_total_YEARLY_TAX_CRED));
1922: FND_FILE.PUT_LINE(fnd_file.log,
1923: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_cred');
1924: FND_FILE.PUT_LINE(fnd_file.log,
1925: 'does not match the total yearly tax credit in pay_ie_tax_trailer_interface.tc_tot_yearly_tax_cred');
1926: END IF;
1920: 'The total yearly tax credit in pay_ie_tax_trailer_interface.tc_tot_yearly_tax_cred is '
1921: || TO_CHAR(l_total_YEARLY_TAX_CRED));
1922: FND_FILE.PUT_LINE(fnd_file.log,
1923: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_cred');
1924: FND_FILE.PUT_LINE(fnd_file.log,
1925: 'does not match the total yearly tax credit in pay_ie_tax_trailer_interface.tc_tot_yearly_tax_cred');
1926: END IF;
1927:
1928: IF l_total_YEARLY_TAX_RATE_1 <> l_sum_YRLY_TAX_RATE_1 THEN
1925: 'does not match the total yearly tax credit in pay_ie_tax_trailer_interface.tc_tot_yearly_tax_cred');
1926: END IF;
1927:
1928: IF l_total_YEARLY_TAX_RATE_1 <> l_sum_YRLY_TAX_RATE_1 THEN
1929: FND_FILE.NEW_LINE(fnd_file.log, 1);
1930: FND_FILE.PUT_LINE(fnd_file.log,
1931: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_1 '
1932: || TO_CHAR(l_sum_YRLY_TAX_RATE_1));
1933: FND_FILE.PUT_LINE(fnd_file.log,
1926: END IF;
1927:
1928: IF l_total_YEARLY_TAX_RATE_1 <> l_sum_YRLY_TAX_RATE_1 THEN
1929: FND_FILE.NEW_LINE(fnd_file.log, 1);
1930: FND_FILE.PUT_LINE(fnd_file.log,
1931: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_1 '
1932: || TO_CHAR(l_sum_YRLY_TAX_RATE_1));
1933: FND_FILE.PUT_LINE(fnd_file.log,
1934: 'The total yearly tax rate1 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_1 is '
1929: FND_FILE.NEW_LINE(fnd_file.log, 1);
1930: FND_FILE.PUT_LINE(fnd_file.log,
1931: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_1 '
1932: || TO_CHAR(l_sum_YRLY_TAX_RATE_1));
1933: FND_FILE.PUT_LINE(fnd_file.log,
1934: 'The total yearly tax rate1 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_1 is '
1935: || TO_CHAR(l_total_YEARLY_TAX_RATE_1));
1936: FND_FILE.PUT_LINE(fnd_file.log,
1937: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_1');
1932: || TO_CHAR(l_sum_YRLY_TAX_RATE_1));
1933: FND_FILE.PUT_LINE(fnd_file.log,
1934: 'The total yearly tax rate1 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_1 is '
1935: || TO_CHAR(l_total_YEARLY_TAX_RATE_1));
1936: FND_FILE.PUT_LINE(fnd_file.log,
1937: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_1');
1938: FND_FILE.PUT_LINE(fnd_file.log,
1939: 'does not match the total yearly tax rate1 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_1');
1940: END IF;
1934: 'The total yearly tax rate1 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_1 is '
1935: || TO_CHAR(l_total_YEARLY_TAX_RATE_1));
1936: FND_FILE.PUT_LINE(fnd_file.log,
1937: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_1');
1938: FND_FILE.PUT_LINE(fnd_file.log,
1939: 'does not match the total yearly tax rate1 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_1');
1940: END IF;
1941:
1942: IF l_total_YEARLY_TAX_RATE_2 <> l_sum_YRLY_TAX_RATE_2 THEN
1939: 'does not match the total yearly tax rate1 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_1');
1940: END IF;
1941:
1942: IF l_total_YEARLY_TAX_RATE_2 <> l_sum_YRLY_TAX_RATE_2 THEN
1943: FND_FILE.NEW_LINE(fnd_file.log, 1);
1944: FND_FILE.PUT_LINE(fnd_file.log,
1945: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_2 '
1946: || TO_CHAR(l_sum_YRLY_TAX_RATE_2));
1947: FND_FILE.PUT_LINE(fnd_file.log,
1940: END IF;
1941:
1942: IF l_total_YEARLY_TAX_RATE_2 <> l_sum_YRLY_TAX_RATE_2 THEN
1943: FND_FILE.NEW_LINE(fnd_file.log, 1);
1944: FND_FILE.PUT_LINE(fnd_file.log,
1945: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_2 '
1946: || TO_CHAR(l_sum_YRLY_TAX_RATE_2));
1947: FND_FILE.PUT_LINE(fnd_file.log,
1948: 'The total yearly tax rate2 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_2 is '
1943: FND_FILE.NEW_LINE(fnd_file.log, 1);
1944: FND_FILE.PUT_LINE(fnd_file.log,
1945: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_2 '
1946: || TO_CHAR(l_sum_YRLY_TAX_RATE_2));
1947: FND_FILE.PUT_LINE(fnd_file.log,
1948: 'The total yearly tax rate2 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_2 is '
1949: || TO_CHAR(l_total_YEARLY_TAX_RATE_2));
1950: FND_FILE.PUT_LINE(fnd_file.log,
1951: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_2');
1946: || TO_CHAR(l_sum_YRLY_TAX_RATE_2));
1947: FND_FILE.PUT_LINE(fnd_file.log,
1948: 'The total yearly tax rate2 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_2 is '
1949: || TO_CHAR(l_total_YEARLY_TAX_RATE_2));
1950: FND_FILE.PUT_LINE(fnd_file.log,
1951: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_2');
1952: FND_FILE.PUT_LINE(fnd_file.log,
1953: 'does not match the total yearly tax rate2 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_2');
1954: END IF;
1948: 'The total yearly tax rate2 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_2 is '
1949: || TO_CHAR(l_total_YEARLY_TAX_RATE_2));
1950: FND_FILE.PUT_LINE(fnd_file.log,
1951: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_2');
1952: FND_FILE.PUT_LINE(fnd_file.log,
1953: 'does not match the total yearly tax rate2 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_2');
1954: END IF;
1955:
1956: IF l_total_MONTHLY_TAX_RATE_2 <> l_sum_MTHLY_TAX_RATE_2 THEN
1953: 'does not match the total yearly tax rate2 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_2');
1954: END IF;
1955:
1956: IF l_total_MONTHLY_TAX_RATE_2 <> l_sum_MTHLY_TAX_RATE_2 THEN
1957: FND_FILE.NEW_LINE(fnd_file.log, 1);
1958: FND_FILE.PUT_LINE(fnd_file.log,
1959: 'The sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_2 '
1960: || TO_CHAR(l_sum_MTHLY_TAX_RATE_2));
1961: FND_FILE.PUT_LINE(fnd_file.log,
1954: END IF;
1955:
1956: IF l_total_MONTHLY_TAX_RATE_2 <> l_sum_MTHLY_TAX_RATE_2 THEN
1957: FND_FILE.NEW_LINE(fnd_file.log, 1);
1958: FND_FILE.PUT_LINE(fnd_file.log,
1959: 'The sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_2 '
1960: || TO_CHAR(l_sum_MTHLY_TAX_RATE_2));
1961: FND_FILE.PUT_LINE(fnd_file.log,
1962: 'The total monthly tax rate2 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_2 is '
1957: FND_FILE.NEW_LINE(fnd_file.log, 1);
1958: FND_FILE.PUT_LINE(fnd_file.log,
1959: 'The sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_2 '
1960: || TO_CHAR(l_sum_MTHLY_TAX_RATE_2));
1961: FND_FILE.PUT_LINE(fnd_file.log,
1962: 'The total monthly tax rate2 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_2 is '
1963: || TO_CHAR(l_total_MONTHLY_TAX_RATE_2));
1964: FND_FILE.PUT_LINE(fnd_file.log,
1965: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_2');
1960: || TO_CHAR(l_sum_MTHLY_TAX_RATE_2));
1961: FND_FILE.PUT_LINE(fnd_file.log,
1962: 'The total monthly tax rate2 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_2 is '
1963: || TO_CHAR(l_total_MONTHLY_TAX_RATE_2));
1964: FND_FILE.PUT_LINE(fnd_file.log,
1965: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_2');
1966: FND_FILE.PUT_LINE(fnd_file.log,
1967: 'does not match the total monthly tax rate2 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_2');
1968: END IF;
1962: 'The total monthly tax rate2 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_2 is '
1963: || TO_CHAR(l_total_MONTHLY_TAX_RATE_2));
1964: FND_FILE.PUT_LINE(fnd_file.log,
1965: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_2');
1966: FND_FILE.PUT_LINE(fnd_file.log,
1967: 'does not match the total monthly tax rate2 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_2');
1968: END IF;
1969:
1970: IF l_total_WEEKLY_TAX_RATE_2 <> l_sum_WKLY_TAX_RATE_2 THEN
1967: 'does not match the total monthly tax rate2 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_2');
1968: END IF;
1969:
1970: IF l_total_WEEKLY_TAX_RATE_2 <> l_sum_WKLY_TAX_RATE_2 THEN
1971: FND_FILE.NEW_LINE(fnd_file.log, 1);
1972: FND_FILE.PUT_LINE(fnd_file.log,
1973: 'The sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_2 '
1974: || TO_CHAR(l_sum_WKLY_TAX_RATE_2));
1975: FND_FILE.PUT_LINE(fnd_file.log,
1968: END IF;
1969:
1970: IF l_total_WEEKLY_TAX_RATE_2 <> l_sum_WKLY_TAX_RATE_2 THEN
1971: FND_FILE.NEW_LINE(fnd_file.log, 1);
1972: FND_FILE.PUT_LINE(fnd_file.log,
1973: 'The sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_2 '
1974: || TO_CHAR(l_sum_WKLY_TAX_RATE_2));
1975: FND_FILE.PUT_LINE(fnd_file.log,
1976: 'The total weekly tax rate2 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_2 is '
1971: FND_FILE.NEW_LINE(fnd_file.log, 1);
1972: FND_FILE.PUT_LINE(fnd_file.log,
1973: 'The sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_2 '
1974: || TO_CHAR(l_sum_WKLY_TAX_RATE_2));
1975: FND_FILE.PUT_LINE(fnd_file.log,
1976: 'The total weekly tax rate2 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_2 is '
1977: || TO_CHAR(l_total_WEEKLY_TAX_RATE_2));
1978: FND_FILE.PUT_LINE(fnd_file.log,
1979: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_2');
1974: || TO_CHAR(l_sum_WKLY_TAX_RATE_2));
1975: FND_FILE.PUT_LINE(fnd_file.log,
1976: 'The total weekly tax rate2 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_2 is '
1977: || TO_CHAR(l_total_WEEKLY_TAX_RATE_2));
1978: FND_FILE.PUT_LINE(fnd_file.log,
1979: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_2');
1980: FND_FILE.PUT_LINE(fnd_file.log,
1981: 'does not match the total weekly tax rate2 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_2');
1982: END IF;
1976: 'The total weekly tax rate2 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_2 is '
1977: || TO_CHAR(l_total_WEEKLY_TAX_RATE_2));
1978: FND_FILE.PUT_LINE(fnd_file.log,
1979: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_2');
1980: FND_FILE.PUT_LINE(fnd_file.log,
1981: 'does not match the total weekly tax rate2 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_2');
1982: END IF;
1983:
1984: IF l_total_YEARLY_TAX_RATE_3 <> l_sum_YRLY_TAX_RATE_3 THEN
1981: 'does not match the total weekly tax rate2 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_2');
1982: END IF;
1983:
1984: IF l_total_YEARLY_TAX_RATE_3 <> l_sum_YRLY_TAX_RATE_3 THEN
1985: FND_FILE.NEW_LINE(fnd_file.log, 1);
1986: FND_FILE.PUT_LINE(fnd_file.log,
1987: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_3 '
1988: || TO_CHAR(l_sum_YRLY_TAX_RATE_3));
1989: FND_FILE.PUT_LINE(fnd_file.log,
1982: END IF;
1983:
1984: IF l_total_YEARLY_TAX_RATE_3 <> l_sum_YRLY_TAX_RATE_3 THEN
1985: FND_FILE.NEW_LINE(fnd_file.log, 1);
1986: FND_FILE.PUT_LINE(fnd_file.log,
1987: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_3 '
1988: || TO_CHAR(l_sum_YRLY_TAX_RATE_3));
1989: FND_FILE.PUT_LINE(fnd_file.log,
1990: 'The total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_3 is '
1985: FND_FILE.NEW_LINE(fnd_file.log, 1);
1986: FND_FILE.PUT_LINE(fnd_file.log,
1987: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_3 '
1988: || TO_CHAR(l_sum_YRLY_TAX_RATE_3));
1989: FND_FILE.PUT_LINE(fnd_file.log,
1990: 'The total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_3 is '
1991: || TO_CHAR(l_total_YEARLY_TAX_RATE_3));
1992: FND_FILE.PUT_LINE(fnd_file.log,
1993: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_3');
1988: || TO_CHAR(l_sum_YRLY_TAX_RATE_3));
1989: FND_FILE.PUT_LINE(fnd_file.log,
1990: 'The total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_3 is '
1991: || TO_CHAR(l_total_YEARLY_TAX_RATE_3));
1992: FND_FILE.PUT_LINE(fnd_file.log,
1993: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_3');
1994: FND_FILE.PUT_LINE(fnd_file.log,
1995: 'does not match the total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_3');
1996: END IF;
1990: 'The total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_3 is '
1991: || TO_CHAR(l_total_YEARLY_TAX_RATE_3));
1992: FND_FILE.PUT_LINE(fnd_file.log,
1993: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_3');
1994: FND_FILE.PUT_LINE(fnd_file.log,
1995: 'does not match the total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_3');
1996: END IF;
1997:
1998: IF l_total_MONTHLY_TAX_RATE_3 <> l_sum_MTHLY_TAX_RATE_3 THEN
1995: 'does not match the total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_3');
1996: END IF;
1997:
1998: IF l_total_MONTHLY_TAX_RATE_3 <> l_sum_MTHLY_TAX_RATE_3 THEN
1999: FND_FILE.NEW_LINE(fnd_file.log, 1);
2000: FND_FILE.PUT_LINE(fnd_file.log,
2001: 'The sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_3 '
2002: || TO_CHAR(l_sum_MTHLY_TAX_RATE_3));
2003: FND_FILE.PUT_LINE(fnd_file.log,
1996: END IF;
1997:
1998: IF l_total_MONTHLY_TAX_RATE_3 <> l_sum_MTHLY_TAX_RATE_3 THEN
1999: FND_FILE.NEW_LINE(fnd_file.log, 1);
2000: FND_FILE.PUT_LINE(fnd_file.log,
2001: 'The sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_3 '
2002: || TO_CHAR(l_sum_MTHLY_TAX_RATE_3));
2003: FND_FILE.PUT_LINE(fnd_file.log,
2004: 'The total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_3 is '
1999: FND_FILE.NEW_LINE(fnd_file.log, 1);
2000: FND_FILE.PUT_LINE(fnd_file.log,
2001: 'The sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_3 '
2002: || TO_CHAR(l_sum_MTHLY_TAX_RATE_3));
2003: FND_FILE.PUT_LINE(fnd_file.log,
2004: 'The total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_3 is '
2005: || TO_CHAR(l_total_MONTHLY_TAX_RATE_3));
2006: FND_FILE.PUT_LINE(fnd_file.log,
2007: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_3');
2002: || TO_CHAR(l_sum_MTHLY_TAX_RATE_3));
2003: FND_FILE.PUT_LINE(fnd_file.log,
2004: 'The total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_3 is '
2005: || TO_CHAR(l_total_MONTHLY_TAX_RATE_3));
2006: FND_FILE.PUT_LINE(fnd_file.log,
2007: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_3');
2008: FND_FILE.PUT_LINE(fnd_file.log,
2009: 'does not match the total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_3');
2010: END IF;
2004: 'The total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_3 is '
2005: || TO_CHAR(l_total_MONTHLY_TAX_RATE_3));
2006: FND_FILE.PUT_LINE(fnd_file.log,
2007: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_3');
2008: FND_FILE.PUT_LINE(fnd_file.log,
2009: 'does not match the total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_3');
2010: END IF;
2011:
2012: IF l_total_WEEKLY_TAX_RATE_3 <> l_sum_WKLY_TAX_RATE_3 THEN
2009: 'does not match the total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_3');
2010: END IF;
2011:
2012: IF l_total_WEEKLY_TAX_RATE_3 <> l_sum_WKLY_TAX_RATE_3 THEN
2013: FND_FILE.NEW_LINE(fnd_file.log, 1);
2014: FND_FILE.PUT_LINE(fnd_file.log,
2015: 'The sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_3 '
2016: || TO_CHAR(l_sum_WKLY_TAX_RATE_3));
2017: FND_FILE.PUT_LINE(fnd_file.log,
2010: END IF;
2011:
2012: IF l_total_WEEKLY_TAX_RATE_3 <> l_sum_WKLY_TAX_RATE_3 THEN
2013: FND_FILE.NEW_LINE(fnd_file.log, 1);
2014: FND_FILE.PUT_LINE(fnd_file.log,
2015: 'The sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_3 '
2016: || TO_CHAR(l_sum_WKLY_TAX_RATE_3));
2017: FND_FILE.PUT_LINE(fnd_file.log,
2018: 'The total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_3 is '
2013: FND_FILE.NEW_LINE(fnd_file.log, 1);
2014: FND_FILE.PUT_LINE(fnd_file.log,
2015: 'The sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_3 '
2016: || TO_CHAR(l_sum_WKLY_TAX_RATE_3));
2017: FND_FILE.PUT_LINE(fnd_file.log,
2018: 'The total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_3 is '
2019: || TO_CHAR(l_total_WEEKLY_TAX_RATE_3));
2020: FND_FILE.PUT_LINE(fnd_file.log,
2021: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_3');
2016: || TO_CHAR(l_sum_WKLY_TAX_RATE_3));
2017: FND_FILE.PUT_LINE(fnd_file.log,
2018: 'The total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_3 is '
2019: || TO_CHAR(l_total_WEEKLY_TAX_RATE_3));
2020: FND_FILE.PUT_LINE(fnd_file.log,
2021: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_3');
2022: FND_FILE.PUT_LINE(fnd_file.log,
2023: 'does not match the total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_3');
2024: END IF;
2018: 'The total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_3 is '
2019: || TO_CHAR(l_total_WEEKLY_TAX_RATE_3));
2020: FND_FILE.PUT_LINE(fnd_file.log,
2021: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_3');
2022: FND_FILE.PUT_LINE(fnd_file.log,
2023: 'does not match the total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_3');
2024: END IF;
2025:
2026: IF l_total_YEARLY_TAX_RATE_4 <> l_sum_YRLY_TAX_RATE_4 THEN
2023: 'does not match the total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_3');
2024: END IF;
2025:
2026: IF l_total_YEARLY_TAX_RATE_4 <> l_sum_YRLY_TAX_RATE_4 THEN
2027: FND_FILE.NEW_LINE(fnd_file.log, 1);
2028: FND_FILE.PUT_LINE(fnd_file.log,
2029: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_4 '
2030: || TO_CHAR(l_sum_YRLY_TAX_RATE_4));
2031: FND_FILE.PUT_LINE(fnd_file.log,
2024: END IF;
2025:
2026: IF l_total_YEARLY_TAX_RATE_4 <> l_sum_YRLY_TAX_RATE_4 THEN
2027: FND_FILE.NEW_LINE(fnd_file.log, 1);
2028: FND_FILE.PUT_LINE(fnd_file.log,
2029: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_4 '
2030: || TO_CHAR(l_sum_YRLY_TAX_RATE_4));
2031: FND_FILE.PUT_LINE(fnd_file.log,
2032: 'The total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_4 is '
2027: FND_FILE.NEW_LINE(fnd_file.log, 1);
2028: FND_FILE.PUT_LINE(fnd_file.log,
2029: 'The sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_4 '
2030: || TO_CHAR(l_sum_YRLY_TAX_RATE_4));
2031: FND_FILE.PUT_LINE(fnd_file.log,
2032: 'The total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_4 is '
2033: || TO_CHAR(l_total_YEARLY_TAX_RATE_4));
2034: FND_FILE.PUT_LINE(fnd_file.log,
2035: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_4');
2030: || TO_CHAR(l_sum_YRLY_TAX_RATE_4));
2031: FND_FILE.PUT_LINE(fnd_file.log,
2032: 'The total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_4 is '
2033: || TO_CHAR(l_total_YEARLY_TAX_RATE_4));
2034: FND_FILE.PUT_LINE(fnd_file.log,
2035: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_4');
2036: FND_FILE.PUT_LINE(fnd_file.log,
2037: 'does not match the total yearly tax rate4 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_4');
2038: END IF;
2032: 'The total yearly tax rate3 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_4 is '
2033: || TO_CHAR(l_total_YEARLY_TAX_RATE_4));
2034: FND_FILE.PUT_LINE(fnd_file.log,
2035: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_yrly_tax_rate_4');
2036: FND_FILE.PUT_LINE(fnd_file.log,
2037: 'does not match the total yearly tax rate4 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_4');
2038: END IF;
2039:
2040: IF l_total_MONTHLY_TAX_RATE_4 <> l_sum_MTHLY_TAX_RATE_4 THEN
2037: 'does not match the total yearly tax rate4 in pay_ie_tax_trailer_interface.tot_yearly_tax_rate_4');
2038: END IF;
2039:
2040: IF l_total_MONTHLY_TAX_RATE_4 <> l_sum_MTHLY_TAX_RATE_4 THEN
2041: FND_FILE.NEW_LINE(fnd_file.log, 1);
2042: FND_FILE.PUT_LINE(fnd_file.log,
2043: 'The sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_4 '
2044: || TO_CHAR(l_sum_MTHLY_TAX_RATE_4));
2045: FND_FILE.PUT_LINE(fnd_file.log,
2038: END IF;
2039:
2040: IF l_total_MONTHLY_TAX_RATE_4 <> l_sum_MTHLY_TAX_RATE_4 THEN
2041: FND_FILE.NEW_LINE(fnd_file.log, 1);
2042: FND_FILE.PUT_LINE(fnd_file.log,
2043: 'The sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_4 '
2044: || TO_CHAR(l_sum_MTHLY_TAX_RATE_4));
2045: FND_FILE.PUT_LINE(fnd_file.log,
2046: 'The total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_4 is '
2041: FND_FILE.NEW_LINE(fnd_file.log, 1);
2042: FND_FILE.PUT_LINE(fnd_file.log,
2043: 'The sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_4 '
2044: || TO_CHAR(l_sum_MTHLY_TAX_RATE_4));
2045: FND_FILE.PUT_LINE(fnd_file.log,
2046: 'The total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_4 is '
2047: || TO_CHAR(l_total_MONTHLY_TAX_RATE_4));
2048: FND_FILE.PUT_LINE(fnd_file.log,
2049: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_4');
2044: || TO_CHAR(l_sum_MTHLY_TAX_RATE_4));
2045: FND_FILE.PUT_LINE(fnd_file.log,
2046: 'The total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_4 is '
2047: || TO_CHAR(l_total_MONTHLY_TAX_RATE_4));
2048: FND_FILE.PUT_LINE(fnd_file.log,
2049: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_4');
2050: FND_FILE.PUT_LINE(fnd_file.log,
2051: 'does not match the total monthly tax rate4 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_4');
2052: END IF;
2046: 'The total monthly tax rate3 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_4 is '
2047: || TO_CHAR(l_total_MONTHLY_TAX_RATE_4));
2048: FND_FILE.PUT_LINE(fnd_file.log,
2049: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_mthly_tax_rate_4');
2050: FND_FILE.PUT_LINE(fnd_file.log,
2051: 'does not match the total monthly tax rate4 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_4');
2052: END IF;
2053:
2054: IF l_total_WEEKLY_TAX_RATE_4 <> l_sum_WKLY_TAX_RATE_4 THEN
2051: 'does not match the total monthly tax rate4 in pay_ie_tax_trailer_interface.tot_monthly_tax_rate_4');
2052: END IF;
2053:
2054: IF l_total_WEEKLY_TAX_RATE_4 <> l_sum_WKLY_TAX_RATE_4 THEN
2055: FND_FILE.NEW_LINE(fnd_file.log, 1);
2056: FND_FILE.PUT_LINE(fnd_file.log,
2057: 'The sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_4 '
2058: || TO_CHAR(l_sum_WKLY_TAX_RATE_4));
2059: FND_FILE.PUT_LINE(fnd_file.log,
2052: END IF;
2053:
2054: IF l_total_WEEKLY_TAX_RATE_4 <> l_sum_WKLY_TAX_RATE_4 THEN
2055: FND_FILE.NEW_LINE(fnd_file.log, 1);
2056: FND_FILE.PUT_LINE(fnd_file.log,
2057: 'The sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_4 '
2058: || TO_CHAR(l_sum_WKLY_TAX_RATE_4));
2059: FND_FILE.PUT_LINE(fnd_file.log,
2060: 'The total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_4 is '
2055: FND_FILE.NEW_LINE(fnd_file.log, 1);
2056: FND_FILE.PUT_LINE(fnd_file.log,
2057: 'The sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_4 '
2058: || TO_CHAR(l_sum_WKLY_TAX_RATE_4));
2059: FND_FILE.PUT_LINE(fnd_file.log,
2060: 'The total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_4 is '
2061: || TO_CHAR(l_total_WEEKLY_TAX_RATE_4));
2062: FND_FILE.PUT_LINE(fnd_file.log,
2063: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_4');
2058: || TO_CHAR(l_sum_WKLY_TAX_RATE_4));
2059: FND_FILE.PUT_LINE(fnd_file.log,
2060: 'The total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_4 is '
2061: || TO_CHAR(l_total_WEEKLY_TAX_RATE_4));
2062: FND_FILE.PUT_LINE(fnd_file.log,
2063: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_4');
2064: FND_FILE.PUT_LINE(fnd_file.log,
2065: 'does not match the total weekly tax rate4 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_4');
2066: END IF;
2060: 'The total weekly tax rate3 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_4 is '
2061: || TO_CHAR(l_total_WEEKLY_TAX_RATE_4));
2062: FND_FILE.PUT_LINE(fnd_file.log,
2063: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.cd_wkly_tax_rate_4');
2064: FND_FILE.PUT_LINE(fnd_file.log,
2065: 'does not match the total weekly tax rate4 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_4');
2066: END IF;
2067:
2068: IF l_total_YEARLY_USC_RATE_1 <> l_sum_USC_YRLY_CUTOFF_1 THEN
2065: 'does not match the total weekly tax rate4 in pay_ie_tax_trailer_interface.tot_weekly_tax_rate_4');
2066: END IF;
2067:
2068: IF l_total_YEARLY_USC_RATE_1 <> l_sum_USC_YRLY_CUTOFF_1 THEN
2069: FND_FILE.NEW_LINE(fnd_file.log, 1);
2070: FND_FILE.PUT_LINE(fnd_file.log,
2071: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_1 '
2072: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_1));
2073: FND_FILE.PUT_LINE(fnd_file.log,
2066: END IF;
2067:
2068: IF l_total_YEARLY_USC_RATE_1 <> l_sum_USC_YRLY_CUTOFF_1 THEN
2069: FND_FILE.NEW_LINE(fnd_file.log, 1);
2070: FND_FILE.PUT_LINE(fnd_file.log,
2071: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_1 '
2072: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_1));
2073: FND_FILE.PUT_LINE(fnd_file.log,
2074: 'The total yearly usc rate1 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_1 is '
2069: FND_FILE.NEW_LINE(fnd_file.log, 1);
2070: FND_FILE.PUT_LINE(fnd_file.log,
2071: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_1 '
2072: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_1));
2073: FND_FILE.PUT_LINE(fnd_file.log,
2074: 'The total yearly usc rate1 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_1 is '
2075: || TO_CHAR(l_total_YEARLY_USC_RATE_1));
2076: FND_FILE.PUT_LINE(fnd_file.log,
2077: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_1');
2072: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_1));
2073: FND_FILE.PUT_LINE(fnd_file.log,
2074: 'The total yearly usc rate1 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_1 is '
2075: || TO_CHAR(l_total_YEARLY_USC_RATE_1));
2076: FND_FILE.PUT_LINE(fnd_file.log,
2077: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_1');
2078: FND_FILE.PUT_LINE(fnd_file.log,
2079: 'does not match the total yearly usc rate1 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_1');
2080: END IF;
2074: 'The total yearly usc rate1 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_1 is '
2075: || TO_CHAR(l_total_YEARLY_USC_RATE_1));
2076: FND_FILE.PUT_LINE(fnd_file.log,
2077: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_1');
2078: FND_FILE.PUT_LINE(fnd_file.log,
2079: 'does not match the total yearly usc rate1 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_1');
2080: END IF;
2081:
2082: IF l_total_YEARLY_USC_RATE_2 <> l_sum_USC_YRLY_CUTOFF_2 THEN
2079: 'does not match the total yearly usc rate1 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_1');
2080: END IF;
2081:
2082: IF l_total_YEARLY_USC_RATE_2 <> l_sum_USC_YRLY_CUTOFF_2 THEN
2083: FND_FILE.NEW_LINE(fnd_file.log, 1);
2084: FND_FILE.PUT_LINE(fnd_file.log,
2085: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_2 '
2086: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_2));
2087: FND_FILE.PUT_LINE(fnd_file.log,
2080: END IF;
2081:
2082: IF l_total_YEARLY_USC_RATE_2 <> l_sum_USC_YRLY_CUTOFF_2 THEN
2083: FND_FILE.NEW_LINE(fnd_file.log, 1);
2084: FND_FILE.PUT_LINE(fnd_file.log,
2085: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_2 '
2086: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_2));
2087: FND_FILE.PUT_LINE(fnd_file.log,
2088: 'The total yearly usc rate2 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_2 is '
2083: FND_FILE.NEW_LINE(fnd_file.log, 1);
2084: FND_FILE.PUT_LINE(fnd_file.log,
2085: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_2 '
2086: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_2));
2087: FND_FILE.PUT_LINE(fnd_file.log,
2088: 'The total yearly usc rate2 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_2 is '
2089: || TO_CHAR(l_total_YEARLY_USC_RATE_2));
2090: FND_FILE.PUT_LINE(fnd_file.log,
2091: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_2');
2086: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_2));
2087: FND_FILE.PUT_LINE(fnd_file.log,
2088: 'The total yearly usc rate2 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_2 is '
2089: || TO_CHAR(l_total_YEARLY_USC_RATE_2));
2090: FND_FILE.PUT_LINE(fnd_file.log,
2091: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_2');
2092: FND_FILE.PUT_LINE(fnd_file.log,
2093: 'does not match the total yearly usc rate2 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_2');
2094: END IF;
2088: 'The total yearly usc rate2 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_2 is '
2089: || TO_CHAR(l_total_YEARLY_USC_RATE_2));
2090: FND_FILE.PUT_LINE(fnd_file.log,
2091: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_2');
2092: FND_FILE.PUT_LINE(fnd_file.log,
2093: 'does not match the total yearly usc rate2 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_2');
2094: END IF;
2095:
2096: IF l_total_YEARLY_USC_RATE_3 <> l_sum_USC_YRLY_CUTOFF_3 THEN
2093: 'does not match the total yearly usc rate2 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_2');
2094: END IF;
2095:
2096: IF l_total_YEARLY_USC_RATE_3 <> l_sum_USC_YRLY_CUTOFF_3 THEN
2097: FND_FILE.NEW_LINE(fnd_file.log, 1);
2098: FND_FILE.PUT_LINE(fnd_file.log,
2099: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_3 '
2100: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_3));
2101: FND_FILE.PUT_LINE(fnd_file.log,
2094: END IF;
2095:
2096: IF l_total_YEARLY_USC_RATE_3 <> l_sum_USC_YRLY_CUTOFF_3 THEN
2097: FND_FILE.NEW_LINE(fnd_file.log, 1);
2098: FND_FILE.PUT_LINE(fnd_file.log,
2099: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_3 '
2100: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_3));
2101: FND_FILE.PUT_LINE(fnd_file.log,
2102: 'The total yearly usc rate3 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_3 is '
2097: FND_FILE.NEW_LINE(fnd_file.log, 1);
2098: FND_FILE.PUT_LINE(fnd_file.log,
2099: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_3 '
2100: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_3));
2101: FND_FILE.PUT_LINE(fnd_file.log,
2102: 'The total yearly usc rate3 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_3 is '
2103: || TO_CHAR(l_total_YEARLY_USC_RATE_3));
2104: FND_FILE.PUT_LINE(fnd_file.log,
2105: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_3');
2100: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_3));
2101: FND_FILE.PUT_LINE(fnd_file.log,
2102: 'The total yearly usc rate3 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_3 is '
2103: || TO_CHAR(l_total_YEARLY_USC_RATE_3));
2104: FND_FILE.PUT_LINE(fnd_file.log,
2105: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_3');
2106: FND_FILE.PUT_LINE(fnd_file.log,
2107: 'does not match the total yearly usc rate3 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_3');
2108: END IF;
2102: 'The total yearly usc rate3 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_3 is '
2103: || TO_CHAR(l_total_YEARLY_USC_RATE_3));
2104: FND_FILE.PUT_LINE(fnd_file.log,
2105: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_3');
2106: FND_FILE.PUT_LINE(fnd_file.log,
2107: 'does not match the total yearly usc rate3 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_3');
2108: END IF;
2109:
2110: IF l_total_YEARLY_USC_RATE_4 <> l_sum_USC_YRLY_CUTOFF_4 THEN
2107: 'does not match the total yearly usc rate3 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_3');
2108: END IF;
2109:
2110: IF l_total_YEARLY_USC_RATE_4 <> l_sum_USC_YRLY_CUTOFF_4 THEN
2111: FND_FILE.NEW_LINE(fnd_file.log, 1);
2112: FND_FILE.PUT_LINE(fnd_file.log,
2113: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_4 '
2114: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_4));
2115: FND_FILE.PUT_LINE(fnd_file.log,
2108: END IF;
2109:
2110: IF l_total_YEARLY_USC_RATE_4 <> l_sum_USC_YRLY_CUTOFF_4 THEN
2111: FND_FILE.NEW_LINE(fnd_file.log, 1);
2112: FND_FILE.PUT_LINE(fnd_file.log,
2113: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_4 '
2114: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_4));
2115: FND_FILE.PUT_LINE(fnd_file.log,
2116: 'The total yearly usc rate4 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_4 is '
2111: FND_FILE.NEW_LINE(fnd_file.log, 1);
2112: FND_FILE.PUT_LINE(fnd_file.log,
2113: 'The sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_4 '
2114: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_4));
2115: FND_FILE.PUT_LINE(fnd_file.log,
2116: 'The total yearly usc rate4 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_4 is '
2117: || TO_CHAR(l_total_YEARLY_USC_RATE_4));
2118: FND_FILE.PUT_LINE(fnd_file.log,
2119: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_4');
2114: || TO_CHAR(l_sum_USC_YRLY_CUTOFF_4));
2115: FND_FILE.PUT_LINE(fnd_file.log,
2116: 'The total yearly usc rate4 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_4 is '
2117: || TO_CHAR(l_total_YEARLY_USC_RATE_4));
2118: FND_FILE.PUT_LINE(fnd_file.log,
2119: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_4');
2120: FND_FILE.PUT_LINE(fnd_file.log,
2121: 'does not match the total yearly usc rate4 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_4');
2122: END IF;
2116: 'The total yearly usc rate4 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_4 is '
2117: || TO_CHAR(l_total_YEARLY_USC_RATE_4));
2118: FND_FILE.PUT_LINE(fnd_file.log,
2119: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.am_usc_yrly_cutoff_4');
2120: FND_FILE.PUT_LINE(fnd_file.log,
2121: 'does not match the total yearly usc rate4 in pay_ie_tax_trailer_interface.tot_yearly_usc_rate_4');
2122: END IF;
2123:
2124: --
2145: errbuf := fnd_message.get;
2146: l_error_stack := errbuf;
2147: l_error := SQLERRM;
2148: retcode := 2;
2149: FND_FILE.PUT_LINE (fnd_file.log, 'Error raised in loading data into one or all of the follo
2150: wing tables: pay_ie_tax_header_interface, pay_ie_tax_body_interface, pay_ie_tax_trailer_interface');
2151:
2152: INSERT INTO pay_ie_tax_error ( pps_number
2153: , employee_number
2353:
2354: If p_tax_year < 2012 THEN
2355: retcode := 2;
2356: errbuf := 'Invalid Tax Year.';
2357: fnd_file.PUT_LINE(FND_FILE.LOG,'Please enter tax year 2012 or later.');
2358: raise e_invlid_tax_year;
2359: End if;
2360:
2361:
2367: commit;
2368: end if;
2369: exception
2370: when others then
2371: FND_FILE.PUT_LINE(fnd_file.log,'Error occured while deleting exisiting rows in interface tables.');
2372: end;
2373:
2374: --fnd_file.PUT_LINE(FND_FILE.LOG, 'File Name:'|| p_filename);
2375: --fnd_file.PUT_LINE(FND_FILE.LOG, 'Mode:'||p_validate_mode);
2370: when others then
2371: FND_FILE.PUT_LINE(fnd_file.log,'Error occured while deleting exisiting rows in interface tables.');
2372: end;
2373:
2374: --fnd_file.PUT_LINE(FND_FILE.LOG, 'File Name:'|| p_filename);
2375: --fnd_file.PUT_LINE(FND_FILE.LOG, 'Mode:'||p_validate_mode);
2376:
2377: fnd_profile.get('PER_DATA_EXCHANGE_DIR', l_location);
2378:
2371: FND_FILE.PUT_LINE(fnd_file.log,'Error occured while deleting exisiting rows in interface tables.');
2372: end;
2373:
2374: --fnd_file.PUT_LINE(FND_FILE.LOG, 'File Name:'|| p_filename);
2375: --fnd_file.PUT_LINE(FND_FILE.LOG, 'Mode:'||p_validate_mode);
2376:
2377: fnd_profile.get('PER_DATA_EXCHANGE_DIR', l_location);
2378:
2379: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_location:'||l_location);
2375: --fnd_file.PUT_LINE(FND_FILE.LOG, 'Mode:'||p_validate_mode);
2376:
2377: fnd_profile.get('PER_DATA_EXCHANGE_DIR', l_location);
2378:
2379: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_location:'||l_location);
2380:
2381: l_file_handle := utl_file.fopen(l_location,p_filename,'r');
2382: utl_file.get_line(l_file_handle,l_present_line);
2383:
2380:
2381: l_file_handle := utl_file.fopen(l_location,p_filename,'r');
2382: utl_file.get_line(l_file_handle,l_present_line);
2383:
2384: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line-1:'||l_present_line); --Reading Header Columns
2385:
2386:
2387: --First Line must be this
2388: --HC_TAX_YEAR, HC_EMPLOYER_NUMBER, HC_EMPLOYER_NAME, HC_DATE, HC_LABEL_YEAR, HC_EMPLOYER_UNIT_NUM
2389: IF (substr(trim(l_present_line),1,11) <> 'HC_TAX_YEAR')
2390: THEN
2391: retcode := 2;
2392: errbuf := 'Invalid file format.';
2393: fnd_file.PUT_LINE(FND_FILE.LOG,'File not started with HC_TAX_YEAR');
2394: hr_utility.trace('Beginning line is :'||l_present_line);
2395: raise invalid_file_format;
2396: END IF;
2397:
2395: raise invalid_file_format;
2396: END IF;
2397:
2398: utl_file.get_line(l_file_handle,l_present_line);--Reading Header values
2399: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line-2:'||l_present_line);
2400:
2401: --13359423
2402: /* if (count_tokens(l_present_line) <> 5) then
2403: retcode := 2;
2401: --13359423
2402: /* if (count_tokens(l_present_line) <> 5) then
2403: retcode := 2;
2404: errbuf := 'Header Record Format altered.';
2405: fnd_file.PUT_LINE(FND_FILE.OUTPUT,'Delimiter count is not as expected. Record Format altered.');
2406: raise invalid_file_format;
2407: end if; */
2408: --13359423
2409:
2409:
2410: --Inserting into the header table
2411: l_record_type := 'HC';
2412: l_tax_year := get_token(l_present_line,1);
2413: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tax_year:'||l_tax_year);
2414: l_employer_number := get_token(l_present_line,2);
2415: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_number:'||l_employer_number);
2416: l_employer_name := get_token(l_present_line,3);
2417: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_name:'||l_employer_name);
2411: l_record_type := 'HC';
2412: l_tax_year := get_token(l_present_line,1);
2413: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tax_year:'||l_tax_year);
2414: l_employer_number := get_token(l_present_line,2);
2415: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_number:'||l_employer_number);
2416: l_employer_name := get_token(l_present_line,3);
2417: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_name:'||l_employer_name);
2418: l_hc_date := to_date(get_token(l_present_line,4),'DDMMYY');
2419: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_hc_date:'||l_hc_date);
2413: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tax_year:'||l_tax_year);
2414: l_employer_number := get_token(l_present_line,2);
2415: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_number:'||l_employer_number);
2416: l_employer_name := get_token(l_present_line,3);
2417: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_name:'||l_employer_name);
2418: l_hc_date := to_date(get_token(l_present_line,4),'DDMMYY');
2419: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_hc_date:'||l_hc_date);
2420: l_hc_label_year := to_number(get_token(l_present_line,5));
2421: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_hc_label_year:'||l_hc_label_year);
2415: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_number:'||l_employer_number);
2416: l_employer_name := get_token(l_present_line,3);
2417: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_name:'||l_employer_name);
2418: l_hc_date := to_date(get_token(l_present_line,4),'DDMMYY');
2419: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_hc_date:'||l_hc_date);
2420: l_hc_label_year := to_number(get_token(l_present_line,5));
2421: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_hc_label_year:'||l_hc_label_year);
2422: --fnd_file.PUT_LINE(FND_FILE.LOG, get_token(l_present_line,6));
2423: l_employer_unit_no:= substr(get_token(l_present_line,6),1,3);
2417: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_name:'||l_employer_name);
2418: l_hc_date := to_date(get_token(l_present_line,4),'DDMMYY');
2419: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_hc_date:'||l_hc_date);
2420: l_hc_label_year := to_number(get_token(l_present_line,5));
2421: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_hc_label_year:'||l_hc_label_year);
2422: --fnd_file.PUT_LINE(FND_FILE.LOG, get_token(l_present_line,6));
2423: l_employer_unit_no:= substr(get_token(l_present_line,6),1,3);
2424: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_unit_no:'||l_employer_unit_no);
2425:
2418: l_hc_date := to_date(get_token(l_present_line,4),'DDMMYY');
2419: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_hc_date:'||l_hc_date);
2420: l_hc_label_year := to_number(get_token(l_present_line,5));
2421: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_hc_label_year:'||l_hc_label_year);
2422: --fnd_file.PUT_LINE(FND_FILE.LOG, get_token(l_present_line,6));
2423: l_employer_unit_no:= substr(get_token(l_present_line,6),1,3);
2424: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_unit_no:'||l_employer_unit_no);
2425:
2426: INSERT INTO PAY_IE_TAX_HEADER_INTERFACE
2420: l_hc_label_year := to_number(get_token(l_present_line,5));
2421: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_hc_label_year:'||l_hc_label_year);
2422: --fnd_file.PUT_LINE(FND_FILE.LOG, get_token(l_present_line,6));
2423: l_employer_unit_no:= substr(get_token(l_present_line,6),1,3);
2424: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_employer_unit_no:'||l_employer_unit_no);
2425:
2426: INSERT INTO PAY_IE_TAX_HEADER_INTERFACE
2427: (
2428: RECORD_TYPE
2444: ,l_hc_label_year
2445: );
2446:
2447: utl_file.get_line(l_file_handle,l_present_line);--Reading Body Columns
2448: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line-3:'||l_present_line);
2449:
2450: --Body Column must start with
2451: --ID_PPSN, CD_SURNAME, CD_FORENAME,....
2452: IF (substr(trim(l_present_line),1,7) <> 'ID_PPSN')
2452: IF (substr(trim(l_present_line),1,7) <> 'ID_PPSN')
2453: THEN
2454: retcode := 2;
2455: errbuf := 'Invalid file format.';
2456: fnd_file.PUT_LINE(FND_FILE.LOG,'Body not started with ID_PPSN');
2457: hr_utility.trace('Beginning line is :'||l_present_line);
2458: raise invalid_file_format;
2459: END IF;
2460:
2457: hr_utility.trace('Beginning line is :'||l_present_line);
2458: raise invalid_file_format;
2459: END IF;
2460:
2461: --fnd_file.PUT_LINE(FND_FILE.LOG, '+++++++++BODY+++++++++');
2462:
2463: LOOP
2464: BEGIN
2465:
2463: LOOP
2464: BEGIN
2465:
2466: utl_file.get_line(l_file_handle,l_present_line); --Reading Body values
2467: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line:'||l_present_line);
2468:
2469: l_present_line1 := SUBSTR(l_present_line, 1, INSTR(l_present_line,'"',1,14)+1);
2470: l_present_line2 := SUBSTR(l_present_line, INSTR(l_present_line,'"',1,14)+2);
2471:
2468:
2469: l_present_line1 := SUBSTR(l_present_line, 1, INSTR(l_present_line,'"',1,14)+1);
2470: l_present_line2 := SUBSTR(l_present_line, INSTR(l_present_line,'"',1,14)+2);
2471:
2472: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line1:'||l_present_line1);
2473: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line2:'||l_present_line2);
2474: --fnd_file.PUT_LINE(FND_FILE.LOG, '+++++++++++++++++++++++++++++++++++++++++++++++');
2475:
2476: IF (substr(trim(l_present_line),1,18) = 'TC_EMPLOYER_NUMBER') THEN
2469: l_present_line1 := SUBSTR(l_present_line, 1, INSTR(l_present_line,'"',1,14)+1);
2470: l_present_line2 := SUBSTR(l_present_line, INSTR(l_present_line,'"',1,14)+2);
2471:
2472: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line1:'||l_present_line1);
2473: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line2:'||l_present_line2);
2474: --fnd_file.PUT_LINE(FND_FILE.LOG, '+++++++++++++++++++++++++++++++++++++++++++++++');
2475:
2476: IF (substr(trim(l_present_line),1,18) = 'TC_EMPLOYER_NUMBER') THEN
2477: EXIT;
2470: l_present_line2 := SUBSTR(l_present_line, INSTR(l_present_line,'"',1,14)+2);
2471:
2472: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line1:'||l_present_line1);
2473: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line2:'||l_present_line2);
2474: --fnd_file.PUT_LINE(FND_FILE.LOG, '+++++++++++++++++++++++++++++++++++++++++++++++');
2475:
2476: IF (substr(trim(l_present_line),1,18) = 'TC_EMPLOYER_NUMBER') THEN
2477: EXIT;
2478: ELSE
2478: ELSE
2479: if (count_tokens(l_present_line) < 53) then
2480: retcode := 2;
2481: errbuf := 'Body Record Format altered.';
2482: fnd_file.PUT_LINE(FND_FILE.OUTPUT,'Delimiter count is not as expected. Record Format altered.');
2483: raise invalid_file_format;
2484: end if;
2485: --Inserting into the Body table
2486:
2484: end if;
2485: --Inserting into the Body table
2486:
2487: l_pps_number := get_token(l_present_line1,1,'",');
2488: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_pps_number '||l_pps_number);
2489: l_last_name := get_token(l_present_line1,2,'",');
2490: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_last_name '||l_last_name);
2491: l_first_name := get_token(l_present_line1,3,'",');
2492: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_first_name '||l_first_name);
2486:
2487: l_pps_number := get_token(l_present_line1,1,'",');
2488: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_pps_number '||l_pps_number);
2489: l_last_name := get_token(l_present_line1,2,'",');
2490: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_last_name '||l_last_name);
2491: l_first_name := get_token(l_present_line1,3,'",');
2492: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_first_name '||l_first_name);
2493: l_works_number := get_token(l_present_line1,4);
2494: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_works_number '||l_works_number);
2488: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_pps_number '||l_pps_number);
2489: l_last_name := get_token(l_present_line1,2,'",');
2490: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_last_name '||l_last_name);
2491: l_first_name := get_token(l_present_line1,3,'",');
2492: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_first_name '||l_first_name);
2493: l_works_number := get_token(l_present_line1,4);
2494: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_works_number '||l_works_number);
2495: l_address_line1 := get_token(l_present_line1,5,'",');
2496: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line1 '||l_address_line1);
2490: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_last_name '||l_last_name);
2491: l_first_name := get_token(l_present_line1,3,'",');
2492: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_first_name '||l_first_name);
2493: l_works_number := get_token(l_present_line1,4);
2494: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_works_number '||l_works_number);
2495: l_address_line1 := get_token(l_present_line1,5,'",');
2496: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line1 '||l_address_line1);
2497: l_address_line2 := get_token(l_present_line1,6,'",');
2498: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line2 '||l_address_line2);
2492: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_first_name '||l_first_name);
2493: l_works_number := get_token(l_present_line1,4);
2494: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_works_number '||l_works_number);
2495: l_address_line1 := get_token(l_present_line1,5,'",');
2496: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line1 '||l_address_line1);
2497: l_address_line2 := get_token(l_present_line1,6,'",');
2498: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line2 '||l_address_line2);
2499: l_address_line3 := get_token(l_present_line1,7,'",');
2500: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line3 '||l_address_line3);
2494: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_works_number '||l_works_number);
2495: l_address_line1 := get_token(l_present_line1,5,'",');
2496: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line1 '||l_address_line1);
2497: l_address_line2 := get_token(l_present_line1,6,'",');
2498: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line2 '||l_address_line2);
2499: l_address_line3 := get_token(l_present_line1,7,'",');
2500: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line3 '||l_address_line3);
2501:
2502: l_employer_number := l_employer_number;
2496: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line1 '||l_address_line1);
2497: l_address_line2 := get_token(l_present_line1,6,'",');
2498: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line2 '||l_address_line2);
2499: l_address_line3 := get_token(l_present_line1,7,'",');
2500: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_address_line3 '||l_address_line3);
2501:
2502: l_employer_number := l_employer_number;
2503:
2504: l_cert_date := to_date(get_token(l_present_line2,8-7),'DDMMYY');
2501:
2502: l_employer_number := l_employer_number;
2503:
2504: l_cert_date := to_date(get_token(l_present_line2,8-7),'DDMMYY');
2505: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_cert_date '||l_cert_date);
2506: l_cert_start_date := to_date(get_token(l_present_line2,9-7),'DDMMYY');
2507: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_cert_start_date '||l_cert_start_date);
2508:
2509: --fnd_file.PUT_LINE(FND_FILE.LOG, 'Before l_cert_end_date '||l_cert_end_date);
2503:
2504: l_cert_date := to_date(get_token(l_present_line2,8-7),'DDMMYY');
2505: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_cert_date '||l_cert_date);
2506: l_cert_start_date := to_date(get_token(l_present_line2,9-7),'DDMMYY');
2507: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_cert_start_date '||l_cert_start_date);
2508:
2509: --fnd_file.PUT_LINE(FND_FILE.LOG, 'Before l_cert_end_date '||l_cert_end_date);
2510: If substr(get_token(l_present_line2,10-7),1,6) <> '000000' THEN
2511: l_cert_end_date := to_date(get_token(l_present_line2,10-7),'DDMMYY');
2505: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_cert_date '||l_cert_date);
2506: l_cert_start_date := to_date(get_token(l_present_line2,9-7),'DDMMYY');
2507: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_cert_start_date '||l_cert_start_date);
2508:
2509: --fnd_file.PUT_LINE(FND_FILE.LOG, 'Before l_cert_end_date '||l_cert_end_date);
2510: If substr(get_token(l_present_line2,10-7),1,6) <> '000000' THEN
2511: l_cert_end_date := to_date(get_token(l_present_line2,10-7),'DDMMYY');
2512: ELSE
2513: l_cert_end_date := NULL; --14627559
2511: l_cert_end_date := to_date(get_token(l_present_line2,10-7),'DDMMYY');
2512: ELSE
2513: l_cert_end_date := NULL; --14627559
2514: END IF;
2515: --fnd_file.PUT_LINE(FND_FILE.LOG, 'After l_cert_end_date '||l_cert_end_date);
2516:
2517: l_wk_mth_indicator := get_token(l_present_line2,11-7);
2518: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_wk_mth_indicator '||l_wk_mth_indicator);
2519:
2514: END IF;
2515: --fnd_file.PUT_LINE(FND_FILE.LOG, 'After l_cert_end_date '||l_cert_end_date);
2516:
2517: l_wk_mth_indicator := get_token(l_present_line2,11-7);
2518: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_wk_mth_indicator '||l_wk_mth_indicator);
2519:
2520: l_tot_pay_to_date := fnd_number.canonical_to_number(get_token(l_present_line2,12-7));
2521: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tot_pay_to_date '||l_tot_pay_to_date);
2522:
2517: l_wk_mth_indicator := get_token(l_present_line2,11-7);
2518: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_wk_mth_indicator '||l_wk_mth_indicator);
2519:
2520: l_tot_pay_to_date := fnd_number.canonical_to_number(get_token(l_present_line2,12-7));
2521: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tot_pay_to_date '||l_tot_pay_to_date);
2522:
2523: l_tot_tax_to_date := fnd_number.canonical_to_number(get_token(l_present_line2,13-7));
2524: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tot_tax_to_date '||l_tot_tax_to_date);
2525:
2520: l_tot_pay_to_date := fnd_number.canonical_to_number(get_token(l_present_line2,12-7));
2521: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tot_pay_to_date '||l_tot_pay_to_date);
2522:
2523: l_tot_tax_to_date := fnd_number.canonical_to_number(get_token(l_present_line2,13-7));
2524: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tot_tax_to_date '||l_tot_tax_to_date);
2525:
2526: l_exemption_indicator := get_token(l_present_line2,14-7);
2527: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_exemption_indicator '||l_exemption_indicator);
2528:
2523: l_tot_tax_to_date := fnd_number.canonical_to_number(get_token(l_present_line2,13-7));
2524: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tot_tax_to_date '||l_tot_tax_to_date);
2525:
2526: l_exemption_indicator := get_token(l_present_line2,14-7);
2527: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_exemption_indicator '||l_exemption_indicator);
2528:
2529: l_CD_YRLY_TAX_CRED := fnd_number.canonical_to_number(get_token(l_present_line2,15-7));
2530: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_CRED '||l_CD_YRLY_TAX_CRED);
2531:
2526: l_exemption_indicator := get_token(l_present_line2,14-7);
2527: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_exemption_indicator '||l_exemption_indicator);
2528:
2529: l_CD_YRLY_TAX_CRED := fnd_number.canonical_to_number(get_token(l_present_line2,15-7));
2530: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_CRED '||l_CD_YRLY_TAX_CRED);
2531:
2532: l_mth_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line2,16-7)); -->length 8
2533: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_mth_tax_credit '||l_mth_tax_credit);
2534:
2529: l_CD_YRLY_TAX_CRED := fnd_number.canonical_to_number(get_token(l_present_line2,15-7));
2530: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_CRED '||l_CD_YRLY_TAX_CRED);
2531:
2532: l_mth_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line2,16-7)); -->length 8
2533: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_mth_tax_credit '||l_mth_tax_credit);
2534:
2535: l_wk_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line2,17-7)); -->length 7
2536: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_wk_tax_credit '||l_wk_tax_credit);
2537:
2532: l_mth_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line2,16-7)); -->length 8
2533: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_mth_tax_credit '||l_mth_tax_credit);
2534:
2535: l_wk_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line2,17-7)); -->length 7
2536: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_wk_tax_credit '||l_wk_tax_credit);
2537:
2538: l_std_rate_of_tax := fnd_number.canonical_to_number(get_token(l_present_line2,18-7));
2539: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_std_rate_of_tax '||l_std_rate_of_tax);
2540:
2535: l_wk_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line2,17-7)); -->length 7
2536: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_wk_tax_credit '||l_wk_tax_credit);
2537:
2538: l_std_rate_of_tax := fnd_number.canonical_to_number(get_token(l_present_line2,18-7));
2539: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_std_rate_of_tax '||l_std_rate_of_tax);
2540:
2541: l_CD_YRLY_TAX_RATE_1 := fnd_number.canonical_to_number(get_token(l_present_line2,19-7));
2542: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_1 '||l_CD_YRLY_TAX_RATE_1);
2543:
2538: l_std_rate_of_tax := fnd_number.canonical_to_number(get_token(l_present_line2,18-7));
2539: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_std_rate_of_tax '||l_std_rate_of_tax);
2540:
2541: l_CD_YRLY_TAX_RATE_1 := fnd_number.canonical_to_number(get_token(l_present_line2,19-7));
2542: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_1 '||l_CD_YRLY_TAX_RATE_1);
2543:
2544: l_mth_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line2,20-7)); -->length 8
2545: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_mth_rate_cutoff '||l_mth_rate_cutoff);
2546:
2541: l_CD_YRLY_TAX_RATE_1 := fnd_number.canonical_to_number(get_token(l_present_line2,19-7));
2542: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_1 '||l_CD_YRLY_TAX_RATE_1);
2543:
2544: l_mth_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line2,20-7)); -->length 8
2545: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_mth_rate_cutoff '||l_mth_rate_cutoff);
2546:
2547: l_wk_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line2,21-7)); -->length 7
2548: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_wk_rate_cutoff '||l_wk_rate_cutoff);
2549:
2544: l_mth_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line2,20-7)); -->length 8
2545: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_mth_rate_cutoff '||l_mth_rate_cutoff);
2546:
2547: l_wk_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line2,21-7)); -->length 7
2548: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_wk_rate_cutoff '||l_wk_rate_cutoff);
2549:
2550: l_higher_rate_of_tax := fnd_number.canonical_to_number(get_token(l_present_line2,22-7));
2551: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_higher_rate_of_tax '||l_higher_rate_of_tax);
2552:
2547: l_wk_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line2,21-7)); -->length 7
2548: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_wk_rate_cutoff '||l_wk_rate_cutoff);
2549:
2550: l_higher_rate_of_tax := fnd_number.canonical_to_number(get_token(l_present_line2,22-7));
2551: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_higher_rate_of_tax '||l_higher_rate_of_tax);
2552:
2553: l_processed_flag := NULL;
2554: l_processed_date := NULL;
2555: --
2554: l_processed_date := NULL;
2555: --
2556:
2557: l_CD_YRLY_TAX_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,23-7));
2558: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_2 '||l_CD_YRLY_TAX_RATE_2);
2559: l_CD_MTHLY_TAX_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,24-7));
2560: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_2 '||l_CD_MTHLY_TAX_RATE_2);
2561: l_CD_WKLY_TAX_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,25-7));
2562: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_2 '||l_CD_WKLY_TAX_RATE_2);
2556:
2557: l_CD_YRLY_TAX_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,23-7));
2558: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_2 '||l_CD_YRLY_TAX_RATE_2);
2559: l_CD_MTHLY_TAX_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,24-7));
2560: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_2 '||l_CD_MTHLY_TAX_RATE_2);
2561: l_CD_WKLY_TAX_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,25-7));
2562: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_2 '||l_CD_WKLY_TAX_RATE_2);
2563: l_CD_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,26-7));
2564: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_3 '||l_CD_TAX_RATE_3);
2558: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_2 '||l_CD_YRLY_TAX_RATE_2);
2559: l_CD_MTHLY_TAX_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,24-7));
2560: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_2 '||l_CD_MTHLY_TAX_RATE_2);
2561: l_CD_WKLY_TAX_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,25-7));
2562: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_2 '||l_CD_WKLY_TAX_RATE_2);
2563: l_CD_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,26-7));
2564: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_3 '||l_CD_TAX_RATE_3);
2565: l_CD_YRLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,27-7));
2566: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_3 '||l_CD_YRLY_TAX_RATE_3);
2560: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_2 '||l_CD_MTHLY_TAX_RATE_2);
2561: l_CD_WKLY_TAX_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,25-7));
2562: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_2 '||l_CD_WKLY_TAX_RATE_2);
2563: l_CD_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,26-7));
2564: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_3 '||l_CD_TAX_RATE_3);
2565: l_CD_YRLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,27-7));
2566: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_3 '||l_CD_YRLY_TAX_RATE_3);
2567: l_CD_MTHLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,28-7));
2568: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_3 '||l_CD_MTHLY_TAX_RATE_3);
2562: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_2 '||l_CD_WKLY_TAX_RATE_2);
2563: l_CD_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,26-7));
2564: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_3 '||l_CD_TAX_RATE_3);
2565: l_CD_YRLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,27-7));
2566: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_3 '||l_CD_YRLY_TAX_RATE_3);
2567: l_CD_MTHLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,28-7));
2568: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_3 '||l_CD_MTHLY_TAX_RATE_3);
2569: l_CD_WKLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,29-7));
2570: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_3 '||l_CD_WKLY_TAX_RATE_3);
2564: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_3 '||l_CD_TAX_RATE_3);
2565: l_CD_YRLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,27-7));
2566: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_3 '||l_CD_YRLY_TAX_RATE_3);
2567: l_CD_MTHLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,28-7));
2568: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_3 '||l_CD_MTHLY_TAX_RATE_3);
2569: l_CD_WKLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,29-7));
2570: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_3 '||l_CD_WKLY_TAX_RATE_3);
2571: l_CD_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,30-7));
2572: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_4 '||l_CD_TAX_RATE_4);
2566: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_3 '||l_CD_YRLY_TAX_RATE_3);
2567: l_CD_MTHLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,28-7));
2568: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_3 '||l_CD_MTHLY_TAX_RATE_3);
2569: l_CD_WKLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,29-7));
2570: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_3 '||l_CD_WKLY_TAX_RATE_3);
2571: l_CD_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,30-7));
2572: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_4 '||l_CD_TAX_RATE_4);
2573: l_CD_YRLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,31-7));
2574: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_4 '||l_CD_YRLY_TAX_RATE_4);
2568: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_3 '||l_CD_MTHLY_TAX_RATE_3);
2569: l_CD_WKLY_TAX_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,29-7));
2570: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_3 '||l_CD_WKLY_TAX_RATE_3);
2571: l_CD_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,30-7));
2572: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_4 '||l_CD_TAX_RATE_4);
2573: l_CD_YRLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,31-7));
2574: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_4 '||l_CD_YRLY_TAX_RATE_4);
2575: l_CD_MTHLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,32-7));
2576: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_4 '||l_CD_MTHLY_TAX_RATE_4);
2570: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_3 '||l_CD_WKLY_TAX_RATE_3);
2571: l_CD_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,30-7));
2572: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_4 '||l_CD_TAX_RATE_4);
2573: l_CD_YRLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,31-7));
2574: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_4 '||l_CD_YRLY_TAX_RATE_4);
2575: l_CD_MTHLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,32-7));
2576: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_4 '||l_CD_MTHLY_TAX_RATE_4);
2577: l_CD_WKLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,33-7));
2578: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_4 '||l_CD_WKLY_TAX_RATE_4);
2572: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_4 '||l_CD_TAX_RATE_4);
2573: l_CD_YRLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,31-7));
2574: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_4 '||l_CD_YRLY_TAX_RATE_4);
2575: l_CD_MTHLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,32-7));
2576: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_4 '||l_CD_MTHLY_TAX_RATE_4);
2577: l_CD_WKLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,33-7));
2578: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_4 '||l_CD_WKLY_TAX_RATE_4);
2579: l_CD_TAX_RATE_5 := fnd_number.canonical_to_number(get_token(l_present_line2,34-7));
2580: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_5 '||l_CD_TAX_RATE_5 );
2574: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_YRLY_TAX_RATE_4 '||l_CD_YRLY_TAX_RATE_4);
2575: l_CD_MTHLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,32-7));
2576: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_4 '||l_CD_MTHLY_TAX_RATE_4);
2577: l_CD_WKLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,33-7));
2578: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_4 '||l_CD_WKLY_TAX_RATE_4);
2579: l_CD_TAX_RATE_5 := fnd_number.canonical_to_number(get_token(l_present_line2,34-7));
2580: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_5 '||l_CD_TAX_RATE_5 );
2581: l_IN_EXEMPT_USC := get_token(l_present_line2,35-7);
2582: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_IN_EXEMPT_USC '||l_IN_EXEMPT_USC );
2576: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_MTHLY_TAX_RATE_4 '||l_CD_MTHLY_TAX_RATE_4);
2577: l_CD_WKLY_TAX_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,33-7));
2578: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_4 '||l_CD_WKLY_TAX_RATE_4);
2579: l_CD_TAX_RATE_5 := fnd_number.canonical_to_number(get_token(l_present_line2,34-7));
2580: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_5 '||l_CD_TAX_RATE_5 );
2581: l_IN_EXEMPT_USC := get_token(l_present_line2,35-7);
2582: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_IN_EXEMPT_USC '||l_IN_EXEMPT_USC );
2583: l_CD_TOTAL_USC_PAY_TODATE := fnd_number.canonical_to_number(get_token(l_present_line2,36-7));
2584: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TOTAL_USC_PAY_TODATE '||l_CD_TOTAL_USC_PAY_TODATE);
2578: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_WKLY_TAX_RATE_4 '||l_CD_WKLY_TAX_RATE_4);
2579: l_CD_TAX_RATE_5 := fnd_number.canonical_to_number(get_token(l_present_line2,34-7));
2580: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_5 '||l_CD_TAX_RATE_5 );
2581: l_IN_EXEMPT_USC := get_token(l_present_line2,35-7);
2582: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_IN_EXEMPT_USC '||l_IN_EXEMPT_USC );
2583: l_CD_TOTAL_USC_PAY_TODATE := fnd_number.canonical_to_number(get_token(l_present_line2,36-7));
2584: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TOTAL_USC_PAY_TODATE '||l_CD_TOTAL_USC_PAY_TODATE);
2585: l_CD_TOTAL_USC_TAX_TODATE := fnd_number.canonical_to_number(get_token(l_present_line2,37-7));
2586: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TOTAL_USC_TAX_TODATE '||l_CD_TOTAL_USC_TAX_TODATE);
2580: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TAX_RATE_5 '||l_CD_TAX_RATE_5 );
2581: l_IN_EXEMPT_USC := get_token(l_present_line2,35-7);
2582: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_IN_EXEMPT_USC '||l_IN_EXEMPT_USC );
2583: l_CD_TOTAL_USC_PAY_TODATE := fnd_number.canonical_to_number(get_token(l_present_line2,36-7));
2584: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TOTAL_USC_PAY_TODATE '||l_CD_TOTAL_USC_PAY_TODATE);
2585: l_CD_TOTAL_USC_TAX_TODATE := fnd_number.canonical_to_number(get_token(l_present_line2,37-7));
2586: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TOTAL_USC_TAX_TODATE '||l_CD_TOTAL_USC_TAX_TODATE);
2587: l_CD_USC_RATE_1 := fnd_number.canonical_to_number(get_token(l_present_line2,38-7));
2588: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_1 '||l_CD_USC_RATE_1);
2582: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_IN_EXEMPT_USC '||l_IN_EXEMPT_USC );
2583: l_CD_TOTAL_USC_PAY_TODATE := fnd_number.canonical_to_number(get_token(l_present_line2,36-7));
2584: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TOTAL_USC_PAY_TODATE '||l_CD_TOTAL_USC_PAY_TODATE);
2585: l_CD_TOTAL_USC_TAX_TODATE := fnd_number.canonical_to_number(get_token(l_present_line2,37-7));
2586: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TOTAL_USC_TAX_TODATE '||l_CD_TOTAL_USC_TAX_TODATE);
2587: l_CD_USC_RATE_1 := fnd_number.canonical_to_number(get_token(l_present_line2,38-7));
2588: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_1 '||l_CD_USC_RATE_1);
2589: l_AM_USC_YRLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,39-7));
2590: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_1 '||l_AM_USC_YRLY_CUTOFF_1);
2584: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TOTAL_USC_PAY_TODATE '||l_CD_TOTAL_USC_PAY_TODATE);
2585: l_CD_TOTAL_USC_TAX_TODATE := fnd_number.canonical_to_number(get_token(l_present_line2,37-7));
2586: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TOTAL_USC_TAX_TODATE '||l_CD_TOTAL_USC_TAX_TODATE);
2587: l_CD_USC_RATE_1 := fnd_number.canonical_to_number(get_token(l_present_line2,38-7));
2588: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_1 '||l_CD_USC_RATE_1);
2589: l_AM_USC_YRLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,39-7));
2590: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_1 '||l_AM_USC_YRLY_CUTOFF_1);
2591: l_AM_USC_MTHLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,40-7));
2592: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_1 '||l_AM_USC_MTHLY_CUTOFF_1);
2586: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_TOTAL_USC_TAX_TODATE '||l_CD_TOTAL_USC_TAX_TODATE);
2587: l_CD_USC_RATE_1 := fnd_number.canonical_to_number(get_token(l_present_line2,38-7));
2588: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_1 '||l_CD_USC_RATE_1);
2589: l_AM_USC_YRLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,39-7));
2590: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_1 '||l_AM_USC_YRLY_CUTOFF_1);
2591: l_AM_USC_MTHLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,40-7));
2592: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_1 '||l_AM_USC_MTHLY_CUTOFF_1);
2593: l_AM_USC_WKLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,41-7));
2594: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_1 '||l_AM_USC_WKLY_CUTOFF_1);
2588: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_1 '||l_CD_USC_RATE_1);
2589: l_AM_USC_YRLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,39-7));
2590: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_1 '||l_AM_USC_YRLY_CUTOFF_1);
2591: l_AM_USC_MTHLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,40-7));
2592: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_1 '||l_AM_USC_MTHLY_CUTOFF_1);
2593: l_AM_USC_WKLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,41-7));
2594: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_1 '||l_AM_USC_WKLY_CUTOFF_1);
2595: l_CD_USC_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,42-7));
2596: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_2 '||l_CD_USC_RATE_2);
2590: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_1 '||l_AM_USC_YRLY_CUTOFF_1);
2591: l_AM_USC_MTHLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,40-7));
2592: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_1 '||l_AM_USC_MTHLY_CUTOFF_1);
2593: l_AM_USC_WKLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,41-7));
2594: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_1 '||l_AM_USC_WKLY_CUTOFF_1);
2595: l_CD_USC_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,42-7));
2596: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_2 '||l_CD_USC_RATE_2);
2597: l_AM_USC_YRLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,43-7));
2598: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_2 '||l_AM_USC_YRLY_CUTOFF_2);
2592: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_1 '||l_AM_USC_MTHLY_CUTOFF_1);
2593: l_AM_USC_WKLY_CUTOFF_1 := fnd_number.canonical_to_number(get_token(l_present_line2,41-7));
2594: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_1 '||l_AM_USC_WKLY_CUTOFF_1);
2595: l_CD_USC_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,42-7));
2596: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_2 '||l_CD_USC_RATE_2);
2597: l_AM_USC_YRLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,43-7));
2598: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_2 '||l_AM_USC_YRLY_CUTOFF_2);
2599: l_AM_USC_MTHLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,44-7));
2600: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_2 '||l_AM_USC_MTHLY_CUTOFF_2);
2594: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_1 '||l_AM_USC_WKLY_CUTOFF_1);
2595: l_CD_USC_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line2,42-7));
2596: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_2 '||l_CD_USC_RATE_2);
2597: l_AM_USC_YRLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,43-7));
2598: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_2 '||l_AM_USC_YRLY_CUTOFF_2);
2599: l_AM_USC_MTHLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,44-7));
2600: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_2 '||l_AM_USC_MTHLY_CUTOFF_2);
2601: l_AM_USC_WKLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,45-7));
2602: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_2 '||l_AM_USC_WKLY_CUTOFF_2);
2596: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_2 '||l_CD_USC_RATE_2);
2597: l_AM_USC_YRLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,43-7));
2598: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_2 '||l_AM_USC_YRLY_CUTOFF_2);
2599: l_AM_USC_MTHLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,44-7));
2600: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_2 '||l_AM_USC_MTHLY_CUTOFF_2);
2601: l_AM_USC_WKLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,45-7));
2602: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_2 '||l_AM_USC_WKLY_CUTOFF_2);
2603: l_CD_USC_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,46-7));
2604: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_3 '||l_CD_USC_RATE_3);
2598: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_2 '||l_AM_USC_YRLY_CUTOFF_2);
2599: l_AM_USC_MTHLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,44-7));
2600: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_2 '||l_AM_USC_MTHLY_CUTOFF_2);
2601: l_AM_USC_WKLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,45-7));
2602: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_2 '||l_AM_USC_WKLY_CUTOFF_2);
2603: l_CD_USC_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,46-7));
2604: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_3 '||l_CD_USC_RATE_3);
2605: l_AM_USC_YRLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,47-7));
2606: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_3 '||l_AM_USC_YRLY_CUTOFF_3);
2600: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_2 '||l_AM_USC_MTHLY_CUTOFF_2);
2601: l_AM_USC_WKLY_CUTOFF_2 := fnd_number.canonical_to_number(get_token(l_present_line2,45-7));
2602: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_2 '||l_AM_USC_WKLY_CUTOFF_2);
2603: l_CD_USC_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,46-7));
2604: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_3 '||l_CD_USC_RATE_3);
2605: l_AM_USC_YRLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,47-7));
2606: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_3 '||l_AM_USC_YRLY_CUTOFF_3);
2607: l_AM_USC_MTHLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,48-7));
2608: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_3 '||l_AM_USC_MTHLY_CUTOFF_3);
2602: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_2 '||l_AM_USC_WKLY_CUTOFF_2);
2603: l_CD_USC_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line2,46-7));
2604: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_3 '||l_CD_USC_RATE_3);
2605: l_AM_USC_YRLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,47-7));
2606: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_3 '||l_AM_USC_YRLY_CUTOFF_3);
2607: l_AM_USC_MTHLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,48-7));
2608: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_3 '||l_AM_USC_MTHLY_CUTOFF_3);
2609: l_AM_USC_WKLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,49-7));
2610: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_3 '||l_AM_USC_WKLY_CUTOFF_3);
2604: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_3 '||l_CD_USC_RATE_3);
2605: l_AM_USC_YRLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,47-7));
2606: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_3 '||l_AM_USC_YRLY_CUTOFF_3);
2607: l_AM_USC_MTHLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,48-7));
2608: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_3 '||l_AM_USC_MTHLY_CUTOFF_3);
2609: l_AM_USC_WKLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,49-7));
2610: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_3 '||l_AM_USC_WKLY_CUTOFF_3);
2611: l_CD_USC_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,50-7));
2612: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_4 '||l_CD_USC_RATE_4);
2606: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_3 '||l_AM_USC_YRLY_CUTOFF_3);
2607: l_AM_USC_MTHLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,48-7));
2608: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_3 '||l_AM_USC_MTHLY_CUTOFF_3);
2609: l_AM_USC_WKLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,49-7));
2610: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_3 '||l_AM_USC_WKLY_CUTOFF_3);
2611: l_CD_USC_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,50-7));
2612: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_4 '||l_CD_USC_RATE_4);
2613: l_AM_USC_YRLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,51-7));
2614: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_4 '||l_AM_USC_YRLY_CUTOFF_4);
2608: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_3 '||l_AM_USC_MTHLY_CUTOFF_3);
2609: l_AM_USC_WKLY_CUTOFF_3 := fnd_number.canonical_to_number(get_token(l_present_line2,49-7));
2610: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_3 '||l_AM_USC_WKLY_CUTOFF_3);
2611: l_CD_USC_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,50-7));
2612: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_4 '||l_CD_USC_RATE_4);
2613: l_AM_USC_YRLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,51-7));
2614: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_4 '||l_AM_USC_YRLY_CUTOFF_4);
2615: l_AM_USC_MTHLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,52-7));
2616: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_4 '||l_AM_USC_MTHLY_CUTOFF_4);
2610: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_3 '||l_AM_USC_WKLY_CUTOFF_3);
2611: l_CD_USC_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line2,50-7));
2612: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_4 '||l_CD_USC_RATE_4);
2613: l_AM_USC_YRLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,51-7));
2614: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_4 '||l_AM_USC_YRLY_CUTOFF_4);
2615: l_AM_USC_MTHLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,52-7));
2616: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_4 '||l_AM_USC_MTHLY_CUTOFF_4);
2617: l_AM_USC_WKLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,53-7));
2618: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_4 '||l_AM_USC_WKLY_CUTOFF_4);
2612: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_4 '||l_CD_USC_RATE_4);
2613: l_AM_USC_YRLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,51-7));
2614: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_4 '||l_AM_USC_YRLY_CUTOFF_4);
2615: l_AM_USC_MTHLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,52-7));
2616: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_4 '||l_AM_USC_MTHLY_CUTOFF_4);
2617: l_AM_USC_WKLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,53-7));
2618: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_4 '||l_AM_USC_WKLY_CUTOFF_4);
2619:
2620: IF ASCII(substr(get_token(l_present_line2,54-7),1,2)) <> '13' THEN
2614: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_YRLY_CUTOFF_4 '||l_AM_USC_YRLY_CUTOFF_4);
2615: l_AM_USC_MTHLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,52-7));
2616: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_MTHLY_CUTOFF_4 '||l_AM_USC_MTHLY_CUTOFF_4);
2617: l_AM_USC_WKLY_CUTOFF_4 := fnd_number.canonical_to_number(get_token(l_present_line2,53-7));
2618: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_AM_USC_WKLY_CUTOFF_4 '||l_AM_USC_WKLY_CUTOFF_4);
2619:
2620: IF ASCII(substr(get_token(l_present_line2,54-7),1,2)) <> '13' THEN
2621: l_CD_USC_RATE_5 := fnd_number.canonical_to_number(substr(get_token(l_present_line2,54-7),1,2));
2622: END IF;
2619:
2620: IF ASCII(substr(get_token(l_present_line2,54-7),1,2)) <> '13' THEN
2621: l_CD_USC_RATE_5 := fnd_number.canonical_to_number(substr(get_token(l_present_line2,54-7),1,2));
2622: END IF;
2623: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_CD_USC_RATE_5-3 '||l_CD_USC_RATE_5);
2624: --
2625:
2626: INSERT INTO PAY_IE_TAX_BODY_INTERFACE
2627: (
2755: END IF;
2756:
2757: EXCEPTION
2758: WHEN NO_DATA_FOUND THEN
2759: fnd_file.PUT_LINE(FND_FILE.LOG, 'End of file reached.');
2760: EXIT;
2761: WHEN OTHERS THEN
2762: fnd_file.PUT_LINE(FND_FILE.LOG, 'Other error occured');
2763: fnd_file.PUT_LINE(FND_FILE.LOG, sqlerrm);
2758: WHEN NO_DATA_FOUND THEN
2759: fnd_file.PUT_LINE(FND_FILE.LOG, 'End of file reached.');
2760: EXIT;
2761: WHEN OTHERS THEN
2762: fnd_file.PUT_LINE(FND_FILE.LOG, 'Other error occured');
2763: fnd_file.PUT_LINE(FND_FILE.LOG, sqlerrm);
2764: EXIT;
2765: END;
2766: END LOOP;
2759: fnd_file.PUT_LINE(FND_FILE.LOG, 'End of file reached.');
2760: EXIT;
2761: WHEN OTHERS THEN
2762: fnd_file.PUT_LINE(FND_FILE.LOG, 'Other error occured');
2763: fnd_file.PUT_LINE(FND_FILE.LOG, sqlerrm);
2764: EXIT;
2765: END;
2766: END LOOP;
2767:
2766: END LOOP;
2767:
2768: utl_file.get_line(l_file_handle,l_present_line); --Reading the Footer Values.
2769:
2770: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line last:'||l_present_line);
2771: if (count_tokens(l_present_line) <> 20) then
2772: retcode := 2;
2773: errbuf := 'Trailer Record Format altered.';
2774: fnd_file.PUT_LINE(FND_FILE.OUTPUT,'Delimiter count is not as expected. Record Format altered.');
2770: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_present_line last:'||l_present_line);
2771: if (count_tokens(l_present_line) <> 20) then
2772: retcode := 2;
2773: errbuf := 'Trailer Record Format altered.';
2774: fnd_file.PUT_LINE(FND_FILE.OUTPUT,'Delimiter count is not as expected. Record Format altered.');
2775: raise invalid_file_format;
2776: end if;
2777:
2778: --Inserting into the Footer table
2777:
2778: --Inserting into the Footer table
2779: l_employer_number := l_employer_number;
2780: l_record_no := get_token(l_present_line,21);
2781: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_record_no '||l_record_no);
2782: l_total_mth_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line,6));
2783: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_mth_rate_cutoff '||l_total_mth_rate_cutoff);
2784: l_total_wk_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line,7));
2785: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_wk_rate_cutoff '||l_total_wk_rate_cutoff);
2779: l_employer_number := l_employer_number;
2780: l_record_no := get_token(l_present_line,21);
2781: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_record_no '||l_record_no);
2782: l_total_mth_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line,6));
2783: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_mth_rate_cutoff '||l_total_mth_rate_cutoff);
2784: l_total_wk_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line,7));
2785: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_wk_rate_cutoff '||l_total_wk_rate_cutoff);
2786: l_total_mth_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line,3));
2787: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_mth_tax_credit '||l_total_mth_tax_credit);
2781: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_record_no '||l_record_no);
2782: l_total_mth_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line,6));
2783: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_mth_rate_cutoff '||l_total_mth_rate_cutoff);
2784: l_total_wk_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line,7));
2785: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_wk_rate_cutoff '||l_total_wk_rate_cutoff);
2786: l_total_mth_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line,3));
2787: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_mth_tax_credit '||l_total_mth_tax_credit);
2788: l_total_wk_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line,4));
2789: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_wk_tax_credit '||l_total_wk_tax_credit);
2783: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_mth_rate_cutoff '||l_total_mth_rate_cutoff);
2784: l_total_wk_rate_cutoff := fnd_number.canonical_to_number(get_token(l_present_line,7));
2785: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_wk_rate_cutoff '||l_total_wk_rate_cutoff);
2786: l_total_mth_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line,3));
2787: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_mth_tax_credit '||l_total_mth_tax_credit);
2788: l_total_wk_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line,4));
2789: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_wk_tax_credit '||l_total_wk_tax_credit);
2790:
2791: --
2785: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_wk_rate_cutoff '||l_total_wk_rate_cutoff);
2786: l_total_mth_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line,3));
2787: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_mth_tax_credit '||l_total_mth_tax_credit);
2788: l_total_wk_tax_credit := fnd_number.canonical_to_number(get_token(l_present_line,4));
2789: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_total_wk_tax_credit '||l_total_wk_tax_credit);
2790:
2791: --
2792: l_TC_TOT_YEARLY_TAX_CRED := fnd_number.canonical_to_number(get_token(l_present_line,2));
2793: l_TOT_YEARLY_TAX_RATE_1 := fnd_number.canonical_to_number(get_token(l_present_line,5));
2804: l_TOT_YEARLY_USC_RATE_2 := fnd_number.canonical_to_number(get_token(l_present_line,18));
2805: l_TOT_YEARLY_USC_RATE_3 := fnd_number.canonical_to_number(get_token(l_present_line,19));
2806: l_TOT_YEARLY_USC_RATE_4 := fnd_number.canonical_to_number(get_token(l_present_line,20));
2807: --
2808: --fnd_file.PUT_LINE(FND_FILE.LOG, '+++++++++TRAILER+++++++++');
2809:
2810: INSERT INTO PAY_IE_TAX_TRAILER_INTERFACE
2811: (
2812: RECORD_TYPE
2869: , l_employer_number
2870: , l_tax_year);
2871:
2872:
2873: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tax_year: '||l_tax_year);
2874: --fnd_file.PUT_LINE(FND_FILE.LOG, 'retcode: '||retcode);
2875:
2876: IF retcode = '0' Then
2877: valinsupd_new (
2870: , l_tax_year);
2871:
2872:
2873: --fnd_file.PUT_LINE(FND_FILE.LOG, 'l_tax_year: '||l_tax_year);
2874: --fnd_file.PUT_LINE(FND_FILE.LOG, 'retcode: '||retcode);
2875:
2876: IF retcode = '0' Then
2877: valinsupd_new (
2878: errbuf
2990: --13359423
2991: If p_tax_year > 2011 THEN
2992: retcode := 2;
2993: errbuf := 'Invalid Tax Year.';
2994: fnd_file.PUT_LINE(FND_FILE.LOG,'Please enter tax year 2011 or less.');
2995: End if;
2996: --13359423
2997: end;
2998:
3057: commit;
3058: end if;
3059: exception
3060: when others then
3061: FND_FILE.PUT_LINE(fnd_file.log,'Error occured while deleting exisiting rows in
3062: PAY_IE_TAX_ERROR table');
3063: end;
3064:
3065: UPDATE PAY_IE_TAX_BODY_INTERFACE
3098: AND BodyRec.sum_mth_tax_credit = TrailRec.total_mth_credit
3099: AND BodyRec.sum_wk_tax_credit = TrailRec.total_wk_credit)
3100: THEN
3101: retcode := 0;
3102: fnd_file.put_line( fnd_file.log, 'FND - CONC-COMPLETION TEXT:NORMAL');
3103:
3104: update pay_ie_tax_body_interface
3105: set process_flag = 'Y'
3106: where EMPLOYER_NUMBER = p_employer_number;
3116: EXCEPTION
3117: WHEN NO_DATA_FOUND THEN
3118: l_error := SQLERRM;
3119: retcode := 2;
3120: FND_FILE.PUT_LINE(fnd_file.log,'No data found');
3121: WHEN unequal_value THEN
3122: errbuf := fnd_message.get;
3123: l_error_stack := errbuf;
3124: l_error := SQLERRM;
3123: l_error_stack := errbuf;
3124: l_error := SQLERRM;
3125: retcode := 2;
3126: IF l_count_mth_taxcredit <> l_count_emp_recno THEN
3127: FND_FILE.NEW_LINE(fnd_file.log, 1);
3128: FND_FILE.PUT_LINE(fnd_file.log,
3129: 'The total number of record in pay_ie_tax_body_interface is '
3130: || TO_CHAR (l_count_mth_taxcredit));
3131: FND_FILE.PUT_LINE (fnd_file.log,
3124: l_error := SQLERRM;
3125: retcode := 2;
3126: IF l_count_mth_taxcredit <> l_count_emp_recno THEN
3127: FND_FILE.NEW_LINE(fnd_file.log, 1);
3128: FND_FILE.PUT_LINE(fnd_file.log,
3129: 'The total number of record in pay_ie_tax_body_interface is '
3130: || TO_CHAR (l_count_mth_taxcredit));
3131: FND_FILE.PUT_LINE (fnd_file.log,
3132: 'The value in pay_ie_tax_trailer_interface.record_no is '
3127: FND_FILE.NEW_LINE(fnd_file.log, 1);
3128: FND_FILE.PUT_LINE(fnd_file.log,
3129: 'The total number of record in pay_ie_tax_body_interface is '
3130: || TO_CHAR (l_count_mth_taxcredit));
3131: FND_FILE.PUT_LINE (fnd_file.log,
3132: 'The value in pay_ie_tax_trailer_interface.record_no is '
3133: || TO_CHAR(l_count_emp_recno));
3134: FND_FILE.PUT_LINE(fnd_file.log,
3135: 'Error - Retcode = 2, total number of record in pay_ie_tax_body_interface');
3130: || TO_CHAR (l_count_mth_taxcredit));
3131: FND_FILE.PUT_LINE (fnd_file.log,
3132: 'The value in pay_ie_tax_trailer_interface.record_no is '
3133: || TO_CHAR(l_count_emp_recno));
3134: FND_FILE.PUT_LINE(fnd_file.log,
3135: 'Error - Retcode = 2, total number of record in pay_ie_tax_body_interface');
3136: FND_FILE.PUT_LINE(fnd_file.log,
3137: 'does not match the value in pay_ie_tax_trailer_interface.record_no');
3138: END IF;
3132: 'The value in pay_ie_tax_trailer_interface.record_no is '
3133: || TO_CHAR(l_count_emp_recno));
3134: FND_FILE.PUT_LINE(fnd_file.log,
3135: 'Error - Retcode = 2, total number of record in pay_ie_tax_body_interface');
3136: FND_FILE.PUT_LINE(fnd_file.log,
3137: 'does not match the value in pay_ie_tax_trailer_interface.record_no');
3138: END IF;
3139:
3140: IF l_sum_mth_rate_cutoff <> l_total_mth_cutoff THEN
3137: 'does not match the value in pay_ie_tax_trailer_interface.record_no');
3138: END IF;
3139:
3140: IF l_sum_mth_rate_cutoff <> l_total_mth_cutoff THEN
3141: FND_FILE.NEW_LINE(fnd_file.log, 1);
3142: FND_FILE.PUT_LINE(fnd_file.log,
3143: 'The sum of pay_ie_tax_body_interface.mth_rate_cutoff is '
3144: || TO_CHAR (l_sum_mth_rate_cutoff));
3145: FND_FILE.PUT_LINE (fnd_file.log,
3138: END IF;
3139:
3140: IF l_sum_mth_rate_cutoff <> l_total_mth_cutoff THEN
3141: FND_FILE.NEW_LINE(fnd_file.log, 1);
3142: FND_FILE.PUT_LINE(fnd_file.log,
3143: 'The sum of pay_ie_tax_body_interface.mth_rate_cutoff is '
3144: || TO_CHAR (l_sum_mth_rate_cutoff));
3145: FND_FILE.PUT_LINE (fnd_file.log,
3146: 'The total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff is '
3141: FND_FILE.NEW_LINE(fnd_file.log, 1);
3142: FND_FILE.PUT_LINE(fnd_file.log,
3143: 'The sum of pay_ie_tax_body_interface.mth_rate_cutoff is '
3144: || TO_CHAR (l_sum_mth_rate_cutoff));
3145: FND_FILE.PUT_LINE (fnd_file.log,
3146: 'The total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff is '
3147: || TO_CHAR(l_total_mth_cutoff));
3148: FND_FILE.PUT_LINE(fnd_file.log,
3149: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_rate_cutoff');
3144: || TO_CHAR (l_sum_mth_rate_cutoff));
3145: FND_FILE.PUT_LINE (fnd_file.log,
3146: 'The total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff is '
3147: || TO_CHAR(l_total_mth_cutoff));
3148: FND_FILE.PUT_LINE(fnd_file.log,
3149: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_rate_cutoff');
3150: FND_FILE.PUT_LINE(fnd_file.log,
3151: 'does not match the total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff');
3152: END IF;
3146: 'The total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff is '
3147: || TO_CHAR(l_total_mth_cutoff));
3148: FND_FILE.PUT_LINE(fnd_file.log,
3149: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_rate_cutoff');
3150: FND_FILE.PUT_LINE(fnd_file.log,
3151: 'does not match the total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff');
3152: END IF;
3153: IF l_sum_wk_rate_cutoff <> l_total_wk_cutoff THEN
3154: FND_FILE.NEW_LINE(fnd_file.log, 1);
3150: FND_FILE.PUT_LINE(fnd_file.log,
3151: 'does not match the total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff');
3152: END IF;
3153: IF l_sum_wk_rate_cutoff <> l_total_wk_cutoff THEN
3154: FND_FILE.NEW_LINE(fnd_file.log, 1);
3155: FND_FILE.PUT_LINE(fnd_file.log,
3156: 'The sum of pay_ie_tax_body_interface.wk_rate_cutoff is '
3157: || TO_CHAR(l_sum_wk_rate_cutoff));
3158: FND_FILE.PUT_LINE(fnd_file.log,
3151: 'does not match the total monthly cutoff in pay_ie_tax_trailer_interface.total_mth_rate_cutoff');
3152: END IF;
3153: IF l_sum_wk_rate_cutoff <> l_total_wk_cutoff THEN
3154: FND_FILE.NEW_LINE(fnd_file.log, 1);
3155: FND_FILE.PUT_LINE(fnd_file.log,
3156: 'The sum of pay_ie_tax_body_interface.wk_rate_cutoff is '
3157: || TO_CHAR(l_sum_wk_rate_cutoff));
3158: FND_FILE.PUT_LINE(fnd_file.log,
3159: 'The total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff is '
3154: FND_FILE.NEW_LINE(fnd_file.log, 1);
3155: FND_FILE.PUT_LINE(fnd_file.log,
3156: 'The sum of pay_ie_tax_body_interface.wk_rate_cutoff is '
3157: || TO_CHAR(l_sum_wk_rate_cutoff));
3158: FND_FILE.PUT_LINE(fnd_file.log,
3159: 'The total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff is '
3160: || TO_CHAR(l_total_wk_cutoff));
3161: FND_FILE.PUT_LINE(fnd_file.log,
3162: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.wk_rate_cutoff');
3157: || TO_CHAR(l_sum_wk_rate_cutoff));
3158: FND_FILE.PUT_LINE(fnd_file.log,
3159: 'The total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff is '
3160: || TO_CHAR(l_total_wk_cutoff));
3161: FND_FILE.PUT_LINE(fnd_file.log,
3162: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.wk_rate_cutoff');
3163: FND_FILE.PUT_LINE(fnd_file.log,
3164: 'does not match the the total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff');
3165: END IF;
3159: 'The total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff is '
3160: || TO_CHAR(l_total_wk_cutoff));
3161: FND_FILE.PUT_LINE(fnd_file.log,
3162: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.wk_rate_cutoff');
3163: FND_FILE.PUT_LINE(fnd_file.log,
3164: 'does not match the the total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff');
3165: END IF;
3166: IF l_sum_mth_tax_credit <> l_total_mth_credit THEN
3167: FND_FILE.NEW_LINE(fnd_file.log, 1);
3163: FND_FILE.PUT_LINE(fnd_file.log,
3164: 'does not match the the total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff');
3165: END IF;
3166: IF l_sum_mth_tax_credit <> l_total_mth_credit THEN
3167: FND_FILE.NEW_LINE(fnd_file.log, 1);
3168: FND_FILE.PUT_LINE(fnd_file.log,
3169: 'The sum of pay_ie_tax_body_interface.mth_tax_credit is '
3170: || TO_CHAR(l_sum_mth_tax_credit));
3171: FND_FILE.PUT_LINE(fnd_file.log,
3164: 'does not match the the total weekly cutoff in pay_ie_tax_trailer_interface.total_wk_rate_cutoff');
3165: END IF;
3166: IF l_sum_mth_tax_credit <> l_total_mth_credit THEN
3167: FND_FILE.NEW_LINE(fnd_file.log, 1);
3168: FND_FILE.PUT_LINE(fnd_file.log,
3169: 'The sum of pay_ie_tax_body_interface.mth_tax_credit is '
3170: || TO_CHAR(l_sum_mth_tax_credit));
3171: FND_FILE.PUT_LINE(fnd_file.log,
3172: 'The total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit is '
3167: FND_FILE.NEW_LINE(fnd_file.log, 1);
3168: FND_FILE.PUT_LINE(fnd_file.log,
3169: 'The sum of pay_ie_tax_body_interface.mth_tax_credit is '
3170: || TO_CHAR(l_sum_mth_tax_credit));
3171: FND_FILE.PUT_LINE(fnd_file.log,
3172: 'The total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit is '
3173: || TO_CHAR(l_total_mth_credit));
3174: FND_FILE.PUT_LINE(fnd_file.log,
3175: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_tax_credit');
3170: || TO_CHAR(l_sum_mth_tax_credit));
3171: FND_FILE.PUT_LINE(fnd_file.log,
3172: 'The total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit is '
3173: || TO_CHAR(l_total_mth_credit));
3174: FND_FILE.PUT_LINE(fnd_file.log,
3175: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_tax_credit');
3176: FND_FILE.PUT_LINE(fnd_file.log,
3177: 'does not match the total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit');
3178: END IF;
3172: 'The total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit is '
3173: || TO_CHAR(l_total_mth_credit));
3174: FND_FILE.PUT_LINE(fnd_file.log,
3175: 'Error - Retcode = 2, the sum of pay_ie_tax_body_interface.mth_tax_credit');
3176: FND_FILE.PUT_LINE(fnd_file.log,
3177: 'does not match the total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit');
3178: END IF;
3179: IF BodyRec.sum_wk_tax_credit <> TrailRec.total_wk_credit THEN
3180: FND_FILE.NEW_LINE(fnd_file.log, 1);
3176: FND_FILE.PUT_LINE(fnd_file.log,
3177: 'does not match the total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit');
3178: END IF;
3179: IF BodyRec.sum_wk_tax_credit <> TrailRec.total_wk_credit THEN
3180: FND_FILE.NEW_LINE(fnd_file.log, 1);
3181: FND_FILE.PUT_LINE(fnd_file.log,
3182: 'The sum of pay_ie_tax_body_interface.wk_tax_credit is '
3183: || TO_CHAR(l_sum_wk_tax_credit));
3184: FND_FILE.PUT_LINE(fnd_file.log,
3177: 'does not match the total monthly credit in pay_ie_tax_trailer_interface.total_mth_tax_credit');
3178: END IF;
3179: IF BodyRec.sum_wk_tax_credit <> TrailRec.total_wk_credit THEN
3180: FND_FILE.NEW_LINE(fnd_file.log, 1);
3181: FND_FILE.PUT_LINE(fnd_file.log,
3182: 'The sum of pay_ie_tax_body_interface.wk_tax_credit is '
3183: || TO_CHAR(l_sum_wk_tax_credit));
3184: FND_FILE.PUT_LINE(fnd_file.log,
3185: 'The total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit is '
3180: FND_FILE.NEW_LINE(fnd_file.log, 1);
3181: FND_FILE.PUT_LINE(fnd_file.log,
3182: 'The sum of pay_ie_tax_body_interface.wk_tax_credit is '
3183: || TO_CHAR(l_sum_wk_tax_credit));
3184: FND_FILE.PUT_LINE(fnd_file.log,
3185: 'The total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit is '
3186: || TO_CHAR(l_total_wk_credit));
3187: FND_FILE.PUT_LINE(fnd_file.log,
3188: 'Error - Retcode = 2 because the sum of pay_ie_tax_body_interface.wk_tax_credit');
3183: || TO_CHAR(l_sum_wk_tax_credit));
3184: FND_FILE.PUT_LINE(fnd_file.log,
3185: 'The total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit is '
3186: || TO_CHAR(l_total_wk_credit));
3187: FND_FILE.PUT_LINE(fnd_file.log,
3188: 'Error - Retcode = 2 because the sum of pay_ie_tax_body_interface.wk_tax_credit');
3189: FND_FILE.PUT_LINE(fnd_file.log,
3190: 'does not match the total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit');
3191: END IF;
3185: 'The total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit is '
3186: || TO_CHAR(l_total_wk_credit));
3187: FND_FILE.PUT_LINE(fnd_file.log,
3188: 'Error - Retcode = 2 because the sum of pay_ie_tax_body_interface.wk_tax_credit');
3189: FND_FILE.PUT_LINE(fnd_file.log,
3190: 'does not match the total weekly credit in pay_ie_tax_trailer_interface.total_wk_tax_credit');
3191: END IF;
3192:
3193: INSERT INTO pay_ie_tax_error ( pps_number
3212: errbuf := fnd_message.get;
3213: l_error_stack := errbuf;
3214: l_error := SQLERRM;
3215: retcode := 2;
3216: FND_FILE.PUT_LINE (fnd_file.log, 'Error raised in loading data into one or all of the follo
3217: wing tables: pay_ie_tax_header_interface, pay_ie_tax_body_interface, pay_ie_tax_trailer_interface');
3218:
3219: INSERT INTO pay_ie_tax_error ( pps_number
3220: , employee_number
3592: l_request_id := FND_GLOBAL.CONC_REQUEST_ID;
3593: retcode := 1;
3594: -- Bug 5724436, the audit report will be called only in mode="Validate"
3595: IF p_validate_mode <> 'IE_VALIDATE' THEN
3596: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11, ' ')||lpad('Works Number',15,' ')||lpad('Status',30,' ')); --4878630
3597: fnd_file.put_line(fnd_file.output,lpad('----------',11, ' ')||lpad('------------',15,' ')||lpad('------',30,' '));
3598: ELSE
3599: -- bug 5724436
3600: -- This is called only once to set the report fields.
3593: retcode := 1;
3594: -- Bug 5724436, the audit report will be called only in mode="Validate"
3595: IF p_validate_mode <> 'IE_VALIDATE' THEN
3596: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11, ' ')||lpad('Works Number',15,' ')||lpad('Status',30,' ')); --4878630
3597: fnd_file.put_line(fnd_file.output,lpad('----------',11, ' ')||lpad('------------',15,' ')||lpad('------',30,' '));
3598: ELSE
3599: -- bug 5724436
3600: -- This is called only once to set the report fields.
3601: fnd_file.put_line(fnd_file.output,'Index');
3597: fnd_file.put_line(fnd_file.output,lpad('----------',11, ' ')||lpad('------------',15,' ')||lpad('------',30,' '));
3598: ELSE
3599: -- bug 5724436
3600: -- This is called only once to set the report fields.
3601: fnd_file.put_line(fnd_file.output,'Index');
3602: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
3603: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
3604: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
3605: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
3598: ELSE
3599: -- bug 5724436
3600: -- This is called only once to set the report fields.
3601: fnd_file.put_line(fnd_file.output,'Index');
3602: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
3603: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
3604: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
3605: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
3606: fnd_file.put_line(fnd_file.output,' ');
3599: -- bug 5724436
3600: -- This is called only once to set the report fields.
3601: fnd_file.put_line(fnd_file.output,'Index');
3602: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
3603: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
3604: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
3605: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
3606: fnd_file.put_line(fnd_file.output,' ');
3607:
3600: -- This is called only once to set the report fields.
3601: fnd_file.put_line(fnd_file.output,'Index');
3602: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
3603: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
3604: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
3605: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
3606: fnd_file.put_line(fnd_file.output,' ');
3607:
3608: fnd_file.put_line(fnd_file.output,lpad('PAYE Details in Oracle Payroll',70,' ')||lpad('PAYE Details from Revenue',105,' '));
3601: fnd_file.put_line(fnd_file.output,'Index');
3602: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
3603: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
3604: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
3605: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
3606: fnd_file.put_line(fnd_file.output,' ');
3607:
3608: fnd_file.put_line(fnd_file.output,lpad('PAYE Details in Oracle Payroll',70,' ')||lpad('PAYE Details from Revenue',105,' '));
3609: fnd_file.put_line(fnd_file.output,lpad('==============================',70,' ')||lpad('=========================',105,' '));
3602: fnd_file.put_line(fnd_file.output,'I :- Week1/Month1 Indicator');
3603: fnd_file.put_line(fnd_file.output,'F :- Exemption Flag');
3604: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
3605: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
3606: fnd_file.put_line(fnd_file.output,' ');
3607:
3608: fnd_file.put_line(fnd_file.output,lpad('PAYE Details in Oracle Payroll',70,' ')||lpad('PAYE Details from Revenue',105,' '));
3609: fnd_file.put_line(fnd_file.output,lpad('==============================',70,' ')||lpad('=========================',105,' '));
3610: fnd_file.put_line(fnd_file.output,' ');
3604: fnd_file.put_line(fnd_file.output,'Tax1 :- Standard Rate of Tax');
3605: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
3606: fnd_file.put_line(fnd_file.output,' ');
3607:
3608: fnd_file.put_line(fnd_file.output,lpad('PAYE Details in Oracle Payroll',70,' ')||lpad('PAYE Details from Revenue',105,' '));
3609: fnd_file.put_line(fnd_file.output,lpad('==============================',70,' ')||lpad('=========================',105,' '));
3610: fnd_file.put_line(fnd_file.output,' ');
3611: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11,' ')
3612: -- for previous PAYE Details
3605: fnd_file.put_line(fnd_file.output,'Tax2 :- Higher Rate of Tax');
3606: fnd_file.put_line(fnd_file.output,' ');
3607:
3608: fnd_file.put_line(fnd_file.output,lpad('PAYE Details in Oracle Payroll',70,' ')||lpad('PAYE Details from Revenue',105,' '));
3609: fnd_file.put_line(fnd_file.output,lpad('==============================',70,' ')||lpad('=========================',105,' '));
3610: fnd_file.put_line(fnd_file.output,' ');
3611: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11,' ')
3612: -- for previous PAYE Details
3613: || lpad('Works',13,' ')
3606: fnd_file.put_line(fnd_file.output,' ');
3607:
3608: fnd_file.put_line(fnd_file.output,lpad('PAYE Details in Oracle Payroll',70,' ')||lpad('PAYE Details from Revenue',105,' '));
3609: fnd_file.put_line(fnd_file.output,lpad('==============================',70,' ')||lpad('=========================',105,' '));
3610: fnd_file.put_line(fnd_file.output,' ');
3611: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11,' ')
3612: -- for previous PAYE Details
3613: || lpad('Works',13,' ')
3614: || lpad('Last Name',16,' ')
3607:
3608: fnd_file.put_line(fnd_file.output,lpad('PAYE Details in Oracle Payroll',70,' ')||lpad('PAYE Details from Revenue',105,' '));
3609: fnd_file.put_line(fnd_file.output,lpad('==============================',70,' ')||lpad('=========================',105,' '));
3610: fnd_file.put_line(fnd_file.output,' ');
3611: fnd_file.put_line(fnd_file.output,lpad('PPS Number',11,' ')
3612: -- for previous PAYE Details
3613: || lpad('Works',13,' ')
3614: || lpad('Last Name',16,' ')
3615: || lpad('I',3,' ')||lpad('F',3,' ')
3625: || lpad('Cert Issue',12,' ')||lpad('Tot Pay',12,' ')
3626: || lpad('Tot Tax',12,' ')||lpad('Tax1',6,' ')
3627: || lpad('Tax2',6,' '));
3628:
3629: fnd_file.put_line(fnd_file.output, lpad('Number',24,' ')
3630: || lpad('Cutoff',30,' ')||lpad('Credit',9,' ')
3631: || lpad('Cutoff',10,' ')||lpad('Credit',10,' ')
3632: || lpad('Date',10,' ')||lpad('to Date',15,' ')
3633: || lpad('to Date',12,' ') ||lpad(' ',28,' ')
3636: || lpad('Cutoff',10,' ')||lpad('Credit',10,' ')
3637: || lpad('Date',10,' ')||lpad('to Date',15,' ')
3638: || lpad('to Date',12,' '));
3639:
3640: fnd_file.put_line(fnd_file.output,lpad('----------',11,' ')
3641: -- for previous PAYE Details
3642: || lpad('----------',13,' ')
3643: || lpad('---------',16,' ')
3644: || lpad('-',3,' ')||lpad('-',3,' ')
3684: --end of bug 6376140
3685:
3686:
3687: -- Bug 6929566 Start
3688: FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_date is ' || r_pay.cert_date);
3689: FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_start_date is ' || r_pay.cert_start_date);
3690: FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_end_date is ' || r_pay.cert_end_date);
3691: IF r_pay.cert_date < r_pay.cert_start_date THEN
3692: l_effective_date := r_pay.cert_start_date;
3685:
3686:
3687: -- Bug 6929566 Start
3688: FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_date is ' || r_pay.cert_date);
3689: FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_start_date is ' || r_pay.cert_start_date);
3690: FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_end_date is ' || r_pay.cert_end_date);
3691: IF r_pay.cert_date < r_pay.cert_start_date THEN
3692: l_effective_date := r_pay.cert_start_date;
3693: ELSIF r_pay.cert_date >= r_pay.cert_start_date THEN
3686:
3687: -- Bug 6929566 Start
3688: FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_date is ' || r_pay.cert_date);
3689: FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_start_date is ' || r_pay.cert_start_date);
3690: FND_FILE.PUT_LINE(FND_FILE.LOG, 'r_pay.cert_end_date is ' || r_pay.cert_end_date);
3691: IF r_pay.cert_date < r_pay.cert_start_date THEN
3692: l_effective_date := r_pay.cert_start_date;
3693: ELSIF r_pay.cert_date >= r_pay.cert_start_date THEN
3694: l_effective_date := r_pay.cert_date;
3692: l_effective_date := r_pay.cert_start_date;
3693: ELSIF r_pay.cert_date >= r_pay.cert_start_date THEN
3694: l_effective_date := r_pay.cert_date;
3695: END IF;
3696: FND_FILE.PUT_LINE(FND_FILE.LOG, 'l_effective_date is ' || l_effective_date);
3697: --
3698: -- Bug 6929566 End
3699:
3700: --FOR r_pay IN c_pay
3718: --ppsno_cnt := ppsno_cnt+1;
3719: IF l_pps_number_hr IS NOT NULL THEN
3720: ppsno_cnt := ppsno_cnt+1;
3721: l_pps_number(ppsno_cnt) :=r_pay.pps_number_hr;
3722: --fnd_file.put_line(l_pps_number(ppsno_cnt));
3723: hr_utility.set_location('PPS Number..'||l_pps_number_hr,420);
3724: -- checks for standard rate tax to be mandatory
3725: IF l_std_rate_of_tax IS NULL THEN
3726: raise std_rate_of_tax_is_null;
3903: WHERE pps_number = r_pay.pps_number_int;
3904: END IF;
3905: hr_utility.set_location('Assignment Number..'||r_pay.employee_no_int,107);
3906: IF p_validate_mode <> 'IE_VALIDATE' THEN
3907: fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Success');
3908: ELSE
3909: IF g_validate_count =1 then
3910: hr_utility.set_location('PPS Number..Second check'||l_pps_number_hr,841);
3911: hr_utility.set_location('Assignment Number..'||r_pay.employee_no_int,108);
3997: l_pay_to_date := 0;
3998: l_tax_to_date := 0;
3999: END IF;
4000: -- print the values.
4001: fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')
4002: -- for previous PAYE Details
4003: || lpad(substr(r_pay.employee_no_int,1,12),13,' ')
4004: || lpad(substr(r_pay.last_name_hr,1,15),16,' ')
4005: || lpad(pay_ie_paye_pkg.decode_value_char(r_paye_details.tax_basis='IE_WEEK1_MONTH1','1','0'),3,' ')
4030: -- Bug Fix 3500192
4031: -- WHEN name_not_equal THEN
4032: -- l_error := SQLERRM;
4033: -- retcode := 1;
4034: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
4035: -- FND_FILE.PUT_LINE(fnd_file.log, 'The first name and last name in the interface body table does not match
4036: -- the first and last name in the payroll tables');
4037: --
4038: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
4031: -- WHEN name_not_equal THEN
4032: -- l_error := SQLERRM;
4033: -- retcode := 1;
4034: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
4035: -- FND_FILE.PUT_LINE(fnd_file.log, 'The first name and last name in the interface body table does not match
4036: -- the first and last name in the payroll tables');
4037: --
4038: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
4039: -- FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4034: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
4035: -- FND_FILE.PUT_LINE(fnd_file.log, 'The first name and last name in the interface body table does not match
4036: -- the first and last name in the payroll tables');
4037: --
4038: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
4039: -- FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4040: -- r_pay.employee_no_hr ||', '||
4041: -- r_pay.last_name_hr ||' '||
4042: -- r_pay.first_name_hr ||', '||
4035: -- FND_FILE.PUT_LINE(fnd_file.log, 'The first name and last name in the interface body table does not match
4036: -- the first and last name in the payroll tables');
4037: --
4038: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
4039: -- FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4040: -- r_pay.employee_no_hr ||', '||
4041: -- r_pay.last_name_hr ||' '||
4042: -- r_pay.first_name_hr ||', '||
4043: -- r_pay.last_name_int ||' '||
4069: --
4070: -- WHEN same_day THEN
4071: -- l_error := SQLERRM;
4072: -- retcode := 1;
4073: -- FND_FILE.PUT_LINE(fnd_file.log, 'This record has already been updated today with changes to the
4074: -- PAY_IE_PAYE_DETAILS_F table');
4075: --
4076: --
4077: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
4073: -- FND_FILE.PUT_LINE(fnd_file.log, 'This record has already been updated today with changes to the
4074: -- PAY_IE_PAYE_DETAILS_F table');
4075: --
4076: --
4077: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
4078: -- FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4079: -- r_pay.employee_no_hr ||', '||
4080: -- r_pay.last_name_hr ||' '||
4081: -- r_pay.first_name_hr ||', '||
4074: -- PAY_IE_PAYE_DETAILS_F table');
4075: --
4076: --
4077: -- FND_FILE.NEW_LINE(fnd_file.log, 1);
4078: -- FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4079: -- r_pay.employee_no_hr ||', '||
4080: -- r_pay.last_name_hr ||' '||
4081: -- r_pay.first_name_hr ||', '||
4082: -- r_pay.ppd_effective_start_date ||', '||
4107:
4108: /*WHEN future_day THEN
4109: l_error := SQLERRM;
4110: retcode := 1;
4111: FND_FILE.PUT_LINE(fnd_file.log, 'This record has been updated to a future date');
4112:
4113: FND_FILE.NEW_LINE(fnd_file.log, 1);
4114: FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4115: r_pay.employee_no_hr ||', '||
4109: l_error := SQLERRM;
4110: retcode := 1;
4111: FND_FILE.PUT_LINE(fnd_file.log, 'This record has been updated to a future date');
4112:
4113: FND_FILE.NEW_LINE(fnd_file.log, 1);
4114: FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4115: r_pay.employee_no_hr ||', '||
4116: r_pay.last_name_hr ||' '||
4117: r_pay.first_name_hr ||', '||
4110: retcode := 1;
4111: FND_FILE.PUT_LINE(fnd_file.log, 'This record has been updated to a future date');
4112:
4113: FND_FILE.NEW_LINE(fnd_file.log, 1);
4114: FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4115: r_pay.employee_no_hr ||', '||
4116: r_pay.last_name_hr ||' '||
4117: r_pay.first_name_hr ||', '||
4118: r_pay.payroll_name_hr
4141:
4142: WHEN std_rate_of_tax_is_null THEN
4143: l_error := 'Standard Rate of Tax cannot be Null';--SQLERRM;
4144: retcode := 1;
4145: FND_FILE.PUT_LINE(fnd_file.log, 'Standard Rate of Tax cannot be Null');
4146:
4147: FND_FILE.NEW_LINE(fnd_file.log, 1);
4148: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4149: r_pay.employee_no_hr ||', '||
4143: l_error := 'Standard Rate of Tax cannot be Null';--SQLERRM;
4144: retcode := 1;
4145: FND_FILE.PUT_LINE(fnd_file.log, 'Standard Rate of Tax cannot be Null');
4146:
4147: FND_FILE.NEW_LINE(fnd_file.log, 1);
4148: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4149: r_pay.employee_no_hr ||', '||
4150: r_pay.last_name_hr ||' '||
4151: r_pay.first_name_hr ||', '||
4144: retcode := 1;
4145: FND_FILE.PUT_LINE(fnd_file.log, 'Standard Rate of Tax cannot be Null');
4146:
4147: FND_FILE.NEW_LINE(fnd_file.log, 1);
4148: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4149: r_pay.employee_no_hr ||', '||
4150: r_pay.last_name_hr ||' '||
4151: r_pay.first_name_hr ||', '||
4152: r_pay.payroll_name_hr
4156: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
4157: l_err_tab(err_cnt).p_err_msg := 'Failed : Standard Rate of Tax cannot be Null';
4158: err_cnt := err_cnt + 1;
4159: --ELSE
4160: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : Standard Rate of Tax cannot be Null');
4161: --END IF;
4162: -- The exception details are written to an error table
4163:
4164: INSERT INTO pay_ie_tax_error ( pps_number
4183:
4184: WHEN higher_rate_of_tax_is_null THEN
4185: l_error := 'Higher Rate of Tax cannot be Null';--SQLERRM;
4186: retcode := 1;
4187: FND_FILE.PUT_LINE(fnd_file.log, 'Higher Rate of Tax cannot be Null');
4188:
4189: FND_FILE.NEW_LINE(fnd_file.log, 1);
4190: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4191: r_pay.employee_no_hr ||', '||
4185: l_error := 'Higher Rate of Tax cannot be Null';--SQLERRM;
4186: retcode := 1;
4187: FND_FILE.PUT_LINE(fnd_file.log, 'Higher Rate of Tax cannot be Null');
4188:
4189: FND_FILE.NEW_LINE(fnd_file.log, 1);
4190: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4191: r_pay.employee_no_hr ||', '||
4192: r_pay.last_name_hr ||' '||
4193: r_pay.first_name_hr ||', '||
4186: retcode := 1;
4187: FND_FILE.PUT_LINE(fnd_file.log, 'Higher Rate of Tax cannot be Null');
4188:
4189: FND_FILE.NEW_LINE(fnd_file.log, 1);
4190: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4191: r_pay.employee_no_hr ||', '||
4192: r_pay.last_name_hr ||' '||
4193: r_pay.first_name_hr ||', '||
4194: r_pay.payroll_name_hr
4199: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
4200: l_err_tab(err_cnt).p_err_msg := 'Failed : Higher Rate of Tax cannot be Null';
4201: err_cnt := err_cnt + 1;
4202: --ELSE
4203: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : Higher Rate of Tax cannot be Null');
4204: --END IF;
4205:
4206: -- The exception details are written to an error table
4207: INSERT INTO pay_ie_tax_error ( pps_number
4227: WHEN exemption_is_null THEN
4228:
4229: l_error := 'Exemption Indicator cannot be Null';--SQLERRM;
4230: retcode := 1;
4231: FND_FILE.PUT_LINE(fnd_file.log, 'Exemption Indicator cannot be Null');
4232:
4233: FND_FILE.NEW_LINE(fnd_file.log, 1);
4234: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4235: r_pay.employee_no_hr ||', '||
4229: l_error := 'Exemption Indicator cannot be Null';--SQLERRM;
4230: retcode := 1;
4231: FND_FILE.PUT_LINE(fnd_file.log, 'Exemption Indicator cannot be Null');
4232:
4233: FND_FILE.NEW_LINE(fnd_file.log, 1);
4234: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4235: r_pay.employee_no_hr ||', '||
4236: r_pay.last_name_hr ||' '||
4237: r_pay.first_name_hr ||', '||
4230: retcode := 1;
4231: FND_FILE.PUT_LINE(fnd_file.log, 'Exemption Indicator cannot be Null');
4232:
4233: FND_FILE.NEW_LINE(fnd_file.log, 1);
4234: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4235: r_pay.employee_no_hr ||', '||
4236: r_pay.last_name_hr ||' '||
4237: r_pay.first_name_hr ||', '||
4238: r_pay.payroll_name_hr
4243: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
4244: l_err_tab(err_cnt).p_err_msg := 'Failed : Exemption Indicator cannot be Null';
4245: err_cnt := err_cnt + 1;
4246: --ELSE
4247: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : Exemption Indicator cannot be Null');
4248: --END IF;
4249:
4250: -- The exception details are written to an error table
4251: INSERT INTO pay_ie_tax_error ( pps_number
4270:
4271: WHEN exemption_mismatch THEN
4272: l_error := 'The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%';--SQLERRM;
4273: retcode := 1;
4274: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%');
4275:
4276: FND_FILE.NEW_LINE(fnd_file.log, 1);
4277: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4278: r_pay.employee_no_hr ||', '||
4272: l_error := 'The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%';--SQLERRM;
4273: retcode := 1;
4274: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%');
4275:
4276: FND_FILE.NEW_LINE(fnd_file.log, 1);
4277: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4278: r_pay.employee_no_hr ||', '||
4279: r_pay.last_name_hr ||' '||
4280: r_pay.first_name_hr ||', '||
4273: retcode := 1;
4274: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%');
4275:
4276: FND_FILE.NEW_LINE(fnd_file.log, 1);
4277: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4278: r_pay.employee_no_hr ||', '||
4279: r_pay.last_name_hr ||' '||
4280: r_pay.first_name_hr ||', '||
4281: r_pay.payroll_name_hr
4286: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
4287: l_err_tab(err_cnt).p_err_msg := 'Failed : The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%';
4288: err_cnt := err_cnt + 1;
4289: --ELSE
4290: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : The higher rate of tax for Exemption should be '||l_tax_rate_exempt||'%');
4291: --END IF;
4292:
4293: -- The exception details are written to an error table
4294: INSERT INTO pay_ie_tax_error ( pps_number
4313:
4314: WHEN normal_tax_mismatch THEN
4315: l_error := 'The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%';--SQLERRM;
4316: retcode := 1;
4317: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%');
4318:
4319: FND_FILE.NEW_LINE(fnd_file.log, 1);
4320: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4321: r_pay.employee_no_hr ||', '||
4315: l_error := 'The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%';--SQLERRM;
4316: retcode := 1;
4317: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%');
4318:
4319: FND_FILE.NEW_LINE(fnd_file.log, 1);
4320: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4321: r_pay.employee_no_hr ||', '||
4322: r_pay.last_name_hr ||' '||
4323: r_pay.first_name_hr ||', '||
4316: retcode := 1;
4317: FND_FILE.PUT_LINE(fnd_file.log, 'The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%');
4318:
4319: FND_FILE.NEW_LINE(fnd_file.log, 1);
4320: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4321: r_pay.employee_no_hr ||', '||
4322: r_pay.last_name_hr ||' '||
4323: r_pay.first_name_hr ||', '||
4324: r_pay.payroll_name_hr
4329: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
4330: l_err_tab(err_cnt).p_err_msg := 'Failed : The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%';
4331: err_cnt := err_cnt + 1;
4332: --ELSE
4333: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : The higher rate of tax for Cumulative or Week1/Month1 Tax Basis should be '||l_tax_rate_high||'%');
4334: --END IF;
4335:
4336: -- The exception details are written to an error table
4337: INSERT INTO pay_ie_tax_error ( pps_number
4356:
4357: WHEN pay_to_date THEN
4358: l_error := 'Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis.';--SQLERRM;
4359: retcode := 1;
4360: FND_FILE.PUT_LINE(fnd_file.log, 'Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis.');
4361:
4362: FND_FILE.NEW_LINE(fnd_file.log, 1);
4363: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4364: r_pay.employee_no_hr ||', '||
4358: l_error := 'Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis.';--SQLERRM;
4359: retcode := 1;
4360: FND_FILE.PUT_LINE(fnd_file.log, 'Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis.');
4361:
4362: FND_FILE.NEW_LINE(fnd_file.log, 1);
4363: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4364: r_pay.employee_no_hr ||', '||
4365: r_pay.last_name_hr ||' '||
4366: r_pay.first_name_hr ||', '||
4359: retcode := 1;
4360: FND_FILE.PUT_LINE(fnd_file.log, 'Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis.');
4361:
4362: FND_FILE.NEW_LINE(fnd_file.log, 1);
4363: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4364: r_pay.employee_no_hr ||', '||
4365: r_pay.last_name_hr ||' '||
4366: r_pay.first_name_hr ||', '||
4367: r_pay.payroll_name_hr
4372: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
4373: l_err_tab(err_cnt).p_err_msg := 'Failed : Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis';
4374: err_cnt := err_cnt + 1;
4375: --ELSE
4376: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : Total Pay to Date and Total Tax to Date can be null only for Week1/Month1 basis');
4377: --END IF;
4378:
4379: -- The exception details are written to an error table
4380: INSERT INTO pay_ie_tax_error ( pps_number
4411: WHERE pps_number = r_pay.pps_number_int;
4412: END IF;
4413: -- The following command will be used to output the exception details to an output file:
4414:
4415: /*FND_FILE.PUT_LINE(fnd_file.output, r_pay.pps_number_hr ||','||
4416: r_pay.pps_number_int ||', '||
4417: r_pay.employee_no_hr ||', '||
4418: r_pay.pps_number_int ||', '||
4419: r_pay.last_name_hr ||' '||
4427: l_err_tab(err_cnt).p_works_number := substr(r_pay.employee_no_int,1,12);
4428: l_err_tab(err_cnt).p_err_msg := 'Failed : '||l_error;
4429: err_cnt := err_cnt + 1;
4430: --ELSE
4431: -- fnd_file.put_line(fnd_file.output,lpad(r_pay.pps_number_int,11,' ')||lpad(substr(r_pay.employee_no_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : '||l_error);
4432: --END IF;
4433: -- The exception details are written to an error table
4434:
4435: INSERT INTO pay_ie_tax_error ( pps_number
4461:
4462: IF l_err_tab.COUNT <> 0 then
4463: for i in l_err_tab.first..l_err_tab.last
4464: loop
4465: fnd_file.put_line(fnd_file.output,lpad(l_err_tab(i).p_pps_number,11,' ')||lpad(l_err_tab(i).p_works_number,13,' ')||lpad(' ',20,' ')||l_err_tab(i).p_err_msg);
4466: end loop;
4467: END IF;
4468: --bug 6376140
4469: /* for i in csr_skipped_asg
4467: END IF;
4468: --bug 6376140
4469: /* for i in csr_skipped_asg
4470: loop
4471: fnd_file.put_line(fnd_file.output,lpad(i.pps_number,11,' ')||lpad(i.works_number,13,' ')||lpad(' ',20,' ') || 'Please check the employee''s works number and/or PPS number');
4472: end loop;
4473: */
4474: FOR i in csr_skipped_assignments
4475: LOOP
4486: IF flag='N' THEN
4487: -- open check_pps(i.pps_number);
4488: -- FETCH check_pps INTO p_check_pps
4489: -- if check_pps%found then
4490: fnd_file.put_line(fnd_file.output,lpad(i.pps_number,11,' ')||lpad(substr(nvl(i.works_number,' '),1,12),13,' ')
4491: || lpad(substr(nvl(i.last_name,' '),1,20),16,' ')||lpad(substr(nvl(i.first_name,' '),1,20),16,' ')||'Please check the employee''s PPS number/works number');
4492: -- else
4493: -- else
4494: --fnd_file.put_line(fnd_file.output,lpad(i.pps_number,11,' ')||'Please check the employee''s PPS number');
4490: fnd_file.put_line(fnd_file.output,lpad(i.pps_number,11,' ')||lpad(substr(nvl(i.works_number,' '),1,12),13,' ')
4491: || lpad(substr(nvl(i.last_name,' '),1,20),16,' ')||lpad(substr(nvl(i.first_name,' '),1,20),16,' ')||'Please check the employee''s PPS number/works number');
4492: -- else
4493: -- else
4494: --fnd_file.put_line(fnd_file.output,lpad(i.pps_number,11,' ')||'Please check the employee''s PPS number');
4495: -- end if;
4496: -- close check_pps;
4497: END IF;
4498: END LOOP;
4517: EXCEPTION
4518: WHEN NO_DATA_FOUND THEN
4519: l_error := SQLERRM;
4520: retcode := 1;
4521: FND_FILE.PUT_LINE(fnd_file.log, 'No data found');
4522:
4523: INSERT INTO pay_ie_tax_error ( pps_number
4524: , employee_number
4525: , full_name
4548: l_error := SQLERRM;
4549: retcode := 2;
4550: /* The following command will be used to output the exception details to an output file*/
4551:
4552: /*FND_FILE.PUT_LINE(fnd_file.output, l_pps_number_hr ||', '||
4553: l_pps_number_int ||', '||
4554: l_employee_number_hr ||', '||
4555: l_employee_number_int ||', '||
4556: l_last_name_hr ||' '||l_first_name_hr ||', '||
4563: l_err_tab(err_cnt).p_works_number := substr(l_employee_number_int,1,12);
4564: l_err_tab(err_cnt).p_err_msg := 'Failed : OTHER in Main..'||l_error;
4565: err_cnt := err_cnt + 1;
4566: --ELSE
4567: -- fnd_file.put_line(fnd_file.output,lpad(l_pps_number_int,20,' ')||lpad(substr(l_employee_number_int,1,12),13,' ')||lpad(' ',20,' ')||'Failed : OTHER in Main..'||l_error);
4568: --END IF;
4569: /* The exception details are written to an error table */
4570: INSERT INTO pay_ie_tax_error ( pps_number
4571: , employee_number
4641: || rpad('-',8,'-')
4642: || ' '
4643: || rpad('-',8,'-');
4644:
4645: FND_FILE.NEW_LINE(fnd_file.log, 1);
4646: FND_FILE.PUT_LINE(fnd_file.log,l_line_1);
4647: FND_FILE.PUT_LINE(fnd_file.log,l_line_2);
4648: FND_FILE.PUT_LINE(fnd_file.log,l_line_3);
4649:
4642: || ' '
4643: || rpad('-',8,'-');
4644:
4645: FND_FILE.NEW_LINE(fnd_file.log, 1);
4646: FND_FILE.PUT_LINE(fnd_file.log,l_line_1);
4647: FND_FILE.PUT_LINE(fnd_file.log,l_line_2);
4648: FND_FILE.PUT_LINE(fnd_file.log,l_line_3);
4649:
4650: END log_ie_paye_header;
4643: || rpad('-',8,'-');
4644:
4645: FND_FILE.NEW_LINE(fnd_file.log, 1);
4646: FND_FILE.PUT_LINE(fnd_file.log,l_line_1);
4647: FND_FILE.PUT_LINE(fnd_file.log,l_line_2);
4648: FND_FILE.PUT_LINE(fnd_file.log,l_line_3);
4649:
4650: END log_ie_paye_header;
4651:
4644:
4645: FND_FILE.NEW_LINE(fnd_file.log, 1);
4646: FND_FILE.PUT_LINE(fnd_file.log,l_line_1);
4647: FND_FILE.PUT_LINE(fnd_file.log,l_line_2);
4648: FND_FILE.PUT_LINE(fnd_file.log,l_line_3);
4649:
4650: END log_ie_paye_header;
4651:
4652: PROCEDURE log_ie_paye_body(
4709: || rpad(nvl(to_char(r_paye_details.weekly_std_rate_cut_off),'-'),8,' ')
4710: || ' '
4711: || rpad(nvl(to_char(r_paye_details.monthly_std_rate_cut_off),'-'),8,' ');
4712:
4713: FND_FILE.PUT_LINE(fnd_file.log,l_line);
4714:
4715: END log_ie_paye_body;
4716:
4717: PROCEDURE log_ie_paye_footer(p_total IN NUMBER)
4719: l_line varchar2(100);
4720: BEGIN
4721: l_line := 'Number of Records: '
4722: || p_total;
4723: FND_FILE.NEW_LINE(fnd_file.log, 1);
4724: FND_FILE.PUT_LINE(fnd_file.log,l_line);
4725: FND_FILE.NEW_LINE(fnd_file.log, 1);
4726: END log_ie_paye_footer;
4727:
4720: BEGIN
4721: l_line := 'Number of Records: '
4722: || p_total;
4723: FND_FILE.NEW_LINE(fnd_file.log, 1);
4724: FND_FILE.PUT_LINE(fnd_file.log,l_line);
4725: FND_FILE.NEW_LINE(fnd_file.log, 1);
4726: END log_ie_paye_footer;
4727:
4728: END PAY_IE_TAX_VAL;
4721: l_line := 'Number of Records: '
4722: || p_total;
4723: FND_FILE.NEW_LINE(fnd_file.log, 1);
4724: FND_FILE.PUT_LINE(fnd_file.log,l_line);
4725: FND_FILE.NEW_LINE(fnd_file.log, 1);
4726: END log_ie_paye_footer;
4727:
4728: END PAY_IE_TAX_VAL;