Stored Porcedures Problem

[marciboy]

Meint ihr das??

Delphi-Quellcode:

SET TERM ^ ;

CREATE PROCEDURE P_MODELL (
    p_khernr varchar(5),
    p_kmodnr varchar(5))
returns (
    kmodnr varchar(5),
    bez varchar(60),
    khernr varchar(5),
    sort1 varchar(3),
    bjvon varchar(6),
    bjbis varchar(6))
as
begin
  if (:p_kmodnr is null ) then
  for
    select * from tab110
    where khernr = :p_khernr
    order by sort1
    into :KMODNR,:BEZ,:KHERNR,
         :SORT1,:BJVON,:BJBIS
  do
  begin
    suspend;
  end
  else
  for
    select * from tab110
    where kmodnr = :p_kmodnr
    order by sort1
    into :KMODNR,:BEZ,:KHERNR,
         :SORT1,:BJVON,:BJBIS
  do
  begin
    suspend;
  end
end^

SET TERM ; ^

[mkinzler]

Alles Strings? Du solltest gier die entsprechenden Typen der Tabellen verwenden.

[marciboy]

das ist alles was ich habe

[mkinzler]

Im ER waren es aber ganz andere Typen (Numeric usw.)

[marciboy]

Das war die Version des Herstellers. Die Version von Großhändler ist diese.

[Hansa]

Wieso ist das jetzt auf einmal TAB110 ?? :shock: Vorhin war es noch TABMODELL. Egal ist das nicht ! Solange nicht der Quelltext einer gültigen Tabelle gepostet wird, die was mit der SP zu tun hat, kann die Raterei ruhig weitergehen, allerdings ohne mich. :mrgreen:

[marciboy]

TAB110 = TABModell
hab ich umbenannt und eben vergessen :-)

[marciboy]

Das Problem ist ja das ich noch keinen Quelltext habe außer das Formular.

[hoika]

Hallo,

deine SP ist je eine Selectable SP.
Sie wird also über eine normale Query aufgerufen.
Das die SP zwei Input-Parameter verlangt,
müssen die auch angegeben werden.

SQL-Code:

Select * From P_Modell('1', '2')

Der zweite Parameter kann NULL sein

SQL-Code:

Select * From P_Modell('1', NULL)

Wie du eine Query in einem Form benutzt,
steht in den SQL-Tutorials.


Zum ausprobieren kannst du ja IBExport benutzen (F12 für SQL-Statement)


Heiko

[marciboy]

Hallo hoika


die Queries haben alle select abfragen mit inputparametern.

[hoika]

Hallo,

ja ...
und ?

Ich habe die Input-Parameter ja angegeben in meinem Bsp.
Wo ist da jetzt das Problem?

Poste doch mal einen deiner Aufrufe.


Heiko

[marciboy]

THersteller:

SQL.Strings = (
'select * from p_hersteller(:p_khernr) order by bez')

TModell:

SQL.Strings = (
'select * from p_modell(:p_khernr,:p_kmodnr)')

[mkinzler]

Oder besser noch Poste mal eine Test-Datenbank.

[hoika]

Hallo marciboy,

wo steht denn dein Query.Open ?
Du benutzt in der Query Parameter (mit Doppelpunkt)
Wo ist das ParamByName


Heiko

[marciboy]

niergens. Ich weis nicht wie ich den code in delphi schreiben soll. Bin Anfänger

[mkinzler]

Dann Poste mal die DB (Siehe #53)

[marciboy]

Die DB darf ich leider nicht weitergeben.

[mkinzler]

Deshalb auch TestDB

[marciboy]

TestDB vom Hersteller. Ich darf die nicht weitergeben.

[mkinzler]

Mit TestDB meine ich eine Datenbank mit Testdaten. Obwohl Audi, Daimler und Co, ihre Modellpalette sicherlich nicht Betriebsgeheimnis ansehen.

[Hansa]

Die Tabelle mit Daten wird wohl viel zu groß sein. Deshalb mein Vorschlag : siehe #36.

[marciboy]

Wenn du mir sagst wo ich den Kopf finde poste ich ihn natürlich

[Hansa]

Zitat:

Zitat von Hansa

Poste mal lieber den Kopf der SP und den Quelltext der Tabelle "Tabmodell".

Der Kopf der SP ist ja schon geliefert. Da die Tabelle ja auch mittlerweile umbenannt wurde, sollte die zumindest endlich bis Beitrag #100 zu sehen sein. 8) Mich beschleicht allerdings langsam das dumpfe Gefühl, das das hier sowieso nichts werden kann. :roll:

[Hansa]

Zitat:

Zitat von Hansa

Poste mal lieber den Kopf der SP und den Quelltext der Tabelle "Tabmodell".

Der Kopf der SP ist ja schon geliefert. Da die Tabelle ja auch mittlerweile umbenannt wurde, sollte die zumindest endlich bis Beitrag #100 zu sehen sein. 8) Mich beschleicht allerdings langsam das dumpfe Gefühl, das das hier sowieso nichts werden kann. :roll:

[hoika]

Hallo,

dann schau dir mal das DB-Tutorial hier an.
Erwartest du fertigen Quelltext mit den paar Angaben

- TDataBase aufs Form
konfigurieren per Doppelklick
- TQuery aufs Form (mit TDataSource verknüpfen)
- TDataSource aufs Form, verknüpfen
- TDBGrid aufs Form, mit TDataSource verknüpfen
- TQuery befüllen (siehe mein select * from ...)
- Query.Open

steht so alles um Tutorial


Heiko