« ExecuteTestSuiteScript (CM) » : différence entre les versions

De Wiki1000
Aucun résumé des modifications
mAucun résumé des modifications
 
Ligne 19 : Ligne 19 :
Exemple
Exemple
<source lang='delphi'>
<source lang='delphi'>
//Procedure Test_5_execute_script;
//Procedure Test_4_execute_script;
var dbi:TDatabaseinfo;errorMsg:string;
var dbi:TDatabaseinfo;errorMsg:string;
begin
begin

Dernière version du 28 décembre 2018 à 08:21

<source lang='delphi'>function ExecuteTestSuiteScript(dbi:TDatabaseInfo; const iTestSuiteEnvName:string; var errorMsg:string):boolean;</source>

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é alors la fonction exécute le script de création des objets de partage associé à l'environnement de test.

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 <source lang='delphi'> //Procedure Test_4_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; </source>

Voir aussi :

{{#if:Gestion des bases de données (CM)|

{{#if:Gestion des bases de données (CM)|— Gestion des bases de données (CM) |}} — Développement DSM

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM

}}