save another field on array

save another field on array

Postby Silvio.Falconi » Fri Feb 22, 2019 9:43 am

I have this xbrowse made with an array

Image

I can edit the last column

WITH OBJECT oBrowse:aCols[6]
:cEditPicture := '@ €99,999.99'
:nEditType := EDIT_GET
END

How I can to save also the filed n.12 on array I must save this calc = oBrowse:acols[5]-oBRowse:acols[6]
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7090
Joined: Thu Oct 18, 2012 7:17 pm

Re: save another field on array

Postby FranciscoA » Fri Feb 22, 2019 6:16 pm

Try this sample code:
Code: Select all  Expand view  RUN
 oBrw:Neto:Value := oBrw:Precio:Value - oBrw:Descuento:Value  
 

Regards.
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh-MySql-TMySql
User avatar
FranciscoA
 
Posts: 2159
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: save another field on array

Postby FranciscoA » Fri Feb 22, 2019 6:24 pm

Code: Select all  Expand view  RUN
WITH OBJECT oBrowse:aCols[6]
   :cEditPicture := '@ €99,999.99'
   :nEditType := EDIT_GET
   :bOnChange := {|| oBrowse:aCols[12]:Value :=  oBrowse:aCols[5]:Value -  oBrowse:aCols[6]:Value  }
END
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh-MySql-TMySql
User avatar
FranciscoA
 
Posts: 2159
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: save another field on array

Postby Silvio.Falconi » Fri Feb 22, 2019 6:48 pm

io not have that column (oBrowse:aCols[12]:Value) on xbrowse I have only it on array
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7090
Joined: Thu Oct 18, 2012 7:17 pm


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 90 guests