Okay. Das hab ich soweit. Danke erstmal dafür.

Zitat Zitat von Fuerchau Beitrag anzeigen
Const verhindert nicht das verändern der Parameter im gerufenen Programm sondern gibt die Veränderung nicht zurück.
Dazu aber noch eine Frage.

Folgendes Beispiel:
PHP-Code:
     DPGM1             PR                  extpgm('PGM1')
     D EXT_VAR1                       1A   const
     D EXT_VAR2                       2A   const
     D EXT_VAR3                       3A   const

     D  VAR1           S              1A
     D  VAR2           S              2A
     D  VAR3           S              3A

       VAR3 = 'XYZ';
       PGM1(VAR1:VAR2:VAR3); 
PGM1 kann VAR3 jetzt zwar auf 'ABC' ändern, es kommt aber nicht zurück, sondern es steht weiterhin 'XYZ' drin?

Ich habe das mit einem Programm mit *ENTRY getestet und der Wert wird verändert, obwohl die Variable im Prototyp auf CONST steht.

Es macht natürlich keinen Sinn den Wert der sich verändern soll als Konstante (im Beispiel: PGM1(VAR1:VAR2:'XYZ')) zu übergeben. Dann kann die Veränderung ja in keine Variable geschrieben werden.