CHGVAR

VAR(&CMD) VALUE('MSGBOX')

CHGVAR

VAR(&PARM1) VALUE('

Text="Texte du message";

Caption="Titre de la fenêtre"

')

CHGVAR

VAR(&PARM2) VALUE('

Type=Type du bouton

[;Default=Numéro du bouton par défaut]

')

CALL

PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +
&PARM2 &RESULT)

Paramètres

Parm1

Parm1 contient le titre et le texte à afficher dans la boîte à message :
Text=Texte dans la boîte à message.

Caption=Titre de la fenêtre.

Parm2

RESULT

Parm2 contient les options de la boîte à message :

Type=type de la boite à message.
Il peut avoir l'une de ces valeurs suivantes :
MB_ABORTRETRYIGNORE, MB_OK, MB_OKCANCEL, MB_RETRYCANCEL, MB_YESNO, MB_YESNOCANCEL.

L'une des valeurs suivante peut être ajoutée (avec le signe + ) pour afficher une icône dans la boîte à message :
MB_ICONEXCLAMATION, MB_ICONWARNING, MB_ICONINFORMATION, MB_ICONASTERISK, MB_ICONQUESTION, MB_ICONSTOP, MB_ICONERROR, MB_ICONHAND

Default= Numéro du bouton à rendre actif par défaut. Optionnel.

Contient le numéro du bouton sur lequel l'utilisateur a cliqué.

CHGVAR

VAR(&CMD) VALUE('MSGBOX')

CHGVAR

VAR(&PARM1) VALUE('Text="Customer not found %LF%
Do you want to continue ?";Caption="Customer Service Application"')

CHGVAR

VAR(&PARM2) VALUE('Type= MB_ICONEXCLAMATION+
MB_YESNO')

CALL

PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +
&PARM2 &RESULT)