Holidays Database
Hy!
I need to build a holiday staff database for my employee in Access 97. Is there any idea to how can i do it?
Thanks
View Complete Forum Thread with Replies
Related Forum Messages:
Employee Absense/Holidays Database
Hi all, I am stuck where to start and wanted some advise. I want to create a database that captures whether employees are late, sick, holidays etc. So i would have a list of employees, then create a new records in another table to store what type of reason it is, (late, sick, holidays etc.), and then the directors can monitor employee sickness. But what i would to do is to be a bit clever about it though in 2 ways. Against the employee they would have a number of allocated holidays against them, but i just wanted the user to enter the start and end date, and then get access to work out how many holidays days need to be taken off, i.e. it does not included weekends or bank holidays.... Also in the sickness report, work out how many single days where taken on either a Monday or Friday.... Has anyone done or seen an access database that can do this already. I know there is a calendar addin, but i've not used it...
View Replies !
Accumulating Holidays
OK Here's the deal: An employee has 0 holiday days in the first year of employment and accumulates 1 holiday day for every 1.2 months worked after the first year of employment. So after 2 years of working the employee is entitled to 10 holiday days, but if the employee only takes 5 holiday days they should be able to accumulate the rest of thier days into their next year. I've added the database that I've created so far, I haven't got too far, and I realize that I will have to create a field in the employee table with the first day of employment. Any help with this would be greatly appreciated.
View Replies !
Staff Holidays
Hi All, I need a query to tell me how many staff are on holiday on the same day..here what i have so far. A query with name, startholsdate,endholsdate, totaldays, etc, etc,, records showing; employee A books 01/01/06 to 14/01/06 and employee B books 10/01/06 to 24/01/06 C books 01/02/06 to 10/02/06 and so on, I need to show how many employees are off on what days eg employee A and B are on hols between 10/01/06 and 14/01/06, so only 3 more staff may take days off between the 10th and 14th. I have tried all sorts of calculations but to no avail? can anyone help.. thanks
View Replies !
Bank Holidays: Advice Needed
hi i'm trying to build something that knows when to notify someone that they can call a trade, given 1) a callable date 2) a notice period and 3) the relevant cities e.g. ?NotificationDate(#28-jun-2008#,10,"LONY ") 16-06-08 the good news is, i've done it, with this code:- '--------------------------------------------------------------------------------------- ' Procedure : NoficationDate ' Date : 28/03/08 ' Purpose : to calculate the date of notification for an EMTN, given the call date & notice period & cities '--------------------------------------------------------------------------------------- ' Public Function NotificationDate(dtCall As Date, intPeriod As Integer, strSixDigitCities As String) As Date Dim intWorkingDaysBefore As Integer Dim strCities(2) As String Dim dtLoop As Date strCities(0) = Left(strSixDigitCities, 2) strCities(1) = Mid(strSixDigitCities, 3, 2) strCities(2) = Mid(strSixDigitCities, 5, 2) dtLoop = dtCall intWorkingDaysBefore = 0 Do dtLoop = dtLoop - 1 If Left(Format(dtLoop, "ddd"), 1) <> "s" And IsBankHoliday(dtLoop, strCities(0)) = False _ And IsBankHoliday(dtLoop, strCities(1)) = False And IsBankHoliday(dtLoop, strCities(0)) = False Then intWorkingDaysBefore = intWorkingDaysBefore + 1 End If Loop Until intWorkingDaysBefore = intPeriod NotificationDate = dtLoop End Function '--------------------------------------------------------------------------------------- ' Procedure : IsBankHoliday ' Date : 28/03/08 ' Purpose : to see if it's a bank holiday '--------------------------------------------------------------------------------------- ' Public Function IsBankHoliday(dtInput As Date, strCity As String) As Boolean Dim rs As DAO.Recordset Set rs = CurrentDb.OpenRecordset("SELECT * FROM qry_Tass_All_Hols WHERE CITY = '" & strCity & "' AND HDATE=#" & Format(dtInput, "mm/dd/yyyy") & "#", dbReadOnly) If rs.RecordCount > 0 Then IsBankHoliday = True Else IsBankHoliday = False End If rs.Close Set rs = Nothing End Function BUT it runs like arthritic toad, it makes a minute per execution and i was hoping to scale it up to 4000 records => 2 days of run time :eek: any ideas on how to attack this problem...even guesses appreciated, i can try things out and see if they work thanks in advance
View Replies !
Future Date - Taking W/e & Holidays Into Account
Hey all, I'm designing a query that must calculate a future date based on a recorded date. Unfortunately it's not as simple as just using adddate (unless I was using Excel!). Here's my requirements: Future Date = [StartDate] + 45 business days I am able to take weekends into account, but haven't been able to figure out how to bring holidays into the equation. I have an existing holidays table that I am using for another query within the database (calculates # of business days between 2 existing dates). Hope this makes sense... I've been staring at it all day so I may not be thinking clearly anymore. Any help is greatly appreciated.
View Replies !
How Do I Automatically Update Client Database From Master Database?
Does anyone know if there is a form or sample database out there that can check the version of a specific database a person is running on their pc against a master version; and if the 2 versions don't match automatically update the local version from the master version? Is this possible? I would need the autoupdate to do Tables, Queries, Reports, and Forms.
View Replies !
Forms Count Of Other Database Without Opening That Database Physically
Hello All... Well, I am facing one problem..in my application; I need to show all forms / reports name of other database( .mdb ) file without opening the other database physically. I tried a lot but didnt succeded. I tried with below code.. Set AcApl = New Access.Application Call AcApl.OpenCurrentDatabase(strfolder, True) Set AcProj = AcApl.CurrentProject Set frm1 = AcProj.AllForms intCount = frm1.Count But here wen the second line AcApl.opencurrentdatabase get executed at that time the database get open physically, and i dont want that..So is there any other way around..If so..please please help me.. Thanks in advance..!!
View Replies !
Jet Database Engine Error On Non-shared Database
I have a problem that seems to be happening on several users' databases and is causing a big problem. None of the databases is a shared database...they are all single-user databases on stand-alone computers. I have tried looking for help within previous posts, but all seem to be related to shared databases. I am getting an error message: "The Microsoft Jet database engine stopped the process because you and another user are attempting to change the same data at the same time." The database cannot be opened, imported, repaired...nothing seems to work. Again...these are NOT shared databases. I appreciate any help I can get. I created the database for all of the secretaries in our school district to keep up with absence data. It involves many tables, queries, forms and reports, and has generally worked well. However I am now seeing several that are getting similar errors as mentioned. Thanks!
View Replies !
Best Way To Import SQL Database To Local Access Database?
I'm new to Access and VBA, for the record. What I need to do is copy a SQL database (table structures and records) and save it as a local Access database, so that the user can query and make any changes on the local file without editting the SQL database. Looking around, it seems like the best option would be to use the TransferDatabase method with the acImport option. Does this sound reasonable, or can someone with more experience suggest a better way to go about it? Thanks.
View Replies !
Synchronise MySQL Database With Website Database
Hi, I am trying to update the stock levels on our company website on a daily basis with those found in our stock system. Our stock system uses MySQL for the backend and Access 2003 for the front end. Our website (www.epactrading.co.uk) uses php and a MySQL database. The website was not built by me but is a piece of software that allows me to log into the backend and add products, categories, update stock levels etc. Unfortunately the company we paid the software for will not give me/tell me how to gain direct access to the MySQL database, apart from using the back end provided by them. I am assuming/hoping the the user name and password to log into the back end is the same to access the tables in the database. Does anyone know how I can find out the table structure or gain access to the tables in the website database? Also I cannot run my own php scripts on the server, which is how I was originally hoping to update the site. Thanks for your time Kevin
View Replies !
Opening Form In Different Database Using Criteria From First Database
I have two separate databases. I need to be able to open database 2 using a criteria of a field on a form from Database 1. I have successfully used the shell command to actually open database 2 but I can't get the correct form with filtered information to open. I have used the following code behind a button: Dim Varset, varpath Set Varset = DBEngine.Workspaces(0).OpenDatabase("S:RESETIB Station ModuleDSA USE ONLYIB Intelligence_be.mdb").OpenRecordset("Select LogIn.* from LogIn Where Login.[Hash ID] = '" & Environ$("username") & "';") If Varset.EOF Then MsgBox "User does not have an account. For access email rudy@madeup.com", vbCritical, "Invalid User Account" DoCmd.Quit Else varpath = """c:program filesmicrosoft officeofficeoffice11msaccess.exe"" ""s:RESETIB Station ModuleDSA USE ONLYIB Intelligence.mdb"" /wrkgrp ""s:RESETIB Station ModuleDSA USE ONLYsecurity.mdw"" /user " If Varset!Permission = 1 Then varpath = varpath & "agent /pwd randjont" If Varset!Permission = 2 Then varpath = varpath & "Supervisor /pwd randjont" If Varset!Permission = 3 Then varpath = varpath & "Superuser /pwd randjont" Call Shell(varpath, 3) End If End Sub Database 1 is sourced from and ODBC connection and database 2 is from a local table. They both have the same field (although named slightly different). Where do I put the query/sql that will do the last part of opening the Subject Form for the person with the common field value? Your help is greatly appreciated. Tyler:)
View Replies !
|
TRACKER
