Discussion :

[Mophus]

Bonjour,

Je suis confronté à un problème(si c'en est un) ou je suis obliger d'ouvrir 2 fenêtres de recherche "Clients" soit par une fenêtre "Saisie Devis" soit par une "saisie commandes". J'aurai voulu n'avoir qu'une seule fenêtre de recherche pour les 2 fenêtres de saisie. Seulement je ne sais pas comment les déclarer actives en arrière plan.
Comment déclare-t'on une fenêtre ouverte en arrière plan pour que je puisse différencier les 2 codes séparément dans un seule fenêtre recherche Clients.
Ce ne doit pas être compliquer mais je ne trouve que des aides pour les champs.
Merci par avance

[Mophus]

J'ai trouvé ce code pour ma fenêtre "recherche clients":

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
SELON FenEtat(FEN_NouvelleCommande)
	CAS Actif
	HLitRecherche(Client,NumClient, FEN_NouvelleCommande.COMBO_Client)
SI HTrouve(Client) ALORS
	Client.NumClient = FEN_NouvelleCommande.COMBO_Client
	TableSelect(TABLE_Recherche_Client,tsLigneCellule)
	TableAffiche(TABLE_Recherche_Client,taCourantEnreg)
FIN	
	AUTRE CAS
		HLitRecherche(Client,NumClient, FEN_Nouveau_Devis.COMBO_Client)
		SI HTrouve(Client) ALORS
			Client.NumClient = FEN_Nouveau_Devis.COMBO_Client
			TableSelect(TABLE_Recherche_Client,tsLigneCellule)
			TableAffiche(TABLE_Recherche_Client,taCourantEnreg)
		FIN			
FIN

La sélection de ma table client se fait bien quelle que soit la fenêtre de saisie
Pourrais-je connaitre votre avis.
Désolé de vous avoir faire perdre votre temps, mais je n'y croyais plus.
Merci à tous.

[tatayo]

Bonjour,
Je pense que tu prends le problème à l'envers.
Tu devrais passer le code client en paramètre à ta fenêtre de recherche, pour rendre cette dernière indépendante de la fenêtre d'appel.
Sinon à chaque fois que tu voudras réutiliser cette fenêtre ailleurs, tu devras en modifier le code.

Tatayo.

[Mophus]

Merci de me répondre,

J'avais commencé comme ça mais je n'arrivais pas à sélectionner le client dans la table de la fenêtre recherche client.
Je vais réessayer, merci pour ces conseils.
Je passais par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
SI ouvre(Fen_Recherche_Clients) alors
combo_client = client.NumClient
FIN

Mais je ne savais quoi mettre dans ma fenêtre recherche une erreur à la fermeture de celle-ci me retournait que mon Si attendais un résultat en retour.
Je m'y remets.
encore merci

[Mophus]

Je n'ai pas trouvé comment faire à partir de mes fenêtres de saisies.
Je ne pense pas que la table recherche clients servira à autre chose, je vais rester comme ça à moins que quelqu'un ait la solution.
Encore merci pour votre aide.

[tatayo]

Le message d'erreur devrait te mettre sur la voie: il faut que ta fenêtre de recherche renvoie une valeur.
Je te laisse chercher dans l'aide en ligne comment faire.

Tatayo.

[Mophus]

Tu m'en dit trop ou pas assez, quelle valeur ? quelle aide en ligne ?

[tatayo]

Comment quelle aide en ligne ? Tu as un problème avec la fonction Ouvre(), personnellement je commencerai par là.
Quand à la valeur retournée, je dirai que c'est à toi de voir. Mais quand je vois ton code:

Code WinDev :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
SI ouvre(Fen_Recherche_Clients) alors
 combo_client = client.NumClient
 FIN

Je dirai que la fenêtre doit renvoyer un booléen.

Quoi qu'il en soit, si tu bloques sur un point aussi simple, je ne peux que t'encourager à suivre le guide d'auto-formation...

Tatayo.

[Mophus]

Bon, je crois avoir trouvé (avec du mal) dans mes fenêtres saisies "Devis et Cde" sur le clic du bouton recherche j'ai codé:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
HLitRecherchePremier(Client,NumClient,COMBO_Client)
SI HTrouve(Client) ALORS
	Client.NumClient = COMBO_Client
FIN
Ouvre(FEN_Recherche_Client, Client.NumClient)

Et dans ma fenêtre Table_recherche en procédure global j'ai déclaré:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
PROCEDURE FEN_Recherche_Client(gNumclient = Client.NumClient)
 
TableSelect(TABLE_Recherche_Client,tsLigneCellule)
TableAffiche(TABLE_Recherche_Client,taCourantEnreg)

Était-ce là la solution, cela fonctionne ?
J'aurai aimé avoir ton avis car j'ai mis 3 jours avant de trouver.

[tatayo]

Je ne comprends pas la logique ici: tu passes le code client à la fenêtre de recherche, mais tu ne l'utilises pas.

Je ne comprends pas non plus l'utilité ici de la fenêtre de recherche, vu que tu as déjà le code client concerné (via la combo). Je pensait que cette fenêtre permettait de chercher autre chose qu'un client (une facture, par exemple) depuis le code client.

Si le but de la fenêtre de recherche est de trouver un client, je pense que le mieux serait non pas de lui passer en paramètre le code client, mais de lui faire renvoyer le code client, si un client a été sélectionné, et vide dans le cas contraire.

Tatayo.

[Mophus]

Bonjour et bonne année 2016,

Ta réponse vient à me faire douter du bien fondé de cette recherche.
je ne comprends pas ta remarque:

Je ne comprends pas la logique ici: tu passes le code client à la fenêtre de recherche, mais tu ne l'utilises pas.

Il me semblait l'utiliser pour sélectionner le client dans la table recherche.

Je ne comprends pas non plus l'utilité ici de la fenêtre de recherche, vu que tu as déjà le code client concerné (via la combo). Je pensait que cette fenêtre permettait de chercher autre chose qu'un client (une facture, par exemple) depuis le code client.

Cette recherche sert à pouvoir modifier les paramètres d'un client et/ou d'en consulter l'historique.

Si le but de la fenêtre de recherche est de trouver un client, je pense que le mieux serait non pas de lui passer en paramètre le code client, mais de lui faire renvoyer le code client, si un client a été sélectionné, et vide dans le cas contraire.

Cette recherche est ponctuelle et pas systématique elle ne sert que dans le cas décrit précédemment.

Encore merci pour ton aide, mais plus ça va, plus je suis dans le flou (je ne suis qu'un amateur de WD et non un programmeur)

[tatayo]

Il me semblait l'utiliser pour sélectionner le client dans la table recherche.

Et pourtant je ne vois pas de gNumClient autre part que dans la déclaration des paramètres de la fenêtre...

Cette recherche est ponctuelle et pas systématique elle ne sert que dans le cas décrit précédemment.

Par expérience je sais qu'un code qui "ne doit service qu'une fois, juste ici", finit par être utilisé ailleurs. Et puis c'est un bon exercice de faire un code réutilisable (qui sera réutilisé un jour ou l'autre).

Tatayo.

[gabcouts]

Bonjour,

Si j'essaie de comprendre, tu as une fenêtre disons "FEN_NouvelleCommande", tu veux ouvrir une fenêtre pour lister l'historique des devis OU des commandes?


Si c'est le cas, le plus simple est de passé en paramètre lors de ton Ouvre(), le type d'info que tu veux obtenir. (ex : dev,comm) et dans ta déclaration globales de ta fenêtre de recherche, tu ajoute un SELON Type

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
PROCEDURE MaFenêtre(type,numclient)
 
SELON Type
 
	CAS "dev"
 
		//Ta requête de devis avec le num client en Param1
	CAS "comm"
 
                //Ta requête de commandes avec le num client en Param1
 
FIN

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
HLitRecherchePremier(Client,NumClient,COMBO_Client)
SI HTrouve(Client) ALORS
	Client.NumClient = COMBO_Client
FIN
 
Ouvre(FEN_Recherche_Client, Client.NumClient)

Ici ton "Client.NumClient = COMBO_Client" est inutile. Créer toi une variable globale ou locale "NumClient" et affecte-y ton Client.NumClient.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
NumClient est un entier
HLitRecherchePremier(Client,NumClient,COMBO_Client)
SI HTrouve(Client) ALORS
	NumClient =  Client.NumClient
FIN

Ensuite tu ouvre ta fenêtre.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Ouvre(FEN_Recherche_Client,"comm",numClient)

Lorsque ta fenêtre sera ouverte, tu aura quel type d'informations recherché et l'id du client. Avec ses 2 informations, tu est capable de créer tes requêtes et d'afficher les infos dont tu as besoin.


Bon dev