--RECOMENTAÇÕES:
--   * - SEMPRE QUE POSSIVEL REALIZAR BACKUP ANTES DE EXECUTAR O SCRIPT.
--	 * - EXECUTAR O SCRIPT NOS BANCOS DOS SISTEMA QUANDO EXECUDADO NO BANCO PRINCIPAL (master, model, msdb, tempdb).
--	 * - CONFERIR SE O BANCO É O CORRETO PARA EXECUÇÃO.
--	 * - EXECUTAR DBCC CHECKDB SEM PARAMETRO PARA VERIFICAR NECESSIDADES DE REPARAÇÃO DO BANCO.

print 'Definindo banco de dados...'
USE DBTechPosto_VB
GO

print 'Desativando update automatico de estatisticas...'
ALTER DATABASE DBTechPosto_VB SET AUTO_UPDATE_STATISTICS_ASYNC OFF
GO

print 'Definindo banco de dados para modo de emergência...'
ALTER DATABASE DBTechPosto_VB SET EMERGENCY WITH ROLLBACK IMMEDIATE
GO

print 'Definindo banco de dados para usuario unico...'
ALTER DATABASE DBTechPosto_VB SET SINGLE_USER WITH ROLLBACK IMMEDIATE
GO

print 'Reparando banco de dados...'
DBCC CHECKDB ('DBTechPosto_VB', REPAIR_ALLOW_DATA_LOSS) WITH NO_INFOMSGS, ALL_ERRORMSGS 
GO

print 'Checando constraints...'
DBCC CHECKCONSTRAINTS WITH ALL_CONSTRAINTS, NO_INFOMSGS ,ALL_ERRORMSGS
GO

print 'Checando Filegroups...'
DBCC CHECKFILEGROUP WITH NO_INFOMSGS, ALL_ERRORMSGS;
GO

print 'Definindo banco de dados para leitura e escrita...'
ALTER DATABASE DBTechPosto_VB SET READ_WRITE
GO

print 'Definindo banco de dados para multiusuarios...'
ALTER DATABASE DBTechPosto_VB SET MULTI_USER
GO

print 'Realizando limpeza pos reparação...'
DBCC SHRINKDATABASE(N'DBTechPosto_VB', 0) WITH NO_INFOMSGS
GO

print 'Concluído!'