DBA Data[Home] [Help]

APPS.HR_DM_RANGE dependencies on HR_DM_UTILITY

Line 86: hr_dm_utility.message_init;

82: --
83:
84: -- initialize messaging (only for concurrent processing)
85: IF (p_concurrent_process = 'Y') THEN
86: hr_dm_utility.message_init;
87: END IF;
88:
89: hr_dm_utility.message('ROUT','entry:hr_dm_range.main', 5);
90: hr_dm_utility.message('PARA','(p_migration_id - ' || p_migration_id ||

Line 89: hr_dm_utility.message('ROUT','entry:hr_dm_range.main', 5);

85: IF (p_concurrent_process = 'Y') THEN
86: hr_dm_utility.message_init;
87: END IF;
88:
89: hr_dm_utility.message('ROUT','entry:hr_dm_range.main', 5);
90: hr_dm_utility.message('PARA','(p_migration_id - ' || p_migration_id ||
91: ')(p_last_migration_date - ' ||
92: p_last_migration_date || ')', 10);
93:

Line 90: hr_dm_utility.message('PARA','(p_migration_id - ' || p_migration_id ||

86: hr_dm_utility.message_init;
87: END IF;
88:
89: hr_dm_utility.message('ROUT','entry:hr_dm_range.main', 5);
90: hr_dm_utility.message('PARA','(p_migration_id - ' || p_migration_id ||
91: ')(p_last_migration_date - ' ||
92: p_last_migration_date || ')', 10);
93:
94: -- get the current phase_id

Line 95: l_phase_id := hr_dm_utility.get_phase_id('R', p_migration_id);

91: ')(p_last_migration_date - ' ||
92: p_last_migration_date || ')', 10);
93:
94: -- get the current phase_id
95: l_phase_id := hr_dm_utility.get_phase_id('R', p_migration_id);
96:
97: -- get the business_group_id and migration_type
98: OPEN csr_migration_info;
99: LOOP

Line 106: l_no_of_threads := hr_dm_utility.number_of_threads(l_business_group_id);

102: END LOOP;
103: CLOSE csr_migration_info;
104:
105: -- find the number of threads to use
106: l_no_of_threads := hr_dm_utility.number_of_threads(l_business_group_id);
107:
108: -- loop until either range phase is in error or all range phase items have
109: -- been processed
110:

Line 114: l_current_phase_status := NVL(hr_dm_utility.get_phase_status('R',

110:
111: LOOP
112: -- get status of range phase, is phase completed?
113: -- if null returned, then assume it is NS.
114: l_current_phase_status := NVL(hr_dm_utility.get_phase_status('R',
115: p_migration_id), 'NS');
116:
117: -- if status is error, then raise an exception
118: IF (l_current_phase_status = 'E') THEN

Line 130: hr_dm_utility.update_phase_items(p_new_status => 'S',

126: l_status, l_short_name;
127: EXIT WHEN csr_get_pi%NOTFOUND;
128: CLOSE csr_get_pi;
129: -- update status to started
130: hr_dm_utility.update_phase_items(p_new_status => 'S',
131: p_id => l_phase_item_id);
132:
133: -- send info on current table to logfile
134: hr_dm_utility.message('INFO','Processing - ' || l_table_name, 13);

Line 134: hr_dm_utility.message('INFO','Processing - ' || l_table_name, 13);

130: hr_dm_utility.update_phase_items(p_new_status => 'S',
131: p_id => l_phase_item_id);
132:
133: -- send info on current table to logfile
134: hr_dm_utility.message('INFO','Processing - ' || l_table_name, 13);
135:
136: -- call calculate ranges code in TDS package
137:
138: -- build parameter string

Line 152: hr_dm_utility.update_phase_items(p_new_status => 'C',

148: dbms_sql.close_cursor(l_cursor);
149:
150:
151: -- update status to completed
152: hr_dm_utility.update_phase_items(p_new_status => 'C',
153: p_id => l_phase_item_id);
154:
155: END LOOP;
156:

Line 163: hr_dm_utility.message('INFO','Range - main controller', 15);

159: retcode := 0;
160: errbuf := 'No errors - examine logfiles for detailed reports.';
161:
162:
163: hr_dm_utility.message('INFO','Range - main controller', 15);
164: hr_dm_utility.message('SUMM','Range - main controller', 20);
165: hr_dm_utility.message('ROUT','exit:hr_dm_range.main', 25);
166: hr_dm_utility.message('PARA','(retcode - ' || retcode ||
167: ')(errbuf - ' || errbuf || ')', 30);

Line 164: hr_dm_utility.message('SUMM','Range - main controller', 20);

160: errbuf := 'No errors - examine logfiles for detailed reports.';
161:
162:
163: hr_dm_utility.message('INFO','Range - main controller', 15);
164: hr_dm_utility.message('SUMM','Range - main controller', 20);
165: hr_dm_utility.message('ROUT','exit:hr_dm_range.main', 25);
166: hr_dm_utility.message('PARA','(retcode - ' || retcode ||
167: ')(errbuf - ' || errbuf || ')', 30);
168:

Line 165: hr_dm_utility.message('ROUT','exit:hr_dm_range.main', 25);

161:
162:
163: hr_dm_utility.message('INFO','Range - main controller', 15);
164: hr_dm_utility.message('SUMM','Range - main controller', 20);
165: hr_dm_utility.message('ROUT','exit:hr_dm_range.main', 25);
166: hr_dm_utility.message('PARA','(retcode - ' || retcode ||
167: ')(errbuf - ' || errbuf || ')', 30);
168:
169: -- error handling

Line 166: hr_dm_utility.message('PARA','(retcode - ' || retcode ||

162:
163: hr_dm_utility.message('INFO','Range - main controller', 15);
164: hr_dm_utility.message('SUMM','Range - main controller', 20);
165: hr_dm_utility.message('ROUT','exit:hr_dm_range.main', 25);
166: hr_dm_utility.message('PARA','(retcode - ' || retcode ||
167: ')(errbuf - ' || errbuf || ')', 30);
168:
169: -- error handling
170: EXCEPTION

Line 175: hr_dm_utility.error(SQLCODE,'hr_dm_range.main',l_fatal_error_message,'R');

171: WHEN e_fatal_error THEN
172: retcode := 0;
173: errbuf := 'An error occurred during the migration - examine logfiles ' ||
174: 'for detailed reports.';
175: hr_dm_utility.error(SQLCODE,'hr_dm_range.main',l_fatal_error_message,'R');
176: WHEN OTHERS THEN
177: retcode := 2;
178: errbuf := 'An error occurred during the migration - examine logfiles for '
179: || 'detailed reports.';

Line 181: hr_dm_utility.update_phase_items(p_new_status => 'E',

177: retcode := 2;
178: errbuf := 'An error occurred during the migration - examine logfiles for '
179: || 'detailed reports.';
180: -- update status to error
181: hr_dm_utility.update_phase_items(p_new_status => 'E',
182: p_id => l_phase_item_id);
183: hr_dm_utility.error(SQLCODE,'hr_dm_range.main','(none)','R');
184:
185:

Line 183: hr_dm_utility.error(SQLCODE,'hr_dm_range.main','(none)','R');

179: || 'detailed reports.';
180: -- update status to error
181: hr_dm_utility.update_phase_items(p_new_status => 'E',
182: p_id => l_phase_item_id);
183: hr_dm_utility.error(SQLCODE,'hr_dm_range.main','(none)','R');
184:
185:
186: --
187: END main;