RPG Zyklusfrei - Felder initialisieren

[mihael]

Standard RPG Compile Options kann man auch and den Befehl CRTSQLRPGI übergeben. Dafür ist der Parameter COMPILEOPT da.

Zum Bespiel:

CRTSQLRPGI ... COMPILEOPT('DFTACTGRP(*NO) ACTGRP(*CALLER) INCDIR(''/usr/local/include'') OPTION(*SRCSTMT *NODEBUGIO) OPTIMIZE(*BASIC)')

[Radinator]

Nur mal so gefragt, hilft da auch kein inz(*zero) bzw *inz(*blanks)?

[Fuerchau]

Leider nein.
Inz ist eine Initialisierung die bei der Speicherbelegung ausgeführt wrd.
Das selbe gilt dann für Clear.
Einzig die Existenz einer *INZSR (auch verdeckt) sorgt automatisch dafür, dass der Compiler für jede Reset-Anwesiung eine Kopie mit dem Initwert des Feldes/der Struktur generiert.
Ansonsten wirkt Reset da wohl wie Clear.

Wenn du allerdings mittls NoMain eine Prozedur verwendest, dann wird nicht mehr static, sondern automatic storage belegt. Einzig Variablen, die vor der 1. Prozedur definiert sind, bleiben static.

https://www.itjungle.com/2008/08/27/fhg082708-story01/