DBA Data[Home] [Help]

APPS.PER_DK_POSTALCODE_UPLOAD dependencies on HR_UTILITY

Line 63: hr_utility.set_location(l_location,4);

59: THEN
60: -- error : I/O directory not defined
61: RAISE e_fatal_error;
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;

Line 68: hr_utility.set_location('file type ok',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);
71: LOOP
72: BEGIN

Line 75: hr_utility.set_location ( ' line ' || l_line_read, 10);

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:
79: IF MOD (l_batch_seq, c_commit_point) = 0 THEN

Line 92: hr_utility.set_message (800, 'HR_377018_DK_INVALID_RECORD');

88: retcode := c_warning;
89:
90: -- Set the application error
91:
92: hr_utility.set_message (800, 'HR_377018_DK_INVALID_RECORD');
93: hr_utility.set_message_token (800, 'LINE_NO', l_batch_seq);
94: hr_utility.set_message_token (800, 'LINE', l_line_read);
95:
96: -- Write the message to log file, do not raise an application error but continue

Line 93: hr_utility.set_message_token (800, 'LINE_NO', l_batch_seq);

89:
90: -- Set the application error
91:
92: hr_utility.set_message (800, 'HR_377018_DK_INVALID_RECORD');
93: hr_utility.set_message_token (800, 'LINE_NO', l_batch_seq);
94: hr_utility.set_message_token (800, 'LINE', l_line_read);
95:
96: -- Write the message to log file, do not raise an application error but continue
97: -- (with next line)

Line 94: hr_utility.set_message_token (800, 'LINE', l_line_read);

90: -- Set the application error
91:
92: hr_utility.set_message (800, 'HR_377018_DK_INVALID_RECORD');
93: hr_utility.set_message_token (800, 'LINE_NO', l_batch_seq);
94: hr_utility.set_message_token (800, 'LINE', l_line_read);
95:
96: -- Write the message to log file, do not raise an application error but continue
97: -- (with next line)
98:

Line 99: fnd_file.put_line (fnd_file.LOG, hr_utility.get_message);

95:
96: -- Write the message to log file, do not raise an application error but continue
97: -- (with next line)
98:
99: fnd_file.put_line (fnd_file.LOG, hr_utility.get_message);
100:
101: END;
102:
103: END LOOP ;

Line 121: hr_utility.set_message (800, 'HR_78040_DATA_EXCHANGE_DIR_MIS');

117: -- Set retcode to 2, indicating an ERROR to the ConcMgr
118: retcode := c_error;
119:
120: -- Set the application error
121: hr_utility.set_message (800, 'HR_78040_DATA_EXCHANGE_DIR_MIS');
122:
123: -- Return the message to the ConcMgr (This msg will appear in the log file)
124: errbuf := hr_utility.get_message;
125:

Line 124: errbuf := hr_utility.get_message;

120: -- Set the application error
121: hr_utility.set_message (800, 'HR_78040_DATA_EXCHANGE_DIR_MIS');
122:
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

Line 138: hr_utility.set_location (l_proc, 220);

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;
140: errbuf := 'Reading File ('||l_location ||' -> '
141: || l_file_name
142: || ') - Invalid Operation.';

Line 151: hr_utility.set_location (l_proc, 230);

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;
153: errbuf := 'Reading File ('
154: || l_location
155: || ' -> '

Line 167: hr_utility.set_location (l_proc, 240);

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;
169: errbuf := 'Reading File ('
170: || l_location
171: || ' -> '

Line 189: hr_utility.set_location (l_proc, 250);

185: || l_location
186: || ' -> '
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

Line 199: hr_utility.set_location (l_proc, 260);

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;
201: errbuf := 'Reading File ('
202: || l_location
203: || ' -> '

Line 215: hr_utility.set_location (l_proc, 270);

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;
217: errbuf := 'Reading File ('
218: || l_location
219: || ' -> '

Line 241: hr_utility.set_location ( ' bg id '||g_bg_id, 20);

237: l_view_application_id := 3;
238: update_flag :='N';
239: l_line := rtrim(p_line);
240:
241: hr_utility.set_location ( ' bg id '||g_bg_id, 20);
242: begin
243: select SECURITY_GROUP_ID into l_security_group_id from per_business_groups where business_group_id = g_bg_id;
244: exception
245: when others then

Line 250: hr_utility.set_location ( ' l_line '||l_line , 20);

246: l_security_group_id := 0;
247: end;
248:
249:
250: hr_utility.set_location ( ' l_line '||l_line , 20);
251: if l_line is NULL then
252: null;
253:
254: else

Line 256: hr_utility.set_location ('lookup_code:' || l_lookup_code, 110);

252: null;
253:
254: else
255: l_lookup_code:= get_field (p_line => l_line, p_delimiter => '~');
256: hr_utility.set_location ('lookup_code:' || l_lookup_code, 110);
257:
258: if l_lookup_code is NULL OR l_line is NULL OR to_number(l_lookup_code) < 1 OR to_number(l_lookup_code) >9999 then
259: raise e_invalid_record;
260: else

Line 265: hr_utility.set_location ( ' code '||l_lookup_code , 20);

261:
262:
263: l_meaning:=l_lookup_code ||' ' || get_field (p_line => l_line, p_delimiter => '~');
264: l_description:=NULL;
265: hr_utility.set_location ( ' code '||l_lookup_code , 20);
266: hr_utility.set_location ( ' meaning '||l_meaning , 30);
267: hr_utility.set_location ( ' desc '||l_description , 40);
268:
269:

Line 266: hr_utility.set_location ( ' meaning '||l_meaning , 30);

262:
263: l_meaning:=l_lookup_code ||' ' || get_field (p_line => l_line, p_delimiter => '~');
264: l_description:=NULL;
265: hr_utility.set_location ( ' code '||l_lookup_code , 20);
266: hr_utility.set_location ( ' meaning '||l_meaning , 30);
267: hr_utility.set_location ( ' desc '||l_description , 40);
268:
269:
270: begin

Line 267: hr_utility.set_location ( ' desc '||l_description , 40);

263: l_meaning:=l_lookup_code ||' ' || get_field (p_line => l_line, p_delimiter => '~');
264: l_description:=NULL;
265: hr_utility.set_location ( ' code '||l_lookup_code , 20);
266: hr_utility.set_location ( ' meaning '||l_meaning , 30);
267: hr_utility.set_location ( ' desc '||l_description , 40);
268:
269:
270: begin
271: select 'Y' INTO update_flag

Line 349: hr_utility.set_location ( ' insert row ', 30);

345: X_LAST_UPDATE_DATE => SYSDATE,
346: X_LAST_UPDATED_BY => TO_NUMBER(FND_PROFILE.VALUE('USER_ID')),
347: X_LAST_UPDATE_LOGIN => TO_NUMBER(FND_PROFILE.VALUE('LOGIN_ID')));
348:
349: hr_utility.set_location ( ' insert row ', 30);
350:
351: end insert_row;
352:
353: -- Procedure to update a row in fnd_lookup_values table

Line 398: hr_utility.set_location ( ' update row ', 30);

394: X_LAST_UPDATE_DATE => SYSDATE,
395: X_LAST_UPDATED_BY => TO_NUMBER(FND_PROFILE.VALUE('USER_ID')),
396: X_LAST_UPDATE_LOGIN => TO_NUMBER(FND_PROFILE.VALUE('LOGIN_ID')));
397:
398: hr_utility.set_location ( ' update row ', 30);
399: end update_row;
400:
401: --Function to fetch a field from the line.
402: FUNCTION get_field (

Line 419: hr_utility.set_location (

415: IF (l_position > 0)
416: THEN
417: l_field := SUBSTR (p_line, 1, l_position
418: - 1);
419: hr_utility.set_location (
420: RPAD ('Field', 31)
421: || RPAD (LPAD (l_position, 3), 4)
422: || l_field,
423: 70