Discussion :

[davidus-70]

bonjour a tous ,
actuellement en stage , je développe une application de prospection téléphonique.
Et pour cela je suis amené a devoir remplir un combo par programmation qui est situé dans une zone répétée.
mon combo : COMBO_Numero_FicheContact situé dans ma zone répétée : ZR_REQ_Selection_Rappel qui se situe dans le fenêtre : FEN_Teleprospection_Campagne

Voici la partie de mon code qui se situe dans ma la prise de focus de la FEN_Teleprospection_Campagne :

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
POUR i = 1 A ZR_REQ_Selection_Rappel..Occurrence
	Info(ZR_REQ_Selection_Rappel[i].IDFicheContact)
	SI(HExécuteRequête(REQ_Selection_Numeros_FicheContact,hRequêteDéfaut,ZR_REQ_Selection_Rappel[i].IDFicheContact) = Vrai) ALORS
		HLitPremier(REQ_Selection_Numeros_FicheContact)
		SI(REQ_Selection_Numeros_FicheContact.tel1 > 0) ALORS
			ListeAjoute(ZR_REQ_Selection_Rappel[i].COMBO_Numero_FicheContact,REQ_Selection_Numeros_FicheContact.tel1)
		FIN
		SI(REQ_Selection_Numeros_FicheContact.tel2 > 0) ALORS
			ListeAjoute(ZR_REQ_Selection_Rappel[i].COMBO_Numero_FicheContact,REQ_Selection_Numeros_FicheContact.tel2)
		FIN
		SI(REQ_Selection_Numeros_FicheContact.mobil1 > 0) ALORS
			ListeAjoute(ZR_REQ_Selection_Rappel[i].COMBO_Numero_FicheContact,REQ_Selection_Numeros_FicheContact.mobil1)
		FIN
		SI(REQ_Selection_Numeros_FicheContact.mobil2 > 0) ALORS
			ListeAjoute(ZR_REQ_Selection_Rappel[i].COMBO_Numero_FicheContact,REQ_Selection_Numeros_FicheContact.mobil2)
		FIN
	FIN
FIN

Mon erreur :

Erreur à la ligne 21 du traitement Prise de focus de FEN_Teleprospection_Campagne.
Vous avez appelé la fonction ListeAjoute.
Commande invalide pour le champ car ce n'est ni une liste, ni une table, ni une combo.

----- Informations techniques -----

Projet : Projet_Gestion_Teleprospection

Appel WL :
Traitement de 'Prise de focus de FEN_Teleprospection_Campagne' (FEN_Teleprospection_Campagne), ligne 21, thread 0
Fonction 'ListeAjoute', syntaxe 1

Que s'est-il passé ?
Commande invalide pour le champ car ce n'est ni une liste, ni une table, ni une combo.

Code erreur : 10005
Niveau : erreur fatale (EL_FATAL)

Dump de l'erreur du module 'wd170obj.dll' (17.0.321.7).
Identifiant des informations détaillées (.err) : 10005
Informations de débogage :
Fonction (1,8)
Informations supplémentaires :
EIT_PILEWL :
Prise de focus de FEN_Teleprospection_Campagne (FEN_Teleprospection_Campagne), ligne 21
Clic sur BTN_Demarrer (FEN_Teleprospection_ChoixCampagne.BTN_Demarrer), ligne 2
Clic sur BTN_Teleprospection (FEN_Acceuil.BTN_Teleprospection), ligne 2
EIT_DATEHEURE : 05/03/2015 17:09:55

Comme le dit l'erreur : Commande invalide pour le champ car ce n'est ni une liste, ni une table, ni une combo.
Alors que j'essaye bien d'ajouter dans un combo ... es une limite technique du WL ...

J'ai également essayer de créer une procédure en passant en paramètre le combo et l'IDFicheContact mais rien y fait.

Voila mon problème aurez vous une solution je l’espère !!

[tbc92]

J'ai lu en diagonale ton code, et je dirais qu'il manque un ZoneRépétéeAjoute().

Code :

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

1
2
3
4
5
6
7
Pour i = 1 a n_i 
    ZoneRepeteeAjoute ( maZoneRepetee ,  bla bla bla ) 
    // Et maintenant, je peux agir sur ma combo, car elle a été créée par l'instruction précédente 
    pour j = 1 a n_j
        ListeAjoute( maZoneRepetee[i].MaCombo, bla bla bla)
    fin
fin

[davidus-70]

Après quelques modifications et essais avec la fonction ZoneRépétéeAjoute() , aucune amélioration

D'autre idées peut être ?

[Ry_Yo]

Bonjour,

Dans les zones répétées, la gestion des combos est un peu différente... Je ne me suis pas penché sur toutes les possibilités d'interaction, mais un des moyens dont je me sers est de passer par des ATTRIBUTS.

Définissez un attribut qui pointe vers votre combo, cet attribut sera de type "contenu".

Ensuite dans votre code, vous utiliser la 2ème syntaxe d'ajout d'élément dans une combo à savoir, l'utilisation du retour chariot.

Code :

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

1
2
3
4
5
...
SI(REQ_Selection_Numeros_FicheContact.tel1 > 0) ALORS
	ZR_REQ_Selection_Rappel[i].ATT_ContenuCbo += [RC] + REQ_Selection_Numeros_FicheContact.tel1
FIN
...

Cordialement.

[tunizar]

Bonjour,
Est il possible L'utilisation de gLien ?

[Gates001]

Bonjour,
Est il possible L'utilisation de gLien ?

en faite pour récupérer la valeur affichée:

Code :

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

info(extraitchaine(maZoneRepetee[i].ATT_ContenuCbo, maZoneRepetee[i].MaCombo,RC))

[frenchsting]

Bonjour,

Répondre à un sujet 6 ans après, c'est audacieux, je trouve.