Syfre le 14 avril 2017 à 07:06

2017-04-14T07:06:29Z

← Version précédente		Version du 14 avril 2017 à 07:06
Ligne 1 :		Ligne 1 :
	Après synchronisation du modèle relationnel de l'application le framework exécute une procédure de synchronisation		Après synchronisation du modèle relationnel de l'application, le framework exécute une procédure de synchronisation pour chaque paquet métier.

			'''Si la base de données est en mode partage (multi sociétés)'''

			La procédure de synchronisation execute les méthodes de synchronisation de chaque domaine métier :

			<source lang='delphi'>procedure TRegister<Nom_du_paquet>.Code_du_domaine;</source>

			'''Si la base de données n'est pas en mode partage'''

			La procédure de synchronisation exécute la méthode :

	<source lang='delphi'>procedure TRegister<Nom_du_paquet>.Synchronize;</source>		<source lang='delphi'>procedure TRegister<Nom_du_paquet>.Synchronize;</source>

	~~pour chaque paquet.~~

	{{tip\|Le code de ces procédures doit être exécutable plusieurs fois, si vous créez des objets assurez vous avant qu'ils n'existent pas déjà.}}		{{tip\|Le code de ces procédures doit être exécutable plusieurs fois, si vous créez des objets assurez vous avant qu'ils n'existent pas déjà.}}
Ligne 38 :		Ligne 47 :
	{{Footer\|ModelManager_(code)}}		{{Footer\|ModelManager_(code)}}
	[[category:ModelManager]]		[[category:ModelManager]]
			[[category:Initialisation d'une base de données]]

Syfre : Nouvelle page : Après synchronisation du modèle relationnel de l'application le framework exécute une procédure de synchronisation procedure TRegister.Synch...

2009-11-26T15:14:56Z

Nouvelle page : Après synchronisation du modèle relationnel de l'application le framework exécute une procédure de synchronisation <source lang='delphi'>procedure TRegister<Nom_du_paquet>.Synch...

Nouvelle page

Après synchronisation du modèle relationnel de l'application le framework exécute une procédure de synchronisation

<source lang='delphi'>procedure TRegister<Nom_du_paquet>.Synchronize;</source>

pour chaque paquet.

{{tip|Le code de ces procédures doit être exécutable plusieurs fois, si vous créez des objets assurez vous avant qu'ils n'existent pas déjà.}}

Exemple
<source lang='delphi'>
procedure TRegisterMyPackage.Synchronize;
begin
var
vContexte : TContextePoids;
begin
ClassManager.BeginTran;
try
vContexte := ClassManager.FindSingleton('TContextePoids');
if not Assigned(vContexte) then
begin
vContexte := ClassManager.CreateInstance('TContextePoids');
vContexte.Caption := 'ContextePoids';
end;

....

ClassManager.Commit;
except
ClassManager.RollBack;
end;
end;
</source>

Voir aussi :

* [[Procédure d'initialisation de paquet (MM)|Procédure d'initialisation de paquet]]

{{Footer|ModelManager_(code)}}
[[category:ModelManager]]

Procédure de synchronisation de paquet (MM) - Historique des versions

Syfre le 14 avril 2017 à 07:06

Syfre : Nouvelle page : Après synchronisation du modèle relationnel de l'application le framework exécute une procédure de synchronisation procedure TRegister.Synch...

Syfre : Nouvelle page : Après synchronisation du modèle relationnel de l'application le framework exécute une procédure de synchronisation procedure TRegister.Synch...