Need checkboxes to enable subforms

[hoff]

Hey,



I've been working on a big database and now that I've figured out the relationship/form structure I need to add some extra functionality.

The attached pic shows you the process I have for entering patient data in my database..

Note: addition of ~20 sub subforms (assessments) and formatting of assessments is going to change once I have a functional structure



Subject ID/Patient Demographics is the main form. Date index is a subform connected through the global ID (GLID) via one to many. Each GLID in Date index can have many assessment dates, and this combo (GLID + date) is represented as a unique Event ID. Every assessment is then connected through Event ID via one to one. These assessments are sub subforms, ie. subforms in the Date index form.

I only want to allow entry access for certain assessments if intended, so I'll use checkboxes. I have basic functionality, but it doesn't save what I do when navigating from record to record


My current code is as follows:

Private Sub IQ_check_AfterUpdate()
If Me.[IQ_check] Then
Me.[IQ].Enabled = -1
Else
Me.[IQ].Enabled = 0
End If

End Sub

Private Sub IQ_check_BeforeUpdate(Cancel As Integer)
If Me.[IQ_check] Then
Me.[IQ].Enabled = -1
Else
Me.[IQ].Enabled = 0
End If

End Sub

Any help or alternate options would be appreciated!!

[Jester0001]

Just a quick thought...

but it doesn't save what I do when navigating from record to record

Have you tried the Me.Dirty property?

'To force save the record data on the main form
    If Me.Dirty Then Me.Dirty = False

[hoff]

K I think I got it..

for one, I created yes/no checkbox fields in my DATE_index table, so values are stored there. Then I pasted the same If statement into my form's 'on current' event.

Next question...

I figured out that I can add the identical code with visible replacing enabled. This is nice because the form and tab it sits in only shows up when I click the box..

My question is, should I keep the Enabled code in each checkbox event with visible to be safe, or is visible sufficient to block data entry?