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('forms names, and formats variables')

CALL

PGM(LNCWBM) PARM(&HANDLE &PARM1 +

&VAR1 &VAR2 . . . &VARN)

MONMSG

MSGID(LNC0000) EXEC(GOTO CMDLBL(ERROR))

Parameters

&PARM1

Each form value set by the command is displayed in brackets, as to syntax :

(Name1:Fnn.dd)(Name2:Fnn.dd)

Name 1 and Name 2 are the forms names.
F is AS/400 program variable type.
A = Character Type.
P = Condensed decimal Type (PACK).
S = Extended decimal Type.
nn is the variable figures or characters number.
dd is the decimals number.

If the forms values are in a DS variable, then they are showed as follow :

DS:(( Name 1:Fnn.dd)( Name 2:Fnn.dd)…)

&VAR…

Variables including values to assign to forms are over.

Variables number and variables order match with what &PARM1 describes.