For Programmers: Free Programming Magazines  


Home > Archive > Clarion > May 2006 > PUT in Browse does not work.









You are viewing an archived Text-only version of the thread. To view this thread in it's original format and/or if you want to reply to this thread please [click here]

 

Author PUT in Browse does not work.
RestingSound@gmail.com

2006-05-18, 6:55 pm

Hello,
I have a browse where I want to manually zero the amount in a column
just by
pressing a button on the browse window.
Seems simple enough, I've attached this embed to the Accepted Code for
my
button. And the Test Messages read out as you would expect, however
the record
in the browse (Or in the File) does not change.
I Do Not have EIP or any other special features enabled on this browse.

Get(BRWQ,Choice(?List))
MESSAGE('Selected Inventory Amount = '&INV:Amount)
IF INV:Amount <> 0 THEN
INV:Amount = 0
MESSAGE('Selected Inventory Amount = '&INV:Amount)
Put(BRWQ)
END
ThisWindow.Update
ThisWindow.Reset(0)

sandinzz@yahoo.com

2006-05-19, 7:55 am

Hi.

!You must fetch the record from file for selected item in your browse
list, and update it
!So, load segment(s) of key, for example:
INV:InventoryID = value from browse list: BRWxy.INV:InventoryID or
similar
!Fetch the record
IF Access:YourFile.TryFetch(YourFileKey) <> Level:Benign
! error
ELSE

IF INV:Amount <> 0
INV:Amount = 0
! Update record:
IF Access:YourFile.Update() <> Level:Benign
! error
ELSE
! OK
! You must update item in "BRW list"
! or you must reset it It will be reloaded from file ...
END
END

END

Sponsored Links







Also available: Server administration forum archive | Web Design forum archive | Software forum archive | Hardware reviews archive

Copyright 2008 codecomments.com