Cette section s'applique également à la définition du script pour une méthode personnalisée, une collection calculée, un gestionnaire d'événement ou une transformation.
L'onglet Script global est utilisée pour stocker les fonctions et attributs statiques qui peuvent être réutilisés entre les différentes fonctions. Cette page affiche une bibliothèque de sous-fonctions disponibles.
Dans l'exemple Sybase AS IQ, vous pouvez utiliser une fonction appelée DataTypeBase qui extrait le type de données d'un élément afin de mieux l'analyser.
Cette fonction est définie comme suit :
Function DataTypeBase(datatype)
Dim position
position = InStr(datatype, "(")
If position <> 0 Then
DataTypeBase = Ucase(Left(datatype, position -1))
Else
DataTypeBase = Ucase(datatype)
End If
End Function
Dans ce cas, cette fonction a seulement besoin d'être référencée dans les scripts de vérification et de correction automatique :
Function %Check%(obj)
Dim c 'temporary index column
Dim col 'temporary column
Dim position
%Check%= True
If obj.type = "LF" or obj.type = "HG" or obj.type = "CMP" or obj.type ="HNG" then
For Each c In obj.IndexColumns
Set col = c.column
If (DataTypeBase(col.datatype) = "VARCHAR") And (col.length > 255) Then
Output "Table " & col.parent.name & " Column " & col.name & " : Data type is not compatible with Index " & obj.name & " type " & obj.type
%Check% = False
End If
Next
End If
End Function