Solved

Clearing filter on popup dialog form and reset to new value

Posted on 2011-02-18
17
941 Views
Last Modified: 2012-06-27
I have setup a popup form to allow users to tag a list of pre-filtered values in a lookup reference table - code library.  This works very well and will allow user to tag a set back to the openArg value from the event control source.

I need to either tag the list filtered or clear filter and use combo box to set a new filter.

See Screencast video on the issue.

http://screencast.com/t/Hu5t5ao6

Thanks
Ivan
0
Comment
Question by:phoenxMan
  • 9
  • 8
17 Comments
 
LVL 119

Expert Comment

by:Rey Obrero
ID: 34928713
do you have an afterupdate event on that combo Box?

after setting the value of the combo to myarg, call the afterupdate event of the combo box

0
 
LVL 119

Expert Comment

by:Rey Obrero
ID: 34928886
or call the Click event of the button that sets the filter.
0
 

Author Comment

by:phoenxMan
ID: 34928925
The under lining query for the popup has a criteria using Like filter on the recordset, verses setting the filter property

The combo box filter will change. I preferring to reset the filter property.  But I get a request of parameter when I do this.

I believe if I get the correct syntax to reset after cbo update the filter on the forms property verses a like criteria on the SQL . This should work.

   me.filter = Itemgroup &"=" & me.cbofiltergroup

but syntax is on the filter = Itemgroup = 'PatientNarrative'

How would you write the event to set this value back to the form filter property?

Thanks


0
 

Author Comment

by:phoenxMan
ID: 34928931
0
 
LVL 119

Expert Comment

by:Rey Obrero
ID: 34928995
clear the Filter property of the form in design view, save form
try just to requery the form

private sub form_load()
me.cboFilterGroup=myArg
me.requery

end sub
0
 
LVL 119

Expert Comment

by:Rey Obrero
ID: 34929012
if that still fails try this

private sub form_load()
me.filter=""
me.cboFilterGroup=myArg
me.requery

end sub
0
 

Author Comment

by:phoenxMan
ID: 34929026
Can the form filters be cleared and set dynamically in view mode?  

I will try what you suggest.  

But when I load the form I need to set a default value from the control name on the source event. Either to the form filter property or the the combo box filtering by SQL criteria.
0
 

Author Comment

by:phoenxMan
ID: 34929595
I tried setting the myArg to the combo after clearing the filter in design view.  Still not setting the value (myArg) to the combo box.

0
Get up to 2TB FREE CLOUD per backup license!

An exclusive Black Friday offer just for Expert Exchange audience! Buy any of our top-rated backup solutions & get up to 2TB free cloud per system! Perform local & cloud backup in the same step, and restore instantly—anytime, anywhere. Grab this deal now before it disappears!

 
LVL 119

Expert Comment

by:Rey Obrero
ID: 34929737
upload a copy of the db
0
 

Author Comment

by:phoenxMan
ID: 34929800
0
 

Author Comment

by:phoenxMan
ID: 34929828
It is a double click on the yellor Patient Narrative field to open the popup.

0
 
LVL 119

Accepted Solution

by:
Rey Obrero earned 500 total points
ID: 34930028
0
 

Author Comment

by:phoenxMan
ID: 34930206
Not sure if I understand the if then logic.  But it works.
Thanks a million.
0
 

Author Comment

by:phoenxMan
ID: 34931541
I tested the code and the openarg on other controls and found the filter is not released other than the first field use Patient Narrative.  I check the code for changes you make to the openform filter and openarg settings.  

See short video showing the difference.  No narrative.

http://screencast.com/t/f2SCTaMG

0
 
LVL 119

Expert Comment

by:Rey Obrero
ID: 34933251
you have two popup forms, "PopupTagMultiSelectitemswithFilter" and "PopupTagMultiSelectitems"

the changes in this uploaded db is NOW done only for  "PopupTagMultiSelectitems"

RebuttalMaster--2A.accdb
0
 

Author Comment

by:phoenxMan
ID: 34933303
I see one new line I did not see in the previous version.  
Private Sub Form_Load()
If Me.OpenArgs & "" <> "" Then
    Me.cboFilterGroup = Me.OpenArgs
    Me.Requery
End If
Me.getFilter = myArg

End Sub

Its working great now.

Thanks
0
 
LVL 119

Expert Comment

by:Rey Obrero
ID: 34933307
this line
Me.getFilter = myArg

is already there, don't know where you use it for.
0

Featured Post

Threat Intelligence Starter Resources

Integrating threat intelligence can be challenging, and not all companies are ready. These resources can help you build awareness and prepare for defense.

Join & Write a Comment

In the previous article, Using a Critera Form to Filter Records (http://www.experts-exchange.com/A_6069.html), the form was basically a data container storing user input, which queries and other database objects could read. The form had to remain op…
Introduction When developing Access applications, often we need to know whether an object exists.  This article presents a quick and reliable routine to determine if an object exists without that object being opened. If you wanted to inspect/ite…
Familiarize people with the process of utilizing SQL Server stored procedures from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Micr…
Basics of query design. Shows you how to construct a simple query by adding tables, perform joins, defining output columns, perform sorting, and apply criteria.

707 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

12 Experts available now in Live!

Get 1:1 Help Now