Discussion :

[jeromecha]

Bonjour,

Depuis les ligne de commande d'achat , je souhaite appeler un objet spécifique.
Cet objet spécifique e st lié à la ligne de commande par les champs POHNUM et POPLIN ;
Dans l'écran POP2 j'ai ajouté mon bouton spécifique avec le code

Code :

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

1
2
3
4
5
6
7
8
9
10
Local Char PARA (250) (1..10)
 
Infbox 'Recherhce des fmp pour '-[M:POH0]POHNUM-' ligne :'-num$([M:POH2]POPLIN(nolign-1))
PARA(1)= [M:POH0]POHNUM+'~'+[M:POH2]POPLIN(nolign-1)
PARA(2)='ZF3'
PARA(3)=""
 
Infbox PARA(1) 
 
Call  OBJET_CHAR(PARA(1),PARA(2),PARA(3)) From GOBJET

Ce code n'affiche pas les enregistrements qui correspondent à la ligne de commande.
Le problème est que la clé de recherche est basé sur champs POHNUM ET POPLIN



Dans la table qui est gérée par l'objet, l'index est POHNUM+POPLIN.

J'ai essayé de mettre :

Code :

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

PARA(1)= [M:POH0]POHNUM+'/'+[M:POH2]POPLIN(nolign-1)

mais çà ne fonctionne pas non plus.
La seule solution que j'ai trouvé pour contourner le problème est de creer un champ texte qui contient POHNUM+'/'+POPLIN et de faire le lien sur ce champ.. mais ça m'étonne qu'on ne puisse pas faire de lien sur 2 champs !

[bimiman]

Bonjour,

Et avec ~ ?

[jeromecha]

Merci bimiman pour ta réponse. Dans mon code d'origine (ligne 4) j'avais essayer avec le "~" . mais sans résultat.

[bimiman]

Ah oui je n'avais pas vu.

En V5 j'ai eu le cas où j'ai dû inverser PARA(2) et PARA(3), sans en comprendre la raison...

[laftate]

tu met ';'

[bimiman]

Voici le sous-programme en V6 :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Subprog OBJET_CHAR(CLE1,OBJET,CLE2)
Variable Char    CLE1
Value    Char    OBJET
Value    Char    CLE2
If dim(CLE2)=1 & instr(1,CLE2,"~")
 Gosub SET_CLETAB
 Call OBJET(OBJET,CLE1,CLETAB)
 Gosub RESET_CLETAB
Else
 Call OBJET(OBJET,CLE1,CLE2)
Endif
End

Si ça peut aider...

[jeromecha]

Mon intégrateur m'a fourni la réponse :

Code :

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

1
2
3
PARA(1)= num$([M:POH2]POPLIN(nolign-1))
PARA(2)='ZF3'
PARA(3)=[M:POH0]POHNUM

Les paramètres doivent être envoyés dans l'ordre inverse des champs de la clé .... logique non ?

Merci à tous pour votre aide .

[bimiman]

C'est ce que montrait le code que j'avais mis.

[jeromecha]

C'est ce que montrait le code que j'avais mis.

J'ai pourtant bien regardé le code que tu avais mis mais je ne comprends pas !
Je suis dans le cas où on appelle

Code :

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

 Call OBJET(OBJET,CLE1,CLE2)

vu que CLE2 ne contient pas de '~'.
Comment j'aurais pu deviner qu'il fallait inverser les 2 CLEx ?

[bimiman]

Première ligne du sous-programme :

Code :

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

Subprog OBJET_CHAR(CLE1,OBJET,CLE2)

En fait je parlais de l'objet qui est en deuxième position.
Pour l'ordre, oui, parfois il faut permuter (cf ma deuxième réponse).

Bref, rien de logique dans tout ça !

[jeromecha]

OK.
Effectivement c'est un peu flou
Enfin bref, c'est résolu !