Διπλές εγγραφές σε Ερώτημα και Έκθεση

[Thanosp]

Καλησπέρα σε ολους
Κώστα πρόσθεσα επι πλέον το πεδίο με το κωδικό τεμαχ, επιλέγοντας προσεκτικά τον κωδικό που είναι και συγχρόνως εξοφλημένος ή οχι κάνει την εγγραφή εκτύπωση, με μικρά προβληματάκια που ισως βοηθήσει κάποιος!!!! προσοχή στα κενά...
θανάσης

[ΚΩΣΤΑΣ2]

Καλησπέρα Θανάση και στο FORUM
Ευχαριστώ πολύ με το ενδιαφέρον σου για το πρόβλημα μου.
Μου έδωσες όμως ιδέες Στο επισυναπτόμενο
Έκανα κάποιες αλλαγές στα ερωτήματα και στη forma και ένα ένα τεμάχιο εξοφλείται και η εκτύπωση είναι σωστή όμως συναντώ το πρόβλημα με όλα τα τεμάχια εκεί δεν περνώ εκτύπωση εάν δεν βάλω στο κάθε ένα τεμάχιο ["DATEOUT"] στη forma που ανοίγει με το κουμπί επιλογή .
Σκέπτομαι στο κουμπί επιλογής της φόρμας θα ενημερώνω τη δεύτερη forma το [DATEOUT]από το [HMEPOM] κοιτάω κάποια παραδείγματα και από το FORUM

[ασχετος]

Κώστα καλησπέρα,

Τροποποίησα λίγο τον κώδικα του Θανάση. Στο button 'Επιλογή' στο συμβάν On Click από το πτυσσόμενο πλαίσιο επέλεξε Event Procedure και πρόσθεσε τον παρακάτω κώδικα

Dim msg As String

If IsNull(Me.ΚΩΔ_ΠΕΛ) = True Then
msg = MsgBox("Σε αυτήν την εγγραφή η τιμή στο πεδίο 'Πελάτης' είναι ΚΕΝΗ", _
vbInformation, "Η Εφαρμογή σας ενημερώνει ότι..")
Exit Sub
Else
DoCmd.OpenForm "ΚΙΝΗΣΕΙΣ17/8", _
WhereCondition:="ΚΩΔ_ΠΕΛ=" & Me.ΚΩΔ_ΠΕΛ
End If

Με τον κώδικα αυτόν όταν είναι ΚΩΔ_ΠΕΛ = Null εμφανίζετε μόνο το μήνυμα

[ΚΩΣΤΑΣ2]

Κώστα καλησπέρα και εσένα
Έβαλα τον κώδικα αλλά δημιουργεί διπλοτίμες και δεν δουλεύει στην έκθεση για περισσότερες διαλογές τεμαχίων
Πάντως το προσπαθώ και σε ευχαριστώ πολύ