FiveTech Software tech support forums

https://forums.fivetechsupport.com/viewtopic.php?f=3&t=41866&p=250982&hilit=VARPUT&sid=27d4ea68105bc15d0382336b5dad0003&sid=f37f8b30d578778fade8b08fa4a674a8#p250982

Saludos.

... of clipboard    testmail->(dbappend())    testmail->email = cText    obrwmail:refresh()return You can also use the varput and do it in Xbrowse itself Dear Friend. With FWH you do not have to write long code like this at all.

... of clipboard    testmail->(dbappend())    testmail->email = cText    obrwmail:refresh()return You can also use the varput and do it in Xbrowse itself

I tried this and seems to work

@ 10,60 get oGet Var cFirst OF oDlg update PIXEL SIZE 100,15;
valid( (oBrw:first:varput(cFirst),.t.,oBrw:refresh()),.t.)

oGet:bLostFocus :=<|o| end rest is not needed.
....

Giovany Vecchi wrote:Try like this:
oGet:VarPut( oCalendar:dDate )

?????????????????????????????????????????????????????????????????????????????????????????

not run Doubleclick!!!!

Try like this:
oGet:VarPut( oCalendar:dDate )

VARPUT()

Regards, saludos.

I use this to toggle a Logic field with F2 Key

oBrw[1]:bKeyDown := {| k | IF ( K == VK_F2, if(oBrw[1]:uitass:value = .f., oBrw[1]:uitass:Varput( .t. ), oBrw[1]:uitass:Varput( .F. ) ) , NIL ) }

If you use VarPut(), bOnChange also is executed and totals also get modified.
VarPut() is totally equivalent to user editing the data online.

... LEN(oBRWT2:aSELECTED) // obrw:aSELECTED is an array containing recnos marked (oBrwT2:cAlias)->(dbgoto(oBRWT2:aSELECTED[I])) oBrwT2:&nVeldID:Varput( mem_var ) NEXT

oBrw:NET:VarPut( nTotalTax )Not run ok oBrw:AMOUNT:VarPut( nTotalRow ) Not run ok The problem is that ndescount = undifined ?? and it failes at if ndescount > 0 if you comment them out, you get no error, but i'm sure that the ...

... in your functions for better reading and sure when you add a column, all formulas will go wrong. With the names you have no problems. oBrw:NET:VarPut( value ) instead of oBrw:acols[9]:varput(value) you're right (nTotalRow*ntax)/100 oBrw:NET:VarPut( nTotalTax )Not run ok oBrw:AMOUNT:VarPut( ...

... in your functions for better reading and sure when you add a column, all formulas will go wrong. With the names you have no problems. oBrw:NET:VarPut( value ) instead of oBrw:acols[9]:varput(value)

... local dStart := oBrowse:aArrayData[nRecord][5] local dEnd := oBrowse:aArrayData[nRecord][6] local nGiorni:= (dEnd-dStart)+1 *oBrowse:aCols[7]:VarPut(nGiorni) return nGiorni any solution ?

RiazKhan wrote:Dear Nageswaragunupudi

Thanks, I have resolved my issue.

oBrw:Gross:VarPut( oBrw:Basic:Value + oBrw:A1:Value + oBrw:A5:Value )
oBrw:Net:VarPut( oBrw:Gross:Value + oBrw:ATot:Value - (oBrw:DTot:Value))

VarPut , hmmm slipped my mind, Very simple

Great !!!