plaudern.de-Forum |
Fremder (unbekannt) |
|
> > 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! |
Überschrift Ebene 1: | {h1}Überschrift 1{/h1} |
Überschrift Ebene 2: | {h2}Überschrift 2{/h2} |
Überschrift Ebene 3: | {h3}Überschrift 3{/h3} |
Hervorgehoben: | {strong}Hervorgehoben{/strong} |
Quelltext: | {code}Quelltext{/code} |
Fett: | {b}fett{/b} |
Kursiv: | {i}kursiv{/i} |
Groß: | {big}Groß{/big} |
Klein: | {small}Klein{/small} |
Hochgestellt: | {sup}Hochgestellt{/sup} |
Tiefgestellt: | {sub}Tiefgestellt{/sub} |
Trennlinie: | {hr} |
Bild: | {img="http://www.tdb.de/images/tdb_logo.gif"} |
Link: | {url}http://www.tdb.de{/url} |
Link: | {url="http://www.tdb.de"}Zur Homepage{/url} |
Link zu Forum: | {url="for:123"}Zum Forum 123{/url} |
Link zu Napping: | {url="nap:123"}Zum Napping 123{/url} |
Link zu Beitrag: | {url="btr:123"}Zum Beitrag 123{/url} |
Kombiniert: | {url="for:1,btr:2"}Zum Beitrag 2 im Forum 1{/url} |
Oder: | {url="for:1,btr:2,nap:3"}Zum Beitrag 2 im Forum 1 mit Design des Nappings 3{/url} |
|
|
|