WDForge.org - Forums

Indirection sur rubrique de classe

Sujet: Indirection sur rubrique de classe
par joduphan sur 8/8/2007 11:54:55

Bonjour
Je ne voudrais affecter que certaines rubriques d'un objet dont la liste des rubriques se trouve dans un tableau de chaine

Le but étant de parcourir le tableau, d'associer le nom de la rubrique qui se trouve dans le poste à l'indice demandé et l'objet par indirection

Exemple
m_pclObjet_cre est un objet dynamique

m_tabRubriquesSel est un tableau dynamique de 1 chaîne

m_sdResReqObjet est un Source de Données

m_sRequete est un chaîne = ""
Contient une requête sélection construite à partir des éléments du tableau
SELECT CL_ID , CL_SOCIETE , CL_ADRESSE1 , CL_ADRESSE2 , CL_ADRESSE3 , CL_CP , CL_VILLE , CL_DATEMODIF FROM CLIENT ORDER BY CL_DATEMODIF DESC

Classe client
CCLIENT est une classe
CL_ID est un entier = 0 //CL_ID
CL_TITRE est un chaîne = "" //CL_TITRE
CL_NOMCLI est un chaîne = "" //CL_NOMCLI
CL_SOCIETE est un chaîne = "" //CL_SOCIETE
CL_ADRESSE1 est un chaîne = "" //CL_ADRESSE1
CL_ADRESSE2 est un chaîne = "" //CL_ADRESSE2
CL_CP est un chaîne = "" //CL_CP
CL_VILLE est un chaîne = "" //CL_VILLE
CL_PAYS est un chaîne = "" //CL_PAYS
CL_TELCLI est un chaîne = "" //CL_TELCLI
CL_FAXCLI est un chaîne = "" //CL_FAXCLI
……..
PROCEDURE Initialise_m_tabRubriquesSel(NbPoste)

:m_tabRubriquesSel = allouer un tableau dynamique de NbPoste chaîne

PROCEDURE LectureDynamique()
HExécuteRequêteSQL(:m_sdResReqObjet,:m_sRequete)
.....

PROCEDURE RempliRubSel()
NbPoste est un entier
i est un entier

NomRubReq est une chaîne
NomRubObj est une chaîne

:m_pclObjet_crt = allouer un objet CCLIENT

NbPoste = Dimension(:m_tabRubriquesSel)
POUR i = 1 A NbPoste
NomRubReq = ":m_sdResReqObjet." + :m_tabRubriquesSel[i]
NomRubObj = ":m_pclObjet_crt:" + :m_tabRubriquesSel[i]
Trace(" req " + {NomRubReq} )
Trace (" obj " + {NomRubObj })
{NomRubObj } = {NomRubReq}
FIN

J'ai bien une valeur affichée pour NomRubReq

req 3771

Mais il y a un message d'erreur pour NomRubObj

/////////////////////////////////////////////////////
Erreur à la ligne 27 du traitement Méthode RempliRubSel.
L'élément ':m_pclObjet_crt:CL_ID' est inconnu.

Informations techniques

Projet : GestAric

Dump de l'erreur du module <WD110VM.DLL> <11.00Qa>.

- Appel WL :
Traitement de <CClientDao.RempliRubSel>, ligne <27>, thread <0>

- Niveau : erreur fatale (EL_FATAL)

- Code erreur : 1059

- Code erreur WD55 : 0

- Pas de code d'erreur système

- Pas de message d'erreur système

- Que s'est-il passé ?
L'élément ':m_pclObjet_crt:CL_ID' est inconnu.

- Pas d'info de debug