Stored Procedure Abfrage ob Eintrag vorhanden

[p80286]

Muß die BLZ ein Integer sein?
Soweit ich weiß, wird damit nicht gerechnet und da würde ein Char-Typ sich doch eher anbieten.

Gruß
K-H

[Metallicwar]

das Feld in der Tabelle ist ein Integer Feld, daher wird auch ein Integer erwartet, oder nicht?

[Metallicwar]

Code:

FUNCTION ZMI_Bankdaten 
   ( 
   such cichar(100)
   )
   RETURNS Memo
BEGIN
  declare @Bankleitzahl integer;
  declare @Bankname string;
  try
    @Bankleitzahl=cast(such as sql_integer);
  catch all
    @Bankname=trim(such);
  end try;
  if @Bankleitzahl is NULL then
    @Bankleitzahl= (SELECT Bankleitzahl FROM Bankdaten WHERE Bankname = such);
  else
    @Bankname= (SELECT Bankname FROM Bankdaten WHERE Bankleitzahl = such);
  endif;
  return trim(cast(@Bankleitzahl as sql_char))+' '+@Bankname;
END;

Soo, beim Eingeben einer Zahl natürlich in '' (

Code:

DECLARE @test Memo;
@test = ZMI_Bankdaten('10000000');

bekomm ich folgende Fehlermeldung:
Invalid operand for operator: = **
Script error information: -- Location of error in the SQL statement is: 295 (line: 11 column: 16) Error in UDF: ZMI_Bankdaten

Bei Eingabe einer Bank (

Code:

DECLARE @test Memo;
@test = ZMI_Bankdaten('Bundesbank');

liefert er mir die entsprechende PLZ zurück. Dazu eine Frage, werden bei Functionen der Rückgabewerd nicht wie bei Prozeduren in der Messagebox angezeigt?

[p80286]

Könnte es sein, daß

Code:

SELECT Bankname FROM Bankdaten WHERE Bankleitzahl = such

ein NULL zurück liefert, was dann wieder in '' übersetzt werden müßte?

Gruß
K-H

[Metallicwar]

hmn, mir is jetzte nicht klar, wieso ich das wieder umwandeln muss?
@bankname is vom typ string
und bei meinem Select erhalte ich doch auch einen Text zurück ?!?

[joachimd]

Zitat von Metallicwar:

if @Bankleitzahl is NULL then
@Bankleitzahl= (SELECT Bankleitzahl FROM Bankdaten WHERE Bankname = such);
else
@Bankname= (SELECT Bankname FROM Bankdaten WHERE Bankleitzahl = such);

naja, 'such' ist string...'bankleitzahl' aber integer. Nimm doch einfach
@Bankleitzahl= (SELECT Bankleitzahl FROM Bankdaten WHERE Bankname = @bankname);

[Metallicwar]

Er knallt in der Zeile,

Code:

@Bankname= (SELECT Bankname FROM Bankdaten WHERE Bankleitzahl = such);

nicht in der @Bankleitzahl .....

wie gesagt mit der Fehlermeldung: Invalid operand for operator...

[Metallicwar]

ah ok, habs hinbekommen !!!

Code:

FUNCTION ZMI_Bankdaten 
   ( 
   suchwert cichar(100)
   )
   RETURNS Memo
BEGIN
  DECLARE @Bankleitzahl integer;
  DECLARE @Bankname string;
  TRY
    @Bankleitzahl=cast(suchwert as sql_integer);
  catch all
    @Bankname=trim(suchwert);
  END TRY;
  IF @Bankleitzahl is NULL then
    @Bankleitzahl= (SELECT Bankleitzahl FROM Bankdaten WHERE Bankname = @bankname);
  ELSE
    @Bankname= (SELECT Bankname FROM Bankdaten WHERE Bankleitzahl = @Bankleitzahl);
  ENDIF;
  return trim(cast(@Bankleitzahl as sql_char))+' '+@Bankname;

END;

Vielen Dank Herr Dürr!

[Metallicwar]

Doch noch eine Frage
Beim Aufruf der Function über Delphi, wie kann ich mir das Ergebnis der Query in einem Editfeld anzeigen lassen.
Bei gewöhnlichen Abfragen (Select NAME from BENUTZER WHERE NAME = Hugo) ist dies ja über edtRückgabe.Text := qBankdaten.FieldByName('NAME').asString möglich.
Wenn ich hier als Feld ZMI_Bankdaten angebe, sagt er, dass er das angegebene Feld nicht finden kann.
Wie kann ich das lösen?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  qBankdaten.SQL.Text := 'SELECT ZMI_Bankdaten('+QuotedStr(edtSuchwert.Text)+') FROM system.iota';
  qBankdaten.Open;
  edtRückgabe.Text := // das Ergebnis der Query als Text an mein EditFeld übergeben
end;