>>(Repeated Thread)
>>
>>Taken Some Data In a Cursor 'SEARCHREPORT ' using Select command,I have designed a GRID. The GRID initially displays all the records. The Total of the column is also displayed at the end/bottom of the grid..
>>
>>Now, I have a combo which has DISTINCT Excahnge Codes. I need that when the user selects any one of the exchange code from the combo the GRID Items should Changed
>>accordingly and should display only the records pertaining to that Exchange code. The amount at the bottom should also change accordingly.
>>
>>
>>In order to do so, I placed the following Code in Click Method of combo
>>
>>

>>SET FILTER TO EXCHANGE=ALLTRIM(This.Value)
>> SUM(AMT) to C for Exchange=ALLTRIM(This.Value)
>>Thisform.Grid1.Refresh
>>

>>
>>But the things are not working. I googled a lot but could not fetch a proper solution. While I was Googling, I encountered that in such cases the Grid Losses its original Formatting, How to overcome this problem ? Kinldy also tell that if I want that the first element of my combo box should be "All Exchanges"."
>
>This is not a case where the grid should lose its formatting. That happens only if you do something that recreates the underlying cursor.
>
>You need to refresh the textbox that contains the total as well as the grid.
>
>
>>All Exchanges" is Not any of the exchange and therefore Not is the DISTINCT List, Currently the fisrt element is the name of one of the exchange.
>
>You didn't indicate the RowSourceType for the combo, but whatever it is, you need to add the "All Exchanges" item. In this situation, I usually use an array RowSource because it's easy to set it up the way I want it. In this case, you can use a query that pulls out the distinct values and then add the "All Exchanges" item to the resulting array.
>
>Tamar
--------------------------
I tried The below code in combo box Valid method. But it is Not working

SET FILTER TO EXCHANGE=ALLTRIM(This.Value)
SUM(AMTPAYABLE) to Text10 for Exchange=ALLTRIM(This.Value)
THISFORM.grdsorting1.Refresh && Generates Error as Function, count is invalid
THISFORM.TEXT10.Refresh && No change Noticed on Form

Where I am Going wrong, what should be the proper code.