Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi * in Stored Procedure [Interbase] (https://www.delphipraxis.net/29220-%2A-stored-procedure-%5Binterbase%5D.html)

Hansa 6. Sep 2004 07:21


* in Stored Procedure [Interbase]
 
Was ist hieran falsch :

SQL-Code:
SELECT * FROM TABLE8;
Da muß noch eine WHERE-Klausel rein und ein paar Parameter. Aber bereits hier beschwert er sich über den *.

Sharky 6. Sep 2004 07:49

Re: * in Stored Procedure [Interbase]
 
Hai Hansa,
kann es sein das deine Zugriffsmethode mit dem ";" am Ende nicht zurechtkommt? Oder mag die DB keine "Zahlen" im Tabellennamen?

Hansa 6. Sep 2004 07:56

Re: * in Stored Procedure [Interbase]
 
Bis zum Zugriff bin ich noch gar nicht gekommen. Das muß ein spezielles Problem mit Stored Procedures sein, das ich nicht sehe. 8) Zahl im Tabellennamen ist egal und der ; ? Was soll der ausmachen ? Führe ich diese Zeile, so wie sie ist aus, so geht alles. Als Stored Procedure aber nicht.

Sharky 6. Sep 2004 08:43

Re: * in Stored Procedure [Interbase]
 
:wall:
Sorry, ich hatte das mit der "Stored Procedure" überlesen.

Robert_G 6. Sep 2004 08:58

Re: * in Stored Procedure [Interbase]
 
Zeig' mal den Code drumrum. Ein SELECT-Statement ist ja noch keine Prozedur. ;)
Wenn du einen Haufe Daten in der Tabelle ändern willst: Deklariere es als Cursor, schiebe die Daten in Collections und mache etwas damit. Danach kannst du die per BULK DML ziemlich fix zurückschreiben:
SQL-Code:
create or replace procedure SenselessSample(pC in varchar2) is

  cursor curTabl8(iC in varchar2) is
    SELECT PK
          ,A
          ,B
    FROM  Table8
    WHERE C = iC;

  type IntTab is table of integer;
  type ShortChrTab is table of varchar2(255);
  type LongChrTab is table of varchar2(2000);

  lPK IntTab;
  lA ShortChrTab;
  lB LongChrTab;

  i integer;
begin
  -- hole Daten
  open curTabl8(pC);
  fetch curTabl8 bulk collect
    INTO lPK, lA, lB;
  close curTabl8;

  -- mache was damit
  for i in lPK.first .. lPK.last loop
    lA(i) := lA(i) || ' miep!';
    lB(i) := lB(i) || ' ' || lA(i);
  end loop;

  -- schiebe sie per BULK DML zurück
  forall i in lPK.first .. lPK.last
    UPDATE Table8 u
    SET   u.A = lA(i)
          ,u.B = lB(i)
    WHERE PK = lPK(i);

end;

Hansa 6. Sep 2004 09:28

Re: * in Stored Procedure [Interbase]
 
Die Frage ist, ob ich den * in einer Stored Procedure überhaupt verwenden kann. Ich erhalte nämlich momentan eine Warn/Fehlermeldung.

@RG: Bleib mir nur vom Hals mit Deinem überzüchteten Oracle-Code. :lol: :mrgreen: Es geht auch nur um das Lesen der Daten, sonst nichts. Glaube kaum, daß ich ein Bulk DML brauche. :stupid:

Lemmy 6. Sep 2004 09:44

Re: * in Stored Procedure [Interbase]
 
Guten Morgen Hansa,


lass mal den kompletten Code der SP lesen, es kann schon sein, dass er meckert, weil er z.B: nicht weiß, was er mit der Ergebnissmenge machen soll (Select .... from .... into ....) bzw. die Anzahl der Parameter stimmt nicht....

Grüße
Lemmy

Hansa 6. Sep 2004 09:57

Re: * in Stored Procedure [Interbase]
 
Es gibt noch keinen Code. :lol: Ich brauche alle Felder einer Datenmenge aus einem bestimmten Zeitraum. Z.B.:
SQL-Code:
SELECT * FROM TABLE WHERE DATUM= :DATUM
Kann ich das mit einer SP machen, oder nicht ? Mit Dataset geht es, aber wo bleiben dann meine Parameter ?

EDIT:

vorher hat da gestanden :

SQL-Code:
DATUM< :DATUM

Jelly 6. Sep 2004 10:41

Re: * in Stored Procedure [Interbase]
 
Hallo,

ja, mit TDataset geht das, weil du zeilenweise vom Server alle Spalten geliefert kriegst. Das Ergebnis ist dann in deinem Dataset gespeichert... In einer Stored Procedure läuft das ganze also auf dem Server ab, und du musst dafür sorgen, daß du zeilenweise deine Daten irgendwo durchforstest, und deshalb geht da kein "Select * from...". Da geht kein Weg drum rum, statt *, alle Spalten einzeln aufzulisten... Und was schon gar nicht geht, ist die Parameterübergabe mittels :Datum. Ich bin jetzt kein Interbase Experte, aber das mit dem vorgestellten ":" erinnert doch stark an die Parameterübergabe, wie sie in Delphi in den TDataset Abkömmlingen praktiziert wird. In MSSQL z.B. ist es der Klammeraffe "@" der als Parameterindentifikator dient.

Gruß,
Tom

Jelly 6. Sep 2004 10:44

Re: * in Stored Procedure [Interbase]
 
OK, ich hab mir das bei Interbase mal nachgekuckt, da werden also Parameter ebenfalls mit ":" markiert... Also vergiss das zuletzt geschriebene im vorherigen Thread.

Gruß,

Lemmy 6. Sep 2004 11:52

Re: * in Stored Procedure [Interbase]
 
Hi Hansa,

evtl. kann das mit dem * nicht funktionieren, weil Du alle Spalten einer Tabelle den Parametern der SP zuordnen musst:

SQL-Code:
CREATE PROCEDURE GetAdresseName (AdresseID INTEGER)
RETURNS (AdresseName VARCHAR(80))
AS
BEGIN
  FOR
    SELECT Name From Adresse Where ID=:AdresseID INTO AdresseName
  Do
   SUSPEND;
END^
Mit Into wird die SP quasi angewiesen die Werte in diesen Parameter (oder eben mehrere) zu übergeeben. Schau Dir doch mal das SP-Tutorial auf meiner Seite an

http://www.delphi-tutorials.de/Tutor...f_tutorial.zip

Grüße
Lemmy

Robert_G 6. Sep 2004 21:37

Re: * in Stored Procedure [Interbase]
 
Da ich hier schon des öfteren Prozeduren gesehen habe (MSSQL & IB/FB), die sich wie Views verhalten, wollte ich mich mal schlau machen, warum Oracle das nicht unterstützt.

Die Antwort ist simpel: Das Ganze funktioniert (zumindest beim SQL Svr) über zwei Threads.
Der erste arbeitet die Prozedur ab und schickt die Werte (mit suspend) durch eine Pipe an den zweiten.
Das kann in einer großen DB niemals funktionieren da es einfach zu viel Leistung schluckt (sicher nicht mehr als 20-30 User, bei mehr wird es zu Verzögerungen kommen, die der User bemerken würde).

Ein wesentlich effektiverer Weg wäre es einen Verweis auf einen Cursor zu übergeben.
Falls die FB/IB-Komponenten (sie arbeiten doch direkt mit der API von FB/IB ?) das ähnlich wie es manche Ora-Kompos unterstützen, könntest du mit dem Rückgabewert sofort ein DataSet oder eine Query "bestücken".

Hansa 6. Sep 2004 23:41

Re: * in Stored Procedure [Interbase]
 
Zitat:

Zitat von Robert_G
...Ein wesentlich effektiver Weg wäre es einen Verweis auf einen Cursor zu übergeben...

nene, viel zu umständlich. 8)

Robert_G 6. Sep 2004 23:47

Re: * in Stored Procedure [Interbase]
 
Zitat:

Zitat von Hansa
Zitat:

Zitat von Robert_G
...Ein wesentlich effektiver Weg wäre es einen Verweis auf einen Cursor zu übergeben...

nene, viel zu umständlich. 8)

nope... :mrgreen:

SQL-Code:
create or replace function GetCursor(pSomeValue in varchar2) return SomeRefCurType
is
  oCur SomeRefCurType;
begin
  open oCur for
    SELECT X
    FROM  Y
    WHERE Z like pSomeValue;
 
  return oCur;
end;
Wird in FB sicher auch funktionieren. (wenn auch mit etwas anderer Syntax ;) )

Hansa 7. Sep 2004 00:20

Re: * in Stored Procedure [Interbase]
 
Robert, erspare mir den Oracle-Mist. :lol: Mir ist schon klar, daß ich einen Nagel auch mit der bloßen (dann blutenden) Hand einkloppen kann. :mrgreen:

Robert_G 7. Sep 2004 00:32

Re: * in Stored Procedure [Interbase]
 
Zitat:

Zitat von Hansa
Robert, erspare mir den Oracle-Mist. :lol: Mir ist schon klar, daß ich einen Nagel auch mit der bloßen (dann blutenden) Hand einkloppen kann. :mrgreen:

Hey, würde ich mich mit FB auskennen, hättest du da PSQL Code gesehen.
So musst du halt selbst schauen, ob die Lösung in FB möglich bzw. ob sie überhaupt besser ist (das was ich weiter oben geschrieben habe, weiß ich halt nur vom SQL Svr).
Da ich mit soviel Freundlichkeit auf einmal nicht umgehen kann:
@Gérome: Wie wär's mit einer Ignore-Liste pro Autor?


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:19 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz