warning message

[gscma1]

I have the following tables

tblEmployees (containing: empid,forename,surname,address etc...)
tblEmployeeLoans (containing: loanid,empid,amount,reason,weekno,repayment amount;paidback etc...)
tblHours (containing: empid,hours,cash,weekno,etc...)

all employees are paid weekly.
if an employee receives a loan, they will pay this back from there wages each week at a low rate. e.g. loan=£200, pay back £20over 10 weeks.
this £10 is taken from the Cash field in tblHours.

Is it possible to have a text field warning within tblHours once the employee id has been selected to state whether there is a loan outstanding or not?

e.g. user selects empid: 1;employee 1 has an outstanding loan of £100;repayment rate of £20 a week;when the user enters new weeks wages for empid 1; a warning message would state 'Loan Outstanding Repayments £20 per Week'.
the paidback tick box in tblEmployeeLoans would then stop the warning message from appearing.

is this possible?

 

[randy700]

How about...

Place a label on the form stating that there is a loan outstanding. Set it's visible property to false. In the form's OnCurrent event, do a DLookUp to tblEmployeeLoans to determine if there is an outstanding loan. If the DLookup returns true, set the label's visible property to true, else set it to false.


Randy

 

[SeeThru]

You colu dynamically change the labels .caption to reflect the value of the loan:

mylabel.caption="Employee Loan: " & dlookup("LoanValue","EmployeeLoans","EmployeeID=" & employeeID) & " - Paying " & dlookup("RepaymentAmount","EmployeeLoans","EmployeeID=" & employeeID)

And so on.