Prozeduren

[dschroeder]

Meiner Meinung nach machen Prozeduren fast immer Sinn! Man muss nur wissen, wie sie sich verhalten. Deklarationen, die innerhalb von Prozeduren vorgenommen werden, sind lokal. Das heißt, wenn du innerhalb einer Procedure eine Datei deklarierst und öffnest, steht diese Datei nur lokal zur Verfügung. Eine andere Procedure kann diese Datei nicht nutzen. Sie müsste sie dann schon selber öffnen.

Du kannst eine Datei natürlich außerhalb der Procedure (also im globalen Bereich) öffnen. Dann steht sie allen Prozeduren zur Verfügung.

Dieter

[Fuerchau]

Mit "außerhalb" sind F- und D-Bestimmungen vor der ersten Prozedur gemeint.
Diese Definitionen gelten dann als Global.

Wenn du also eine F-Bestimmung am Anfang hast wird diese automatisch geöffnet (außer eben bei USROPN).
Wenn du dann einen Close kodierst, kannst du nicht erwarten, dass die Datei der nächsten Prozedur wieder zur Verfügung steht.

Du kannst natürlich auch zwischen DCL-PROC und END-PROC Dateibestimmungen definieren. Diese sind dann lokal.

Und AutoOpen-Dateien bleiben natürlich offen, wenn du am Ende *INLR auf *OFF belässt.
Um das automatisch zu verhindern, dann musst du eine MAIN-Prozedur erstellen:
https://www.ibm.com/support/knowledg...sd/hmainkw.htm
Die hat dann keinen Zyklus und INLR wirkt nicht mehr.

[_MG_]

Danke euch beiden, das hat mir für mein Verständnis sehr geholfen!!!
Eine Frage noch. Sobald ich die f bestimmung innnerhalb der Prozedur mache, bekomme ich beim kompilieren die Meldung das eine Ergebnisdatenstruktur benötigt wird und der Name der Variable nicht definiert ist. Gibt es an der Stelle auch noch was zu beachten?

Schönen Abend!

[prsbrc]

GM!
Schau dir auf Simon Hutchinsons Blog mal die beiden Blogs an.
Dort zeigt er recht anschaulich die Lösung deines Problems denn du musst wenn du die Tabelle lokal definierst eine DS angeben in welche du den Buffer liest.

http://www.rpgpgm.com/2016/03/defini...rocedures.html
http://www.rpgpgm.com/2016/03/defini...es-part-2.html

Oder auf meiner Git-Seite habe ich auch ein kleines Beispiel dazu:
https://github.com/prsbrc/Miscellane...Def_Proc.rpgle

Greets

[_MG_]

Danke euch allen! Hat mir sehr geholfen.