Commande WBOOKMARK

Insère du texte à l’emplacement du signet spécifié.

Syntaxe

CHGVAR	VAR(&CMD) VALUE(WBOOKMARK)
CHGVAR	VAR(&PARM1) VALUE(' [ Bookmark="Nom de signet" ] + [ ;Start] [ ;End] [ ;Overtype] [ ;Adjust] [ ;Append] + [ ;InsertRow] [ ;Merge=n] + [ ;Unicode=True/False ] + [ ;ToBookmark="Nom de signet" ] [ ;NUMFMT(d DECPOINT=p GRPPOINT=g)] + [ ;PROP(Property)=Value] + ')
CHGVAR	VAR(&PARM2) VALUE('Texte à insérer')
CALL	PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 + &PARM2 &RESULT)

Paramètres

Paramètres
Parm1	Bookmark est le nom d’un signet présent dans le document, ou un signet prédéfini de Microsoft Word, ou une valeur spéciale - Voir les notes plus bas. Un signet représente une position dans le document, ou une sélection (plage) de plusieurs caractères. Un signet se place dans un document Word par le menu « Insertion » « Signet » de Word. Si le nom de signet est absent dans Parm1, ou, s’il est égal à NONE, alors, le curseur Word n’est pas déplacé, et le texte sera inséré à la position courante. Si le signet spécifié ici est absent du document, aucune action n’est effectuée, et le mot 'FALSE'* est retourné dans le paramètre &RESULT. Start : Quand le signet englobe une sélection, l’option Start indique que l’on veut positionner le curseur de Word au début de la sélection. End : Quand le signet englobe une sélection, l’option End indique que l’on veut positionner le curseur de Word à la fin de la sélection. Overtype indique que le nouveau texte vient écraser le texte existant. Par défaut, le nouveau texte sera inséré, ou, remplacera la sélection. Adjust permet de replacer le signet à l’emplacement du texte inséré. Append ajoute la nouvelle valeur au contenu actuel du signet. InsertRow permet d’insérer une ligne dans un tableau, à l’emplacement du signet. Merge : fusionne les n cellules en une seule. NUMFMT(d DECPOINT=p GRPPOINT=g) permet de formater une valeur numérique décimale. -d est le nombre de décimales. -p représente le caractère à utiliser comme point décimal. -g représente le caractère à utiliser comme séparateur de milliers. PROP fixe la valeur d’une propriété à l’emplacement du texte inséré. Plusieurs directives PROP() peuvent se suivre, séparées par un point-virgule ( ;). Example : PROP(Font.bold)=True;Prop(Font.italic)=True Unicode : Par défaut Unicode=false. Quand Unicode est vrai, le texte à écrire dans &PARM2 doit être dans le jeu de caractère Unicode de Windows. La valeur Unicode Windows peut être générée par le programme LNCCVTWCS. ToBookmark permet de désigner un signet. La sélection sera étendue jusqu’à ce signet, à partir du signet spécifié avec le paramètre Bookmark, ou de la position courante si Bookmark n’est pas spécifié.
Parm2	Texte à insérer. Si le texte est absent (blanc), le curseur est positionné sur le signet, et aucun texte n’est inséré. La valeur spéciale %NONE% entraîne l’effacement de la valeur actuelle de la sélection. Si l’option Unicode= est fixée, le contenu de &Parm2 doit être en format Unicode Windows, et le paramètre &OPT doit avoir la valeur ‘W’.
Opt	Quand Unicode est vrai, &OPT doit avoir la valeur ‘W’. &PARM2 doit contenir une chaîne Unicode Windows.

Remarques

1) Le nom du signet peut prendre les valeurs suivantes :

• Un nom de signet inséré dans le modèle du document

• Un Signet Prédéfini de Microsoft Word

• *RIGHT pour se déplacer vers la cellule de droite

• *LEFT pour se déplacer vers la cellule de gauche

• *UP pour se déplacer à la cellule du dessus

• *DOWN pour se déplacer à la cellule du dessous

Si le signet n’existe pas, aucun texte n’est inséré.

2) Si le signet englobe une sélection de plusieurs caractères, c’est toute la sélection qui sera remplacé par la nouvelle valeur.

3) La commande WBOOKMARK peut servir à supprimer des paragraphes entiers qui sont compris dans un signet.

4) Les signets peuvent se chevaucher.

5) Les signets peuvent se trouver n’importe où dans le document, y compris dans les entêtes et pieds de page, ou les filigranes.

6) Word adapte le mode d’affichage automatiquement.

7) Dans tous les cas, le déplacement s'effectue avant l'insertion de texte.

Exemple 1

CHGVAR VAR(&CMD) VALUE('WBOOKMARK')

CHGVAR VAR(&PARM1) VALUE('Bookmark="Signet1";NUMFMT(0)')

CHGVAR VAR(&PARM2) VALUE('0001234')

CALL PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +

&PARM2 &RESULT)

Résultat : 1234

CHGVAR VAR(&CMD) VALUE('WBOOKMARK')

CHGVAR VAR(&PARM1) VALUE('Bookmark="Signet2";NUMFMT(2)')

CHGVAR VAR(&PARM2) VALUE('0001234')

CALL PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +

&PARM2 &RESULT)

Résultat : 12.34

Exemple 2

CHGVAR VAR(&CMD) VALUE('WORDOPEN')

CHGVAR VAR(&PARM1) VALUE('FILE ="C:\TEMP\TEST.DOCX"')

CHGVAR VAR(&PARM2) VALUE('VISIBLE')

CALL PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +

&PARM2 &RESULT)

CHGVAR VAR(&CMD) VALUE('WBOOKMADD')

CHGVAR VAR(&PARM1) VALUE('Bookmark="S1"')

CHGVAR VAR(&PARM2) VALUE(' ')

CALL PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +

&PARM2 &RESULT)

CHGVAR VAR(&CMD) VALUE('WBOOKMARK')

CHGVAR VAR(&PARM1) VALUE('Bookmark="S1";NUMFMT(2 DECPOINT=, GRPPOINT=.)')

CHGVAR VAR(&PARM2) VALUE('12345678')

CALL PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +

&PARM2 &RESULT)

Exemple 3

LNCCMD CMD(WBOOKMADD) +

PARM1('Bookmark="Name";Text="Client name"')

LNCCMD CMD(WBOOKMARK) +

PARM1('Bookmark="Name";Start;Overtype;Adjus+

t;PROP(Font.bold)=True;Prop(Font.italic)=Tr+

ue') PARM2('Aura Equipements')

Exemple RPG

La valeur 12345678 envoyée par l’AS/400 avec le format suivant :

NUMFMT(2 DECPOINT=, GRPPOINT =.)

Imprime la valeur ainsi:

123.456,78

L’exemple RPG suivant :

EVAL LNC_PARM2 =*BLANKS

EVAL LNC_PARM1=’*RIGHT NUMFMT(2)’

MOVEL TOTAL LNC_PARM2

CALL ‘LNCCMD’

. . .

va permettre d'avoir une donnée numérique du côté AS/400 et une zone texte formatée sur le document.

Si la variable TOTAL vaut 12350 (la donnée envoyée à LAUNCHER Office est représentée comme celle que vous pouvez voir dans UPDDTA, sans le point décimal) dont deux chiffres pour la partie décimale.
LAUNCHER Office placera dans le document la valeur 123.50.

Comment formater une date ?

Il n’existe pas de commandes LAUNCHER Office pour WORD permettant de formater des dates.

L’utilisateur doit donc utiliser la commande "CVTDAT" sur l’AS/400.

Cependant, dans le cas d’un publipostage, il est possible de définir le format des dates dans le document WORD pour tous les champs "MERGEFIELD".

Voir aussi

• Les valeurs spéciales

• LNCWBM - Programme API