[Home] [Help]
1: package BODY IEM_MIGRATION_PVT as
2: /* $Header: iemvmgrb.pls 120.24.12010000.3 2008/11/06 00:26:05 rtripath ship $*/
3: g_statement_log boolean; -- Statement Level Logging
4: g_exception_log boolean; -- Statement Level Logging
5: g_error_log boolean; -- Statement Level Logging
1108: x_msg_data => l_msg_data
1109: );
1110: if l_stat='S' then
1111: -- Migrate Config Data
1112: iem_migration_pvt.iem_config(l_stat);
1113: if l_stat<>'S' then
1114: l_error_message:='Error While Creating Configuration Data'||sqlerrm;
1115: raise WORKER_NOT_SUBMITTED;
1116: else
1113: if l_stat<>'S' then
1114: l_error_message:='Error While Creating Configuration Data'||sqlerrm;
1115: raise WORKER_NOT_SUBMITTED;
1116: else
1117: IEM_MIGRATION_PVT.build_migration_queue(l_buildstat); --Build only Once
1118: end if;
1119: else
1120: l_error_message:='Error While Creating Config Historical Date Info in IEM_COMP_RT_STATS';
1121: raise WORKER_NOT_SUBMITTED;
1240: status_Text=null
1241: where migration_id=l_migration_id;
1242: commit;
1243: -- Build WorkList Item For the Folders
1244: IEM_MIGRATION_PVT.create_worklist(l_migration_id,l_status);
1245: END LOOP; -- End Loop for all folders
1246:
1247: -- PostProcessing Phase
1248: LOOP
1283: set folder_status='V'
1284: where migration_id=l_migration_id;
1285: commit;
1286: -- Build WorkList Item For the Folders
1287: IEM_MIGRATION_PVT.start_postprocessing(l_migration_id,l_status);
1288: end if;
1289: END LOOP; -- End Loop for all folders
1290: -- Check for all account to transfer them from Migrate mode to in active mode. WE make account
1291: --active even if it is doing historical email migration
1645: x_status:='S';
1646: EXCEPTION WHEN OTHERS THEN
1647: x_status:='E';
1648: end iem_config;
1649: end IEM_MIGRATION_PVT;