RPG/400 ruft ILE auf -> Parameterfrage

[ExAzubi]

Hallo zusammen,

ich habe da mal eine Frage bevor ich wieder mal stundenlang rumexperemtiere:

Ich habe ein ILE Programm mit folgendem ENTRY - Parameter:

D $PARM           DS                                             
D  VAL                          21    DIM(53)                    
D  DSKWJJ                        4  0 OVERLAY(VAL:1)             
D  DSKWWO                        2  0 OVERLAY(VAL:*NEXT)         
D  DSWERT                       15  3 OVERLAY(VAL:*NEXT)         
 *                                                               
C     *ENTRY        PLIST                                        
C                   PARM                    YYARNR               
C                   PARM                    YYANZW               
C                   PARM                    $PARM

Jetzt will ich dieses Programm aus einem RPG/400 Programm aufrufen, wie muss ich dort den Parameter $PARM definieren? Als OCCUR -DS ?

Danke an alle Helfenden!

[Fuerchau]

Von OPM aus ist die Definition etwas aufwändiger:

E VAL 21 53
IPARM DS
IVAL 0 1112

IKWDS DS
IDSKWJJ S0 3 0
IDSKWWO S4 5 0
IDSWERT S6 21 3

Die KWDS kannst du in die Tabelle VAL Index 1 bis 53 übertragen oder aus VAL rausholen und die DS PARM übergeben.

[ExAzubi]

Danke Furchau,

da mach ich es, dachte halt das man die KWDS auch als OCCUR definieren könnte.

Dann mach ich es halt so.

[Fuerchau]

In OPM-RPG ist eine Occurs-DS leider nicht "überlagerbar".
Auch Pointer werden da noch nicht unterstützt.