Maybe I've looked at this too long and cant' see the simple answer.

I can't get the following code to pass the "result" to Column-1 whatever row in my AUTH_EDIT Edittable. Any ideas….

declare function indexlookup

Parent=Get_Property(@WINDOW,"MDIFRAME")

if len( Parent ) else

 Parent=@window

end

Result=indexlookup(Parent,'AUTHORS', 'FULL_NAME_XREF', 'FULL_NAME' , '')

eTable=.AUTH_EDIT"

pos=Get_Property(Parent:eTable,"SELPOS")

acode=Get_Property(Parent:eTable,"CELLPOS",1:@FM:pos)

if Result then

 Rtn=Set_Property(Parent:".AUTH_EDIT.1","CELLPOS",Result)

 call send_event(Parent:".AUTH_EDIT.1", "LOSTFOCUS")

end

Return 0

---

A debug statement shows Result is correct code.

Thanks

eTable=.AUTH_EDIT"

pos=Get_Property(Parent:eTable,"SELPOS")

acode=Get_Property(Parent:eTable,"CELLPOS",1:@FM:pos)



if Result then

*

Rtn=Set_Property(Parent:".AUTH_EDIT.1","CELLPOS",Result)

call send_event(Parent:".AUTH_EDIT.1", "LOSTFOCUS")

The first thing I noticed was that ".AUTH_EDIT" is being used at the top but ".AUTH_EDIT.1" is being used at the bottom. It wasn't clear if these are supposed to be the same edittable or not.

[email protected]

SRP Computer Solutions

If I remove the .1 I still do not get the code passed back to the col,row and the "READ" .

A,

Haven't you just forgot the 4th parameter (position) in your Set_Property( …,"CELLPOS", … )? I get odd results when I try without.

- Oystein -

You need a location for the CELLPOS command. Otherwise, it's not going anywhere.

[email protected]

Sprezzatura, Inc.

View this thread on the forum...