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.