CasewareDocumentation
Nouveautés de Caseware Cloud EngagementsVoir les nouveautés

Paramètres

Renvoie une collection de paramètres d'exécution attribués à l'enregistrement d'exécution actuel (association entre le test d'audit et le tableau IDEA).

Compatibilité

Proposé dès IDEA version 12.0

Syntaxe

Parameters As Collection

Valeur retournée

Collection énumérable de paramètres d'exécution physiques de l'enregistrement d'exécution actuel. Si l'enregistrement d'exécution n'est pas accessible, une exception est déclenchée.

Remarques

Un élément de collection (paramètre d'exécution) met en œuvre les propriétés suivantes :

Propriétés
Méthode Type de données Description
Id String Obtient le nom symbolique (identifiant) du paramètre.
ParameterType Integer

Obtient le type de paramètre. Le type peut être :

Inconnu = 0

Aging = 1

CheckBox = 2

ComboBox = 3

Duplicate = 4

FromToList = 5

Gap = 6

OptionGroup = 7

SingleList = 8

Stratification = 9

TextBox = 10

Weekend = 11

ParameterDataType Integer

Obtient le type de données du paramètre. Le type de données peut être :

Inconnu = 0

Numérique = 1

Décimal = 2

Chaîne = 3

Date = 4

Heure = 5

DisplayName String Obtient un nom lisible par l'humain du paramètre.
Valeur Object Obtient ou définit la valeur du paramètre. La valeur du paramètre logique est toujours vide.

La collection de paramètres est énumérable, c.-à-d. qu'elle peut être utilisée POUR CHAQUE boucle. En plus, elle met en œuvre les propriétés ou méthodes suivantes :

Propriété/méthodes
Méthode Type de données Description
Décompte Integer Obtient le nombre d'éléments dans la collection.
Get(id As String) Object

Renvoie le paramètre d'exécution ayant l'identifiant indiqué. Si ce paramètre n'existe pas, rien n'est renvoyé.

Item(index As Integer) Object

Renvoie le paramètre d'exécution par son index dans la collection. L'index est basé sur zéro.

Exemple

Sub Main()
Dim ac As Object
Dim atExecutor As Object
Dim parameters
Dim paramCheckBox1
Dim paramSingleList1
Set ac = CreateObject("SmartAnalyzer.AutomationClient")
atId = "f4d65220-77f1-5969-8943-59c7bd448460"
tblName = "Sample-Weblog"
Set atExecutor = SA.GetAtExecutor(atId, tblName)
Set parameters = atExecutor.Parameters
MsgBox"Parameters' count: " & parameters.Count
FOR EACH p IN parameters
MsgBox"Next parameter's name: '" + p.Id + "'"
NEXT
' Display certain parameters' values
Set paramCheckBox1 = parameters.Get("smartCheckBox1")
Set paramSingleList1 = parameters.Get("smartSingleList1")
MsgBox"Value of chexbox1: " & paramCheckBox1.Value
' Value of single list is collection; enumerate through it
FOR EACH v IN paramSingleList1.Value
MsgBox"Next value of singleList1: '" + v + "'"
NEXT
End Sub

Lorsqu'il est exécuté, ce script produit la séquence de sortie suivante :

Décompte des paramètres : 3

Nom du paramètre suivant : 'smartCheckBox1'

Nom du paramètre suivant : 'smartCheckBox2'

Nom du paramètre suivant : 'smartSingleList1'

Valeur de chexbox1 : True

Valeur suivante de singleList1 : 'Pomme de terre'

Valeur suivante de singleList1 : 'Tomate'

Valeur suivante de singleList1 : 'Cucumber'