Assuming, from your narrative, that
- The EntryAgent originates the Record
- The AuditAgent approves the amount to be paid
- The PaymentAgent actually makes the payment
you can have the appropriate 'agent' Field populated when the Control each agent is responsible for is completed...something like this:
Code:
Private Sub InvoiceEntryDate_AfterUpdate()
Me.EntryAgent = Environ("Username")
End Sub
Private Sub ApprovedAmount_AfterUpdate()
Me.AuditAgent = Environ("Username")
End Sub
Private Sub PaymentAmount_AfterUpdate()
Me.PaymentAgent = Environ("Username")
End Sub
This presupposes that your users aren't intentionally trying to jigger your system! Making sure that all three agent names are different could be done, but would require additional code for a validation check to be made before each agent name is entered.
Linq ;0)>
The problem with making anything foolproof...is that fools are so darn ingenious!
All posts/responses based on Access 2003/2007