ExecuteTestSuiteScript (CM)
De Wiki1000
(Différences entre les versions)
m |
|||
| 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 | ||
Version actuelle en date du 28 décembre 2018 à 10: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 :
| Whos here now: Members 0 Guests 0 Bots & Crawlers 1 |
