DBA Data[Home] [Help]

APPS.PER_NO_POSTALCODE_UPLOAD dependencies on UTL_FILE

Line 12: l_file_type UTL_FILE.file_type;

8: l_security_group_id PER_BUSINESS_GROUPS.business_group_id%type;
9:
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 63: RAISE UTL_FILE.invalid_filehandle;

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

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

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

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

68:
69: LOOP
70: BEGIN
71:
72: UTL_FILE.get_line (l_file_type, l_line_read);
73: hr_utility.set_location ( ' line ' || l_line_read, 10);
74: l_batch_seq := l_batch_seq + 1;
75: hr_utility.set_location('call read record',4);
76: read_record(l_line_read);

Line 114: IF UTL_FILE.is_open (l_file_type)

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

Line 116: UTL_FILE.fclose (l_file_type);

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

Line 129: WHEN UTL_FILE.invalid_operation

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

Line 135: IF UTL_FILE.is_open (l_file_type)

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

Line 137: UTL_FILE.fclose (l_file_type);

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

Line 145: WHEN UTL_FILE.internal_error

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

Line 148: IF UTL_FILE.is_open (l_file_type)

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

Line 150: UTL_FILE.fclose (l_file_type);

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

Line 161: WHEN UTL_FILE.invalid_mode

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

Line 164: IF UTL_FILE.is_open (l_file_type)

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

Line 166: UTL_FILE.fclose (l_file_type);

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

Line 177: WHEN UTL_FILE.invalid_path

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

Line 180: IF UTL_FILE.is_open (l_file_type)

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

Line 182: UTL_FILE.fclose (l_file_type);

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

Line 193: WHEN UTL_FILE.invalid_filehandle

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

Line 196: IF UTL_FILE.is_open (l_file_type)

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

Line 198: UTL_FILE.fclose (l_file_type);

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

Line 208: WHEN UTL_FILE.read_error

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

Line 212: IF UTL_FILE.is_open (l_file_type)

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

Line 214: UTL_FILE.fclose (l_file_type);

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