Discussion :

[judor31]

Bonjour,

J'ai deux requêtes REQ_1 et REQ_2 contenant les mêmes rubriques du même fichier .

une des requêtes sert à afficher les données :

Code :

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

1
2
3
HExécuteRequête(REQ_1)
HLitPremier(REQ_1,REQ_1.idp)  //   idp est la clé de parcours
FichierVersEcran(FEN_1,REQ_1)

avec 4 boutons : premier,précedent,suivant,dernier

l'autre requête sert à remplir les champs d'un formulaire par les mêmes données:

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
17
18
19
20
21
22
23
HExécuteRequête(REQ_2)
HLitPremier(REQ_2,REQ_2.idp) 
FichierVersEcran(FEN_1,REQ_2)
 
MonCode est une chaîne=HTM_HTML1..ValeurAffichée
sEnreg est une chaîne=HRécupèreEnregistrement(REQ_2)
sPrénom est une chaîne=ExtraitChaîne(sEnreg, 1)
sNom est une chaîne=ExtraitChaîne(sEnreg, 2)
sPasseportN est une chaîne=ExtraitChaîne(sEnreg,3)
sLieuD est une chaîne=ExtraitChaîne(sEnreg,4)
sLieuN est une chaîne=ExtraitChaîne(sEnreg,5)
sProfession est une chaîne=ExtraitChaîne(sEnreg,6)
sNiveau est une chaîne=ExtraitChaîne(sEnreg,7)
 
MonCode=Remplace(MonCode,"NAME=efirstname","NAME=efirstname                                                value="+sPrénom,SansCasse)
MonCode=Remplace(MonCode,"NAME=efamily","NAME=efamily                                                             value="+sNom,SansCasse)
MonCode=Remplace(MonCode,"NAME=passport_no","NAME=passport_no                                        value="+sPasseportN,SansCasse)
MonCode=Remplace(MonCode,"NAME=passport_issue_place","NAME=passport_issue_place  value="+sLieuD,SansCasse)
MonCode=Remplace(MonCode,"NAME=birth_place","NAME=birth_place value="            +sLieuN,SansCasse)
MonCode=Remplace(MonCode,"NAME=job_or_relation","NAME=job_or_relation value="  +sProfession,SansCasse)
MonCode=Remplace(MonCode,"NAME=degree","NAME=degree  value="                +sNiveau,SansCasse)
MonCode=Remplace(MonCode,"NAME=degree_source","NAME=degree_source  value="      +sLieuD,SansCasse)
MonCode=Remplace(MonCode,"NAME=address_home","NAME=address_home  value="    +sAdresse,SansCasse)

avec toujours les mêmes boutons de parcours

la question: pourrais-je fusionner les deux requêtes et comment?

Merci à vous

[Jannus]

Il faudrait plutôt nous montrer le code des requêtes

[judor31]

Salut, voilà le codes des deux requêtes:

REQ_2

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
SELECT 
  clients.Prenom AS Prenom,  
  clients.Nom AS Nom,  
  clients.PasseportN AS PasseportN,  
  clients.LieuD AS LieuD,  
  clients.LieuNaissance AS LieuNaissance,  
  clients.Profession AS Profession,  
  clients.NivEtud AS NivEtud,  
  clients.Adresse AS Adresse,  
FROM 
  clients
ORDER BY 
  IDP ASC

REQ_1

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
SELECT 
  clients.Prenom AS Prenom,  
  clients.Nom AS Nom,  
  clients.PasseportN AS PasseportN,  
  clients.LieuD AS LieuD,  
  clients.LieuNaissance AS LieuNaissance,  
  clients.Profession AS Profession,  
  clients.NivEtud AS NivEtud,  
  clients.Adresse AS Adresse,  
FROM 
  clients
ORDER BY 
  IDP ASC

Merci encore

[Jannus]

Tu as essayé UNION ?
Cf cette discussion

[JPDMJC]

c'est étrange, mais les deux requêtes sont exactement les mêmes. Pour vouloir fusionner deux requêtes strictement identiques ?