Δημιουργία Δόσεων χωρίς τόκους
 

Καλημέρα στο Φορουμ.

Προσπαθώ να φτιάξω ένα αυτόματο Δοσολόγιο.
Συγκεκριμένα σε έναν ενδιαφερόμενο δίνοντας πχ ενα κεφάλαιο 1000,00 να του δημιουργεί αυτόματα μετά από Επιλογή αριθμού Δόσεων,
το δοσολόγιό του. π.χ 1000,00/39 δοσεις.χωρίς προσαυξήσεις τοκους κλπ.Στην τελευταία δόση, να στρογγυλοποιεί το συνολικό κεφάλαιο ( 1000/39= 25,64 η δόση, αλλα το κεφαλαιο 25,64 * 39 = 999,96 επομένως η λογική μου ειναι 25,64*38 = 974,32 και η τελευταία δόση 25,68 ). Τέλος, μετά την ημερομηνία που θα δοθεί σαν αφετηρία πρώτης δόσης, να συμπληρώνεται αυτόματα και η λήξη της επόμενης ημερομηνίας του κάθε επόμενου μήνα με την λογική της τελευταίας εργάσιμης ημέρας, για κάθε δόση.

Με λίγα λόγια προσπαθώ να πετύχω την μορφή του ΠΙΝΑΚΑ deigma.

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

Φιλικά/Λουκιανός

Λουκιανέ καλημέρα
Δες μια υλοποίηση αυτού που ζητάς στην συνημμένη βάση. Τα δάνεια τα έχω σε ξεχωριστό πίνακα καθώς ένα άτομα μπορεί να έχει περισσότερα δάνεια. Επίσης έχω βάλει κουμπί για καθαρισμό των δόσεων και πεδίο όπου αθροίζει το σύνολο των δόσεων για να κάνεις δοκιμές με διάφορα ποσά και αριθμό δόσεων.
Το μόνο ελλάτωμα είναι πως δεν εντοπίζει αν η τελευταία ημέρα του μήνα είναι αργία. ο κώδικας εξαιρεί μόνο τα Σαββατοκύριακα. Ίσως κάποιος από το Forum να μας δώσει μια λύση σε αυτό. Απ΄ όσο παρακολουθώ έχει απασχολήσει και σε άλλα θέματα από τα οποία κατάλαβα και την χρήση της DateSerial.

Καλησπέρα στην παρέα

Η επισυναπτόμενη ΒΔ αποτελεί μια εξέλιξη της προσέγγισης του Στέλιου (Sarafis).

Εκτός από τα Σαββατοκύριακα λαμβάνονται υπόψη και οι επίσημες αργίες.

Στέλιο σε μια εντολή Insert η ημερομηνία θα πρέπει να δίνεται σε μορφή m/d/yyyy.

Αν τη δώσουμε σε μορφή d/m/yyyy ενδέχεται να γίνει λάθος.

Για παράδειγμα αν η ημερομηνία πρώτης δόσης είναι 1/2/2014 θα αποθηκευτεί ως 2/1/2014 (εναλλάσσεται ο μήνας με την ημέρα) .

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

Καλησπέρα, και Συγγνωμη που καθυστέρησα να σας ευχαριστήσω Στέλιο και Γιώργο για την άμεση βοήθεια σας. Στέλιο ήταν κατανοητή η λύση σου και αρκετά χρήσιμη για να συνεχίσω. Γιώργο σε ευχαριστώ και σένα για την τελειοποίηση σε ότι αφορά τις Αργίες.Δυστυχώς όμως μου βγάζει σφάλμα η βάση που ανέβασες.Επισυνάπτω την αναφορά του σφάλματος. Τα References είναι οκ.

Μετά Τιμής/ Λουκιανός

Καλησπέρα σε όλους
Λουκιανέ μου βγάζει και εμένα σφάλμα ότι περιέχει στοιχεία ελέγχου ή ιδιότητες που δεν αναγνωρίζει η access και θα αγνοηθούν. Αν την αποθηκεύσεις ως access 2003 σταματάει να βγάζει σφάλματα.
Γιώργο χαίρομαι να με διορθώνεις.
Όπως έχω αναφέρει και σε άλλα θέματα, ο κώδικας που γράφω μπορεί να δουλεύει αλλά δεν μου αρέσει ούτε εμένα. Ο δικός σου αντίθετα είναι εξαιρετικός. Παρακολουθώ και μαθαίνω.
Παρότι ασχολούμαι με την Access πάνω από 15 χρόνια,έχοντας φτιάξει δεκάδες βάσεις, παρακολουθώντας εσάς αισθάνομαι αρχάριος.

Καλησπέρα στην παρέα

Λουκιανέ τη ΒΔ τη δημιούργησα σε access 2010.

Δοκίμασα την επισυναπτόμενη σε access 2007 και 2010 και δεν εμφανίζει σφάλμα.

Ελπίζω να μπορέσεις να την ανοίξεις ή να αντιμετωπίσεις το πρόβλημα με τον τρόπο που υπέδειξε ο Στέλιος.

Στη ΒΔ άλλαξα λίγο τις φόρμες και τον κώδικα (η εκτέλεση του ερωτήματος γίνεται με την CurrentDb.Execute).

Φίλε Στέλιο σ’ ευχαριστώ.

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

Καλημέρα σε όλους,

Στέλιο αν εσύ με 15 χρόνια εμπειρίας, κάνεις τέτοιες διαπιστώσεις, εγώ ο πραγματικά αρχάριος τι

πρέπει να σας πω? Νά είσαστε καλά για την βοήθεια που μας παρέχετε. Γιώργο, η βάση δεν βγάζει

σφάλμα αλλά απότι πρόσεξα δεν υπολογίζει σωστά την τελευταία εργάσιμη μέρα. Για παράδειγμα,

ημερομηνία α δόσης 20/2/2014 δόσεις 36 και ποσό 65.000. ( Ρίξε μια ματιά στον Ιανουάριο 2015 ή

στον Φεβρουάριο 2015 ).


Σας ευχαριστώ για μια ακόμη φορά


Φιλικά/Λουκιανός

Καλησπέρα

Λουκιανέ έχεις δίκιο.

Πράγματι υπάρχει λάθος στον κώδικα.

Αντικατέστησε τη γραμμή: wd = Weekday(dt) με την: wd = Weekday(dt, 2)

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

ΥΓ Διορθώθηκε και το συνημμένο στο προηγούμενο μήνυμα

Σε ευχαριστώ πάρα πολύ Γιώργο. Είσαι Τέλειος.

Φιλικά/Λουκιανός

Λουκιανέ, σ’ ευχαριστώ.

Χρησιμοποίησε το νέο συνημμένο του προηγούμενου μηνύματος στο οποίο έκανα και μία αλλαγή στη πρόταση: Do While

Καλησπέρα
Η βοηθεια που έχω λάβει απο το Forum ειναι τεράστια.
έχω ένα πρόβλημα και θέλω την βοήθεια σας.
Στην ΒΔ ( doseis3) ειναι εφικτό να με βοηθήσετε να προσθέσω μια στήλη με τον αριθμό της δόσης. ( Αν αριθμός δόσεων 20 τότε αριθμός δόσης 1 από 20, 2 από 20 κ.λ.π

Ευχαριστώ

Καλημέρα σε όλους
Γιάννη στο συνημμένο έγινε προσθήκη ενός module που μετράει τις γραμμές της φόρμας.
Στο αδέσμευτο πεδίο γίνεται συγχώνευση του αριθμού γραμμής της φόρμας και του πλήθους των γραμμών.
Έτσι έχουμε την ένδειξη στο πεδίο π.χ. "1 Από 36 Δόσεις" κοκ

Σε ευχαριστώ θερμά για την βοήθεια.

Καλησπέρα
θα μπορούσε η τιμή να γράφεται και στον πίνακα tbldosis αντι να αναγραφεται μόνο σε πεδίο στην φόρμα?

Ευχαριστώ

Καλησπέρα
Χωρίς να θέλω να κουράζω μήπως μπορεί καποιος να με βοηθησει?

Στην ΒΔ (doseis3) η πληροφορία που εμφανίζεται στο αδέσμευτο πεδίο αριθμός δόσης 1 από 20, 2 από 20 κ.λ.π θα ήθελα να καταγράφεται και στον πινακα για να μπορώ να την χρησιμοποίησω αργότερα.

Κάθε βοήθεια ειναι σημαντική.
ευχαριστώ εκ των προτέρων

Καλημέρα σε όλους
Γιάννη στο συνημμένο
1. Προσθήκη πεδίου doseis στον πίνακα tbldosis
2. ερώτημα "qry_filter" το οποίο φιλτράρει και μας παρουσιάζει τις εγγραφές της φόρμας.
3. ερώτημα "make_tbldosis_temp" δημιουργίας βοηθητικού πίνακα tbldosis_temp.
4. ερώτημα ενημέρωσης "upd_doseis_field".Ενημερώνει το πεδίο doseis του πίνακα tbldosis απο τον πίνακα "tbldosis_temp".
5. Προσθήκη γραμμών κώδικα στο κουμπί "Ενημέρωση Δόσεων" της βάσης για τη λειτουργία των (3,4).

Καλησπέρα Νάσο
ειναι όπως ακριβώς το ήθελα.

σε ευχαριστώ πολύ για την βοήθεια σου