Einzelnen Beitrag anzeigen

Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#4

AW: Fehlersuche bei Kopierroutine

  Alt 21. Mär 2012, 11:18
Ich seh es aber ich verstehe es nicht!
Delphi-Quellcode:
    
     FQuery.SQL.add('select ');
     FQuery1.SQL.add('*');
     FQuery1.SQL.add('from vkaufpos where ');
     FQuery1.SQL.add('VKAUFPOS_ID = :VKAUFPOS_ID');
     FQuery1.ParamByName('VKAUFPOS_ID').AsInteger := FVKAUFPOS_ID;
     FQuery1.open;
     FQuery1.append; // neuen Datensatz anhängen
  
    
     FQuery1['EINZELPREISNETTO']:= FEINZELPREISNETTO ;
     FQuery1['GESAMTPREISNETTO']:= FGESAMTPREISNETTO ;
Erwartet hätte ich etwa dies:
Delphi-Quellcode:
FqueryNeuDS.SQL.Text:='Update VkaufPos set EinzelPreisNetto=:einzelpreisnetto where VKaufPos_ID=:vkaufpos_id ';
FQuery1.ParamByName('VKAUFPOS_ID').AsInteger := FVKAUFPOS_ID;
FQuery1.ExecSQL;
Jedesmal (für jeden zu übernemenden Datensatz) ein 'select * ...' ist ja nun nicht so das Gelbe vom Ei.

Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat