Query not working (1 Viewer)

[atrium]

I'm sure it has something to do with the address of the criteria.
I have a form with a subform and and within that subform I perform the following

 Me.PaymentFeeFld = DLookup("PaymentFee", "DdSchedules", "[DdSchedId] = " & DdSchedId)
  MsgBox "The PaymentFee = " & Me.PaymentFeeFld & " The Schedule Id = " & DdSchedId
  If Me.TotOwedFld <= 0 Then
     MsgBox "The Total Owed Amount is <= to zero " & vbCrLf & "The system will change the status to Completed. Change the Include Checked box to Off." & vbCrLf & "No other payments will be attempted on this schedule"
     DoCmd.SetWarnings False
     DoCmd.OpenQuery "UpdateDDSchedCompletedQry"                    '--- Change the schedule status to Completed.
     DoCmd.SetWarnings True

The SQL for the query "UpdateDDSchedCompletedQry is

UPDATE DdSchedules SET DdSchedules.Status = "Completed"
WHERE (((DdSchedules.DdSchedId)=[Forms]![DdCreateABAFileFrm]![DdPaymtTransDueSubform].[Form].[DdSchedId]));

Each time I run this query it asks me to enter the DdSchedId
DdCreateABAFileFrm - is the Parent form
DdPaymtTransDueSubform - is the child subform

Even if I put in the value of DdSchedId into the query it doesn't work. It displays the field with the old contents

Any help would be appreciated

 

[arnelgp]

you can try replacing your DoCmd.OpenQuery "updateDDSchedCompletedQry" with
DoCmd.RunSQL:

dim SQL As String
SQL = "UPDATE DdSchedules SET DdSchedules.Status = 'Completed' " & _
"WHERE DdSchedules.DdSchedId = " & [DdSchedId]

DoCmd.RunSQL SQL

 

[Gasman]

Is DdPaymtTransDueSubform also the subform control name?

 

[jdraw]

Since it is repeatedly asking for a value for DdSchedId, it seems Access is confused as to the location of it. Do you have a test database with only a few records - enough to highlight the issue- that you can post?