Einzelnen Beitrag anzeigen

Walter Landwehr

Registriert seit: 28. Mär 2006
Ort: 32816 Schieder-Schwalenberg
396 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Memo auslesen und als SQL Parameter aufbereiten

  Alt 31. Mai 2013, 19:07
Danke Thomas hat geklappt.

Kennst Du Dich auch mit SQL aus. Hier mal eine Frage:

Wie setze ich den Parameter in einer SQL Abfrage.

Hier der Code:

BuchungenQry.SQL.Add('SELECT SUM(B.Soll) as SollBetrag, SUM(B.Haben) as HabenBetrag ' +
'FROM Konto K INNER JOIN ' +
'Buchung B ON B.DVKontonummer = K.DVKontonummer INNER JOIN ' +
'Beleg BL ON BL.DVBelegnummer = B.DVBelegnummer ' +
'WHERE (BL.Buchungsperiode Between :Anfang and :Ende) ' + //---> Hier der Fehler ?
'and (BL.Belegart = ''ER'' or BL.Belegart = ''EG'')' +
'and K.Kontonummer in (:Kontonummer) ' + //---> Hier der Fehler ?
'and (B.InfoGegenkonto = ''3425'' or B.InfoGegenkonto = ''3410'')');


Fehler: Exception-Klasse EOleException mit Meldung 'Ungültige Autorisierungsangabe' Was ist hier falsch.

Kontonummer := EmptyStr;
for i := 0 to dmMain.Memo1.Lines.Count - 1 do
begin
Kontonummer := Kontonummer + '''' + dmMain.Memo1.Lines[i] + '''' + ',';
end;
Kontonummer := Copy(Kontonummer, 0, Length(Kontonummer) - 1);

Gruß Walter
Walter Landwehr
  Mit Zitat antworten Zitat