parcours et selection selon deux condition ?

Posté par mostafa le 1/2/2008 19:19:10
Bonjour,

j'ai un table que je remplie par un requête comme suit :

N Date

1002 02/11/2007
1002 02/11/2007

1222 02/11/2007

1019 28/09/2007 ok
1019 30/04/2007 ok

1061 28/09/2007 ok
1061 06/07/2007 ok

1154 16/11/2007 ok
1154 09/03/2007 ok
1154 16/11/2007 (mon code me colore aussi cette ligne)
1154 09/03/2007 (mon code me colore aussi cette ligne)

1890 23/03/2007 ok
1890 23/03/2007
1890 24/03/2007 ok

je vaudrais calculer le nombre des lignes qui ont un n qui se répètent avec des dates différentes donc j'ai pensé au début de faire colorer les lignes qui ont cette condition mais j'ai pas bien y arriver !



NombreTable--

POUR nCompteur = 1 A (NombreTable)
  nIndice = TableCherche( N ,MATABLE.N[nCompteur],Vrai,nCompteur+1)
  TANTQUE nIndice > 0
    SI MATABELE.DATE [nCompteur] <> MATABELE.DATE[nIndice] ALORS
      kk = Dimension(tabSuiteDate)
      POUR j = 1 A kk
        // Pour sauter les lignes déjà colorer
        SI MATABLE.DATE [nIndice] = tabSuiteDate [j] ET ( MATABLE.N[nCompteur] = tabSuiteN [j] OU MATABLE.N[nIndice] = tabSuiteN [j] ) ALORS
          GOTO hh
        FIN
      FIN
      BufCompteur ++
      Dimension(tabLIsteIndice,BufCompteur)
      Dimension(tabLIsteSerail,BufCompteur)

      // sauvegarde date et N à colorer
      tabSuiteDate[BufCompteur] = MATABLE.DATE[nIndice]
      tabSuiteN [BufCompteur] = MATABLE.N [nIndice]

      // coloration des ligne de condition    
      MATABLE.N[nCompteur]..CouleurFond = iVertClair
      MATABLE.N[nIndice]..CouleurFond = iVertClair
    FIN
hh :
    nIndice = TableCherche(N ,MATABLE.N[nCompteur],Vrai,nIndice+1)
  FIN
FIN

Svp est ce qu'il y as un truc plus rapide et simple me renvoie seulement les lignes avec (ok)?
Merci

Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=18&topic_id=5670&post_id=23130