Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
End of file
Message
 
À
22/12/2004 07:16:54
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Divers
Thread ID:
00971336
Message ID:
00971346
Vues:
17
No Scan dosn't require SKIP, If You put SKIP SCAN ... ENDSCAN will skip two records at the end of cikle. Put sumethig to see if the LOCATE FOR Char1 == m.tablechar1 is found something.
      select 0
      use newdnc1
      select 0
      use newdnc
      m.tablechar1=char1

      SCAN
          SCATTER MEMVAR
          select newdnc1
          LOCATE FOR Char1 == m.tablechar1
          IF FOUND()
             GATHER MEMVAR
          ELSE
             WAIT WINDOW "Not FOUND. Searched value = "+m.tablechar1
          ENDIF
          select newdnc
      ENDSCAN
      CLOSE ALL
>hi,
>he replace one record only.
>maybe he need somthing as skip.
>thanks.
>
>>many errors in your code:
>>
>>      select 0
>>      use newdnc1
>>      select 0
>>      use newdnc
>>      m.tablechar1=char1
>>
>>      SCAN
>>          SCATTER MEMVAR
>>          select newdnc1
>>          LOCATE FOR Char1 == m.tablechar1
>>          IF FOUND()
>>             GATHER MEMVAR
>>          ENDIF
>>          select newdnc
>>      ENDSCAN
>>      CLOSE ALL
>>
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform