Εφαρμογή Access - (Υπηρεσίες - Αδειες - ...)

[nasos23]

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

Στον κώδικα όσον αφορά την Τρίτη μέρα του Πάσχα έγινε η προσθήκη
TritiTouPasxa As Date
.TritiTouPasxa = .Pasxa + 2
Case Is = .TritiTouPasxa: IsHoliday = True