« ExecuteTestSuiteScript (CM) » : différence entre les versions
Aucun résumé des modifications |
mAucun résumé des modifications |
||
| Ligne 19 : | Ligne 19 : | ||
Exemple | Exemple | ||
<source lang='delphi'> | <source lang='delphi'> | ||
//Procedure | //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
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é 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
//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;
Voir aussi :