Discussion :

[SuperBlaireau]

Bonjour,

J'ai un état qui contient un sous-état "SF2" qui contient un champ [SommeCachée].

Comment traduire dans un VraiFaux : "Si SF2 ne contient aucun enregistrement"
J'ai essayé :

Code :

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

=VraiFaux([SF2]=Null;"ConditionVrai";"ConditionFaux)

ou encore

Code :

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

=VraiFaux(IsNull([SF2]);"ConditionVrai";"ConditionFaux)

Mais ça ne passe pas...

Des idées ?

[argyronet]

Bonjour,

Dans un état, tu as un événement NoData()

Code :

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

1
2
3
4
Private Sub Report_NoData(Cancel As Integer)
   Msgbox "Pas de données !!!", 48
   Cancel= True
End Sub

Argy

[SuperBlaireau]

Merci argy mais dans mon cas cet évènement ne m'aide pas. Voici ma situation :

J'ai un état qui liste les travaux en cours, avec le coût total. Dans cet état, dans la partie détails, j'ai un sous-état qui liste les paiements et acomptes versé pour chaque travail.

Exemple schématisé:

---Detail Etat principal-------------------------------------------------------------------
Echafaudages Coût 10'000.- Frs Total Payé 3000.- Solde 7'000.-
----------Sous-etat----------------------------------------------------
--------------Detail sous-etat-------------------------------------------
Acompte 1 : 1000 Frs
Acompte 2 : 2000 Frs


Mon problème est que pour certains travaux je n'ai pas encore de paiements, du coup j'ai #Erreur qui m'apparait dans le champ total et solde. Je souhaiterais mettre "0" si il n'y a pas de donnée. Est-ce possible ?

[argyronet]

Bien oui...
Tu mets un champ caché comme expliqué dans ce poste...

Tu y met un 0 ou un n'importe quoi d'autre...

Argy

[SuperBlaireau]

Tu as raison Argy, c'est exactement ce qu'il me fallait ! Merci bien !

[@rkane]

tu crees un CHAMP-TEXTE non visible sur le detail de ton etat, et tu colles ce code dans ton etat :

Code :

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

1
2
3
4
5
6
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
    If Me.COMPTE-RENDU.Report.HasData = 0 Then
        Me.CHAMP-TEXTE.Visible = Not (Me.COMPTE-RENDU.Report.HasData)
        Me.COMPTE-RENDU.Visible = Me.COMPTE-RENDU.Report.HasData
    End If
End Sub

Et quand tu lances ton impression d'état, apparait le champ de texte initialement masqué avec l'info que tu y auras precedemment inscrit...
Style "aucun enregistrement aujourd'hui".
Bon courage.