Problème d' incrément rang

Version imprimable

Bonjour :) ,

Afin de repérer les TRANSACTIONS NON commiter, j'ai développé un petit script qui permet d'identifier cette transaction, mais je n'arrive pas à incrémenter ma boucle afin qu'il passe à la BD suivante.

Ci dessous le script :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
 
USE master
GO
 
DECLARE @Database nvarchar(100)
DECLARE @Nb_Db int
DROP TABLE #DB_temp 
 
SELECT name INTO #DB_temp 
FROM sys.databases
WHERE name NOT IN ('master','msdb','model','tempdb')
 
SET @Nb_Db = 0
DECLARE DatabaseCursor CURSOR FOR
        SELECT name FROM #DB_temp
 
OPEN DatabaseCursor
 
FETCH NEXT FROM DatabaseCursor INTO @Database
WHILE @Nb_Db <> (select count(name) from #DB_temp)
	BEGIN
		BEGIN TRY
			--DBCC OPENTRAN(@Database)
			PRINT 'DBCC OK ' + @Database
		END TRY
 
		BEGIN CATCH
			SELECT
				ERROR_NUMBER() AS ErrorNumber
				,ERROR_SEVERITY() AS ErrorSeverity
				,ERROR_STATE() AS ErrorState
				,ERROR_PROCEDURE() AS ErrorProcedure
				,ERROR_LINE() AS ErrorLine
				,ERROR_MESSAGE() AS ErrorMessage
		END CATCH
		SET @Nb_Db = @Nb_Db +1
	END
		CLOSE DatabaseCursor
		DEALLOCATE DatabaseCursor

Pourriez-vous m'aider ?

Merci d'avance :ccool: !

Bonjour,

En effet, il manque un FETCH dans la boucle !

De plus, pour votre condition de sortie de boucle, vous pouvez vérifier si le curseur à encore des lignes sous le coude ;) :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
 
USE master
GO
 
DECLARE @DATABASE nvarchar(100)
DROP TABLE #DB_temp 
 
SELECT name INTO #DB_temp 
FROM sys.DATABASES
WHERE name NOT IN ('master','msdb','model','tempdb')
 
SET @Nb_Db = 0
DECLARE DatabaseCursor CURSOR FOR
        SELECT name FROM #DB_temp
 
OPEN DatabaseCursor
 
FETCH NEXT FROM DatabaseCursor INTO @DATABASE
 
WHILE @@FETCH_STATUS = 0
	BEGIN
		BEGIN TRY
			--DBCC OPENTRAN(@Database)
			PRINT 'DBCC OK ' + @DATABASE
		END TRY
 
		BEGIN CATCH
			SELECT
				ERROR_NUMBER() AS ErrorNumber
				,ERROR_SEVERITY() AS ErrorSeverity
				,ERROR_STATE() AS ErrorState
				,ERROR_PROCEDURE() AS ErrorProcedure
				,ERROR_LINE() AS ErrorLine
				,ERROR_MESSAGE() AS ErrorMessage
		END CATCH
 
		FETCH NEXT FROM DatabaseCursor INTO @DATABASE
 
	END
		CLOSE DatabaseCursor
		DEALLOCATE DatabaseCursor

14/06/2011, 17h22
Blacknounou

:) Merci pour cette réponse rapide !!!! :ccool:

Bonjour,

Encore une fois le curseur ne sert à rien, et mettre un WHILE dans votre curseur ici ne sert à rien non plus :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
SET NOCOUNT ON
GO
 
DECLARE @db TABLE
(
	database_name sysname
)
 
DECLARE @database_name sysname
	, @sql nvarchar(128)
 
INSERT	INTO @db (database_name)
SELECT	name
FROM	sys.databases
WHERE	name NOT IN ('master','msdb','model','tempdb', 'ReportServer', 'ReportServerTempDB', 'distribution')
AND	source_database_id IS NULL -- la BD n'est pas un snashot
AND	state_desc = 'ONLINE'
 
WHILE EXISTS
(
	SELECT	*
	FROM	@db
)
BEGIN
	SELECT	TOP (1) @database_name = database_name
	FROM	@db
 
	SET	@sql = N'DBCC OPENTRAN (' + @database_name + ')'
	PRINT	'------------------------' + @database_name + '------------------------'
	EXEC	(@sql)
 
	DELETE	FROM @db
	WHERE	database_name = @database_name
END

@++ ;)

14/06/2011, 17h29
aieeeuuuuu

Citation:

Envoyé par Blacknounou

:) Merci

de rien ;)

Citation:

Envoyé par Blacknounou

pour cette réponse rapide !!!! :ccool:

Dans laquelle j'ai omis de retirer le SET @Nb_Db = 0

Citation:

Envoyé par elsuket

Bonjour,

Encore une fois le curseur ne sert à rien, et mettre un WHILE dans votre curseur ici ne sert à rien non plus :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
SET NOCOUNT ON
GO
 
DECLARE @db TABLE
(
	database_name sysname
)
 
DECLARE @database_name sysname
	, @sql nvarchar(128)
 
INSERT	INTO @db (database_name)
SELECT	name
FROM	sys.databases
WHERE	name NOT IN ('master','msdb','model','tempdb', 'ReportServer', 'ReportServerTempDB', 'distribution')
AND	source_database_id IS NULL -- la BD n'est pas un snashot
AND	state_desc = 'ONLINE'
 
WHILE EXISTS
(
	SELECT	*
	FROM	@db
)
BEGIN
	SELECT	TOP (1) @database_name = database_name
	FROM	@db
 
	SET	@sql = N'DBCC OPENTRAN (' + @database_name + ')'
	PRINT	'------------------------' + @database_name + '------------------------'
	EXEC	(@sql)
 
	DELETE	FROM @db
	WHERE	database_name = @database_name
END

@++ ;)

Je prends aussi. :P

Merci . :ccool: