Εμφάνιση ενός μόνο μηνύματος
  #1  
Παλιά 07-11-17, 19:17
dimitrisp Ο χρήστης dimitrisp δεν είναι συνδεδεμένος
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-07-2014
Περιοχή: Πάτρα
Μηνύματα: 385
Προεπιλογή Αυτόματη απόδοση τιμής "False" με κριτήρια.

Γειά σας.

Στη δειγματική βάση που ανεβάζω, εμπεριέχεται μια Φόρμα, η [tblP] (Κύρια και δευτερεύουσα, με σχέση ένα προς πολλά).

Στην κύρια Φόρμα υπάρχει πεδίο (ENERGOSP), το οποίο δείχνει αν η καθεμία καταχώρηση είναι ενεργή ή όχι.

Στη δευτερεύουσα Φόρμα υπάρχει επίσης ίδιο πεδίο (ISXIS),το οποίο δείχνει αν η καθεμία καταχώρηση ανά γραμμή είναι ενεργή ή όχι.

Με τη φόρτωση της Φόρμας [tblP], έχω τοποθετήσει τον κώδικα [CurrentDb.Execute ("UPDATE qryUnCheck SET qryUnCheck.[ISXIS] = False")],
προκειμένου, σε όσες εκ των εγγραφών η ημερομηνία είναι μικρότερη από την τρέχουσα, τότε το πεδίο [ISXIS] να παίρνει τιμή False.

Ως εδώ όλα καλά... Ο κώδικας λειτουργεί κανονικά.

Όμως, ήθελα συνακόλουθα, όταν όλες οι εγγραφές στη δευτερεύουσα φόρμα [tblA] σε κάποιο [IDP] είναι False τότε η τιμή του πεδίου
[ENERGOSP] να γίνεται αυτόματα και αυτή False.
Για τούτο δημιούργησα το κουμπί εντολής [cmdUpdate] στο οποίο έχω τοποθετήσει κώδικα.( τον οποίο δημιούργησε ο Φίλος του Forum Γιώργος
(Kapetang) για παρόμοιο σκοπό).

Ωστόσο, ο κώδικας δε λειτουργεί για όλο το φάσμα των εγγραφών, δε λειτουργεί μαζικά. Διαπίστωσα ότι, ύστερα από αρκετές δοκιμές,
δίνει την τιμή False στο πεδίο [ENERGOSP] (εφόσον πληρούνται τα προαναφερόμενα κριτήρια) μόνον της εγγραφής η οποία εμφανίζεται
εκείνη τη στιγμή στη φόρμα.

Κατόπιν τούτων, Θα ήθελα τη βοήθειά σας στο ακόλουθο ερώτημα:
Μετά την εκτέλεση του κώδικα με τη φόρτωση της Φόρμας, στις εγγραφές (για καθένα IDP) όπου όλα τα πεδία [ISXIS]
(της δευτερεύουσας Φόρμας) είναι False τότε αυτομάτως και το πεδίο της κύριας Φόρμας " ENERGOSP" να παίρνει τιμή False
(σε όλες τις εγγραφές που πληρούν τα τεθέντα κριτήρια).


Σας ευχαριστώ εκ των προτέρων.
Συνημμένα Αρχεία
Τύπος Αρχείου: zip UpdateUnChecks.zip (51,8 KB, 4 εμφανίσεις)

Τελευταία επεξεργασία από το χρήστη dimitrisp : 07-11-17 στις 19:55.
Απάντηση με παράθεση