ExecuteTestSuiteScript (CM)

De Wiki1000
Version du 2 décembre 2011 à 11:34 par Syfre (discuter | contributions)
(diff) ← Version précédente | Voir la version courante (diff) | Version suivante → (diff)
function ExecuteTestSuiteScript(dbi:TDatabaseInfo; const iTestSuiteEnvName:string; var errorMsg:string):boolean;

Cette fonction initialise la base de données en exécutant le scripts de base de données associé à l'environnement de test.

Si la base de données supporte le multi-société la fonction exécute le script de création des objets de partage.

Result True si l'initialisation s'est correctement réalisé
iTestSuiteEnvName Le nom d'un contexte de test.
errorMsg Le message d'erreur en cas d'erreur.

Exemple

//Procedure Test_5_execute_script;
var dbi:TDatabaseinfo;errorMsg:string;
begin
  dbi := ClassManager.DatabaseByURL(ClassManager.DefDatabaseURL);
  Check(Assigned(dbi),'No database context');
  Abort(ClassManager.ExecuteTestSuiteScript(dbi,GlbTestSuiteEnvName,errorMsg),errorMsg);
end;

Voir aussi :

Gestion des bases de données (CM)Développement DSM

Outils personnels