Hallo *all,

steh im Wald und das Rehlein sagt Du zu mir....

CREATE FUNCTION /*Mail für RP-Trade 27.08.15 12:39*/
email3( PARARTNR dec(6), VERTRETER dec(3) ) RETURNS
VARCHAR(80) LANGUAGE SQL READS SQL DATA BEGIN
DECLARE RETURNVAL VARCHAR ( 80 ) NOT NULL DEFAULT ' ' ;
DECLARE work VARCHAR ( 100 ) NOT NULL DEFAULT ';' ;
FOR CSRC1 AS C1 CURSOR
FOR SELECT a4mail
FROM adr04pf
WHERE a4kto = PARARTNR and a4sts = 0
and a4fa = 1 and a4edua = 'A10'
DO SET work = ';' concat rtrim(a4mail) ;
END FOR ;
set returnval = ltrim(work) concat case
when vertreter = 953 then ',Ulrich@xxx;'
when vertreter = 914 then ',Georg@xxx;'
when vertreter = 922 then ',Martin@xxx;'
when vertreter = 961 then ',Michael@xxx;'
else ';' end;
RETURN LTRIM(RETURNVAL);
END

Habe nun das Problem das evtl. a4mail keine E-Mail Adresse zurückkommt. Dann ist der String nachher: ",Michael@xxx;" Wenn aber eine Adresse da ist sieht es so aus: "Adresse@xyz.de,Michael@xxx,"

Ich möchte aber das führende "," weg haben wenn der Kunde keine E-Mail Adresse hat.

Sprich wenn a4mail = leer dann "Michael@xx," ansonsten ",Michael@xxx;"

Hatte jetzt in der SQL-Referenz nachgesehen "DB2 Universal Database for iSeries SQL Programming Concepts" aber was ich suche ist quasi eine Auflistung welche Befehle es alles gibt dich ich dort benutzen kann.

Kann mir da einer mal sagen wo es lang geht.

GG