Tres urgent!! Construction d'un état avec SQL (pas débutant)Résolu

Question

Bonjour a tous!!
Je viens ici en d&#233;sespoire de cause ou presque. Voila le topo:

Je dois cr&#233;er un &#233;tat. Bon jusque la &#231;a va ;-)
J'ai cr&#233;&#233; une commande avec VB qui alimente mon &#233;tat.
Le truc c'est que dans mon &#233;tat je voudrais faire apparaitre le resultat d'un calcul. Jusque la &#231;a va aussi :-D
je modiufie ma commande et &#231;a roule
Maintenant, je ne voudrais afficher le resultat que s'il est sup&#233;rieur &#224; 0. Et la &#231;a va beaucoup moins bien... :'(

ValeurC = valeurA - valeurB si valeurC > 0

Je vois pas du tout comment faire. En SQL, je pense pas que &#231;a soit possible (du moins pas avec VB6.0). 
Je voudrais donc savoir comment je pourrais faire pour obtenir le resultat que je souhaite. Plutot une requete SQL ou petit bout de code VB qui me ferait &#231;a bien? Ou alors est ce qu'il est possible de faire les calcules directement sur l'&#233;tat en mettant le calcul dans une zone .

Mais je vois pas du tout comment le mettre en place. 
Si qqn a une id&#233;e m&#234;me pas top &#231;a me serait super utile...et j'en serais tres reconnaissant 
Merci d'avance

youplaboom69 · Accepted Answer

bon ben voila....
Merci pour ton aide....&#231;a s'appel de l'emulsion intellectuelle collective!!

Donc suiffit de mettre la fermeture du recordset en optimiste et pis &#231;a marche tout seul!!
Bilan:

On fait sa requete, on travail sur les donn&#233;es que l'on veut, et on affiche le resultat
En gros &#231;a donne

'Ouverture de la requete
maSource.maRequete [param]

'les op&#233;rations sur le recordset
while not ....
    OPERATIONS
Wend

'Affichage dans le report
MonRapport.show


Et voila c'est tout con en fait!! C'est trop facil le VB 
Et moi qui voulait me prendre la tete avec des requetes SQL...j'ai m&#234;me envisag&#233; de faire un Trigger....Alala

PtitGrumo · Answer

Petite question avant de te r&#233;pondre!

Si tu ram&#232;ne un espace &#224; la place du z&#233;ro cela t'irai?
ainsi tu affiche [Espace] quand tu a '0' donc tu affiche en fait rien!

Si cela te va alors tourne toi vers le IIF(valeurC=0," ",ValeurC)

Sinon, en quoi est fait ton Etat? en crystal report?

A tout

PtitGrumo

youplaboom69 · Answer

Bon des precisions....
C'est parti 

Je travail avec VB 6.0 SP5. Mon etat se construit a partir d'une commande SQL (qui a une commande fille ms &#231;a c'est du d&#233;tail). C'est pas du crystal report (je crois pas que &#231;a soit possible avec VB 6). Dans mon code, pour afficher l'&#233;tat en question je fais: 

 sourceDeDonn&#233;es.infoEmploye mdlCommun.idExercice
dtrListeEmploye.Show

en sachant que:
   - sourceDeDonn&#233;es: ben c'est ma source des donn&#233;es (la connexion en gros)
   - infoEmploye : c'est la commande SQL
   - mdlCommun.idExercice: c'est un parametre pass&#233; a ma requete
   - dtrListeEmploye: c'est mon datareport

Je me demande si c'est pas possible d'ajouter la v&#233;rification dans le code en faisant un truc du style

While  not rsinfoEmploye.EOF (le recordset associ&#233; a la commande)
   valeurC = valeurA - valeurB
   if (valeurC < 0) then
      valeurC = 0
   end if
Wend

'ajouter la valeurC dans l'&#233;tat
dtrListeEmploye.maZone.text = valeurC

Mais &#231;a marche pas...j'ai pas acces a dtrListeEmploye.maZone...
L'autre solution c'est de travailler la requete SQL mais la &#231;a devient galere...
Et puis tant qu'a faire si je peux avoir mon "0" c'est aussi bien ms je me contenterai d'un " " sans que &#231;a ne me cause le moindre soucis moral 
Merci pour tout

youplaboom69 · Answer

Attention j'ai une id&#233;e....je sais pas si c'est possible....

Si entre le moment ou je remplit le recordset et le moment ou je rentre les valeurs dans le report, je changeais les valeurs de certains champs....
En gros si je fais &#231;a:

sourceDeDonn&#233;es.infoEmploye mdlCommun.idExercice
    
    While Not sourceDeDonn&#233;es.rsinfoEmploye.EOF
        valeurC = sourceDeDonn&#233;es.rsinfoEmploye.Fields("valeurA") - sourceDeDonn&#233;es.rsinfoEmploye.Fields("valeurA")
        If (valeurC < 0) Then
            sourceDeDonn&#233;es.rsinfoEmploye.Fields("valeurC") = 0
        End If
        sourceDeDonn&#233;es.rsinfoEmploye.MoveNext
    Wend
   dtrListeEmploye.Show

Moi &#231;a me parait plus accessible en tout cas...
Reste a savoir si je peux modifier les valeurs du recordset....je crois que c'est possible ms il faut que je cherche comment....si qqn peut m'aider a ce niveau la??

*je vais peut etre m'en sortir....yahouuu*

Tres urgent!! Construction d'un état avec SQL (pas débutant)

4 réponses

Discussions similaires