Ανανέωση ιστοσελίδας
ms-office.gr > Forum > Microsoft Access > Access - Ερωτήσεις / Απαντήσεις > Εφαρμογή Access - (Υπηρεσίες - Αδειες - ...)

Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια!

Απάντηση στο θέμα

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 26-07-10, 16:11
Όνομα: Στράτος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 19-01-2010
Μηνύματα: 29
Προεπιλογή

καλησπέρα σε όλους
ασχολήθηκα λιγάκι με το αρχείο ΝΝΣ γιατί με ενδιαφέρει και το επισυνάπτω ξανά με μικρές διορθώσεις-βελτιώσεις. Καλό είναι όποιος ενδιαφέρετε ας το βελτιώσει περισσότερο
φιλικά
Στράτος
Συνημμένα Αρχεία
Τύπος Αρχείου: accdb Υπηρέσιες-Άδειες.accdb (1,78 MB, 9 εμφανίσεις)
Απάντηση με παράθεση
  #2  
Παλιά 25-06-10, 08:07
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-01-2010
Περιοχή: Φλώρινα
Μηνύματα: 164
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από Tasos Εμφάνιση μηνυμάτων
Καλησπέρα κι από μένα!
Δείτε ακόμα ένα παράδειγμα σχετικά με τη διαχείριση ημερομηνιών, αργιών σε περιόδους άδειας: http://www.ms-office.gr/forum/access....html#post2797
Ελπίζω να σας φανεί χρήσιμο!

Τάσος
Πριν από ένα χρόνο περίπου προσπάθησα να ασχοληθώ με ένα πρόγραμμα κανονικών αδειών για την υπηρεσία που εργάζομαι μια και ήμουν υπεύθυνος για τις Κανονικές άδειες των μισθωτών, και ήταν ένα μανίκι μια και οι μισθωτοί είναι γύρω στους 250..

Ήμουν άσχετος από Access (και εν ολίγης παραμένω) αλλά κατάφερα και έφτιαξα ένα αρχείο όπου τύπωνε την άδεια και κρατούσε στοιχεία ανά Μισθωτό, Ομάδα, Τομέα (εάν δεν υπήρχε το υπάρχων Forum ούτε αυτό θα κατάφερνα ) ..

Τώρα στο θέμα μας δεν το έβαλα να υπολογίζει αυτόματα διότι ήταν πολύ μακρινό ειδικά για μένα, μπαίνοντας όμως στο Forum είδα τα παρακάτω άρθρα και αναπτερώθηκαν οι ελπίδες μου, το πρόγραμμα που ετοίμασε ο Τάσος, όταν το είδα έτριβα τα μάτια μου, με τον υπολογισμό των αργιών, ήταν κάτι πρωτοφανές για μένα, έκατσα και το μελέτησα στα κρυφά ( διότι υποτίθεται είμαι σε περίοδο διακοπών στην Χαλκιδική και η γυναίκα μου δεν θέλει να βλέπει το Laptop ) και είδα πώς έχει πολλά θετικά στοιχεία και ως ένα σημείο μπορώ να το προσαρμόσω, στις δικές μου ανάγκες, υπάρχει και ένα αλλά βέβαια που θα το αναφέρω παρακάτω..

Με άρεσε το σύστημα που υπολογίζει με Σ/Κ & Αργίες όπως και χωρίς αυτά διότι κάπου στα 100 άτομα εργάζονται με το σύστημα βάρδιας που σημαίνει πώς υπολογίζεις στην άδεια τους τα Σ/Κ & Α ενώ οι υπόλοιποι 150 είναι με πενθήμερη εργασία όπου δεν υπολογίζονται αυτά. Βέβαια στο πίνακα των μισθωτών θα βάλω άλλο ένα πεδίο όπου θα αναφέρει εάν είναι ημερήσιος η Βάρδια, και θα προσπαθήσω να το αντιστοιχήσω να μετράει της ημέρες του αντίστοιχου πεδίου..

Κατόπιν είδα πώς με λίγη εργασία στον κώδικα μπορείς να προσθέσεις έξτρα αργία, διότι υπάρχουν και οι τοπικές αργίες π,χ, για τον χώρο που δουλεύω είναι η 06/12 ημέρα γιορτής του Αγίου Νικολάου, για την πόλη της Φλώρινας είναι η 27/07 του Αγίου Παντελεήμονα..

Τέλος το δυσκολότερο και για αυτό προς το παρών δεν βλέπω φώς (αλλά ελπίζω με τόσα που είδα εδώ μέσα) είναι πώς έχουμε 4 Ημιαργίες 24/03 , 27/10 , 24/12 , 30/12 , στις Ημιαργίες λοιπόν έχουμε το παρακάτω καθεστώς..

1) Μπορείς να κερδίσεις Ημιαργία με την άδεια σου, αλλά πρέπει να πάρεις άδεια από 3 ημέρες και πάνω.
2) Η άδεια δεν πρέπει να ξεκινάει η να τελειώνει στην ημιαργία (π.χ. από 24/03 η έως 30/12 ) για να την κερδίσεις.
3) Σε περίπτωση που στην άδεια σου πέφτουν μέσα 2 ημιαργίες ( αυτό μπορεί να συμβεί μόνο στις 24/12 με 30/12 ) τότε κερδίζεις μόνο την μία την δεύτερη την χρεώνεσαι κανονικά με άδεια.
4) Μιλάμε για ημερήσιους και όχι για βάρδια..

Αυτά με προβληματίζουν, και μιας και δεν μπορώ να τα εφαρμόσω σε πλήρη λειτουργικότητα σκέφτομαι να τα βάλω όλα σε αργίες (Για το αρχείο του 2011) και εφόσον οι άδειες είναι σε ημερομηνίες παραπλήσιες με τις ημιαργίες να ελέγχω τις συνθήκες και χειροκίνητα να αφαιρώ 1 ημέρα από την κανονική που έλαβε, τσεκάροντας ταυτόχρονα κάτι δίπλα να φαίνεται ότι έχω επέμβει χειροκίνητα ( η αυτόματα να μπαίνει ένα σημάδι εφόσον έχω αλλάξει το νούμερο ), μα θα μου πείτε ότι μπορεί να γίνουν πολλά λάθη , και εγώ απαντώ όχι τόσα όσο αυτή την στιγμή που τα υπολογίζω όλα εγώ..

Πάντως ευχαριστώ όλα τα παιδιά και περισσότερο τον Τάσο διότι η εφαρμογή του με βοηθά πάρα πολύ..
Απάντηση με παράθεση
  #3  
Παλιά 18-07-10, 18:29
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-01-2010
Περιοχή: Φλώρινα
Μηνύματα: 164
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από Free_Ghost Εμφάνιση μηνυμάτων
Κατόπιν είδα πώς με λίγη εργασία στον κώδικα μπορείς να προσθέσεις έξτρα αργία, διότι υπάρχουν και οι τοπικές αργίες π,χ, για τον χώρο που δουλεύω είναι η 06/12 ημέρα γιορτής του Αγίου Νικολάου, για την πόλη της Φλώρινας είναι η 27/07 του Αγίου Παντελεήμονα..

Τέλος το δυσκολότερο και για αυτό προς το παρών δεν βλέπω φώς (αλλά ελπίζω με τόσα που είδα εδώ μέσα) είναι πώς έχουμε 4 Ημιαργίες 24/03 , 27/10 , 24/12 , 30/12 , στις Ημιαργίες λοιπόν έχουμε το παρακάτω καθεστώς..

1) Μπορείς να κερδίσεις Ημιαργία με την άδεια σου, αλλά πρέπει να πάρεις άδεια από 3 ημέρες και πάνω.
2) Η άδεια δεν πρέπει να ξεκινάει η να τελειώνει στην ημιαργία (π.χ. από 24/03 η έως 30/12 ) για να την κερδίσεις.
3) Σε περίπτωση που στην άδεια σου πέφτουν μέσα 2 ημιαργίες ( αυτό μπορεί να συμβεί μόνο στις 24/12 με 30/12 ) τότε κερδίζεις μόνο την μία την δεύτερη την χρεώνεσαι κανονικά με άδεια.
4) Μιλάμε για ημερήσιους και όχι για βάρδια..
Τελικά « δυστυχώς » δεν μπόρεσα να καταφέρω τίποτα η μάλλον το μόνο σωστό που έκανα ήταν να εισάγω και άλλες Αργίες, το πρόβλημα που αναφέρω παραπάνω ούτε το πλησίασα..
Παρατήρησα πώς στη στήλη δεξιά μετράει σαν αργία ( και την ημέρα προ της αργίας ) η κάνω λάθος ??? γιατί κάτι παραπλήσιο θα ήθελα αλλά για τις συγκεκριμένες ημερομηνίες που αναφέρω και όχι για όλες τις Αργίες ..

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

Εστω και κάποιο απο τα προβλήματα μου να λύσω θα είναι μεγάλη Βοήθεια..
Απάντηση με παράθεση
  #4  
Παλιά 25-07-10, 15:37
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
Προεπιλογή

Καλημέρα κοινότητα, καλημέρα στη Φλώρινα !
Αγαπητέ Χρήστο, δουλεύεις πάνω στην εφαρμογή του Τάσου ή έφτιαξες κάτι σχετικό που ταιριάζει στις δικές σου απαιτήσεις; Οι αργίες σου είναι αυτές που καθορίζει ο Τάσος; Οι ημιαργίες είναι τέσσερις ;
...Με συνδυασμό select case ...end select και if...end if, νομίζω ότι το πρόβλημά σου θα λυθεί.
Αν λοιπόν κάποιος είναι imerisios επέτρεψε να γίνει πλήρη διερεύνηση σε ποια κατηγορία αδειούχου ανήκει
κατηγορία (Ι) : αν ( ημερομηνία έναρξής είναι 24/03 ή 27/10 ή 24/12 ή 30/12) AND (Ημερομηνία λήξης είναι
24/03 ή 27/10 ή 24/12 ή 30/12), τότε μπιπ δηλ. δεν αλλάζει το πλήθος των ημερών άδειας!
κατηγορία (ΙΙ) : αν πλήθος ημερών αργίας > 3 AND ( 24/03 μεταξύ ημερομηνιών έναρξης και λήξης, τότε ελάττωσε το πλήθος των ημερών αδείας κατά ένα! έξοδος από ρουτίνα.
κ.ο.κ.
Η βασική μου ιδέα είναι να δημιουργήσεις κατηγορίες αδειούχων. Αυτή είναι η πρότασή μου.
Φιλικά / Νίκος Δ.

Υστερολόγιο : Οι διακοπές μου συνεχίζονται χωρίς internet ...
Απάντηση με παράθεση
  #5  
Παλιά 14-12-10, 16:38
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

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

Χρήστο, στην τελευταία έκδοση προσπάθησα να διορθώσω το λάθος που αναφέρεις. Πράγματι, για ημερομηνία έναρξης 23/03/2009 και άδεια 3 μέρες, το πρόγραμμα δίνει τη ζητούμενη (29/03/2009) τελευταία μέρα απουσίας.
Τώρα, αν κατάλαβα καλά, διαπίστωσες ότι η διόρθωση αυτή προκαλεί λάθη σε άλλες περιπτώσεις.
Μήπως θα μπορούσες να γίνεις σαφέστερος;

Φιλικά/Γιώργος
Απάντηση με παράθεση
  #6  
Παλιά 16-12-10, 20:00
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Φίλε Χρήστο ευχαριστώ για την πρόσκληση. Αν με φέρει ο δρόμος θα σε ψάξω.
Απάντηση με παράθεση
  #7  
Παλιά 18-04-16, 09:49
Όνομα: Βάγγος
Έκδοση λογισμικού Office: Ms-Office 2000, Ms-Office 2003, Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 13-04-2016
Μηνύματα: 29
Προεπιλογή

Καλημέρα κι από μένα
Συμπτωματικά μια τέτοια εφαρμογή αδειών στήνω κι εγώ αυτή την περίοδο
Απορίες:
1. Σχετικά με τον υπολογισμό των αργειών και των ΣΚ. Είδα τα παραδείγματα που ανεβάσατε. Οι αργίες σε αυτά υπολογίζονται με κώδικα. Εάν χρειαστεί να προστεθεί κάποια αργεία (π.χ. όπως φέτος με την πρωτομαγία) έχει τη δυνατότητα ο χρήστης να επέμβει;
2. Με την έναρξη της νέας χρονιάς (κι αυτό ειναι ένα σημείο που έχω κολήσει) πρέπει να έρχεται το υπόλοιπο των περσινών αδειών (από μεταφορά όπως το λένε). Αυτές πώς τις υπολογίζεις; (καθώς οι προπέρσινες πρεπει να παραγραφούν)
Ευχαριστώ
Απάντηση με παράθεση
  #8  
Παλιά 19-04-16, 07:00
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 455
Προεπιλογή

Καλημέρα σε όλους.
Βαγγέλη δες μια υλοποίηση βασισμένη σε ανάρτηση του Γιώργου (Kapetang).
Στην επισυναπτόμενη βάση υπάρχουν οι πίνακες
-tblStaff πίνακας προσωπικού
-AbsenceTypes είδος αδείας,
- tbAbsences Ληφθείσες άδειες
-dikaioutai δικαιούμενη άδεια υπαλλήλου για κάθε έτος,
-Ypoloipa_hlp βοηθητικός πίνακας για τα υπόλοιπα κανονικής άδειας.
Δύο ερωτήματα
-Δημιουργία πίνακα Ypoloipa_hlp
-Μεταφορά αδείας απο προηγούμενο έτος

Στον κώδικα όσον αφορά την Τρίτη μέρα του Πάσχα έγινε η προσθήκη
TritiTouPasxa As Date
.TritiTouPasxa = .Pasxa + 2
Case Is = .TritiTouPasxa: IsHoliday = True
Συνημμένα Αρχεία
Τύπος Αρχείου: zip ΑΔΕΙΕΣ v.2(3).zip (78,2 KB, 106 εμφανίσεις)
Απάντηση με παράθεση
Απάντηση στο θέμα


Δικαιώματα - Επιλογές
Δε μπορείτε να δημοσιεύσετε νέα μηνύματα
Δε μπορείτε να δημοσιεύσετε απαντήσεις
Δεν μπορείτε να επισυνάψετε αρχεία
Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας

Ο κώδικας ΒΒ είναι σε λειτουργία
Τα Smilies είναι σε λειτουργία
Ο κώδικας [IMG] είναι σε λειτουργία
Ο κώδικας HTML είναι εκτός λειτουργίας
Trackbacks are εκτός λειτουργίας
Pingbacks are εκτός λειτουργίας
Refbacks are εκτός λειτουργίας


Παρόμοια Θέματα

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[Γενικά] Πρόγραμμα για Υπηρεσίες Στρατού tasoslamprinos Excel - Ερωτήσεις / Απαντήσεις 2 10-11-15 11:57
Προβολή access σαν εφαρμογή teo1976 Access - Ερωτήσεις / Απαντήσεις 3 24-04-14 12:08
Εφαρμογή (Ι) για όσους ξεκινούν Access & VBA Meteora Access - Ερωτήσεις / Απαντήσεις 2 14-12-09 01:30
Εφαρμογή Ημερολογίου σε Access Ms-Office-Development Team Access samples - Χρήσιμα αρχεία & παραδείγματα 0 11-11-09 09:33
Εφαρμογή Ημερολογίου σε Access kon73 Access - Ερωτήσεις / Απαντήσεις 0 15-01-09 12:18


Η ώρα είναι 13:30.