Parcours des champs d'une fenêtre et affichage de leur type et libellé Code (Text): sParent est une chaîne = "FEN_SAISIE_CLIENT" sNomChamp est une chaîne=EnumèreSousElément(sParent,enumPremier) TANTQUE sNomChamp<>"" // nom complet du champ sNomComplet est une chaîne=sParent+"."+sNomChamp // récupération du type de l'élément nType est un entier={sNomComplet,indGPW}..Type // si c'est un groupe de champs ou un onglet SI nType=typOnglet OU nType=typTable OU nType=typBarreOutils OU nType=typBoîteAOutils OU nType=typSuperChamp ALORS // énumération des champs qui sont à l'intérieur Trace(sNomComplet) SINON // ne fait rien si c'est une option de menu SI nType<>typOptionMenu ALORS // Trace de l'élément Trace(sNomComplet,nType,{sNomComplet,indGPW}..Libellé,{sNomComplet,indGPW}..Groupe) FIN FIN // Champ suivant sNomChamp=EnumèreSousElément(sParent) FIN