Programmation dbase

Bonjour
je dois faire de la programmation dbase et je ne sais pas comment faire pour programmer un numéro incrémenté.
Je dois imprimer une liste pour lequel chaque nom sera associé à un chiffre de 1 à 200.
Merci par avance de votre aide.

3 réponses

  1. Bonsoir,
    J'ai perdu de vue Dbase depuis quelques années, mais je crois me souvenir qu'il faut déclarer un champ "Recno()".

    Votre documentation vous permettra sans doute de retrouver la syntaxe qui convient pour utiliser Recno().

    A propos, je suis sur le point de poubelliser une doc Dbase IV.

    Faites-moi savoir si elle vous intéresse.
    arbaretier.jeanjacques@wanadoo.fr

    La science ne fait que trouver ce qui existe depuis toujours.
    Hubert REEVES.
    0
    1. BONSOIR EDU

      J'essaue de vous repondre a votre question car j'ai utilsé dbase3+ dans les années 90
      donc tu veux afficher une liste avec l'iceémentation du numero
      dans ce cas tu fait le programme suivant

      do while .t.
      num=1
      if not eof()
      @x,y say num pict
      @x1,y1 say nom
      endif
      num=num+1
      endwhile
      0
      1. programme pour imprimer page par page
        i=1
        set ptint on
        set device to print

        do while .not. eof()
        @ str(i)+" "+nom+" "+prenom
        i=i+1
        if i=60
        wait
        i=1
        endif
        skip
        enddo
        set print off
        set device to screen
        *******************************************************************
        programe pour imprimer sur listing
        i=1
        set ptint on
        set device to print
        do while .not. eof()
        ? str(i)," ",nom," ",prenom
        i=i+1
        skip
        enddo
        set print off
        set device to screen
        0