Le
programme LNCGETKW permet de récupérer la valeur associée à un mot clé, en
retour d'un appel à LNCCMD.
Cette commande permet aussi de convertir un nombre stocké dans une variable
chaîne de caractère vers un format décimal condensé ou étendu.
Syntaxe
DCL |
VAR(&HANDLE) TYPE(*CHAR) LEN(50) |
DCL |
VAR(&PARMX) TYPE(*CHAR) LEN(512) |
DCL |
VAR(&KEYW) TYPE(*CHAR) LEN(...) |
DCL |
VAR(&VALUE) TYPE( . . . |
DCL |
VAR(&FORMAT) TYPE(*CHAR) LEN(10) |
|
|
CALL |
PGM(LNCGETKW) PARM(&HANDLE &PARM1 + &KEYW &VALUE &FORMAT) |
Paramètres
Paramètres |
|
&PARMX |
&PARMX est la variable retournée par un précédent appel à LNCCMD. En programmation OPM, &PARMX doit être une variable de type caractère, d'une taille de 512.
|
&KEYW |
&KEYW
contient le mot clé dont on veut récupérer la valeur dans &PARMX.. Exemple: CHGVAR VAR(&KEYW) VALUE('Pattern;') Si le
premier caractère de &KEYW est un astérisque (*), alors, les
caractères suivants représente un format de stockage, sous la forme Tn.d ,
ceci pour convertir le texte stocké dans &PARMX, vers un format numérique
dans &VALUE. Exemple: CHGVAR VAR(&KEYW) VALUE('*P8.2 ')
|
&VALUE |
Résultat : Variable destinée à recevoir la valeur associée au mot clé, ou le résultat de la conversion vers un format numérique.
|
&FORMAT |
Format
du paramètre &VALUE, sous la forme: Tn.d Si &FORMAT est absent, la variable &VALUE est considérée comme étant de type caractère, et sa taille ne sera pas contrôlée. |
|
|
Exemple
DCL VAR(&SBJ)
TYPE(*CHAR) LEN(50)
DCL VAR(&SND) TYPE(*CHAR) LEN(50)
...
CALL PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1
&PARM2 &RES)
/* Ici &RES contient: */
/* 'Subject="Mon message";SenderName="Service information"'
*/
CALL PGM(LNCGETKW) PARM(&HANDLE &RES 'Subject ' &SBJ 'A50')
CALL PGM(LNCGETKW) PARM(&HANDLE &RES 'SenderName ' &SND 'A50')
/* Après ces appels: */
/* &SBJ = 'Mon message' */
/* &SND = 'Service information' */
Voir aussi