Einzelnen Beitrag anzeigen

smudo

Registriert seit: 6. Sep 2005
Ort: Cottbus
362 Beiträge
 
Delphi XE2 Professional
 
#6

Re: Stati per Select aneinandergereiht

  Alt 18. Nov 2005, 10:03
So, ich habs jetzt:

SQL-Code:
CREATE PROCEDURE GETSTATILISTE (
    PNR CHAR(15) CHARACTER SET ISO8859_1)
RETURNS (
    STATILISTE VARCHAR(999) CHARACTER SET ISO8859_1)
AS
DECLARE VARIABLE STATUS VARCHAR(10) CHARACTER SET ISO8859_1;
begin
  statiliste='';
  for select details.status
  from details d
  where d.PNr=:PNr
  into :status
  as cursor StatCursor do
  begin
    if (statiliste='') then
      statiliste=:statiliste || :status;
    else
      statiliste=:statiliste || ', ' || :status;
  end
  suspend;
end^
  Mit Zitat antworten Zitat