Environnement des tests unitaires (testsuite) - Historique des versions

Thdym le 13 décembre 2011 à 13:29

2011-12-13T13:29:32Z

← Version précédente		Version du 13 décembre 2011 à 13:29
Ligne 85 :		Ligne 85 :
	GlbTestSuiteEnvName		GlbTestSuiteEnvName
	:Nom d'un contexte de test, [[Contexte de test unitaire (testsuite)\|le contexte]] défini les paramètres de la base de données.		:Nom d'un contexte de test, [[Contexte de test unitaire (testsuite)\|le contexte]] défini les paramètres de la base de données.
			A noter que cet environnement peut contenir le script nécessaire à l'initialisation de la base. Il est IMPÉRATIF de n'employer cette possibilité uniquement si c'est réellement nécessaire, auquel cas il doit être le plus court possible.

	GlbTestSuiteDatabaseName		GlbTestSuiteDatabaseName

Thdym le 13 décembre 2011 à 13:26

2011-12-13T13:26:32Z

← Version précédente		Version du 13 décembre 2011 à 13:26
Ligne 13 :		Ligne 13 :
	:* Créer cette base de données		:* Créer cette base de données
	:* Synchroniser cette base de données		:* Synchroniser cette base de données
			:* Exécuter un script d'initialisation sur cette base de données
	:* Initialiser cette base de données		:* Initialiser cette base de données

	Créer ensuite vos donner de test.		Créer ensuite vos donner de test.

			Actuellement, il est recommandé d'intégrer à votre application le module "Module Test Suite - Core" si vous souhaiter utiliser cette fonctionnalité, ce module contenant la classe de test fourni dans cet article.

	{{#images:image9.png\|dsm\designer\testsuite}}		{{#images:image9.png\|dsm\designer\testsuite}}
Ligne 58 :		Ligne 61 :
	end;		end;

	//Procedure ~~Test_4_init_database~~;		//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;

			//Procedure Test_5_init_database;
	var dbi:TDatabaseinfo;		var dbi:TDatabaseinfo;
	begin		begin

Syfre le 2 décembre 2011 à 10:47

2011-12-02T10:47:36Z

← Version précédente		Version du 2 décembre 2011 à 10:47
Ligne 86 :		Ligne 86 :
	* [[SyncDatabase (CM)\|SyncDatabase]]		* [[SyncDatabase (CM)\|SyncDatabase]]
	* [[InitDatabase (CM)\|InitDatabase]]		* [[InitDatabase (CM)\|InitDatabase]]
			* [[SelectSociety (CM)\|SelectSociety]]

	[[Category:Tests unitaires]]		[[Category:Tests unitaires]]

Syfre le 28 septembre 2011 à 08:03

2011-09-28T08:03:27Z

← Version précédente		Version du 28 septembre 2011 à 08:03
Ligne 73 :		Ligne 73 :

	GlbTestSuiteEnvName		GlbTestSuiteEnvName
	:Nom d'un contexte de test, le contexte défini les paramètres de la base de données.		:Nom d'un contexte de test, [[Contexte de test unitaire (testsuite)\|le contexte]] défini les paramètres de la base de données.

	GlbTestSuiteDatabaseName		GlbTestSuiteDatabaseName
	:Nom de la base de données		:Nom de la base de données

			Voir aussi :

			* [[Contexte de test unitaire (testsuite)\|Contexte de test unitaire]]
			* [[RegisterTestDatabase (CM)\|RegisterTestDatabase]]
			* [[DropDatabase (CM)\|DropDatabase]]
			* [[CreateDatabase (CM)\|CreateDatabase]]
			* [[SyncDatabase (CM)\|SyncDatabase]]
			* [[InitDatabase (CM)\|InitDatabase]]

	[[Category:Tests unitaires]]		[[Category:Tests unitaires]]

Syfre le 28 septembre 2011 à 07:52

2011-09-28T07:52:42Z

← Version précédente		Version du 28 septembre 2011 à 07:52
Ligne 17 :		Ligne 17 :
	Créer ensuite vos donner de test.		Créer ensuite vos donner de test.

	* {{#images:image9.png\|dsm\designer\testsuite}}		{{#images:image9.png\|dsm\designer\testsuite}}

	L'arborescence des tests doit être organisée de sorte que ces tests d'initialisation soient exécutés en premier, utilisé l'ordre du nom de test pour ceci.		L'arborescence des tests doit être organisée de sorte que ces tests d'initialisation soient exécutés en premier, utilisé l'ordre du nom de test pour ceci.
Ligne 68 :		Ligne 68 :
	</source>		</source>

			Les paramètres GlbTestSuiteEnvName et GlbTestSuiteDatabaseName font référence à des paramètres du contexte qui peuvent être défini au niveau des préférences du concepteur de modèle :

			{{#images:image10.png\|dsm\designer\testsuite}}

			GlbTestSuiteEnvName
			:Nom d'un contexte de test, le contexte défini les paramètres de la base de données.

			GlbTestSuiteDatabaseName
			:Nom de la base de données

	[[Category:Tests unitaires]]		[[Category:Tests unitaires]]

Syfre : Page créée avec « Une bonne pratique consiste à exécuter les tests unitaires dans un Dossier de test qui présente la particularité de n'être pas rattaché à une base de données. A l'i… »

2011-09-28T07:34:53Z

Page créée avec « Une bonne pratique consiste à exécuter les tests unitaires dans un Dossier de test qui présente la particularité de n'être pas rattaché à une base de données. A l'i… »

Nouvelle page

Une bonne pratique consiste à exécuter les tests unitaires dans un Dossier de test qui présente la particularité de n'être pas rattaché à une base de données.

A l'intérieur de ce dossier vos premiers tests enregistreront et créeront une base de données puis initialiseront cette base des données de test. Ainsi vos tests s'exécuteront dans un environnement isolé et stable qui garantira la reproductibilité.

Pour ce faire :

1. Créer un dossier de test dans l'administration en cochant l'option "Ce dossier est un dossier de test" sur la page de sélection de la base de données.

2. A l'intérieur de vos tests définissez une première classe de test dont la responsabilité est de :

:* Enregistrer une base de données dont le nom est unique et lié à votre session de test.
:* Supprimer cette base de données
:* Créer cette base de données
:* Synchroniser cette base de données
:* Initialiser cette base de données

Créer ensuite vos donner de test.

* {{#images:image9.png|dsm\designer\testsuite}}

L'arborescence des tests doit être organisée de sorte que ces tests d'initialisation soient exécutés en premier, utilisé l'ordre du nom de test pour ceci.

Le code de ces tests sera le suivant :

<source lang="delphi">
//Procedure Test_0_RegisterDatabase;
var dbi:TDatabaseInfo;
begin
Abort(GlbTestSuiteEnvName<>'','Test environnement not set');
Abort(GlbTestSuiteDatabaseName<>'','Test database name not set');
dbi := ClassManager.RegisterTestDatabase(GlbTestSuiteEnvName,GlbTestSuiteDatabaseName);
Abort(Assigned(dbi),'Register database failed');
ClassManager.defDatabaseURL := dbi.URL;
end;

//Procedure Test_1_drop_database;
var dbi:TDatabaseinfo;
begin
dbi := ClassManager.DatabaseByURL(ClassManager.DefDatabaseURL);
Check(Assigned(dbi),'No database context');
Abort(ClassManager.DropDatabase(dbi),'Drop database failed');
end;

//Procedure Test_2_create_database;
var dbi:TDatabaseinfo;
begin
dbi := ClassManager.DatabaseByURL(ClassManager.DefDatabaseURL);
Check(Assigned(dbi),'No database context');
Abort(ClassManager.CreateDatabase(dbi),'Create database failed');
end;

//Procedure Test_3_sync_database;
var dbi:TDatabaseinfo;
begin
dbi := ClassManager.DatabaseByURL(ClassManager.DefDatabaseURL);
Check(Assigned(dbi),'No database context');
Abort(ClassManager.SyncDatabase(dbi),'Sync database failed');
end;

//Procedure Test_4_init_database;
var dbi:TDatabaseinfo;
begin
dbi := ClassManager.DatabaseByURL(ClassManager.DefDatabaseURL);
Check(Assigned(dbi),'No database context');
Abort(ClassManager.InitDatabase(dbi),'Init database failed');
end;

</source>

[[Category:Tests unitaires]]