Discussion :

[jacquesprogram]

Bonjour, tout est dans le titre, ce code est-il valide:

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
bRes = HExécuteRequête(REQ_MaRequete1, hRequêteDéfaut)
bRes2 = HExécuteRequête(REQ_MaRequete2, hRequêteDéfaut)
SI PAS bRes ou PAS bRes2 ALORS
    Info("Erreur ! " + HErreurInfo())
SINON
    HLitPremier(REQ_MaRequete1)
    HLitPremier(REQ_MaRequete2)
    TANTQUE PAS HEndehors(REQ_MaRequete1)
        clProd.ID = REQ_MaRequete1.ID
        clProd.Description = REQ_MaRequete1.Description
        clProd.Type = REQ_MaRequete1.Type)
        TANTQUE PAS HEndehors(MaRequete_2)
            SI REQ_MaRequete2.Type = clProd.Type ALORS
                TableauAjoute(clProd.Keywords,MaRequete2.Keyword)
            FIN
            HLitSuivant(REQ_MaRequete2)
         FIN
         TableauAjoute(gtabProduits,clProd)
         HLitSuivant(REQ_MaRequete1)
    FIN
FIN

J'ai une erreur sur la ligne en rouge:

Vous avez appelé la fonction HLitSuivant.
Aucun parcours n'a été amorcé pour la rubrique <ID> sur le fichier <REQ_MaRequete2>.

Pourquoi ?

P.S: tout fonctionnait très bien avant l'ajout de tout ce qui concerne REQ_MaRequete2.

[jacquesprogram]

Pff ! J'avais pas fait gaffe en recopiant le code, que j'avais mis, pour MaRequete1:

HLitPremier(REQ_MaRequete1,ID)

J'ai mis pareil pour MaRequete2 et ça fonctionne.