SQLRPGLE Rekursive Funktion

[BenderD]

Hallo Leute,

kann man in einem SQLRPGLE eine Funktion rekursiv aufrufen mit neuen ResultSet dieser Ebene?
Der declarte Cursor ist wohl global, wie schaff ich es dass dieser nur in der jeweils offenen Rekursionsstufe verwendet wird?

Beispiel:
GETSTUECKLISTE(TEIL)
 -> Fetch auf die Teile a, b, c
   -> je Teil GetStueckliste(a)
     -> Fetch aus a mit  d, e, f 

Eine Lösung wäre nicht jeden einzelnen Record zu fetchen sondern gleich in ein Array-Zwischenspeicher zu stellen und in der nächsten Rekursionsstufe den Cursor neu zu öffnen.

..oder einfach nicht Rekursiv auflösen ^^

mit ACTGRP(*NEW) müsste das gehen, falls dem maroden Precompiler dabei nicht schwindelig wird...
Ansonsten bleibt noch Baldur's Vorschlag oder CLI

D*B