ExecuteTestSuiteScript (CM)

De Wiki1000
(Différences entre les versions)
Syfre (discuter | contributions)
(Page créée avec « <source lang='delphi'>function ExecuteTestSuiteScript(dbi:TDatabaseInfo; const iTestSuiteEnvName:string; var errorMsg:string):boolean;</source> Cette fonction initialise la … »)
Modification suivante →

Version du 2 décembre 2011 à 12:34

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





Whos here now:   Members 0   Guests 0   Bots & Crawlers 1
 
Outils personnels