Re: Table et non tableau croise |
Sujet: Re: Table et non tableau croise par beber sur 22/8/2006 18:41:41 tu mets çà ou ??? L_j est un entier L_Nomzone est une chaîne L_TestMax est un entier T_Mnt01 est un entier T_ZoneAff est une chaîne 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 |