FORMULA |
"Formula"permet de lancer l'éditeur de formule dans une boîte plein écran.
Formula
formule As abrev
formule | Expressionalphanumérique dont le résultat est une formule | |
abrev | abréviationdésignant la boîte |
#- Initilisation de la formule et ouverture del'éditeur de formule
FORMULE = "date$"
FormulaFORMULE As [FML] #- Déclaration des éléments
#- dans la liste des champs et variables
Field [FML] 4, "", "ZMOTTBX","Table ZMOTTBX", "", ""
Field [FML] 4, "ZMOTTBX","ZMOTTBX.YITMREF_0", "Référence article", "","[F:ZMT]YITMREF"
Field [FML] 4, "ZMOTTBX","ZMOTTBX.YITMDES_0", "Descriptionarticle", "", "[F:ZMT]YITMDES"
Field [FML] 4, "ZMOTTBX","ZMOTTBX.YITMSHO_0", "Intitulé abrégé","", "[F:ZMT]YITMSHO"#- Affichage de l'éditeur de formule
Boxact [FML]$SAISIE
#- Saisie dans l'éditeur de formule
Boxinp [FML] Using REPONSE, FORMULE
Case REPONSE
When 1 : Gosub VERIFICATION : Goto FIN
When 46 : Gosub VERIFICATION
When 7 : Goto FIN
When Default :
Endcase
Goto SAISIE#- Vérification de la structure correcte de laformule -#
$VERIFICATION
E = abs(parse(FORMULE))
If E
Errbox errmes$(E)+chr$(13)+errm
Endif
Return$FIN
#- Fermeture de la boite
Boxclr [FML]
Close Local Inpbox [ZI1]
Close Local File [ZI1]
End
"Formula"permet de lancer l'éditeur de formule dans une boîte pleine page. Cette boîteest identifiée par une abréviation que l'on utilisera pour insérer des élémentsdans la liste des champs et variables, afficher, saisir, effacer à l'écran ousupprimer de la mémoire la boîte , avec les instructions
Field, Boxact ,Inpbox, Boxclr etClose Inpbox. Dans cette boîte, 3 boutons sont fixes en bas de la boîte :
bouton OK : permet la sortie de la boîte avec récupération de la formule. bouton ANNULER : permet lasortie de la boîte sans récupération de la formule. bouton VERIFIER: permet de vérifier la formule saisie. Les traitements liés à ces boutons sont à programmer.
Les statutsretournés suite à une saisie dans l'éditeur de formule sont :
Statuts
Casd'emploi
1
retouné par l'activation dubouton "OK"
7
retouné par l'activation dubouton "ANNULER"
46
retouné par l'activation dubouton "VERIFIER"
47
retourné par click sur élémentmère sans élément fille
permet de générés les éléments fille.
L'instruction Close[Local]Inpboxsupprime de la mémoire la boîte ouverte pour l'éditeur de formule par
Formula. Lorsqu'un sous-programme se termine, les boîtes ouvertes par
Formuladans cesous-programme sont refermées comme si l'on avait fait CLose [Local] Inpbox .Pour la saisie d'une formule, il est préférable d'appliquer le type dedonnée AFR sur le champ. Ce type de donnée permet d'accéder à l'éditeur deformule dans le menu contextuel du champ et de contrôler la syntaxe de laformule saisie. 5 tables peuvent être passées en paramètre afin d'alimenter laliste des champs et variables de l'éditeur de formule.
Non disponible en version Web.
Adonix X3(r) L4G |