ontimer event & embedded browse refresh

[Ed Barley]

Re: ontimer event & embedded browse refresh

Didn't forget all of you,

Have been in meetings all morning.

Mike...I think code wise I used over kill, and shortened the code up with yours. I see more consistency.

Jack...You are right about the button, I have had the same experience, where I like putting buttons on the form itself and going from there.

Martin...I like your idea........having a visual might help with what I am trying to accomplish. Instead of trying to do it with no visual indicator.

Will let you know how I make out. I appreciate all of the ideas........

Ed

[martinwcole]

Re: ontimer event & embedded browse refresh

Just a thought, but I think I would use parentform.mode_get() since you most likely don't want it to occur if any enter or change is occuring.

Also, since this is a multiuser environ, you might also add a strongly colored text box normally hidden and freeze the screen and show the text box during the refresh - to account for them hitting an enter or edit while it is in process - like

if parentform.mode_get()="view"
     ui_freeze(.t.) 'do NOT use parentform.disable()
     text1.show(); text1 refresh(); xbasic_wait_for_idle()
     ...... your process here ..... sys_send_keys("{f5}") also will work
     text1.hide()
     ui_freeze(.f.)
end if

[turbojack]

Re: ontimer event & embedded browse refresh

Hi Ed,
Uncertain if what you are attempting is the way to do this but seeing as how the button works all the time, maybe set your OnTimer event script to simply push the button for the user (with the button hidden--most likely with color as the actual "hide" checkbox many times will not allow script to run).

Your_button_name.push()

I have had where I can get the button to work 100% of time but can not get it to work other ways. I do just as Mike says. I have the code push the button. Problem gets solved and on to the next problem/task

[MikeC]

Re: ontimer event & embedded browse refresh

Hi Ed,
I just tried it and it sure seems to work--refresh or resynch stops when not in view mode. I cannot edit any record if a record is already being edited but entering in a new record is not problem...It sounds like you are entering directly into a browse so tested it this way as well as bringing up a separate form. I set the Timer to equal 5 seconds to make sure it interfered.

All changed or new records refreshed between the shadowed runtime app and the Main app.

I used this in the OnTimer event where browse1 is my browse name

If topparent:browse1.mode_get()="View"
   topparent.resynch()
end if

.refresh_layout() most likely would work as well.

[Ed Barley]

Re: ontimer event & embedded browse refresh

Hi Mike,

Appreciate your comments. In the real application the button is actually hidden on the form as you suggest. The manual refresh is from a button on a custom toolbar, with the same code you suggest.

I was just trying to get a little fancy and try and refresh it somehow about every 5 minutes or so, so all the input operators are looking at the same data without having to push the button.

I can get the timer to push the button at the correct time interval, but when a person is doing a new enter(New Record), it knocks them out of entering the new record. That is why object.mode_get() seems correct to use. I just can not get the code right to make it work the way I want.

I thought it would be nice, to not have the timer push the button during "enter", just have the script end and let it refresh when in "view" or "change". So far I have not been knowledgeable enough to get it right.

There has to be a way.

Ed

[MikeC]

Re: ontimer event & embedded browse refresh

Hi Ed,
Uncertain if what you are attempting is the way to do this but seeing as how the button works all the time, maybe set your OnTimer event script to simply push the button for the user (with the button hidden--most likely with color as the actual "hide" checkbox many times will not allow script to run).

Your_button_name.push()

[Ed Barley]

Re: ontimer event & embedded browse refresh

That's OK................

I initially thought it would be easy to get the code working, but it has been inconsistent for me to get it working the way I envision it.

All suggestions are welcome.

Ed

[reynolditpi]

Re: ontimer event & embedded browse refresh

Never mind what i posted. It took a minute for my brain to process what you said and now see that my idea doesent make sense in a multi user environment:)

[Ed Barley]

Re: ontimer event & embedded browse refresh

I am trying to get different ideas.

If I am looking at it right, that would only refresh the workstation entering the data????

Ed

[reynolditpi]

Re: ontimer event & embedded browse refresh

Could you put the refresh on the onrowchange event or for the embedded browse or on the onchange event of a field that gets changed

topparent.commit()
browsename.refresh()

this way it would do it only when a change is made?

[Ed Barley]

Re: ontimer event & embedded browse refresh

Hi Tony,

I have tried the example you have posted, just as is(the messages does pop up), and with a little modification for what I am trying to accomplish.

It is an embedded browse that 10 people enter information into each day. Works fine for its purpose. But still needs to be refreshed at each machine to see the data in all 10 machines.

Being 10 people use the browse, it has to be refreshed at each machine after a new record is entered. It refreshes perfectly with a button and the refresh code on it.

I am just trying to have the embedded browse refresh without the user pressing the button. I am trying to use the the ontimer event to press the same button that has the refresh code on it to refresh the browse. But not while a user is entering data.

I have played with it for a long time, but I do not think that I understand how to correctly use object.mode_get() correctly.

Regards

Ed

[reynolditpi]

Re: ontimer event & embedded browse refresh

Does this work for you?

dim tbl as P

tbl = table.current()
if tbl.mode_get()= 1 then
    ui_msg_box("Mode", "Change mode")
elseif tbl.mode_get()= 2 then
    ui_msg_box("Mode", "Enter mode")
else
    ui_msg_box("Mode", "View mode")
end if

[reynolditpi]

Re: ontimer event & embedded browse refresh

Ed,
I am sorry I do not have any suggestions for you...however I do have a question. Why have you set this up on the ontimer event? I am just trying to learn different ways to do things.
Tony

[Ed Barley]

Hello Everyone,

Please see attached zip file.

Trying to use the object.mode_get() and the form on timer event to refresh an embedded browse.

I only want the refresh to happen when the form/embedded browse is in the "View" mode. In the "enter" or "change" mode I want no refresh to happen.

No matter how I change the code for the on timer event, I can not get the code to work correctly. The browse always refreshes no matter what mode the form/browse is in.

The refresh code is on Button #4 and pushing the button manually refreshes the browse 100% of the time. With the on timer event I can not get the code to trigger correctly according to the mode of the form/browse.

Can someone tell me what I am doing wrong?

Thanks in advance

Ed