Empêcher la mise à jour des références 4D Write

Version imprimable

12/10/2009, 00h29
dogawaf

Empêcher la mise à jour des références 4D Write

Bonsoir à tous,

Je suis en train de migrer une base vers une nouvelle structure. C'est une migration/refonte, qui implique évidemment des changements de nom de table et de nom de champs.

Je me heurte à un problème de taille lors de l'import des champs BLOB contenant une zone 4D Write de l'ancienne structure vers la nouvelle structure.

En effet, une fois l'import des BLOB 4D Write effectué (aucun souci de ce côté là), et lors de l'ouverture du formulaire de la nouvelle structure contenant la zone 4D Write, ce dernier essaie de convertir chaque ancienne référence vers un champ dans le document par un équivalent dans la nouvelle structure.

Mais étant donné que la majorité des tables et noms de champs ont changé, les références se retrouvent "cassées".

J'espère que mon explication est assez claire, car là, je bloque...

Merci à ceux qui auraient une ébauche de solution...

Cordialement

- Mac OS 10.6
- 4D v11.4
13/10/2009, 14h15
Mega_

Le plus simple est de figer les références des zones write dans l'ancienne structure avant d'ouvrir le data avec la nouvelle.

Sinon un peu laborieux, une procédure qui va chercher toutes références dans une zone write et qui remplace par les nouveaux champs. C'est jouable quand les références sont des champs mais si il y a des formules, ça complique un peu plus.
13/10/2009, 23h44
dogawaf

Merci pour les pistes.

Pour la première, j'avais déjà essayé, mais il me semble que "figer les références" est plutôt "figer les valeurs"... dans le sens où les références sont remplacées par les valeurs...

Ce qui me conviendrait le mieux serait donc la deuxième solution, mais je n'ai pas trouvé le moyen de "figer" les références, même sous forme de texte (je voudrais juste le nom du champ référencé), les références aux champs de l'ancienne structure...

Est-ce possible d'exporter une zone 4D Write sous forme de texte sans remplacer les références par les valeurs ?

Autre exemple, si je fais un copier-coller d'une zone 4D Write de l'ancienne vers la nouvelle structure, les références sont conservées. Mais dès que j'enregistre le blob et le réouvre, les références sont cassées...
26/10/2009, 00h25
dogawaf

Hello,

je confirme donc, "figer le document" est bien pour figer les valeurs. C'est à dire que les références à des champs sont remplacées par leurs valeurs, et il est ensuite impossible de retrouver les champs référencés. :?

je réitère donc ma question : y a t'il un moyen d'exporter une zone 4D Write où les références sont sous forme de texte, de telle sorte qu'il soit possible ensuite d'effectuer une sorte de "rechercher-remplacer" pour mettre à jour ces références vers les nouveaux noms des champs ?

Merci...

Comment changer les champs de fusion (références insérées ) dans une zone 4D write

Voici un bout de code qui devrait vous y aider

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
$vLI_OBJ_nb:=WR Compter ($vLI_ZONE_WRT_he;wr nb objets )
 
Si ($vLI_OBJ_nb>0)
 
	Boucle ($vLI_cmpt_2;1;$vLI_OBJ_nb)
		$vBO_To_Update:=Vrai
		WR SELECTIONNER ($vLI_ZONE_WRT_he;1;$vLI_cmpt_2)
		WR LIRE REFERENCE ($vLI_ZONE_WRT_he;$Table;$Champ;$vTX_FSN_nom;$Type)
 
		Au cas ou 
			: ($vTX_FSN_nom="@u_Tab@")
 
				$vTX_FSN_nom:=Remplacer chaine($vTX_FSN_nom;"u_TAb";"TBox_utl_TAB")
				WR SELECTIONNER ($vLI_ZONE_WRT_he;1;$vLI_cmpt_2)
				WR INSERER VARIABLE ($vLI_ZONE_WRT_he;$vTX_FSN_nom)
 
			: ($vTX_FSN_nom="@u_RC@")
 
				$vTX_FSN_nom:=Remplacer chaine($vTX_FSN_nom;"u_RC";"TBox_utl_RC")
				WR SELECTIONNER ($vLI_ZONE_WRT_he;1;$vLI_cmpt_2)
				WR INSERER VARIABLE ($vLI_ZONE_WRT_he;$vTX_FSN_nom)
 
			: ($vTX_FSN_nom="@u_quot@")
 
				$vTX_FSN_nom:=Remplacer chaine($vTX_FSN_nom;"u_TAb";"TBox_utl_QUOT")
				WR SELECTIONNER ($vLI_ZONE_WRT_he;1;$vLI_cmpt_2)
						WR INSERER VARIABLE ($vLI_ZONE_WRT_he;$vTX_FSN_nom)
 
			: ($vTX_FSN_nom="@u_Trait@")
 
				$vTX_FSN_nom:=Remplacer chaine($vTX_FSN_nom;"u_TAb";"TBOX_Trait")
				WR SELECTIONNER ($vLI_ZONE_WRT_he;1;$vLI_cmpt_2)
				WR INSERER VARIABLE ($vLI_ZONE_WRT_he;$vTX_FSN_nom)
 
 
			Sinon 
				$vBO_To_Update:=Faux
			Fin de cas 
 
	Fin de boucle

Par principe : NE JAMAIS METTRE D'INSERTION DE CHAMP EN DIRECT DANS 4D WRITE...

24/11/2009, 01h00
dogawaf

Merci Bernard pour ce code, il me sera utile !

Mais pour épiloguer, mon "problème" est bien que 4D stocke dans le blob les références à des champs par je pense un couple "N° table:N° champ".

Donc quand j'importe ce blob dans une nouvelle structure (où les tables et les champs sont numérotés différemment), le blob n'est pas automatiquement mis à jour (et comment le pourrait-il ?).

Je me retrouve donc avec des références qui sont syntaxiquement correctes (toujours ce couple "N° table:N° champ"), mais ne correspondent plus au contexte de la nouvelle structure...

Bref, je pense que je vais bidouiller, en remplaçant dans l'ancienne structure les références à des champs par un "code" style wiki, importer le tout dans la nouvelle structure, puis remplacer ce code "wiki" par les nouvelles références.

Dommage que 4D ne propose pas cette solution à l'exportation d'un blob contenant une zone 4D Write.

@+
Merci à tous pour vos réponses ;)