Retrieve Environment Variable (JRTVENV)

Comando JRTVENV

Retrieve Environment Variable

Recupera una variabile di ambiente.

Rimedia all'assenza di un comando ufficiale IBM per il recupero delle variabili di ambiente usando le API predisposte.

Pubblicato dall'autore Vengoal Chang in data 15/02/2008 al link http://code.midrange.com/759f4f422d.html

Keyword	Description	Choices	Notes
ENVVAR	Environment variable	Character value	Required, Positional 1
RTNVAL	Return value Var 1-1024 char	Character value	Optional, Positional 2
LEVEL	Level	JOB, SYS	Optional, Positional 3

Environment variable (ENVVAR)

Riceve il nome della variabile di cui si vuole recuperare il valore.

Il valore e' obbligatorio.

Valori permessi:

stringa caratteri

Nome della variabile di ambiente.

Il nome della variabile di ambiente e' limitato ad una lunghezza massima di 128 byte. I valori validi comprendono tutti i caratteri EBCDIC ad eccezione del segno di uguale (=), del segno di terminazione nullo (X'00') e dello spazio vuoto (X'40'). Se contiene caratteri alfanumerici il nome deve essere racchiuso tra apici. Se un apice e' gia' previsto, devono essere utilizzati i doppi apici ('').

Il nome della variabile e' sensibile a maiuscole e minuscole.

Return value (ClearAnte) Var (RTNVAL)

Variabile di ritorno di tipo carattere adatta a contenere la variabile di ambiente.

Il chiamante del corrente comando deve definire una variabile di lunghezza adeguata da 1 a 1024 caratteri.

La variabile e' obbligatoria

Valori permessi:

Variabile di programma.: Da dichiarare nel pgm chiamante di qualunque lunghezza sia adatta a contenere la variabile di ambiente. Si osserva che i comandi originali ADDENVVAR e CHGENVVAR permettono variabili di ambiente solo fino a 1024 caratteri.

Level (LEVEL)

Specifica il livello della variabile di ambiente.

Valori permessi:

*JOB: E' richiesto il recupero della variabile di ambiente a livello di lavoro.
*SYS: E' richiesto il recupero della variabile di ambiente a livello di sistema.

Esempi per JRTVENV

Esempio 1: Chiamata di JRTVENV da programma CL.

Preparare nel job una variabile di ambiente da recuperare:

> ADDENVVAR ENVVAR(ProvaEnvVar) VALUE('Valore per il job')
     LEVEL(*JOB)
  Aggiunta variabile di ambiente.

All'interno del programma in Control Language, inserire le seguenti istruzioni:

Dichiarazione
   DCL        VAR(&RTV) TYPE(*CHAR) LEN(1024)
Recupero
   JRTVENV    ENVVAR('ProvaEnvVar') RTNVAL(&RTV) LEVEL(*JOB)
Utilizzo
   SNDPGMMSG  MSG('*JOB:' *CAT &RTV)

Notare nel recupero gli apici di contorno al nome della variabile, necessari per conservare le minuscole.

Esempio 2: Chiamata del comando JRTVENV dal comando di test JRTVENVT

Si rimanda all'help del comando JRTVENVT "Retrieve Environment Var: Test" che riporta anche il sorgente Control Language del command processing program.