Enter Parameter Value Error

[dwAccessUser32]

I have a form that when I open it, a series of boxes pop up asking me to 'Enter Paramter Value'. The values that it asks for are:


tblPayment.Payor
tblProperty.PersonID
tblproperty.AddressID
tblProperty.OrganizationID
tblProperty.PermitID
tblPermit.StatusOfPermit

The code for the form is shown below:




Option Compare Database

'Private Sub Command65_Click()
'DoCmd.OpenForm "frmPeopleGoodExample"
'End Sub

'Private Sub Command65_Enter()
'DoCmd.OpenForm "frmPeopleGoodExample"
'End Sub

Private Sub Command24_Click()
On Error GoTo Err_Command130_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "frmManagePermits"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command130_Click:
Exit Sub

Err_Command130_Click:
MsgBox Err.Description
Resume Exit_Command130_Click


End Sub

Private Sub Command67_Enter()
DoCmd.OpenForm "frmPeople"
End Sub

Private Sub Command114_Click()
On Error GoTo Err_Command114_Click


Screen.PreviousControl.SetFocus
DoCmd.FindNext

Exit_Command114_Click:
Exit Sub

Err_Command114_Click:
MsgBox Err.Description
Resume Exit_Command114_Click

End Sub
Private Sub Command115_Click()
On Error GoTo Err_Command115_Click


Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_Command115_Click:
Exit Sub

Err_Command115_Click:
MsgBox Err.Description
Resume Exit_Command115_Click

End Sub
Private Sub Command116_Click()
On Error GoTo Err_Command116_Click


Screen.PreviousControl.SetFocus
DoCmd.FindNext

Exit_Command116_Click:
Exit Sub

Err_Command116_Click:
MsgBox Err.Description
Resume Exit_Command116_Click

End Sub
Private Sub Command117_Click()
On Error GoTo Err_Command117_Click


DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70

Exit_Command117_Click:
Exit Sub

Err_Command117_Click:
MsgBox Err.Description
Resume Exit_Command117_Click

End Sub
Private Sub Command118_Click()
On Error GoTo Err_Command118_Click


Screen.PreviousControl.SetFocus
DoCmd.FindNext

Exit_Command118_Click:
Exit Sub

Err_Command118_Click:
MsgBox Err.Description
Resume Exit_Command118_Click

End Sub
Private Sub Command124_Click()
On Error GoTo Err_Command124_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "frmPeople7"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command124_Click:
Exit Sub

Err_Command124_Click:
MsgBox Err.Description
Resume Exit_Command124_Click

End Sub
Private Sub Command126_Click()
On Error GoTo Err_Command126_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "frmSelectPermitType"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command126_Click:
Exit Sub

Err_Command126_Click:
MsgBox Err.Description
Resume Exit_Command126_Click

End Sub
Private Sub Command127_Click()
On Error GoTo Err_Command127_Click


DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.PrintOut acSelection

Exit_Command127_Click:
Exit Sub

Err_Command127_Click:
MsgBox Err.Description
Resume Exit_Command127_Click

End Sub
Private Sub Command128_Click()
On Error GoTo Err_Command128_Click

Dim stDocName As String

stDocName = "Relationships for DAWSONPERMITENTRY2"
DoCmd.OpenReport stDocName, acPreview

Exit_Command128_Click:
Exit Sub

Err_Command128_Click:
MsgBox Err.Description
Resume Exit_Command128_Click

End Sub
Private Sub Command130_Click()
On Error GoTo Err_Command130_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "frmManagePermits"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command130_Click:
Exit Sub

Err_Command130_Click:
MsgBox Err.Description
Resume Exit_Command130_Click

End Sub

Private Sub Command50_Click()

End Sub


I can't figure out why it wants these values since I don't see anywhere in the code for the form anything about this. Does anyone have any idea? Could this be coming from one of the other forms somehow? Any help would be greatly appreciated.

 

[straybullet]

Check the control source of textboxes on your form and correct as necessary. (ex: a control with tblPayment.Payor as it's control source may actually need to have Payor as the control source)

Let them hate - so long as they fear... Lucius Accius

 

[dwAccessUser32]

Thanks, I will check the control sources.

I also found that part of the problem was one of the six tabs on the form. When I deleted it, 6 of the 7 prompts for values disappeared.