Public NewPerson As Boolean
'Person Name is added to the table.
'All required data are given a value of 1 (e.g. the first record of the lookup table)
Response = acDataErrAdded
NewPerson = True
If NewPerson=True Then
'Goes through all controls and set the value to 0, and set focus on the next control, to prompt for user's input