Le programme LNCWBM permet d’envoyer dans le document Word, les valeurs pour plusieurs signets, en un seul appel.
Syntaxe
|
DCL |
VAR(&HANDLE) TYPE(*CHAR) LEN(50) |
|
DCL |
VAR(&PARM1) TYPE(*CHAR) LEN(512) |
|
DCL |
VAR(&VAR1) TYPE( . . . |
|
DCL |
VAR(&VAR2) TYPE( . . . |
|
DCL |
VAR(&VARN) TYPE( . . . |
|
|
|
|
CHGVAR |
VAR(&PARM1) VALUE('noms des signets, et formats des variables') |
|
|
|
|
CALL |
PGM(LNCWBM) PARM(&HANDLE &PARM1 + &VAR1 &VAR2 . . . &VARN) |
|
MONMSG |
MSGID(LNC0000) EXEC(GOTO CMDLBL(ERROR)) |
Paramètres
|
Paramètres |
|
|
&PARM1 |
Chaque signet dont la valeur est fixée par la commande est représenté entre parenthèses, selon la syntaxe : (NOM1:Fnn.dd)(NOM2:Fnn.dd) NOM1
et NOM2
sont les noms des signets.
Si les valeurs à donner aux signets sont dans une variable DS, les signets sont alors représentés ainsi : DS:((NOM1:Fnn.dd)(NOM2:Fnn.dd)…)
|
|
&VAR… |
Les variables contenant les valeurs à donner aux signets sont passées. Le nombre et l’ordre des variables correspond à celui décrit dans &PARM1.
|
Exemples
Dans l’exemple suivant, les variables du programme :
&ZPOLNV, &INTD, &NOMD, &IDADR1, &ZDVILL, &ACTIVITE
Contiennent chacune la valeur à affecter à un signet.
La variable &DS est une variable de 60 caractères au moins, et elle contient les valeurs à affecter aux deux signets : NOM (position 1 à 20) et ADQUERAB (position 21 à 60).
CHGVAR
VAR(&PARM1) +
VALUE('(ZPOLNV:A10)(ZINTD:A20)(ZNOMD:A20) +
(IDADR1:A20)(ZDVILL:A20)DS:((NOM:A20)(ADQUERAB:A40)) +
(ACTIVITE:P8.2)')
CALL PGM(LNCWBM) PARM(&HANDLE &PARM1 &ZPOLNV &INTD &NOMD +
&IDADR1 &ZDVILL &DS +
&ACTIVITE)