318: END get_phase_id;
319: --
320:
321: -- ------------------------- set_process ------------------------
322: -- Description: Updates hr_dm_migrations with the current process
323: -- being undertaken by the DM
324: --
325: --
326: -- Input Parameters
357: l_text := hr_general.decode_lookup('HR_DM_MIGRATION_PHASE', p_phase) ||
358: ' - ' || p_process_text;
359:
360: -- update table
361: UPDATE hr_dm_migrations
362: SET migration_process = l_text
363: WHERE migration_id = p_migration_id;
364: COMMIT;
365:
362: SET migration_process = l_text
363: WHERE migration_id = p_migration_id;
364: COMMIT;
365:
366: message('INFO','Set process in hr_dm_migrations', 15);
367: message('SUMM','Set process in hr_dm_migrations', 20);
368: message('ROUT','exit:hr_dm_utility.set_process', 25);
369: message('PARA','(none)', 30);
370:
363: WHERE migration_id = p_migration_id;
364: COMMIT;
365:
366: message('INFO','Set process in hr_dm_migrations', 15);
367: message('SUMM','Set process in hr_dm_migrations', 20);
368: message('ROUT','exit:hr_dm_utility.set_process', 25);
369: message('PARA','(none)', 30);
370:
371:
1427: -- update status procedures
1428: -- start
1429:
1430: -- ------------------------- update_migrations ------------------------
1431: -- Description: Updates the status of the migration in the hr_dm_migrations
1432: -- table. If the status is to be set to C then all child entries in
1433: -- hr_dm_phases are checked to ensure that they have completed.
1434: --
1435: --
1447:
1448: --
1449: PROCEDURE update_migrations (p_new_status IN VARCHAR2, p_id IN NUMBER) IS
1450: --
1451: -- table is hr_dm_migrations
1452: -- parent of hr_dm_phases
1453: -- child of (none)
1454:
1455: l_parent_table_id NUMBER(9);
1479:
1480: -- non-complete
1481: IF (p_new_status IN('S', 'NS', 'E')) THEN
1482: -- update the status for this row
1483: UPDATE hr_dm_migrations
1484: SET status = p_new_status,
1485: migration_start_date = NVL(l_start_date, migration_start_date)
1486: WHERE migration_id = p_id;
1487: COMMIT;
1496:
1497: IF (csr_child_table_complete%NOTFOUND) THEN
1498: -- update the status for this row since no child rows
1499: -- are incomplete
1500: UPDATE hr_dm_migrations
1501: SET status = p_new_status,
1502: migration_end_date = sysdate
1503: WHERE migration_id = p_id;
1504: COMMIT;
1813: PROCEDURE update_phases (p_new_status IN VARCHAR2, p_id IN NUMBER) IS
1814: --
1815: -- table is hr_dm_phases
1816: -- parent of hr_dm_phase_items
1817: -- child of hr_dm_migrations
1818:
1819: l_parent_table_id NUMBER(9);
1820: l_complete VARCHAR2(30);
1821: l_start_time DATE;