DBA Data[Home] [Help]

APPS.PAY_NO_TC_DP_UPLOAD dependencies on UTL_FILE

Line 51: l_file_type UTL_FILE.file_type;

47: l_legislation_code per_business_groups.legislation_code%TYPE;
48: l_bg_name per_business_groups.name%TYPE;
49:
50: -- File Handling variables
51: l_file_type UTL_FILE.file_type;
52: l_filename VARCHAR2 (240);
53: l_location VARCHAR2 (4000);
54: l_line_read VARCHAR2 (4000);
55:

Line 209: UTL_FILE.fopen (l_location, l_filename, c_read_file, c_max_linesize);

205: END IF;
206:
207: -- Open flat file
208: l_file_type :=
209: UTL_FILE.fopen (l_location, l_filename, c_read_file, c_max_linesize);
210:
211: -- Create the Batch header
212: l_batch_id := hr_pump_utils.create_batch_header
213: (p_batch_name => p_batch_name,

Line 226: UTL_FILE.get_line (l_file_type, l_line_read);

222:
223: <>
224: LOOP
225: BEGIN
226: UTL_FILE.get_line (l_file_type, l_line_read);
227: l_batch_seq := l_batch_seq + 1;
228: EXCEPTION
229: WHEN VALUE_ERROR
230: -- Input line too large for buffer specified in UTL_FILE.fopen

Line 230: -- Input line too large for buffer specified in UTL_FILE.fopen

226: UTL_FILE.get_line (l_file_type, l_line_read);
227: l_batch_seq := l_batch_seq + 1;
228: EXCEPTION
229: WHEN VALUE_ERROR
230: -- Input line too large for buffer specified in UTL_FILE.fopen
231: THEN
232: IF UTL_FILE.is_open (l_file_type)
233: THEN
234: UTL_FILE.fclose (l_file_type);

Line 232: IF UTL_FILE.is_open (l_file_type)

228: EXCEPTION
229: WHEN VALUE_ERROR
230: -- Input line too large for buffer specified in UTL_FILE.fopen
231: THEN
232: IF UTL_FILE.is_open (l_file_type)
233: THEN
234: UTL_FILE.fclose (l_file_type);
235: END IF;
236:

Line 234: UTL_FILE.fclose (l_file_type);

230: -- Input line too large for buffer specified in UTL_FILE.fopen
231: THEN
232: IF UTL_FILE.is_open (l_file_type)
233: THEN
234: UTL_FILE.fclose (l_file_type);
235: END IF;
236:
237: hr_utility.set_location (l_proc, 300);
238: retcode := c_error;

Line 705: UTL_FILE.fclose (l_file_type);

701:
702: -- Commit the outstanding records
703: COMMIT;
704:
705: UTL_FILE.fclose (l_file_type);
706: hr_utility.set_location ( 'Leaving:'|| l_proc, 200);
707:
708: -- Most of these exceptions are not translated as they should not happen normally
709: -- If they do happen, something is seriously wrong and SysAdmin interference will be necessary.

Line 716: IF UTL_FILE.is_open (l_file_type)

712: WHEN e_fatal_error
713: -- No directory specified
714: THEN
715: -- Close the file in case of error
716: IF UTL_FILE.is_open (l_file_type)
717: THEN
718: UTL_FILE.fclose (l_file_type);
719: END IF;
720:

Line 718: UTL_FILE.fclose (l_file_type);

714: THEN
715: -- Close the file in case of error
716: IF UTL_FILE.is_open (l_file_type)
717: THEN
718: UTL_FILE.fclose (l_file_type);
719: END IF;
720:
721: hr_utility.set_location (l_proc, 210);
722:

Line 732: WHEN UTL_FILE.invalid_operation

728:
729: -- Return the message to the ConcMgr (This msg will appear in the log file)
730: errbuf := hr_utility.get_message;
731:
732: WHEN UTL_FILE.invalid_operation
733: -- File could not be opened as requested, perhaps because of operating system permissions
734: -- Also raised when attempting a write operation on a file opened for read, or a read operation
735: -- on a file opened for write.
736:

Line 738: IF UTL_FILE.is_open (l_file_type)

734: -- Also raised when attempting a write operation on a file opened for read, or a read operation
735: -- on a file opened for write.
736:
737: THEN
738: IF UTL_FILE.is_open (l_file_type)
739: THEN
740: UTL_FILE.fclose (l_file_type);
741: END IF;
742:

Line 740: UTL_FILE.fclose (l_file_type);

736:
737: THEN
738: IF UTL_FILE.is_open (l_file_type)
739: THEN
740: UTL_FILE.fclose (l_file_type);
741: END IF;
742:
743: hr_utility.set_location (l_proc, 220);
744: retcode := c_error;

Line 748: WHEN UTL_FILE.internal_error

744: retcode := c_error;
745: errbuf := 'Reading File ('||l_location ||' -> '
746: || l_filename
747: || ') - Invalid Operation.';
748: WHEN UTL_FILE.internal_error
749: -- Unspecified internal error
750: THEN
751: IF UTL_FILE.is_open (l_file_type)
752: THEN

Line 751: IF UTL_FILE.is_open (l_file_type)

747: || ') - Invalid Operation.';
748: WHEN UTL_FILE.internal_error
749: -- Unspecified internal error
750: THEN
751: IF UTL_FILE.is_open (l_file_type)
752: THEN
753: UTL_FILE.fclose (l_file_type);
754: END IF;
755:

Line 753: UTL_FILE.fclose (l_file_type);

749: -- Unspecified internal error
750: THEN
751: IF UTL_FILE.is_open (l_file_type)
752: THEN
753: UTL_FILE.fclose (l_file_type);
754: END IF;
755:
756: hr_utility.set_location (l_proc, 230);
757: retcode := c_error;

Line 764: WHEN UTL_FILE.invalid_mode

760: || ' -> '
761: || l_filename
762: || ') - Internal Error.';
763:
764: WHEN UTL_FILE.invalid_mode
765: -- Invalid string specified for file mode
766: THEN
767: IF UTL_FILE.is_open (l_file_type)
768: THEN

Line 767: IF UTL_FILE.is_open (l_file_type)

763:
764: WHEN UTL_FILE.invalid_mode
765: -- Invalid string specified for file mode
766: THEN
767: IF UTL_FILE.is_open (l_file_type)
768: THEN
769: UTL_FILE.fclose (l_file_type);
770: END IF;
771:

Line 769: UTL_FILE.fclose (l_file_type);

765: -- Invalid string specified for file mode
766: THEN
767: IF UTL_FILE.is_open (l_file_type)
768: THEN
769: UTL_FILE.fclose (l_file_type);
770: END IF;
771:
772: hr_utility.set_location (l_proc, 240);
773: retcode := c_error;

Line 780: WHEN UTL_FILE.invalid_path

776: || ' -> '
777: || l_filename
778: || ') - Invalid Mode.';
779:
780: WHEN UTL_FILE.invalid_path
781: -- Directory or filename is invalid or not accessible
782: THEN
783: IF UTL_FILE.is_open (l_file_type)
784: THEN

Line 783: IF UTL_FILE.is_open (l_file_type)

779:
780: WHEN UTL_FILE.invalid_path
781: -- Directory or filename is invalid or not accessible
782: THEN
783: IF UTL_FILE.is_open (l_file_type)
784: THEN
785: UTL_FILE.fclose (l_file_type);
786: END IF;
787:

Line 785: UTL_FILE.fclose (l_file_type);

781: -- Directory or filename is invalid or not accessible
782: THEN
783: IF UTL_FILE.is_open (l_file_type)
784: THEN
785: UTL_FILE.fclose (l_file_type);
786: END IF;
787:
788: retcode := c_error;
789: errbuf := 'Reading File ('

Line 796: WHEN UTL_FILE.invalid_filehandle

792: || l_filename
793: || ') - Invalid Path or Filename.';
794: hr_utility.set_location (l_proc, 250);
795:
796: WHEN UTL_FILE.invalid_filehandle
797: -- File type does not specify an open file
798: THEN
799: IF UTL_FILE.is_open (l_file_type)
800: THEN

Line 799: IF UTL_FILE.is_open (l_file_type)

795:
796: WHEN UTL_FILE.invalid_filehandle
797: -- File type does not specify an open file
798: THEN
799: IF UTL_FILE.is_open (l_file_type)
800: THEN
801: UTL_FILE.fclose (l_file_type);
802: END IF;
803:

Line 801: UTL_FILE.fclose (l_file_type);

797: -- File type does not specify an open file
798: THEN
799: IF UTL_FILE.is_open (l_file_type)
800: THEN
801: UTL_FILE.fclose (l_file_type);
802: END IF;
803:
804: hr_utility.set_location (l_proc, 260);
805: retcode := c_error;

Line 811: WHEN UTL_FILE.read_error

807: || l_location
808: || ' -> '
809: || l_filename
810: || ') - Invalid File Type.';
811: WHEN UTL_FILE.read_error
812:
813: -- Operating system error occurred during a read operation
814: THEN
815: IF UTL_FILE.is_open (l_file_type)

Line 815: IF UTL_FILE.is_open (l_file_type)

811: WHEN UTL_FILE.read_error
812:
813: -- Operating system error occurred during a read operation
814: THEN
815: IF UTL_FILE.is_open (l_file_type)
816: THEN
817: UTL_FILE.fclose (l_file_type);
818: END IF;
819:

Line 817: UTL_FILE.fclose (l_file_type);

813: -- Operating system error occurred during a read operation
814: THEN
815: IF UTL_FILE.is_open (l_file_type)
816: THEN
817: UTL_FILE.fclose (l_file_type);
818: END IF;
819:
820: hr_utility.set_location (l_proc, 270);
821: retcode := c_error;