Browse dynamic_list

[MikeC]

Re: Browse dynamic_list

Hi Bill,
I tried to experiment but there must be something in v9 preventing my doing so with v8 I am using as I cannot edit your form without it crashing Alpha when saving. I wanted to replace your browse Event event code with

if topparent:Grouptax_browse:Line_isuselinegl.value =.t.
    topparent:Grouptax_browse:Line_IsUseHeadGL.value = .f.
    topparent:Grouptax_browse:line_taxaccount_number.value = ""
    topparent:Grouptax_browse:line_taxaccount_name.value = ""
end if

instead of using "this" as you did.

I also wanted to reduce the number of characters in a couple of fields as that could be confusing Alpha --one differs after 11 characters and the other as seen above differs only after the 17th character. I have read many a post here that this is not a good idea and definitely has caused problems in scripts.....but I could not even save my efforts so maybe something you could try and see.....

[Tim Kiebert]

Re: Browse dynamic_list

Bill,

I had a look and can not explain why that code does not work. You would think it should. I placed a msgbox() within the If section and I can display all three values of the columns you are trying to change when the test value is true.

So, using the syntax you have, the values are able to be read because the script is dropping into the 'IF' code when Line_IsUseLineGL is set to true and the values are being displayed in the msgbox. But the values are not being changed.

I changed to the following and this seems to work

function Line_IsUseLineGL_OnChange as v ()
'debug(1)
t = this.table_get()
if [COLOR=Red]this[/COLOR].Line_IsUseLineGL[COLOR=Red].value[/COLOR] = .t.
    t.Line_IsUseHeadGL = .f.
    t.line_taxaccount_number = ""
    t.line_taxaccount_name = ""
end if
End Function

Probably should change the red this above to t as well, and lose the .value. I left it to see if that syntax was still reading the value.

Mike's syntax below also works. Although I thought the last full colon should be a period but either seems to work

function Line_IsUseLineGL_OnChange as v ()
'debug(1)
if topparent:Grouptax_browse:Line_isuselinegl.value =.t.
    topparent:Grouptax_browse:Line_IsUseHeadGL.value = .f.
    topparent:Grouptax_browse:line_taxaccount_number.value = ""
    topparent:Grouptax_browse:line_taxaccount_name.value = ""
end if
End Function

[Mike Wilson]

Re: Browse dynamic_list

Bill,
I, as well, could not get the OnChange event code to work in the Browse event script itself. Nor would it work as I usually have it do... which is run a UDF. But interestingly enough, I did get it to work by putting the script on a form button and have the event code push the form button. I don't understand the issue. Maybe report it as a bug? (See attached)

[MikeC]

Re: Browse dynamic_list

Tim,

I had a look and can not explain why that code does not work.

Isn't it just due to the nature of using "This" as a pointer to whatever is IN focus? Which then makes sense as the browse object that is changed is IN focus, but none of the others receive focus at all--if the "This" pointer did work in this case I would be surprised as then it would mean focus is changing as each browse object is calculated and what would bring the focus back to the original object which am sure it has focus after this event is run?

Just my take on it.... :)

[Tim Kiebert]

Re: Browse dynamic_list

Mike,

In the code 'this' is not a pointer to the actual column. (it would make things easier in some places if it did) Rather, it is a pointer to the browse object. That is why each column name is added to the pointer as a property in order to reference it.

[Bill Parker]

Re: Browse dynamic_list

Thanks guys.

I will submit it as a bug the problem of using "this" in the browse event, since all works fine in the event, but does not translate to the ui.

As you showed, it works in the ui if a table pointer is used or if the browse object name is used explicity instead of using the "this" relative pointer.

Bill.

[MikeC]

Re: Browse dynamic_list

Tim,
Am confused I guess....

I get that "This" is referring to the browse as an object due to its being embedded as an object on the form. As "This" is used as a pointer for whatever object is in focus (current object), I think that is where I have a bit of confusion....how can the browse AND the fields of said browse BOTH be in focus at the same time?? Maybe why it does work for the field that is initially in focus that triggers the OnChange browse event?

IOW--if one was to click on a browse field to activate it (give focus?), then what is actually in focus then....the browse object or the field? Maybe this is what Alpha is having problems with.

If "This" actually does work this way for a browse, then when a field of a browse has focus, does it still mean that only the browse has focus as far as Alpha is concerned?

I think maybe part of my confusion is that the fields of a browse "seem" analogous to a form's objects and I am going to have to sort of "unlearn" this in my head!!! :) Which now brings up the point of addressing a browse button---is the button an object of the browse....or an object of the form in which the browse is embedded? :D Sorting this may be something that a good night's sleep is prerequisite!!


LATER:Just dawned on me that the button on a browse is actually xdialog so maybe not the same as a form's button.....or is it.....seem to remember that a lot of Alpha's interface is written via xdialog.....

[Bill Parker]

Re: Browse dynamic_list

This (no pun intended) is the reason I have always used table methods vs. object methods in event programming. For this project I am doing much more object methods in order to have certain processing flow through field rules. It would be really nice if field rules were RULES, and universally enforced. (I think the ui rules could be handled.)

Bill.