PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Fichier HF   permutaiton de zones
Fichier HF permutaiton de zones
Débuté par Clausen Michel, 30 déc. 2004 15:00 - 7 réponses
Posté le 30 décembre 2004 - 15:00
J'ai un fichier Client ou j'ai deux zones qui s'appelle

ADRESSE2
ADRESSE1

J'aimerai les permuter comme ca

ADRESSE1
ADRESSE2

Comment m'y prendre pour pas perdre les data concerant ces 2 zones


Salutations et bonne fête



--
Audio-Vidéo-Informatique SA
Clausen Michel
Avenue de la gare 12
1950 SION

027/322.68.14 079/220.76.42
Posté le 30 décembre 2004 - 15:09
Le 31/12/2004, Clausen Michel a supposé :
J'ai un fichier Client ou j'ai deux zones qui s'appelle

ADRESSE2
ADRESSE1

J'aimerai les permuter comme ca

ADRESSE1
ADRESSE2

Comment m'y prendre pour pas perdre les data concerant ces 2 zones


Salutations et bonne fête


Adresse est une chaine
Pour tout CLIENT sur IDCLIENT
Adresse=CLIENT.ADRESSE1
CLIENT.ADRESSE1=CLIENT.ADRESSE2
CLIENT.ADRESSE2=Adresse
HMODIFIE (CLIENT)
FIN


Voilà, si j'ai bien compris ta question...

Bon Dev

--
Remove (nospam) from my Email.
Dr J-M des Grottes - HIS-Etterbeek-Ixelles - Nephrology - Belgium
Posté le 30 décembre 2004 - 15:39
Le plus simple, en utilisant le swap :

hlitpremier(CLIENT,ID_CLIENT)
tantque pas hendehors(CLIENT)
CLIENT.ADRESSE1 <=> CLIENT.ADRESSE2
HMODIFIE(CLIENT)
HLITSUIVANT(CLIENT,ID_CLIENT)
FIN
Posté le 30 décembre 2004 - 15:56
Il se trouve que Rémy a formulé :
Le plus simple, en utilisant le swap :

hlitpremier(CLIENT,ID_CLIENT)
tantque pas hendehors(CLIENT)
CLIENT.ADRESSE1 <=> CLIENT.ADRESSE2
HMODIFIE(CLIENT)
HLITSUIVANT(CLIENT,ID_CLIENT)
FIN


Attention, <=> est-il applicable à des chaines ?

A+

--
Remove (nospam) from my Email.
Dr J-M des Grottes - HIS-Etterbeek-Ixelles - Nephrology - Belgium
Posté le 30 décembre 2004 - 18:31
Le swap est applicable à des chaines...Je n'aurais pas posté de réponse si ça n'avait pas été le cas.
Posté le 02 janvier 2005 - 01:41
Toi aussi tu paux te tromper, tu n'es qu'un homme que je sache. Et poster une réponse, ne veut pas dire que cette réponse soit juste.
Bien à toi
Posté le 03 janvier 2005 - 09:27
Ca marche pas. J'ai fais

HLitPremier(Clients,IDClients);Saisie1=idclients

TANTQUE PAS HEnDehors(Clients)

Clients.ADRESSE1<=> Clients.ADRESSE2

HModifie(Clients);FichierVersEcran()

HLitSuivant(Clients,IDClients);Saisie1=idclients


FIN





Le boucle ne tourne pas

"Clausen Michel" <clausen@tvs2net.ch> a écrit dans le message de news:
41d543ee@news.pcsoft.fr...

J'ai un fichier Client ou j'ai deux zones qui s'appelle

ADRESSE2
ADRESSE1

J'aimerai les permuter comme ca

ADRESSE1
ADRESSE2

Comment m'y prendre pour pas perdre les data concerant ces 2 zones


Salutations et bonne fête



--
Audio-Vidéo-Informatique SA
Clausen Michel
Avenue de la gare 12
1950 SION

027/322.68.14 079/220.76.42

Posté le 03 janvier 2005 - 10:01
Ca marche trés bien merci mille fois

"Clausen Michel" <clausen@tvs2net.ch> a écrit dans le message de news:
41d543ee@news.pcsoft.fr...

J'ai un fichier Client ou j'ai deux zones qui s'appelle

ADRESSE2
ADRESSE1

J'aimerai les permuter comme ca

ADRESSE1
ADRESSE2

Comment m'y prendre pour pas perdre les data concerant ces 2 zones


Salutations et bonne fête



--
Audio-Vidéo-Informatique SA
Clausen Michel
Avenue de la gare 12
1950 SION

027/322.68.14 079/220.76.42