Stored Porcedures Problem

[marciboy]

Hallo

kann wir vielleicht jemand sagen wie ich den Code für eine Rükgabe der Parameter schreibe?

Ich benutze für den Select eine TQuery (select * from p_modell(:p_khernr,:p_kmodnr). Die Rückgabe soll im Grid erscheinen.


Meine SP:

Delphi-Quellcode:

begin
  if (:p_kmodnr = '') then
  for
    select * from tabmodell
    where khernr = :p_khernr
    order by sort1
    into :KMODNR,:BEZ,:KHERNR,
         :SORT1,:BJVON,:BJBIS
  do
  begin
    suspend;
  end
  else
  for
    select * from tabmodell
    where kmodnr = :p_kmodnr
    order by sort1
    into :KMODNR,:BEZ,:KHERNR,
         :SORT1,:BJVON,:BJBIS
  do
  begin
    suspend;
  end
end

Gruß
Marc

[mkinzler]

Die Rückgabe ist im DataSet.

Du brauchst nur das Grid einfach über eine DataSource mit dem Query verbinden.

[marciboy]

das hab ich schon versucht aber es klappt nicht.

[mkinzler]

Zeig mal deinen Code

[marciboy]

ich habe ja keinen Code.

[mkinzler]

Wie hast du die Komponenten verknüpft?
Ist Query geöffnet?

[marciboy]

Ich habe nur im Query unter DataSource (Form1.DSHersteller) stehn. Die Query ist auf TRUE.

[mkinzler]

Dann hast du es gerade falschrum verknüpft:
DBGrid -> DataSource -> Query

[marciboy]

Das habe ich. Die Hersteller werden auch angezeigt aber die Modelle nicht. Wenn ich die Abfrage direkt im SQL Feld mache geht es. Das Problem ist das ich ca. 15 Tabellen habe und Stored Prozeduren die in der Datenbank verknüpft sind. Ich habe auch die Select Befehle für die einzelnen Proceduren aber ich weiß nicht wie ich den Code in Delphi gestalten soll.

[mkinzler]

???
DIe SP besitzt die Felder: KMODNR, BEZ, KHERNR,SORT1, BJVON, BJBIS