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
| //Supprime les champs de la Zone Répété1
ZoneRépétéeSupprimeTout(ZR_ZoneRépétée1)
//Ajoute 1 Ligne à la ZoneRépété1
ZoneRépétéeAjouteLigne(ZR_ZoneRépétée1)
//Ajout du titre
grTitre(ZR_ZoneRépétée1[1].GRF_01,"Réserve",grEnHaut)
i est un entier
//Ajout des valeurs dans la Table Résultats
TableAjoute(TABLE_RESULTATS,"06969"+TAB+"TABLES"+TAB+"55"+TAB+"16776960")
TableAjoute(TABLE_RESULTATS,"06970"+TAB+"CHAISES"+TAB+"75"+TAB+"153")
TableAjoute(TABLE_RESULTATS,"06971"+TAB+"CANAPES"+TAB+"85"+TAB+"16777215")
TableAjoute(TABLE_RESULTATS,"06972"+TAB+"MEUBLES"+TAB+"45"+TAB+"65535")
//Lecture de la table RESULTATS
POUR TOUTE LIGNE DE TABLE_RESULTATS
i++
SELON TABLE_RESULTATS[i][1]
CAS TABLE_RESULTATS[i][1]
//Assigne une Couleur au Graphe
grCouleurSérie(ZR_ZoneRépétée1[1].GRF_01,i, TABLE_RESULTATS[i][4])
FIN
//Ajout des données
grSourceSérie(ZR_ZoneRépétée1[1].GRF_01, i, grProgrammation, TABLE_RESULTATS[i][3])
//Ajout de la source des Etiquettes
grEtiquetteCatégorie(ZR_ZoneRépétée1[1].GRF_01,i,TABLE_RESULTATS[i][2])
FIN
grDessine(ZR_ZoneRépétée1[1].GRF_01) |
Partager