DBA Data[Home] [Help]

APPS.PER_DK_POSTALCODE_UPLOAD dependencies on UTL_FILE

Line 12: l_file_type UTL_FILE.file_type;

8: l_view_application_id FND_LOOKUP_TYPES.view_application_id%type;
9: l_security_group_id PER_BUSINESS_GROUPS.business_group_id%type;
10:
11: -- File Handling variables
12: l_file_type UTL_FILE.file_type;
13: l_location VARCHAR2 (4000);
14: l_line_read VARCHAR2 (4000) ;
15: l_batch_seq NUMBER :=0;
16:

Line 66: RAISE UTL_FILE.invalid_filehandle;

62: END IF;
63: hr_utility.set_location(l_location,4);
64: l_file_extension := substr(l_file_name,-4);
65: IF l_file_extension <> '.txt' THEN
66: RAISE UTL_FILE.invalid_filehandle;
67: END IF;
68: hr_utility.set_location('file type ok',4);
69: -- Open flat file
70: l_file_type := UTL_FILE.fopen (l_location, l_file_name, c_read_file, c_max_linesize);

Line 70: l_file_type := UTL_FILE.fopen (l_location, l_file_name, c_read_file, c_max_linesize);

66: RAISE UTL_FILE.invalid_filehandle;
67: END IF;
68: hr_utility.set_location('file type ok',4);
69: -- Open flat file
70: l_file_type := UTL_FILE.fopen (l_location, l_file_name, c_read_file, c_max_linesize);
71: LOOP
72: BEGIN
73:
74: UTL_FILE.get_line (l_file_type, l_line_read);

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

70: l_file_type := UTL_FILE.fopen (l_location, l_file_name, c_read_file, c_max_linesize);
71: LOOP
72: BEGIN
73:
74: UTL_FILE.get_line (l_file_type, l_line_read);
75: hr_utility.set_location ( ' line ' || l_line_read, 10);
76: l_batch_seq := l_batch_seq + 1;
77: read_record(l_line_read);
78:

Line 112: IF UTL_FILE.is_open (l_file_type)

108: WHEN e_fatal_error
109: -- No directory specified
110: THEN
111: -- Close the file in case of error
112: IF UTL_FILE.is_open (l_file_type)
113: THEN
114: UTL_FILE.fclose (l_file_type);
115: END IF;
116:

Line 114: UTL_FILE.fclose (l_file_type);

110: THEN
111: -- Close the file in case of error
112: IF UTL_FILE.is_open (l_file_type)
113: THEN
114: UTL_FILE.fclose (l_file_type);
115: END IF;
116:
117: -- Set retcode to 2, indicating an ERROR to the ConcMgr
118: retcode := c_error;

Line 127: WHEN UTL_FILE.invalid_operation

123: -- Return the message to the ConcMgr (This msg will appear in the log file)
124: errbuf := hr_utility.get_message;
125:
126:
127: WHEN UTL_FILE.invalid_operation
128: -- File could not be opened as requested, perhaps because of operating system permissions
129: -- Also raised when attempting a write operation on a file opened for read, or a read operation
130: -- on a file opened for write.
131:

Line 133: IF UTL_FILE.is_open (l_file_type)

129: -- Also raised when attempting a write operation on a file opened for read, or a read operation
130: -- on a file opened for write.
131:
132: THEN
133: IF UTL_FILE.is_open (l_file_type)
134: THEN
135: UTL_FILE.fclose (l_file_type);
136: END IF;
137:

Line 135: UTL_FILE.fclose (l_file_type);

131:
132: THEN
133: IF UTL_FILE.is_open (l_file_type)
134: THEN
135: UTL_FILE.fclose (l_file_type);
136: END IF;
137:
138: hr_utility.set_location (l_proc, 220);
139: retcode := c_error;

Line 143: WHEN UTL_FILE.internal_error

139: retcode := c_error;
140: errbuf := 'Reading File ('||l_location ||' -> '
141: || l_file_name
142: || ') - Invalid Operation.';
143: WHEN UTL_FILE.internal_error
144: -- Unspecified internal error
145: THEN
146: IF UTL_FILE.is_open (l_file_type)
147: THEN

Line 146: IF UTL_FILE.is_open (l_file_type)

142: || ') - Invalid Operation.';
143: WHEN UTL_FILE.internal_error
144: -- Unspecified internal error
145: THEN
146: IF UTL_FILE.is_open (l_file_type)
147: THEN
148: UTL_FILE.fclose (l_file_type);
149: END IF;
150:

Line 148: UTL_FILE.fclose (l_file_type);

144: -- Unspecified internal error
145: THEN
146: IF UTL_FILE.is_open (l_file_type)
147: THEN
148: UTL_FILE.fclose (l_file_type);
149: END IF;
150:
151: hr_utility.set_location (l_proc, 230);
152: retcode := c_error;

Line 159: WHEN UTL_FILE.invalid_mode

155: || ' -> '
156: || l_file_name
157: || ') - Internal Error.';
158:
159: WHEN UTL_FILE.invalid_mode
160: -- Invalid string specified for file mode
161: THEN
162: IF UTL_FILE.is_open (l_file_type)
163: THEN

Line 162: IF UTL_FILE.is_open (l_file_type)

158:
159: WHEN UTL_FILE.invalid_mode
160: -- Invalid string specified for file mode
161: THEN
162: IF UTL_FILE.is_open (l_file_type)
163: THEN
164: UTL_FILE.fclose (l_file_type);
165: END IF;
166:

Line 164: UTL_FILE.fclose (l_file_type);

160: -- Invalid string specified for file mode
161: THEN
162: IF UTL_FILE.is_open (l_file_type)
163: THEN
164: UTL_FILE.fclose (l_file_type);
165: END IF;
166:
167: hr_utility.set_location (l_proc, 240);
168: retcode := c_error;

Line 175: WHEN UTL_FILE.invalid_path

171: || ' -> '
172: || l_file_name
173: || ') - Invalid Mode.';
174:
175: WHEN UTL_FILE.invalid_path
176: -- Directory or filename is invalid or not accessible
177: THEN
178: IF UTL_FILE.is_open (l_file_type)
179: THEN

Line 178: IF UTL_FILE.is_open (l_file_type)

174:
175: WHEN UTL_FILE.invalid_path
176: -- Directory or filename is invalid or not accessible
177: THEN
178: IF UTL_FILE.is_open (l_file_type)
179: THEN
180: UTL_FILE.fclose (l_file_type);
181: END IF;
182:

Line 180: UTL_FILE.fclose (l_file_type);

176: -- Directory or filename is invalid or not accessible
177: THEN
178: IF UTL_FILE.is_open (l_file_type)
179: THEN
180: UTL_FILE.fclose (l_file_type);
181: END IF;
182:
183: retcode := c_error;
184: errbuf := 'Reading File ('

Line 191: WHEN UTL_FILE.invalid_filehandle

187: || l_file_name
188: || ') - Invalid Path or Filename.';
189: hr_utility.set_location (l_proc, 250);
190:
191: WHEN UTL_FILE.invalid_filehandle
192: -- File type does not specify an open file
193: THEN
194: IF UTL_FILE.is_open (l_file_type)
195: THEN

Line 194: IF UTL_FILE.is_open (l_file_type)

190:
191: WHEN UTL_FILE.invalid_filehandle
192: -- File type does not specify an open file
193: THEN
194: IF UTL_FILE.is_open (l_file_type)
195: THEN
196: UTL_FILE.fclose (l_file_type);
197: END IF;
198:

Line 196: UTL_FILE.fclose (l_file_type);

192: -- File type does not specify an open file
193: THEN
194: IF UTL_FILE.is_open (l_file_type)
195: THEN
196: UTL_FILE.fclose (l_file_type);
197: END IF;
198:
199: hr_utility.set_location (l_proc, 260);
200: retcode := c_error;

Line 206: WHEN UTL_FILE.read_error

202: || l_location
203: || ' -> '
204: || l_file_name
205: || ') - Invalid File Type.';
206: WHEN UTL_FILE.read_error
207:
208: -- Operating system error occurred during a read operation
209: THEN
210: IF UTL_FILE.is_open (l_file_type)

Line 210: IF UTL_FILE.is_open (l_file_type)

206: WHEN UTL_FILE.read_error
207:
208: -- Operating system error occurred during a read operation
209: THEN
210: IF UTL_FILE.is_open (l_file_type)
211: THEN
212: UTL_FILE.fclose (l_file_type);
213: END IF;
214:

Line 212: UTL_FILE.fclose (l_file_type);

208: -- Operating system error occurred during a read operation
209: THEN
210: IF UTL_FILE.is_open (l_file_type)
211: THEN
212: UTL_FILE.fclose (l_file_type);
213: END IF;
214:
215: hr_utility.set_location (l_proc, 270);
216: retcode := c_error;