[Tasos]

Καλησπέρα σε όλους!

Η δική μου πρόταση:

Δημιουργούμε ένα ερώτημα με το όνομα: QryStrDates

SELECT [ΕΙΣΟΔΟΣ ΕΞΟΔΟΣ].ID, 
[ΕΙΣΟΔΟΣ ΕΞΟΔΟΣ].ΚωδΑσθενούς, 
[ΕΙΣΟΔΟΣ ΕΞΟΔΟΣ].είσοδος, 
[ΕΙΣΟΔΟΣ ΕΞΟΔΟΣ].έξοδος, 
[ΕΙΣΟΔΟΣ ΕΞΟΔΟΣ].Νοσηλευόμενος, 
[Δώσε Ημερομηνία από (Μορφή: MMEE)] AS StartDate, 
[Δώσε Ημερομηνία μέχρι  (Μορφή: MMEE)] AS EndDate
FROM [ΕΙΣΟΔΟΣ ΕΞΟΔΟΣ];

Κατόπιν δημιουργούμε μία Έκθεση χρησιμοποιώντας τον Οδηγό Εκθέσεων βασισμένο στον
πίνακα "ΕΙΣΟΔΟΣ ΕΞΟΔΟΣ" όπου προσθέτουμε ένα επίπεδο ομαδοποίησης με βάση το πεδίο
"είσοδος".
Αφού δημιουργήσουμε την Έκθεση, περνάμε σε Προβολή σχεδίασης και στο πεδίο "Προέλευση Εγγραφών" της Έκθεσης περνάμε το παρακάτω:

SELECT QryStrDates.ID, 
QryStrDates.ΚωδΑσθενούς, 
QryStrDates.είσοδος, 
QryStrDates.έξοδος, 
QryStrDates.Νοσηλευόμενος
FROM QryStrDates
WHERE (((Month([είσοδος]))>=Left([StartDate],2) And (Month([είσοδος]))<=Left([EndDate],2)) 
AND ((Right(Year([είσοδος]),2))>=Right([StartDate],2) And (Right(Year([είσοδος]),2))<=Right([EndDate],2))) 
OR 
(((QryStrDates.StartDate) Is Null) AND ((QryStrDates.EndDate) Is Null));

Επιτρέπει την παράκαμψη των παραμέτρων Από - Έως πατώντας απλά Enter σε περίπτωση που θέλουμε να εμφανίσουμε όλα τα δεδομένα.
Η μορφοποίηση των τιμών στις παραμέτρους θα πρέπει να είναι "ΜΜΕΕ" ( για περισσότερη ευκολία κατά την πληκτρολόγηση αλλά και ανεξαρτησία από τη μορφοποίηση της ημερομηνίας του υπολογιστή ).

Φιλικά

Τάσος