PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV, WEBDEV e WINDEV Mobile

Inicio | Mensagens recentes | Conecte-se... |  | Português FR
Inicio → WINDEV 2024 → Minimiser le code
Minimiser le code
Iniciado por Lefebvre Jean-Louis, out., 21 2005 11:42 AM - 4 respostas
#1
Publicado em outubro, 21 2005 - 11:42 AM
Bonjour à tous

Je dois faire un traitement identique sur plusieurs tables =>

hlitpremier(Tbl1)
tantque pas hendehors(tbl1)
si tbl1.champ1="ok" alors
tbl1.champ2="KO"
fin
hlitsuivant(tbl1)
fin

hlitpremier(Tbl2)
tantque pas hendehors(tbl2)
si tbl2.champ1="ok" alors
tbl2.champ2="KO"
fin
hlitsuivant(tbl2)
fin

ce traitement est identique pour tbl1 à tbl7 mais il y a une page de si

est-il possible de simplifier avec un genre d'alias ou un & comme dans le vieux clipper ou une sorte d'indirect comme en excel

merci de l'aide
A+
Jean-Louis
#2
Publicado em outubro, 21 2005 - 1:04 PM
Bonjour,

tu peux utiliser les indirections à la place de & du très bon vieux clipper... et visual object

hlitPremier( {nomfichier, indFichier})
Si { nomfichier + ".champ1",indRubrique} = "ok" ...
{ nomfichier + ".champ2", indRubrique} = "KO"
Fin
HlitSuivant( {nomfichier, indFichier})

Cordialement,

C.AUBRY
#3
Publicado em outubro, 21 2005 - 1:57 PM
Bonjour,

Regarde dans l'aide au mot clé "Indirection" pour plus de détails

Ca donnera un truc du genre


hlitpremier(NomFich)
tantque pas hendehors(NomFich)
si {NomFich+".champ1}="ok" alors
{NomFich+".champ2}="KO"
fin
hlitsuivant(NomFich)
fin


ou NomFich="Tbl1" ou "Tbl2"
ou encore mieux
NomFich="Tbl"+Numeriqueverchaine(IndiceFich)


--
Francis MOREL
http://wdmlist.free.fr/
#4
Publicado em outubro, 21 2005 - 2:51 PM
oui

cherche le mot indirection dans l'aide

cordialement JCP



"Lefebvre Jean-Louis" <jll@cpee.be> a écrit dans le message de news:
4358a2fc$1@news.pcsoft.fr...


Bonjour à tous

Je dois faire un traitement identique sur plusieurs tables =>

hlitpremier(Tbl1)
tantque pas hendehors(tbl1)
si tbl1.champ1="ok" alors
tbl1.champ2="KO"
fin
hlitsuivant(tbl1)
fin

hlitpremier(Tbl2)
tantque pas hendehors(tbl2)
si tbl2.champ1="ok" alors
tbl2.champ2="KO"
fin
hlitsuivant(tbl2)
fin

ce traitement est identique pour tbl1 à tbl7 mais il y a une page de si

est-il possible de simplifier avec un genre d'alias ou un & comme dans le
vieux clipper ou une sorte d'indirect comme en excel

merci de l'aide
A+
Jean-Louis


#5
Publicado em outubro, 21 2005 - 3:17 PM
voir l'indirection

du genre

dwCpt est entier

pour dwCpt = 1 à 7
trace({"Tbl" + dwCpt}..occurrence)
fin

bon courage ;)

"Lefebvre Jean-Louis" <jll@cpee.be> a écrit dans le message de news:
4358a2fc$1@news.pcsoft.fr...


Bonjour à tous

Je dois faire un traitement identique sur plusieurs tables =>

hlitpremier(Tbl1)
tantque pas hendehors(tbl1)
si tbl1.champ1="ok" alors
tbl1.champ2="KO"
fin
hlitsuivant(tbl1)
fin

hlitpremier(Tbl2)
tantque pas hendehors(tbl2)
si tbl2.champ1="ok" alors
tbl2.champ2="KO"
fin
hlitsuivant(tbl2)
fin

ce traitement est identique pour tbl1 à tbl7 mais il y a une page de si

est-il possible de simplifier avec un genre d'alias ou un & comme dans le
vieux clipper ou une sorte d'indirect comme en excel

merci de l'aide
A+
Jean-Louis


→ Voltar para WINDEV 2024