Create a customized form.
It is possible to specify the form title, and 7 fields with tips.
The SAISI command has to be followed by the SAISIWAIT command.
To work correctly, it is recommanded to have the Firewall activated, and the Launcher program (lncsrv.exe and lncadm.exe) into the list of the allowed apps of the Firewall.
Syntax
|
CHGVAR |
VAR(&CMD) VALUE('SAISI') |
|
|
CHGVAR |
VAR(&PARM1)
VALUE(' [;TIPS="Fields tips"] [;FIELDNAME="Form
title"] |
|
|
CHGVAR |
VAR(&PARM2) VALUE(' ') |
|
|
CALL |
PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 + &PARM2 &RESULT) |
|
|
|
|
|
Parameters
|
Parameters |
|
|
Parm1 |
CAPTIONS : caption for each field, separated by semicolon. Up to 7 fields.
TIPS : tip for each field, when the mouse is over, separated by semicolon. The number of tips has to be the same than the number of captions. Optional.
FIELDNAME : form title. Optional.
|
Example
/* CREATION MENU */
CHGVAR VAR(&CMD) VALUE('SAISI')
CHGVAR VAR(&PARM1) VALUE('CAPTIONS="Nom +
client;Numéro +
client;Entreprise";TIPS="Ecrire le nom +
du client;Ecrire le numéro client;Ecrire +
le nom entreprise";FIELDNAME="Formulaire +
Launcher Office"')
CHGVAR VAR(&PARM2) VALUE(' ')
CALL PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +
&PARM2 &RESULT)
/* ATTENTE CLICK SUR BOUTON */
CHGVAR VAR(&CMD) VALUE('SAISIWAIT')
CHGVAR VAR(&OPT) VALUE(' ')
CHGVAR VAR(&PARM1) VALUE(' ')
CHGVAR VAR(&PARM2) VALUE(' ')
CALL PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +
&PARM2 &RESULT2)
LNCCMD CMD(NOP) PARM1(&RESULT2)
The created form is the following:
When fields are filled, the user click on the "envoyer" button. The filled data are contained into &RESULT2 of the SAISIWAIT command, separated by semicolon.
In this example, &RESULT2 value contains :
SANDERS;123;AURA