Thema
:
Delphi
Stati per Select aneinandergereiht
Einzelnen Beitrag anzeigen
smudo
Registriert seit: 6. Sep 2005
Ort: Cottbus
362 Beiträge
Delphi XE2 Professional
#
6
Re: Stati per Select aneinandergereiht
18. Nov 2005, 10:03
So, ich habs jetzt:
zusammenfalten
·
markieren
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
^
Zitat
smudo
Öffentliches Profil ansehen
Mehr Beiträge von smudo finden