Re: REMPLISSAGE D'UNE TABLE

Posté par mbsl le 19/12/2005 9:48:05
Essayez

TableSupprimeTout(Table1)

HLitRecherchePremier(PROJET_PARTICIPANTS,IDPROJET_ENTETE,IDPROJET_ENTETE)

TANTQUE HTrouve(PROJET_PARTICIPANTS)

 HLitRecherchePremier(PERSONNEL,MATRICULE,PROJET_PARTICIPANTS.MATRICULE)

 SI HTrouve(PERSONNEL) ALORS
  Employé_e = PERSONNEL.NOMPRENOM
  T_horaire = PERSONNEL.TAUX_HORAIRE
 SINON
  Employé_e = "???????????????"
  T_horaire = 0 
 FIN

 TableAjouteLigne(Table1,Employé_e,T_horaire)

 HLitSuivant(PROJET_PARTICIPANTS,IDPROJET_ENTETE)

FIN




Voir à réindexer si le problème persiste

Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=3244&post_id=13715