Fatal error 824

EXEC sp_resetstatus 'DatabaseName' ;
ALTER DATABASE DatabaseName SET EMERGENCY
DBCC checkdb('DatabaseName')
ALTER DATABASE DatabaseName SET SINGLE_USER WITH ROLLBACK IMMEDIATE DBCC CheckDB ('DatabaseName' , REPAIR_ALLOW_DATA_LOSS) 
ALTER DATABASE DatabaseName SET MULTI_USER