RootsLabs

More than a tool ! GitHub Google+ LinkedIn RSS

SSIS : Informations sur la sortie « Progression »

Progi1984 - Commentaires (0)

Vous avez besoin lors du développement de faire un log, déboguer ou tracer un script, surtout dans le cas de l’utilisation d’une Tâche de Script.

Dans le cadre d’un script en langage VB.Net :

Public Sub Main()
  Dim FireAgain As Boolean
  FireAgain = True
  Dts.Events.FireInformation(0, "Title", "Description", String.Empty, 0, FireAgain)
  Dts.TaskResult = ScriptResults.Success
End Sub

Et cela vous permettra de sortir une information dans l’onglet « Progression » :

ssis_debug_fireinformation

Sinon vous pouvez l’améliorer en choisissant le type d’évènement :

Public Sub Main()
	Dim FireAgain As Boolean
	FireAgain = True
	Dts.Events.FireInformation(0, "TitleInfo", "DescriptionInfo", String.Empty, 0, FireAgain)
	Dts.Events.FireWarning(0, "TitleWarning", "DescriptionWarning", String.Empty, 0)
	For i As Integer = 0 To 10
		Dts.Events.FireProgress("DescriptionProgress", i * 10, 0, 0, "TitleProgress", True)
	Next
	Dts.Events.FireError(0, "TitleError", "DescriptionError", String.Empty, 0)
	Dts.TaskResult = ScriptResults.Success
End Sub

Avec une sortie de ce type :

ssis_debug_all

La précesence d’un Dts.Events.FireError définira automatiquement la tâche en échec.

Ajouter un commentaire

Commentaire :