DBA Data[Home] [Help]

APPS.PAY_GB_PAYE_SYNC dependencies on UTL_FILE

Line 773: l_file_handle utl_file.file_type;

769:
770: --
771: l_filename VARCHAR2(100);
772: l_location VARCHAR2(2000);
773: l_file_handle utl_file.file_type;
774: -- DS
775: tab_paye_file paye_sync_table;
776: db_paye_details db_paye_record;
777: l_record_no NUMBER := 0;

Line 1021: l_file_handle := utl_file.fopen(l_location,l_filename,'r');

1017: raise e_fatal_error;
1018: END IF;
1019:
1020: fnd_file.PUT_LINE(FND_FILE.LOG, 'P_PAYE_ELE_ID:'||P_PAYE_ELE_ID);
1021: l_file_handle := utl_file.fopen(l_location,l_filename,'r');
1022: utl_file.get_line(l_file_handle,l_present_line);
1023:
1024: BEGIN
1025: /* The first line of the file should be 'Download Parameters'

Line 1022: utl_file.get_line(l_file_handle,l_present_line);

1018: END IF;
1019:
1020: fnd_file.PUT_LINE(FND_FILE.LOG, 'P_PAYE_ELE_ID:'||P_PAYE_ELE_ID);
1021: l_file_handle := utl_file.fopen(l_location,l_filename,'r');
1022: utl_file.get_line(l_file_handle,l_present_line);
1023:
1024: BEGIN
1025: /* The first line of the file should be 'Download Parameters'
1026: * Read each line for Download Parameter information.

Line 1032: utl_file.get_line(l_file_handle,l_present_line);

1028: IF (l_present_line = '---------------- Download Parameters --------------------')
1029: THEN
1030: WHILE TRUE
1031: LOOP
1032: utl_file.get_line(l_file_handle,l_present_line);
1033: IF (substr(l_present_line,1,24)='* Effective Date :')
1034: THEN
1035: download_cp_eff_date := to_date(trim(substr(l_present_line,26,11)), v_date_format);
1036: ELSIF (substr(l_present_line,1,24)='* Tax Reference :')

Line 1135: utl_file.get_line(l_file_handle,l_present_line);

1131: exit;
1132:
1133: END IF;
1134:
1135: utl_file.get_line(l_file_handle,l_present_line);
1136:
1137: END LOOP;
1138:
1139: EXCEPTION

Line 1225: utl_file.get_line(l_file_handle,l_present_line);

1221: END IF;
1222:
1223: BEGIN
1224:
1225: utl_file.get_line(l_file_handle,l_present_line);
1226:
1227: IF (l_present_line = 'Keys :')
1228: THEN
1229: exit;

Line 1245: utl_file.fclose(l_file_handle);

1241:
1242: END LOOP;
1243:
1244: fnd_file.PUT_LINE(FND_FILE.LOG, 'Reading File complete. Total Records present :'||l_record_no);
1245: utl_file.fclose(l_file_handle);
1246:
1247: /* Loop through the assignments and validate them. Below are the list of validations:
1248: 1. Check if the assignment details are not changed after download program.
1249: 2. Check if the sugg values are consistent across assignments of the same person.

Line 1499: WHEN UTL_FILE.INVALID_OPERATION

1495: WHEN e_fatal_error
1496: THEN
1497: hr_utility.set_location( l_pkg ||'PAYE Upload',100);
1498:
1499: WHEN UTL_FILE.INVALID_OPERATION
1500: THEN
1501:
1502: UTL_FILE.FCLOSE(l_file_handle);
1503: hr_utility.set_location( l_pkg ||'PAYE Upload',110);

Line 1502: UTL_FILE.FCLOSE(l_file_handle);

1498:
1499: WHEN UTL_FILE.INVALID_OPERATION
1500: THEN
1501:
1502: UTL_FILE.FCLOSE(l_file_handle);
1503: hr_utility.set_location( l_pkg ||'PAYE Upload',110);
1504: retcode:=2;
1505: errbuf := 'Reading Flat File - Invalid Operation (file not found).';
1506:

Line 1507: WHEN UTL_FILE.INTERNAL_ERROR

1503: hr_utility.set_location( l_pkg ||'PAYE Upload',110);
1504: retcode:=2;
1505: errbuf := 'Reading Flat File - Invalid Operation (file not found).';
1506:
1507: WHEN UTL_FILE.INTERNAL_ERROR
1508: THEN
1509:
1510: UTL_FILE.FCLOSE(l_file_handle);
1511: hr_utility.set_location( l_pkg ||'PAYE Upload',120);

Line 1510: UTL_FILE.FCLOSE(l_file_handle);

1506:
1507: WHEN UTL_FILE.INTERNAL_ERROR
1508: THEN
1509:
1510: UTL_FILE.FCLOSE(l_file_handle);
1511: hr_utility.set_location( l_pkg ||'PAYE Upload',120);
1512: retcode:=2;
1513: errbuf := 'Reading Flat File - Internal Error.';
1514: WHEN UTL_FILE.INVALID_MODE

Line 1514: WHEN UTL_FILE.INVALID_MODE

1510: UTL_FILE.FCLOSE(l_file_handle);
1511: hr_utility.set_location( l_pkg ||'PAYE Upload',120);
1512: retcode:=2;
1513: errbuf := 'Reading Flat File - Internal Error.';
1514: WHEN UTL_FILE.INVALID_MODE
1515: THEN
1516:
1517: UTL_FILE.FCLOSE(l_file_handle);
1518: hr_utility.set_location( l_pkg ||'PAYE Upload',130);

Line 1517: UTL_FILE.FCLOSE(l_file_handle);

1513: errbuf := 'Reading Flat File - Internal Error.';
1514: WHEN UTL_FILE.INVALID_MODE
1515: THEN
1516:
1517: UTL_FILE.FCLOSE(l_file_handle);
1518: hr_utility.set_location( l_pkg ||'PAYE Upload',130);
1519: retcode:=2;
1520: errbuf := 'Reading Flat File - Invalid Mode.';
1521:

Line 1522: WHEN UTL_FILE.INVALID_PATH

1518: hr_utility.set_location( l_pkg ||'PAYE Upload',130);
1519: retcode:=2;
1520: errbuf := 'Reading Flat File - Invalid Mode.';
1521:
1522: WHEN UTL_FILE.INVALID_PATH
1523: THEN
1524:
1525: UTL_FILE.FCLOSE(l_file_handle);
1526: hr_utility.set_location( l_pkg ||'PAYE Upload',140);

Line 1525: UTL_FILE.FCLOSE(l_file_handle);

1521:
1522: WHEN UTL_FILE.INVALID_PATH
1523: THEN
1524:
1525: UTL_FILE.FCLOSE(l_file_handle);
1526: hr_utility.set_location( l_pkg ||'PAYE Upload',140);
1527: retcode:=2;
1528: errbuf := 'Reading Flat File - Invalid Path.';
1529:

Line 1530: WHEN UTL_FILE.INVALID_FILEHANDLE

1526: hr_utility.set_location( l_pkg ||'PAYE Upload',140);
1527: retcode:=2;
1528: errbuf := 'Reading Flat File - Invalid Path.';
1529:
1530: WHEN UTL_FILE.INVALID_FILEHANDLE
1531: THEN
1532:
1533: UTL_FILE.FCLOSE(l_file_handle);
1534: hr_utility.set_location( l_pkg ||'PAYE Upload',150);

Line 1533: UTL_FILE.FCLOSE(l_file_handle);

1529:
1530: WHEN UTL_FILE.INVALID_FILEHANDLE
1531: THEN
1532:
1533: UTL_FILE.FCLOSE(l_file_handle);
1534: hr_utility.set_location( l_pkg ||'PAYE Upload',150);
1535: retcode:=2;
1536: errbuf := 'Reading Flat File - Invalid File Handle.';
1537:

Line 1538: WHEN UTL_FILE.READ_ERROR

1534: hr_utility.set_location( l_pkg ||'PAYE Upload',150);
1535: retcode:=2;
1536: errbuf := 'Reading Flat File - Invalid File Handle.';
1537:
1538: WHEN UTL_FILE.READ_ERROR
1539: THEN
1540:
1541: UTL_FILE.FCLOSE(l_file_handle);
1542: hr_utility.set_location( l_pkg ||'PAYE Upload',160);

Line 1541: UTL_FILE.FCLOSE(l_file_handle);

1537:
1538: WHEN UTL_FILE.READ_ERROR
1539: THEN
1540:
1541: UTL_FILE.FCLOSE(l_file_handle);
1542: hr_utility.set_location( l_pkg ||'PAYE Upload',160);
1543: retcode:=2;
1544: errbuf := 'Reading Flat File - Read Error.';
1545:

Line 1548: UTL_FILE.FCLOSE(l_file_handle);

1544: errbuf := 'Reading Flat File - Read Error.';
1545:
1546: WHEN NO_DATA_FOUND
1547: THEN
1548: UTL_FILE.FCLOSE(l_file_handle);
1549: hr_utility.set_location( l_pkg ||'PAYE Upload',170);
1550: retcode:=2;
1551: errbuf := 'No Data Found.';
1552:

Line 1555: UTL_FILE.FCLOSE(l_file_handle);

1551: errbuf := 'No Data Found.';
1552:
1553: WHEN INVALID_FILE_FORMAT
1554: THEN
1555: UTL_FILE.FCLOSE(l_file_handle);
1556: hr_utility.set_location( l_pkg ||'PAYE Upload',180);
1557:
1558: WHEN NO_REC_FOUND_IN_FILE
1559: THEN

Line 1560: UTL_FILE.FCLOSE(l_file_handle);

1556: hr_utility.set_location( l_pkg ||'PAYE Upload',180);
1557:
1558: WHEN NO_REC_FOUND_IN_FILE
1559: THEN
1560: UTL_FILE.FCLOSE(l_file_handle);
1561: hr_utility.set_location( l_pkg ||'PAYE Upload',190);
1562:
1563: WHEN others
1564: THEN