1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45
|
variantJson est un Variant
variantJson = JSONVersVariant(jsonFormulaire) //jsonFormulaire est la json ci-dessus
largeurChamp est un réel = Formulaire..Largeur - 16 //8 pixels de marge de chaque coté du champ
posy est un entier = 0 //position en y du champ
nomChamp est une chaîne
indAjoute est un entier
//8 pixels entre chaque champ en hauteur
SI variantJson.formulaire..Occurrence > 0 ALORS
POUR i = 1 À variantJson.formulaire..Occurrence
posy += 8 //8pixels entre chaque champ
nomChamp = variantJson.formulaire[i].nom_champ
SELON variantJson.formulaire[i].type
CAS "libelle"
ChampClone(LIB_Ori,nomChamp,8,posy)
{nomChamp,indChamp}..CadrageHorizontal = chCentre
CAS "saisie"
ChampClone(SAI_Ori,nomChamp,8,posy)
{nomChamp,indChamp}..CadrageHorizontal = chGauche
CAS "selecteur"
//typeChamp = {nomChamp,indChamp}..Type
ChampClone(SEL_Ori,nomChamp,8,posy)
SI variantJson.formulaire[i].options..Occurrence > 0 ALORS
POUR j = 1 À variantJson.formulaire[i].options..Occurrence
SI j = 1 ALORS
{nomChamp,indChamp}[1]..Libellé = variantJson.formulaire[i].options[j].libelle
{nomChamp,indChamp}[1]..ValeurRenvoyée = variantJson.formulaire[i].options[j].valeur_retourne
SINON
indAjoute = SélecteurAjoute({nomChamp,indChamp},variantJson.formulaire[i].options[j].libelle)
{nomChamp,indChamp}[indAjoute]..ValeurRenvoyée = variantJson.formulaire[i].options[j].valeur_retourne
FIN
FIN
FIN
AUTRE CAS
FIN
{nomChamp,indChamp}..Largeur = largeurChamp
{nomChamp,indChamp}..Libellé = variantJson.formulaire[i].libelle
{nomChamp,indChamp}..Ancrage = ancreLargeur
{nomChamp,indChamp}..Visible = Vrai
posy+={nomChamp,indChamp}..Hauteur
FIN
FIN |
Partager