*EVAL | In Variablen definierte Prozeduranweisung ausführen
|
|
*EVAL &var | Der Inhalt der angegebenen Variablen &var wird als Prozeduranweisung interpretiert und ausgeführt.
|
|
| Mit dieser Anweisung ist es z.B. möglich, bei Zuweisungen an eine Prozedurvariable die sonst nicht parametrisierbare Beginnspalte und/oder die Längenangabe variabel anzugeben (siehe Beispiel 1).
|
|
| Die Anweisung *EVAL &var hat die gleiche Wirkung wie *&&var
|
|
*&N=10
*&VAR2='*&VAR3=&VAR(1,'&N.')'
| Nach der Zuweisung *&VAR2=... hat diese Variable den Inhalt *&VAR3=&VAR(1,10)
|
|
*EVAL &VAR2
| Durch die Anweisung *EVAL &VAR2 wird eine Prozeduranweisung ausgeführt, die dem Inhalt der Variablen &VAR2 enstspricht (siehe oben).
|
|
| Nach *EVAL &VAR2 enthält somit die neu kreierte Variable &VAR3 die Zeichenfolge ##########
|
|
*&N=10
*&VAR4='*&VAR5='&N.'C'~'''
| Durch die Zuweisung *&VAR4=... hat diese Variable den Inhalt *&VAR5=10C'~'
|
|
*EVAL &VAR4
| Es wird die Prozeduranweisung ausgeführt, die dem Inhalt der Variablen &VAR4 enstspricht (siehe oben).
|
|
| Nach *EVAL &VAR4 enthält die neu kreierte Variable &VAR5 10 Mal das Standard-Tabulatorzeichen ~. Die Eingabe &VAR5.EDT würde somit im 10-ten Action Code-Feld von CFS die Zeichenfolge 'EDT' eintragen.
|
|