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