Aua, das ist so einfach, dass ich mich beissen könnte...
Code:
/free
   SqlStmt = '+
   Select SUBSTR(A1KDNR, 1, 1) as Grp, +
     sum (A1NWSU), +
   FROM afa100 +         
   WHERE A1RGDT = ? +    
   GROUP By A1RGDT, SUBSTR(A1KDNR, 1, 1)';
/end-free
funktioniert einwandfrei...
Sorry für die überflüssige Frage