Ascentient
IS-IT--Management
- Nov 4, 2002
- 267
Good day everyone,
I made some changes to a subform that is linked to the results of a combo box. All I did on the subform was add a few fields and changed the tab index for layout purposes.
After saving my work, I was able to view a few examples and take a screenshot so I could send it to an end-user for feedback.
Once that was completed, I closed all open forms and tested everything from start to finish. Now when I go to pull a quote up in the system, it does not display anything in the subform.
So Pseudo code follows.
- When retrieving a quote they enter the customer id in a cbobox.
- The after up triggers setting the LinkMasterFields = "cboCustomerID"
- It fails on the msgbox "No Quotes Found..." message.
I have stepped it through and it looks like it should work fine (because I have not changed any coding) but it does not.
Your thoughts and suggestions are appreciated.
Ascent
I made some changes to a subform that is linked to the results of a combo box. All I did on the subform was add a few fields and changed the tab index for layout purposes.
After saving my work, I was able to view a few examples and take a screenshot so I could send it to an end-user for feedback.
Once that was completed, I closed all open forms and tested everything from start to finish. Now when I go to pull a quote up in the system, it does not display anything in the subform.
So Pseudo code follows.
- When retrieving a quote they enter the customer id in a cbobox.
- The after up triggers setting the LinkMasterFields = "cboCustomerID"
Code:
Me.subQuoteHeader.LinkMasterFields = "cboCustomerID"
subQuoteHeader.Requery
'subQuoteDetail.Requery
If Me.subQuoteHeader.Form.RecordsetClone.RecordCount > 0 Then
txtBoxVisible
cmdPrintQuote.Enabled = True
If cboCustomerID = "XXXXXX" Then
cmdTransferQuote.Visible = True
Else
cmdTransferQuote.Visible = False
End If
Else
cboCustomerID.SetFocus
cboCustomerID = ""
subQuoteDetail.Requery
txtBoxHide
MsgBox "No Quotes Found for this Customer. Please select another customer."
cboCustomerID.SetFocus
End If
I have stepped it through and it looks like it should work fine (because I have not changed any coding) but it does not.
Your thoughts and suggestions are appreciated.
Ascent