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
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 |
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.
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.
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
Partager