plaudern.de-Forum
  Suche:
 Visual Data Publisher 3 17.12.2009 Gotthard
 Re: Visual Data Publisher 3 17.12.2009 HoHeSi
> > Hallo ! Wer kann Helfen !
> > Ich möchte bestimmte Felder in allen Datensätzen einer
> > Datei mittels Schleife (While) auf Null setzen. Habe
> > schon viele Möglichkeiten ausprobiert. Komme aber nicht
> > zum Ziel.
> > Danke im Voraus!
> Besser hier fragen:
> http://foren.tdb.de/a.prg?akt=66435778&for=3&btr=0&nap=0&
> dow=3&dom=0&rnd=6978

Hallo, das ist meine Schleife!

PROCEDURE alle_Artikel_auf_Null_setzen;
PrimFile(ARTIKELLISTE);

AlleMarkierungenEntfernen(1);
SetSortOrder('Artikelliste.ID')   DatenSätzeÄndern .. Datensätze ändern EIN
Vardef RNo : Real;
RNo := FirstRec(Artikelliste);
ReadRec(Artikelliste,RNo)
While RNo > 0
Message(Str(RNo));
.. ReadRec(Artikelliste,RNo)
Bestand := 0
Gekauft := 0
Verbrauch := 0

Attach
GetRec(Artikelliste,RNo)
RNo := NextRec(Artikelliste)

.. Attach
End
Attach
hidewait
DatenSätzeÄndern .. Datensätze ändern AUS

SetSortOrder('Artikelliste.ID')
endproc;

Was ist falsch?
Danke!
 Falsches Forum [ohne Text] 02.01.2013 amo
0 User im Forum. Kostenloses Forumhosting von plaudern.de. Dieses Forum im eigenen Design entführen. Impressum