Updating the main grid with info from the child grid in a tabed grid linker

[Mwhite]

Hello

This is my AfterUpdateRecords code for a child grid in a tabbed grid linker.

function AfterUpdateRecords as v (Args as P, PageVariables as P)
with PageVariables

dim tbl as p
dim rec as N
tbl = table.open("[PathAlias.ADB_Path]\debtoraccount")
tbl.order("Statuscode")
rec = tbl.fetch_find(Args.DataSubmitted.R1.Accountid)

tbl.change_begin()
tbl.Statuscode=Args.DataSubmitted.R1.statuscode
tbl.change_end(.T.)

tbl.close()
end with
end function

I would like to update the Status code in the main grid of this tabbed grid linker with information selected in the child grid.

thanks in advance for any help on this issue

[Al Buchholz]

Re: Updating the main grid with info from the child grid in a tabed grid linker

I don't see a specific question, but what you have should update the underlying table but won't change the value on the grid without some additional coding.

Does the value in the table change?

And do you want to refresh the grid - are other values changing also? Or do you want to have the main grid change when the lower level value changes? You'll need some AJAX code to do that.

[Mwhite]

Re: Updating the main grid with info from the child grid in a tabed grid linker

I have a lookup that when a result code is selected, it also selects a status code related to that result code. I posted the above code in the AfterUpdateRecord event and it does not update the main grid in the tabbed grid linker, I guess my question is what addotional code would be needed to make this work correctly. It is updatating a record but not the one I want it to.

Thanks

[Al Buchholz]

Re: Updating the main grid with info from the child grid in a tabed grid linker

I have a lookup that when a result code is selected, it also selects a status code related to that result code. I posted the above code in the AfterUpdateRecord event and it does not update the main grid in the tabbed grid linker, I guess my question is what addotional code would be needed to make this work correctly. It is updatating a record but not the one I want it to.

Thanks

tbl.order("Statuscode")
rec = tbl.fetch_find(Args.DataSubmitted.R1.Accountid)

Since you are doing a fetch of the record via the Accountid - you'll need to set the index to the accountid index (if you don't have one make one...) but it may already be there.

I'm not sure what the tbl.order("Statuscode") is doing to help you here...

All of this changes the underlying values in the table. A refresh of the browser will then show those new values (F5) in the objects that are on the web page.

Once that is working, you can use AJAX to change values on the screen at the time the child value is changed. I don't have code handy to do that. Perhaps someone else does.

[Mwhite]

Re: Updating the main grid with info from the child grid in a tabed grid linker

Al
thanks for all your help.

the code now works correctly this is what I did

function AfterUpdateRecords as v (Args as P, PageVariables as P)
with PageVariables

dim tbl as p
dim rec as N
dim indx_1 as P

tbl = table.open("[PathAlias.ADB_Path]\debtoraccount")
indx_1 = tbl.index_primary_put("Accountid")
rec = tbl.fetch_find(debtoraccount->accountid)
tbl.change_begin()
tbl.Statuscode=Args.DataSubmitted.R1.statuscode
tbl.change_end(.T.)
tbl.close()
end with
end function

[Al Buchholz]

Re: Updating the main grid with info from the child grid in a tabed grid linker

Al
thanks for all your help.

the code now works correctly this is what I did

function AfterUpdateRecords as v (Args as P, PageVariables as P)
with PageVariables

dim tbl as p
dim rec as N
dim indx_1 as P

tbl = table.open("[PathAlias.ADB_Path]\debtoraccount")
indx_1 = tbl.index_primary_put("Accountid")
rec = tbl.fetch_find(debtoraccount->accountid)
if rec > 0 then
tbl.change_begin()
tbl.Statuscode=Args.DataSubmitted.R1.statuscode
tbl.change_end(.T.)
else
'didn't find the record so I couldn't update....... on the web - can't use a messagebox but you could put some kind of code or not.....
end if
tbl.close()
end with
end function

For additional bullet-proofness, you may want to consider the code in red.

Alpha fetch_find gives a positive record number if it finds an exact match, otherwise is returns a negative number with the closest match.....