Gruppierung im DataReport

skeleton5

Grünschnabel
Hallo Leute,

kenn mich leider bei der gruppierung im Data Report nicht so gut aus!!


Das Problem sieht wie folgt aus:

hab mir eine Tabelle erstellt:

ID ********* Datum ********** Bezeichnung ********Einnahme ******* Ausgabe
1 ************ 01.01.2007 ***** abc ******************* 20,00 € ********* 0,00 €
2 ************ 02.01.2007 ***** abc ******************* 20,00 € ********* 0,00 €
3 ************ 03.01.2007 ***** abc ******************* 20,00 € ********* 0,00 €
usw.

In die Tabelle schreib ich über ADO Code das ganze rein.

daraus möchte ich einen DataReport erstellen, in dem ich nach jedem Tag ein fortlaufende Summe nach allen Einträgen des Tages erhalte. ( möchte das ganze dann Wöchentlich bzw. Mohnatlich ausdrucken)

aussehen sollte das dann so:

ID ******** Datum ******** Bezeichnung ********* Ein ************* Aus
1 ******** 01.01.2007 ***** abc ****************** 20,00 € ********* 0,00 €
2 ******** 01.01.2007 ***** abc ****************** 20,00 € ********* 0,00 €
*******************************************************Tagessalodo = 40,00€

3 ******** 02.01.2007 ***** abc ****************** 20,00 € ********* 0,00 €
4 ******** 02.01.2007 ***** abc ****************** 20,00 € ********* 0,00 €
5 ******** 02.01.2007 ***** abc ****************** 20,00 € ********* 0,00 €
*******************************************************Tagessalodo = 100,00€



Ich hoffe ihr könnt mir helfen!! Ich würde mich sehr freuen!!

Danke im voraus

mfg Skeleton5
 
Bei Datumsrechnungen gibts, wie so oft mehrere Möglichkeiten, aber ich denke für Laien ist es
1. am einfachsten das Datum umzustellen, in Jahr\Monat\Tag, so hat man das Datum als immer grösserwerdende Zahl. Für einen Monat einfach Tag immer zweistellig und dann Tage einfach abschneiden.
2. das Datum in eine `Date` Variable konvertieren und richtig mit Datum und Zeit rechnen...

und hier oder hier nachschauen...

Hilft dir das weiter ?
 
Zuletzt bearbeitet:
Hallo Elvan.

Danke erst mal für deine Hilfe!! :-)

Aber da ich leider noch nicht so der Profi in VB bin weiß ich leider nicht wie ich das auf mein Problem anwenden kann und wie ich das auf den DataReport umsetzen kann.

Ich hab mir die Tabelle zuerst in Access erstellt und hatte mir gedacht ich benötige lediglich eine spezielle Abfrage mit der ich dann im DataReport das ganze so gruppieren kann dass ich die fortlaufende Tagessumme erhalte.

Ich hab bisher nur geschafft dass ich im Deteilbereich die gesamten Datensätze und nach jedem Datensatz die Gesamtsumme ( über eine Abfrage ) ausgeben lasse. Wenn jetzt nach jedem Tag die fortlaufende Summe stehen würde wäre ich sehr froh :confused: verzweiflung

Ich hab schon einige Zeit damit verbracht zu versuchen im DataReport einen Gruppenkopf zu erstellen ( der funktioniert ), jedoch kann ich machen was ich will jedes mal kommt die Meldung "Report sections do not match data source" :mad:

Mein Code:

PHP:
Private Sub Form_Load()

    'Datenbank verbinden
    Set Cn = New ADODB.Connection
    With Cn
        .CursorLocation = adUseClient
        .Mode = adModeShareDenyNone
        .Provider = "Microsoft.Jet.OLEDB.4.0"
        .Properties("Data Source") = App.Path & "\KassabuchDB.mdb"
        .Open
    End With
    
    'Recordset öffnen
    Set Rs = New ADODB.Recordset
    With Rs
        .ActiveConnection = Cn
        .CursorLocation = adUseClient
        .CursorType = adOpenKeyset
        .LockType = adLockOptimistic
         ' Hier die ersten 20 Sätze in absteigender Reihenfolge selectieren
        .Source = "SELECT TOP 12 * FROM Tabelle1 ORDER BY ID DESC"
        .Open
        ' Hier wieder in die richtige Reihenfolge bringen
        .Sort = "ID ASC"
    End With
    
            
    'DataGrid anbinden
    Set Me.DataGrid1.DataSource = Rs
End Sub

Private Sub BerichtÖffnen_Click()
    'Recordset öffnen
    Set Rs = New ADODB.Recordset
    With Rs
        .ActiveConnection = Cn
        .CursorLocation = adUseClient
        .CursorType = adOpenKeyset
        .LockType = adLockOptimistic
         ' in der Abfrage2 hab ich die Gesamtsumme berechnen lassen
        .Source = "SELECT * FROM Tabelle , Abfrage2"
        .Open
    End With

    Set rptKassab.DataSource = Rs
    rptKassab.Show
End Sub

Wäre echt sehr sehr dankbar wenn du mir helfen könntest

Mfg Skeleton5
 
Zuletzt bearbeitet:
Hallo Elvan,

Ich bin schon sehr nah am Ziel.

Ich hab aus der einen Tabelle 2 gemacht:

1. tblDetail
2. tblDatum

danach hab ich mir ne Abfrage mit einer DomSumme erstellt und nach Datum gruppiert.

Jetzt bekomme ich in der qryTagessaldo die fortlaufende summe :)

Aber wenn ich jetzt versuche die qryTagessumme im Datenumgebungsdesigner auszuwählen zeigt der immer nur die Abfrage als stored procedur an. :mad:

mfg Skeleton
 
Zurück