DBA Data[Home] [Help]

APPS.PAY_SE_ALECTA_UPLOAD dependencies on HR_UTILITY

Line 50: hr_utility.set_location('p_file_name '||p_file_name,1);

46:
47: INSERT INTO fnd_sessions(SESSION_ID , EFFECTIVE_DATE )
48: VALUES(userenv('SESSIONID'),fnd_date.canonical_to_date(p_effective_date)) ;
49:
50: hr_utility.set_location('p_file_name '||p_file_name,1);
51: hr_utility.set_location('p_business_group_id '||p_business_group_id,1 );
52:
53: hr_utility.set_location ( 'Entering:' || l_proc, 10);
54: -- fnd_file.put_line(fnd_file.log,'$$ Entering'||l_proc);

Line 51: hr_utility.set_location('p_business_group_id '||p_business_group_id,1 );

47: INSERT INTO fnd_sessions(SESSION_ID , EFFECTIVE_DATE )
48: VALUES(userenv('SESSIONID'),fnd_date.canonical_to_date(p_effective_date)) ;
49:
50: hr_utility.set_location('p_file_name '||p_file_name,1);
51: hr_utility.set_location('p_business_group_id '||p_business_group_id,1 );
52:
53: hr_utility.set_location ( 'Entering:' || l_proc, 10);
54: -- fnd_file.put_line(fnd_file.log,'$$ Entering'||l_proc);
55:

Line 53: hr_utility.set_location ( 'Entering:' || l_proc, 10);

49:
50: hr_utility.set_location('p_file_name '||p_file_name,1);
51: hr_utility.set_location('p_business_group_id '||p_business_group_id,1 );
52:
53: hr_utility.set_location ( 'Entering:' || l_proc, 10);
54: -- fnd_file.put_line(fnd_file.log,'$$ Entering'||l_proc);
55:
56: OPEN csr_leg (p_business_group_id);
57: FETCH csr_leg INTO l_legislation_code, l_bg_name;

Line 60: hr_utility.set_location ( 'Legislation = ' || l_legislation_code, 20);

56: OPEN csr_leg (p_business_group_id);
57: FETCH csr_leg INTO l_legislation_code, l_bg_name;
58: CLOSE csr_leg;
59:
60: hr_utility.set_location ( 'Legislation = ' || l_legislation_code, 20);
61: -- fnd_file.put_line(fnd_file.log,'$$ l_legislation_code'||l_legislation_code);
62:
63: l_filename := p_file_name;
64: fnd_profile.get (c_data_exchange_dir, l_location);

Line 66: hr_utility.set_location ( 'Directory = ' || l_location, 30);

62:
63: l_filename := p_file_name;
64: fnd_profile.get (c_data_exchange_dir, l_location);
65:
66: hr_utility.set_location ( 'Directory = ' || l_location, 30);
67: -- fnd_file.put_line(fnd_file.log,'$$ l_location'||l_location);
68:
69: IF l_location IS NULL
70: THEN

Line 71: hr_utility.set_location ( 'Raising I/O error = ' || l_location, 35);

67: -- fnd_file.put_line(fnd_file.log,'$$ l_location'||l_location);
68:
69: IF l_location IS NULL
70: THEN
71: hr_utility.set_location ( 'Raising I/O error = ' || l_location, 35);
72: RAISE e_fatal_error;
73: END IF;
74:
75: l_file_type :=

Line 91: hr_utility.set_location (l_proc, 50);

87: THEN
88: UTL_FILE.fclose (l_file_type);
89: END IF;
90:
91: hr_utility.set_location (l_proc, 50);
92: retcode := c_error;
93: errbuf := 'Input line (line nr = '|| l_line_no + 1 || ') too large for buffer (=' || c_max_linesize || ').';
94: EXIT;
95: WHEN NO_DATA_FOUND

Line 99: hr_utility.set_location ( ' line read: ' || l_line_read,110);

95: WHEN NO_DATA_FOUND
96: THEN
97: EXIT;
98: END;
99: hr_utility.set_location ( ' line read: ' || l_line_read,110);
100:
101: BEGIN
102:
103: compare_record (

Line 108: hr_utility.set_location ( ' l_record_found = ' || l_record_found, 130);

104: p_line => l_line_read
105: ,p_record_found => l_record_found
106: );
107:
108: hr_utility.set_location ( ' l_record_found = ' || l_record_found, 130);
109: -- fnd_file.put_line(fnd_file.log,'$$ l_record_found'||l_record_found);
110:
111: if l_record_found = 0 then
112: hr_utility.set_location ( ' Record not found', 110);

Line 112: hr_utility.set_location ( ' Record not found', 110);

108: hr_utility.set_location ( ' l_record_found = ' || l_record_found, 130);
109: -- fnd_file.put_line(fnd_file.log,'$$ l_record_found'||l_record_found);
110:
111: if l_record_found = 0 then
112: hr_utility.set_location ( ' Record not found', 110);
113: RAISE e_record_not_found;
114: end if;
115:
116: EXCEPTION

Line 121: hr_utility.set_message (801, 'HR_377018_DK_INVALID_RECORD');

117:
118: WHEN e_record_not_found
119: THEN
120: retcode := c_warning;
121: hr_utility.set_message (801, 'HR_377018_DK_INVALID_RECORD');
122: hr_utility.set_message_token (801, 'LINE', l_line_read);
123: hr_utility.set_location (l_proc, 260);
124: fnd_file.put_line (fnd_file.LOG, hr_utility.get_message);
125: END;

Line 122: hr_utility.set_message_token (801, 'LINE', l_line_read);

118: WHEN e_record_not_found
119: THEN
120: retcode := c_warning;
121: hr_utility.set_message (801, 'HR_377018_DK_INVALID_RECORD');
122: hr_utility.set_message_token (801, 'LINE', l_line_read);
123: hr_utility.set_location (l_proc, 260);
124: fnd_file.put_line (fnd_file.LOG, hr_utility.get_message);
125: END;
126: END LOOP read_lines_in_file;

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

119: THEN
120: retcode := c_warning;
121: hr_utility.set_message (801, 'HR_377018_DK_INVALID_RECORD');
122: hr_utility.set_message_token (801, 'LINE', l_line_read);
123: hr_utility.set_location (l_proc, 260);
124: fnd_file.put_line (fnd_file.LOG, hr_utility.get_message);
125: END;
126: END LOOP read_lines_in_file;
127:

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

120: retcode := c_warning;
121: hr_utility.set_message (801, 'HR_377018_DK_INVALID_RECORD');
122: hr_utility.set_message_token (801, 'LINE', l_line_read);
123: hr_utility.set_location (l_proc, 260);
124: fnd_file.put_line (fnd_file.LOG, hr_utility.get_message);
125: END;
126: END LOOP read_lines_in_file;
127:
128: UTL_FILE.fclose (l_file_type);

Line 129: hr_utility.set_location ( 'Leaving:'|| l_proc, 260);

125: END;
126: END LOOP read_lines_in_file;
127:
128: UTL_FILE.fclose (l_file_type);
129: hr_utility.set_location ( 'Leaving:'|| l_proc, 260);
130:
131: EXCEPTION
132: WHEN e_fatal_error
133: THEN

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

135: THEN
136: UTL_FILE.fclose (l_file_type);
137: END IF;
138:
139: hr_utility.set_location (l_proc, 270);
140: retcode := c_error;
141: hr_utility.set_message (801, 'HR_SE_DATA_EXCHANGE_DIR_MIS');
142: errbuf := hr_utility.get_message;
143:

Line 141: hr_utility.set_message (801, 'HR_SE_DATA_EXCHANGE_DIR_MIS');

137: END IF;
138:
139: hr_utility.set_location (l_proc, 270);
140: retcode := c_error;
141: hr_utility.set_message (801, 'HR_SE_DATA_EXCHANGE_DIR_MIS');
142: errbuf := hr_utility.get_message;
143:
144: WHEN UTL_FILE.invalid_operation
145: THEN

Line 142: errbuf := hr_utility.get_message;

138:
139: hr_utility.set_location (l_proc, 270);
140: retcode := c_error;
141: hr_utility.set_message (801, 'HR_SE_DATA_EXCHANGE_DIR_MIS');
142: errbuf := hr_utility.get_message;
143:
144: WHEN UTL_FILE.invalid_operation
145: THEN
146: IF UTL_FILE.is_open (l_file_type)

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

147: THEN
148: UTL_FILE.fclose (l_file_type);
149: END IF;
150:
151: hr_utility.set_location (l_proc, 280);
152: retcode := c_error;
153: errbuf := 'Reading File ('||l_location ||' -> ' || l_filename || ') - Invalid Operation.';
154:
155: WHEN UTL_FILE.internal_error

Line 162: hr_utility.set_location (l_proc, 290);

158: THEN
159: UTL_FILE.fclose (l_file_type);
160: END IF;
161:
162: hr_utility.set_location (l_proc, 290);
163: retcode := c_error;
164: errbuf := 'Reading File (' || l_location || ' -> ' || l_filename || ') - Internal Error.';
165:
166: WHEN UTL_FILE.invalid_mode

Line 173: hr_utility.set_location (l_proc, 300);

169: THEN
170: UTL_FILE.fclose (l_file_type);
171: END IF;
172:
173: hr_utility.set_location (l_proc, 300);
174: retcode := c_error;
175: errbuf := 'Reading File (' || l_location || ' -> ' || l_filename || ') - Invalid Mode.';
176:
177: WHEN UTL_FILE.invalid_path

Line 186: hr_utility.set_location (l_proc, 310);

182: END IF;
183:
184: retcode := c_error;
185: errbuf := 'Reading File (' || l_location || ' -> ' || l_filename || ') - Invalid Path or Filename.';
186: hr_utility.set_location (l_proc, 310);
187:
188: WHEN UTL_FILE.invalid_filehandle
189: THEN
190: IF UTL_FILE.is_open (l_file_type)

Line 195: hr_utility.set_location (l_proc, 320);

191: THEN
192: UTL_FILE.fclose (l_file_type);
193: END IF;
194:
195: hr_utility.set_location (l_proc, 320);
196: retcode := c_error;
197: errbuf := 'Reading File (' || l_location || ' -> ' || l_filename || ') - Invalid File Type.';
198: WHEN UTL_FILE.read_error
199:

Line 206: hr_utility.set_location (l_proc, 330);

202: THEN
203: UTL_FILE.fclose (l_file_type);
204: END IF;
205:
206: hr_utility.set_location (l_proc, 330);
207: retcode := c_error;
208: errbuf := 'Reading File (' || l_location || ' -> ' || l_filename || ') - Read Error.';
209: END upload;
210:

Line 237: hr_utility.set_location ( 'Entering:'|| l_proc, 70);

233: l_record_found number := 0;
234:
235: BEGIN
236:
237: hr_utility.set_location ( 'Entering:'|| l_proc, 70);
238: --fnd_file.put_line(fnd_file.log,''||p_line);
239:
240: l_org_number := get_token(p_line,1);
241: l_cost_centre := get_token(p_line,2);

Line 351: hr_utility.set_location ( 'Leaving:'|| l_proc, 120);

347: END IF;
348:
349: p_record_found := l_record_found;
350: --fnd_file.put_line(fnd_file.log,'## l_record_found'||l_record_found);
351: hr_utility.set_location ( 'Leaving:'|| l_proc, 120);
352:
353: END compare_record;
354:
355: function get_token(