[ Φόρμες ] Άνοιγμα δεύτερης φόρμας με υποφόρμα και πολλαπλά κριτήρια

[jim67]

Καλημέρα
Για πολλοστή φορά ευχαριστώ προκαταβολικά για τον κόπο και το έργο σας
Είναι τεράστια η προσφορά σας και αρκετές φορές μοναδική.

Στο θέμα μου:
Έχω μια φόρμα "Getting Started" στην οποία έχω ένα πλαίσιο λίστας. "UncompletedRecordsListBox". Σ' αυτό το πλαίσιο ανιχνεύω μέσα από ένα ερώτημα, συγκεκριμένες εγγραφές (που δηλώνονται μη ολοκληρωμένες). Μέχρι εκεί καλά.

Μέσα απ' αυτό το πλαίσιο θέλω να μεταβαίνω (με διπλό κλικ) στην αντίστοιχη εγγραφή, (στο συγκεκριμένο όνομα και ημερ/νία παραλαβής). Όρισα με διπλό κλικ να ανοίγει μία κυρίως φόρμα "Patient Details" που περιέχει μία συνδεδεμένη υποφόρμα "Histology Subform". Στην πρώτη υπάρχουν τα ονόματα των ασθενών ενώ στην υποφόρμα οι ημερ/νίες παραλαβής των δειγμάτων.

Το πρόβλημα που προκύπτει είναι ότι ενώ μπορώ και ορίζω τη "Συνθήκη Όπου:" στο άνοιγμα της κυρίως φόρμας, (και έτσι μεταβαίνει στον συγκεκριμένο ασθενή) ψάχνω να βρω τρόπο να μεταβαίνω και στην συγκεκριμένη ημερομηνία στην υποφόρμα.

Προσπάθησα να βάλω δεύτερο κριτήριο στην "Συνθήκη Όπου:" στην ενσωματωμένη μακροεντολή αλλά απ' ότι κατάλαβα ή κάπου κάνω λάθος στη σύνταξη της ή το πεδίο δεν δέχεται πολλαπλά κριτήρια. Με VBA επίσης δεν βρήκα άκρη αν και αρκετά αρχάριος.

Μπορεί κάποιος να βοηθήσει;
(για κατανόηση του προβλήματος επισυνάπτω τη βάση)
Δημήτρης

[kapetang]

Καλό βράδυ

Δημήτρη, δες το συνημμένο αρχείο. Πρόσθεσα:

1) Τη συνάρτηση Protocoll στο module1, για τον ορισμό τιμής στη γενική μεταβλητή iProtocoll.

2) Μια ενέργεια στην ενσωματωμένη μακροεντολή για την εκτέλεση της συνάρτησης.

3) Κώδικα στο συμβάν Load της υποφόρμας.

Φιλικά/Γιώργος

[jim67]

Αγαπητέ Γιώργο
Ευχαριστώ για τη γρήγορη απάντηση
Παρόλα αυτά το πρόβλημα δεν λύθηκε.

Συγνώμη αν δεν έγινα κατανοητός: Το διπλό κλικ στην εγγραφή μέσα στο πλαίσιο λίστας (UncompletedRecordsListBox) θα πρέπει να οδηγεί στον συγκεκριμένο ασθενή αλλά και να επιλέγει την εγγραφή με τη συγκεκριμένη ημερομηνία παραλαβής (πεδίο HistologyReceivedDate), πράγμα που δεν γίνεται με τη λύση που μου προτείνεις.
Για παράδειγμα με διπλό κλικ στο πλαίσιο λίστας στον ασθενή LastName2 FirstName2 (7/8/14) θα έπρεπε να μεταβαίνει στον αντίστοιχο ασθενή και στην εγγραφή με ημερομηνία παραλαβής (πεδίο HistologyReceivedDate)= 7/8/14 και όχι στις 23/8/2014. Το ίδιο γίνεται και σε άλλες εγγραφές που πρόσθεσα.

Σημείωση: Δεν το κάνει πάντα, μόνο μετά από διπλό κλικ για μετάβαση σε άλλους ασθενείς.

Φιλικά
Δημήτρης

[kapetang]

Καλημέρα

Αντί να ταυτίσω την ημερομηνία, σκέφτηκα να ταυτίσω το πρωτόκολλο.

Τώρα παρατηρώ για τον ίδιο άρρωστο και ίδια ημερομηνία έχουμε διαφορετικά πρωτόκολλα (πολλές εγγραφές με ίδια ημερομηνία).

Τι ακριβώς συμβαίνει;

Ποιο πεδίο πρέπει να γίνεται ίσο με την ημερομηνία (ή το πρωτόκολλο) της προέλευσης της δευτερεύουσας φόρμας.

Γιώργος

[jim67]

Καλημέρα
Συγνώμη και πάλι αν σε μπέρδεψα με τις ημερομηνίες - Μάλλον και γω μπερδεύτηκα

Λοιπόν: Ένας ασθενής μπορεί να έχει πολλές ιστολογικές εκθέσεις διαφορετικής ή ίδιας ημερομηνίας αλλά σε κάθε περίπτωση η κάθε ιστολ. έκθεση έχει διαφορετικό αρ. πρωτοκόλλου. Προφανώς ο συνδυασμός των τριών ανωτέρω είναι μοναδικός.
Το πλαίσιο λίστας που έφτιαξα εμφανίζει τις μη ολοκληρωμένες ιστολογικές εκθέσεις που μένουν σε εκκρεμότητα με συνδυασμό ονόματος και ημερομηνίας (για να φαίνεται η παλαιότητα) . Προσπαθώ λοιπόν με διπλό κλικ να μεταβαίνω στην φόρμα με τον αντίστοιχο ασθενή αλλά και στην υποφόρμα στην αντίστοιχη ιστολογική έκθεση που είναι σε εκκρεμότητα.

Σύμφωνα με τα παραπάνω η ταύτιση στη δευτερεύουσα φόρμα πρέπει να αφορά το πεδίο του πρωτοκόλλου (HistologyProtocolNumber) όπως και καλά το σκέφτηκες, αλλά ακόμη κι έτσι δεν βλέπω να λειτουργεί η ταύτιση.
Ευχαριστώ για το χρόνο σου
Φιλικά Δημήτρης

[kapetang]

Καλησπέρα

Δοκίμασε τη συνημμένη ΒΔ.

Στην ενσωματωμένη μακροεντολή άλλαξα τη θέση της ενέργειας RunCode.

Φιλικά/Γιώργος

[jim67]

Καλησπέρα
Ναι, δούλεψε όπως ακριβώς έπρεπε
Χίλια ευχαριστώ και πάλι
Δημήτρης

ΥΓ. Για όποιον μπορεί να ενδιαφέρει, επειδή το έψαξα λίγο (άδικα στην περίπτωσή μου βέβαια) βρήκα ότι στην ενσωματωμένη εντολή Άνοιγμα φόρμας" στο πεδίο Συνθήκη "Όπου" = μπορούν να μπουν πολλαπλά κριτήρια υπό ορισμένες προϋποθέσεις, συνδεδεμένα με And και με περιορισμό στη σύνταξη έως 256 χαρακτήρες. Οτιδήποτε παραπάνω μόνο με κώδικα (Access 2010).