*entry plist ersetzen in RPG/IV Free-Format

[coolie]

Hallo,

erst einmal vielen Dank für die schnellen und hilfreichen Tipps.

Evtl. werden ja auch noch einige andere auf dieses eigentlich simple Problem stossen, darum hier noch eine kurze zusätzliche Erklärung:

Meine Absicht war lediglich, den Quellcode auf Free-Format umzustellen. Der Aufruf des Programms sollte über eine Befehlszeile/CL o.ä. mit Parameterübergabe erfolgen, also z.B.

CALL PGM(ABC) PARM('USA')

Die Lösung meines Problems lautet wie folgt:

D PRDEF PR extpgm('Dummy')
D LAND 3

D PRDEF PI
D LAND 3


Wie Birgitta bereits erwähnte, wird durch Angabe des Schlüssel-Wortes EXTPGM im Prototyp erreicht, daß

a) ein dynamischer call ausgeführt wird
b) der Compiler dacon ausgeht, daß ein Programm aufgerufen werden soll.


Beste Grüße
coolie

[Fuerchau]

Aus Dokumentatorischen Gründen solltest du statt "Dummy" den richtigen Namen verwenden.
Die Deklaration kann man nämlich auch in eine COPY-Strecke verlegen und somit in anderen RPG-Programmen verwenden. Diese brauchen dann nur noch den CALLP aufzurufen und das richtige Programm wird gestartet.

[BenderD]

Hallo,

Hallo,

erst einmal vielen Dank für die schnellen und hilfreichen Tipps.

Evtl. werden ja auch noch einige andere auf dieses eigentlich simple Problem stossen, darum hier noch eine kurze zusätzliche Erklärung:

Meine Absicht war lediglich, den Quellcode auf Free-Format umzustellen. Der Aufruf des Programms sollte über eine Befehlszeile/CL o.ä. mit Parameterübergabe erfolgen, also z.B.

CALL PGM(ABC) PARM('USA')

Die Lösung meines Problems lautet wie folgt:

D PRDEF PR extpgm('Dummy')
D LAND 3

D PRDEF PI
D LAND 3


Wie Birgitta bereits erwähnte, wird durch Angabe des Schlüssel-Wortes EXTPGM im Prototyp erreicht, daß

a) ein dynamischer call ausgeführt wird
b) der Compiler dacon ausgeht, daß ein Programm aufgerufen werden soll.


Beste Grüße
coolie

letzteres gilt für die Verwendung des Prototyps beim Aufruf; bei der Implementierung erkennt der Compiler das Procedure Interface des Mains daran, dass selbiges global deklariert ist und sucht den zugehörigen Prototyp nach Namen - hier wird nun der EXTPGM Eintrag erwartet, da ein Main nur per dynamischem Call aufgerufen werden kann.

mfg

Dieter Bender