how to apply filter on a browse?

[fddizon]

hi to all,

i have created a set, supplier.dbf is the primary table and purmas.dbf is the child table and the link type is one is to many. i have set the child table filter to paid field to .f. (which is a logical type field).

how can i reverse the filter to .t. during runtime and refresh the browse.

one that i think is put a check box on the parent form and toggle it but don't know the xbasic expression.

tia

[Keith Hubert]

Re: how to apply filter on a browse?

Hi Francis,

Remove the filter on the form and have a twostate button on the form. Click once to filter All Paid, click again to show all, or All Not Paid.

That's my suggestion, as this can be done with Action Script, no need to worry about Xbasic.

[johngtatp]

Re: how to apply filter on a browse?

Sounds easy but which action script to use? How do you apply a filter to a two state button? Would you make them conditional actions?

[Stan Mathews]

Re: how to apply filter on a browse?

Sounds easy but which action script to use?

Probably run a saved query (or inline xbasic which queries).

How do you apply a filter to a two state button?

You don't. Script the onchange event to run a query based on the value in the field.

Would you make them conditional actions?

Yes.

[johngtatp]

Re: how to apply filter on a browse?

I tried to put actions in the onpush event for either a two state button or a multi-select buttons but no actions are fired. I have the button tied to a global variable but when the any of the buttons are pressed no actions fire. I was going to run the saved query conditionally but I cannot get it to run with no conditions. Am I missing something here?

[Stan Mathews]

Re: how to apply filter on a browse?

There is no onpush event for a two state button or a multistate button. Script the onchange event.

[johngtatp]

Re: how to apply filter on a browse?

I have never used those buttons and that makes sense, thanks...

[fddizon]

Re: how to apply filter on a browse?

john,

here is what i've done... works great for me.

regards

[fddizon]

Re: how to apply filter on a browse?

remove the following code from radio1 on change event. (this makes the record go to the first record if you perform to switch filter other than the first record.)

[COLOR="Blue"]'Turn off query in  in current form.
topparent.show_all()[/COLOR]

[Keith Hubert]

Re: how to apply filter on a browse?

Hi Stan,

Sorry to drag up this old item but I'm trying to get this to work in a new application.

When the form opens the variable is False. I have the following code in the OnChange event.

'Update value in existing variable 'vl_dress' to '.t.
vl_dress = .T.

'Conditional code follows. Executes only if the condition expression is True.
IF a5_eval_expression("=Var->vl_dress=.T.",local_variables()) THEN 
'Run Saved Query  'Garment_Dress' in current form.
topparent.Run_Saved_Query("Garment_Dress")

END IF

'Conditional code follows. Executes only if the condition expression is True.
IF a5_eval_expression("=Var->vl_dress=.F.",local_variables()) THEN 
'Execute inline Xbasic code.
'Turn off query in  in current form.
topparent.show_all()
END IF

The code runs and filters the browse, what I cant get to work, is to set the variable vl_dress back to false when the Two-State button is pressed again so I can remove the query.

Please advise, what am I missing?

[Al Buchholz]

Re: how to apply filter on a browse?

Hi Stan,

Sorry to drag up this old item but I'm trying to get this to work in a new application.

When the form opens the variable is False. I have the following code in the OnChange event.

'Update value in existing variable 'vl_dress' to '.t.
[B][COLOR="#FF0000"]vl_dress = .T.[/COLOR][/B]

'Conditional code follows. Executes only if the condition expression is True.
IF a5_eval_expression("=Var->vl_dress=.T.",local_variables()) THEN 
'Run Saved Query  'Garment_Dress' in current form.
topparent.Run_Saved_Query("Garment_Dress")

END IF

'Conditional code follows. Executes only if the condition expression is True.
IF a5_eval_expression("=Var->vl_dress=.F.",local_variables()) THEN 
'Execute inline Xbasic code.
'Turn off query in  in current form.
topparent.show_all()
END IF

The code runs and filters the browse, what I cant get to work, is to set the variable vl_dress back to false when the Two-State button is pressed again so I can remove the query.

Please advise, what am I missing?

Keith

You are always setting the variable to .t.

[Stan Mathews]

Re: how to apply filter on a browse?

I have the following code in the OnChange event.

'Update value in existing variable 'vl_dress' to '.t.
vl_dress = .T.

The initial value for the variable needs to be set in the form properties, whether it be true or false.

The onchange should "toggle" the variable's value.

'Toggle value in existing variable 'vl_dress' 
vl_dress = (.not. vl_dress)

'Conditional code follows. Executes only if the condition expression is True.
IF a5_eval_expression("=Var->vl_dress=.T.",local_variables()) THEN 
'Run Saved Query  'Garment_Dress' in current form.
topparent.Run_Saved_Query("Garment_Dress")

END IF

'Conditional code follows. Executes only if the condition expression is True.
IF a5_eval_expression("=Var->vl_dress=.F.",local_variables()) THEN 
'Execute inline Xbasic code.
'Turn off query in  in current form.
topparent.show_all()
END IF

[Keith Hubert]

Re: how to apply filter on a browse?

Thanks Guys,

This is what I ended up with.

'Conditional code follows. Executes only if the condition expression is True.
IF a5_eval_expression("=Var->vl_dress=.T.",local_variables()) THEN 
'Run Saved Query  'Garment_Dress' in current form.
topparent.Run_Saved_Query("Garment_Dress")

END IF

'Conditional code follows. Executes only if the condition expression is True.
IF a5_eval_expression("=Var->vl_dress=.f.",local_variables()) THEN 
'Execute inline Xbasic code.
'Turn off query in  in current form.
topparent.show_all()
END IF

Trying to set variable in the code was causing the problem.