Oben schreibst du:
"Das Pgm zeigt 24 Zeilen, je Zeile werden 4 Sql ausgeführt."

Dabei schlackere ich schon mit den Ohren.
Kann man nicht ein SQL stricken, dass das Ergebnis der 24 Zeilen direkt erzeugt?
Dann kann ich per Fetch halt direkt Zeile per Zeile in die SFL ausgeben.

Z.Zt. habe ich die select count(*) ja als set :wert = (select count(*) ... drin

aus den 4 je Zeile hab ich schon 2 je Zeile gemacht

Du meinst ich kann mein Ziel mit Prepare und group erreichen?
Ok, das versuch ich mal


Zu dem With

d.h. ich kann auf das with verzichten und an der Stelle

Code:
where dadate>=(current_date-(select mon from xx) Months)
auch gleich

Code:
where dadate>=(current_date-(
select dec(substr(inhacd, 1, 2), 2, 0)                       
              from   cbuchp01                                                  
              where  finrcd = 0 and sprccd = 'D' and sakzcd = '6' and          
                     sartcd = 'FORMMK' and rkeycd = 'BONCNT')) Months)
schreiben?