WDForge.org - Forums

Re: Table et non tableau croise

Sujet: Re: Table et non tableau croise
par Aqualung sur 22/8/2006 16:07:08

Bonjour,
Voici un exemple d'utilisation, attention pour la gestion de Champclone avec une table, la table sera vidée dès la création d'une nouvelle colonne.
Dans l'exemple, la table comporte une colonne montant T_Mnt01, les colonnes ajoutées ont le même préfixe suivi du N° d'occurrence.

// Suppression des éléments de la table
// ================================
TableSupprimeTout(Table1)
// Suppression des colonnes variables
// ================================
POUR L_j=2 A 20
	L_Nomzone="T_Mnt"+NumériqueVersChaîne(L_j,"02d")
	SI ChampExiste(L_Nomzone) ALORS
		ChampSupprime(L_Nomzone)
	FIN
FIN
// Gestion des colonnes de la table
// ================================
POUR L_j=1 A L_TestMax
	L_Nomzone="T_Mnt"+NumériqueVersChaîne(L_j,"02d")
	SI PAS ChampExiste(L_Nomzone) ALORS
		ChampClone(T_Mnt01,L_Nomzone)
	FIN
	{L_Nomzone,indChamp}..Libellé=T_ZoneAff[L_j]
FIN