Programmation dbase

edu -  
 abdel -
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. Jacques
     
    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
  2. biskra Messages postés 8 Statut Membre 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
  3. abdel
     
    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