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

[ΚΩΣΤΑΣ2]

Καλησπέρα Θανάση και στο FORUM
ευχαριστώ για το ενδιαφέρον Τώρα στο θέμα η εντολή διαγραφής μου διαγραφή την εγγραφή και στα ερωτήματα
η βάση είναι ένα τμήμα της όλης τα ερωτήματα τα χρειάζομαι εάν εκτελέσω τη διαγραφή θα διαγράψω την προηγούμενη και θα χαλάσει το πεδίο [autonum] έτσι θα εκδίδω διπλή απόδειξη.
Eγώ προσανατολίζομαι σε μια forma επιλογής όπως στο επισυναπτόμενο (δεν είναι και δεσμευτικό όποια πρόταση είναι καλοδεχούμενη)
Εάν έχει ημερομηνία το [CODE1] τότε να εκτελείται η αναφορά και τα ερώτημα ανάλογα

[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 εμφανίζετε μόνο το μήνυμα