afficher tableau en fin de doc calculé dans le corps

**plm222** · 03/05/2012, 07h28

Bonjour le forum,
j'ai besoin d'afficher un bloc à la fin d'un document ... soit fin de doc ou itération ??
Par contre j'ai fais un requête dans le corps (avant impression) qui incrément des variables tableau.
C'est ce fameux tableau que je souhaite afficher en fin de document.
qqun a une idée.
voici mon code du corps.
A l'avance merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
 
SEM est un entier
RECUPDATE est une Date=Droite(Date_evenement,4)+Milieu(Date_evenement,4,2)+Gauche(Date_evenement,2)
SEM=DateVersNuméroDeSemaine(RECUPDATE)
 
 
STInfos est une structure
	sNumero est une chaîne
	nMontant est un numérique
	SEM est une chaîne
FIN
 
gtabResultat est un tableau de 0 STInfos
 
 
nInd est un numérique
elmt est un STInfos 
 
nInd = TableauCherche(gtabResultat,tcLinéaire,"SEM",SEM)
SI nInd > 0 ALORS
	gtabResultat[nInd]:nMontant += Total
SINON
	elmt:nMontant=Total
	elmt:sNumero=SEM
	TableauAjoute(gtabResultat,elmt)	
FIN

**frenchsting** · 03/05/2012, 08h15

Pour moi la solution est l'état interne. Par contre, il va falloir trouver la bonne source de donnée (zone mémoire, fichier texte ou champ table caché sur la fenêtre appelante par exemple), que tu mets en fin de document puisque ton calcul se fait dans le corps.

**wimbish** · 03/05/2012, 09h39

Bonjour,
Tu peux utiliser les blocs d'itération avec la fonction iimprimeBloc()

Dans ton cas, je le présenterais comme çà:
semaine Lundi mardi mercredi etc.... "Bloc Entête"
22 xxx.xx xxx.xxx xxxx.xx "Bloc Détail"
23 xxx.xx xxx.xxx xxxx.xx "Bloc Détail"
etc..

Dans le code "Avant impression de fin de document
1-Tu dois trier ton tableau par N° de semaine
2- imprime Le bloc Entête
3- Parcours le tableau :
pour chaque N° de semaine : imprimer un bloc "Détail"
pour chaque valeur de Jour de ce N° de Semaine, affecter les valeurs au champs correspondant

**plm222** · 03/05/2012, 16h15

merci à vous mais je suis vraiment débutant, donc si un de vous peut m'expliquer:
grace au forum on a générer un tableau qui se nomme "gtabResultat"
Ce code ne me gere pas d'erreur lors de l'execution de mon état donc je suppose que des valeurs "mémoires" sont générée queleque part.
Je pense donc qu'il me manque juste la procédure pour faire afficher ce tableau en fin de document.
une solution toute simple pour vous je pense mais qui est tres laborieuse pour moi.
si je peux avoir des explications plus détaillées , ce serait super....
C'est en forgeant que l'on devient forgeron....
merci à vous

**frenchsting** · 03/05/2012, 16h53

.Je t'explicite mon idée. Wimbish fera la sienne

Tu as ton tableau qui est créé par ton code.
Sur la fenêtre appelante (celle qui lance ton état). Tu crées un tableau à 3 colonnes. Tu le laisses visible pour le moment (tu le cacheras quand tout sera ok).
Tu remplis le tableau avec ce code que tu mets à la fin de ton code de remplissage :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
pour i = 1 _a_ tableauoccurence(gtabResultat)
tableajoute(FenAppelante.TableauCree, gtabResultat:sNumero[i] + tab + gtabResultat:nMontant[i] + tab + gtabResultat:SEM[i])
fin

Ensuite, tu crées un état (Appelé par ex Etat_InterneTableau). Ta source de données est le tableau de la fenêtre.
Sur ton état principal, tu ajoutes un champ état interne (qui sera Etat_InterneTableau).
Le tour est joué...

Notes :
- Mon code de remplissage est à vérifier
- On peut optimiser en "mélangeant" les 2 codes.

**wimbish** · 03/05/2012, 17h14

Re,
Je viens de lire ton code et ce dernier ne peux malheureusement pas fonctionner.
Tes déclarations de variables (structure et tableau) doivent êtres dans l'initialisation de l'état et pas dans le corps.
De plus la définition de ton tableau à changé (voir ton post précédent).

A priori, tu n'est pas encore à l'aise avec la manipulation de ces objets.

La méthode de frenchsting est bonne (+1) et si la manipulation des tables te semble plus simple, je te conseil de créer directement une table et de na pas passer par un tableau.

Si tu souhaites poursuivre avec les tableaux et les blocs d'itération, je reste à ta dispo.

**plm222** · 03/05/2012, 18h24

MERCI wimbish, je vais essayé la méthode frenchsting...
Donc quand tu dis "Sur la fenêtre appelante (celle qui lance ton état). Tu crées un tableau à 3 colonnes", pour moi, celle qui va appeler mon résultat du tableau c'est bien ma fenetre " fin de document"
es-tu d'accord?

**wimbish** · 04/05/2012, 08h56

Non,
Ne confond pas Etat et Fenêtre.
Reprend le guide d’auto formation pour éclaircir les notions de base de Windev.

Ton programme contient des fenêtres, de l'une d'elle en cliquant sur un bouton, tu lance ton état.
Tu peux donc utiliser les champs de cette fenêtre (et donc une table) dans le code de ton état.

**frenchsting** · 04/05/2012, 09h02

Envoyé par plm222

MERCI wimbish, je vais essayé la méthode frenchsting...
Donc quand tu dis "Sur la fenêtre appelante (celle qui lance ton état). Tu crées un tableau à 3 colonnes", pour moi, celle qui va appeler mon résultat du tableau c'est bien ma fenetre " fin de document"
es-tu d'accord?

Je plussoie Wimbish. Tu confonds fenêtre (avec les boutons) et état (qui doit sortir sur papier).

Ton état ne se lance pas tout seul. Tu dois faire une manip depuis une fenêtre de ton projet (clic sur un bouton, choix dans un menu, etc...) afin de l'ouvrir. Tu dois avoir un code du style

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
iconfigure() // choix de l'imprimante -> optionnel
iapercu(i100) // optionnel mais en mode test c'est indispensable
iimprimeetat(MonEtat) // c'est là que ton état est créé

**plm222** · 05/05/2012, 08h47

Bonjour,
ce qui lance mon état est "aperçu avant écran" mais cette fonction est intégrée dans mon logiciel CegidPMI.
En fait Cegid PMI à un générateur intégré mais j'ai besoin du logiciel Etat et requête pour faire mes mise en forme, mes requête qui sont impossibles a faire dans le GE.
mon GE à une case qui dit d'aller chercher le fichier xxx.wde et c'est là que j'utilise états et requêtes" qui lui même va rechercher le fichier txt qui est généré par mon GE intégré.
Je ne peux donc pas intervenir sur le code de lancement ...

**frenchsting** · 07/05/2012, 08h20

Je n'ai jamais utilisé "états et requêtes"...

Question :
Est-ce que tu peux créer des états internes ?

**plm222** · 07/05/2012, 11h07

Je pense que oui,
dans la documentation, ils parlent d'états internes qui peuvent imprimés des états secondaires grace à iImprimeEtat(Etat)...

**frenchsting** · 07/05/2012, 12h23

Dans ce cas, ma solution reste possible, Il n'y aura pas de table, tu travailleras
juste avec un ton tableau gtabResultat.

Quelle source de données peut avoir un état ?

**plm222** · 08/05/2012, 06h51

Bonjour, ma source de données est dans le corps code qui est en début de post:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
SEM est un entier
RECUPDATE est une Date=Droite(Date_evenement,4)+Milieu(Date_evenement,4,2)+Gauche(Date_evenement,2)
SEM=DateVersNuméroDeSemaine(RECUPDATE)
 
 
STInfos est une structure
	sNumero est une chaîne
	nMontant est un numérique
	SEM est une chaîne
FIN
 
gtabResultat est un tableau de 0 STInfos
 
 
nInd est un numérique
elmt est un STInfos 
 
nInd = TableauCherche(gtabResultat,tcLinéaire,"SEM",SEM)
SI nInd > 0 ALORS
	gtabResultat[nInd]:nMontant += Total
SINON
	elmt:nMontant=Total
	elmt:sNumero=SEM
	TableauAjoute(gtabResultat,elmt)	
FIN

je voudrais juste afficher mon tableau dans "fin de doc"
merci à toi

**frenchsting** · 09/05/2012, 10h45

Question stupide. Car "Etats et requêtes", c'est un peu barbant à utiliser :
Peux-tu générer ton tableau sur un autre document ?
Dans ce cas, cela serait plus simple : tu enregistrerais le contenu de ton tableau dans un fichier texte.

**plm222** · 09/05/2012, 23h02

Envoyé par frenchsting

tu enregistrerais le contenu de ton tableau dans un fichier texte.

oui, cela ne me dérange pas , mais comment exporter?
bonne soirée

**frenchsting** · 10/05/2012, 08h17

L'idée de base :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
sContenuFichier est chaine = ""
pour nInd = _A_ Tableauoccurence(gtabResultat)
  sContenuFichier += numeriqueverchaine(gtabResultat[nInd]:nMontant, "07d")
  sContenuFichier += complete(gtabResultat[nInd]:sNumero,5)
  sContenuFichier += RC
FIN
fsauvetexte(frepexe()+"\FichierTableau.txt",sContenuFichier)

Le code est à mettre dans le bloc fin de document.

A tester -> tu dois visualiser ton fichier texte avec un éditeur (notepad++ par ex) comme si c'était ton tableau (sans les traits)

**wimbish** · 10/05/2012, 09h24

Si tu dois refaire qu'un état indépendant et que ce dernier doit repondre au attentes que tu a défini dans ce post :
http://www.developpez.net/forums/d12...tat-requettes/
passer par un fichier texte ne me semble pas être la meilleur solution.
Pour moi, la solution la plus simple reste de stocker les valeurs à utiliser dans le tableau de synthèse dans une variable (tableau ou autre) lors du parcour de la source principale de donnée puis d'utiliser les bloc d'itération pour "afficher" le tableau de synthèse en fin de document.

Comme je te l'ai déjà dit plus haut, le tableau de structure que tu utilisait n'est pas défini au bon endroit et ne peut donc pas être utilisé (défini dans le bloc corps, ce dernier est constamment réinitialisé).
Tu peux le remplacer par un autre type de variable.
Regarde du coté des fonctions iimprimebloc() pour l'affichage tu tableau de synthèse.

**frenchsting** · 10/05/2012, 10h35

Le problème est qu'il est sous "états et requêtes". Le tableau n'est malheureusement pas envisageable.

Je suis ok avec toi pour l'emplacement de l'init du tableau. A voir dans un deuxième temps.

**wimbish** · 10/05/2012, 11h20

Le problème est qu'il est sous "états et requêtes". Le tableau n'est malheureusement pas envisageable.

Avec "Etats et Requêtes" 14 (je ne sais pas pour les autre version) il n'y a pas de pb.

Exemple pour la synthèse d'un fichier AcamExec (Cdcode,CdExec)
Affiche le détail du fichier puis avant la fin de document, le tableau de synthèse:
CdCode, nb de ligne

Ouverture de Etat_etat1:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
STInfos est une structure
	LeCode est une chaîne
	LeNb est un entier
FIN
 
tabTest est un tableau de STInfos

Avant impression de corps:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
npos est un entier
elmt est un STInfos
 
npos =TableauCherche(tabTest,tcLinéaire,"LeCode",ACAMEXEC.CDCODE)
SI npos > 0 ALORS //l'entrée existe dans le tableau, j'ajoute 1 au nb
	tabTest[npos]:LeNb++
SINON
	elmt:LeCode= ACAMEXEC.CDCODE
	elmt:LeNb=1	
	TableauAjoute(tabTest,elmt) //l'entrée n'existe pas dans le tableau, je la créer
FIN

Avant impression fin de document:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
iImprimeBloc(BTitre) //impression du bloc titre
POUR TOUT ELEMENT elmt DE tabTest
CALC_CALCUL1=elmt:LeCode
CALC_CALCUL2=elmt:LeNb
iImprimeBloc(BDetail) //impression des éléments du tableau
FIN

afficher tableau en fin de doc calculé dans le corps

WinDev

Discussions similaires

Partager

Partager