Page 1 of 1

bGetFocus en xbrowse existe?

PostPosted: Thu Oct 21, 2021 7:24 pm
by goosfancito
Hola.
Necesito guardar una copia del valor de una celda en xbrowse antes que sea cambiada.
existe el bGetFocus() en xbrowse?

Re: bGetFocus en xbrowse existe?

PostPosted: Thu Oct 21, 2021 7:43 pm
by leandro
Creo que este te puede servir

Code: Select all  Expand view

    oCol:bOnPostEdit   = { | oCol, xVal, nKey | If( nKey == VK_RETURN, calcItemNota(xVal),) }
    oCol:bEditValid   = { | oGet | validaItem(oGet,oBrwItno:nArrayAt) }
    oCol:bEditValue  = {|| if(Len( aDevolu ) > 0 , aDevolu[oBrwItno:nArrayAt]["devolucion"] ,0 ) }
 

Re: bGetFocus en xbrowse existe?

PostPosted: Thu Oct 21, 2021 7:57 pm
by goosfancito
te comparto como lo he resuelto

Code: Select all  Expand view
    :aCols[ 4 ]:bStrData      := { || IIf( ! Empty( ::aPRoductos[ ::oBrw:nArrayAt, 4 ] ), trans( ::aProductos[ ::oBrw:nArrayAt, 4 ], ), ) }
      :aCols[ 4 ]:bEditWhen     := { || ! Empty( ::aProductos[ ::oBrw:nArrayAt, 3 ] ) }
      :aCols[ 4 ]:bOnPostEdit   := { | oCol, xVal, nKey | ;
                                     ::aproductos[ ::oBrw:narrayat, 8 ] := ::aproductos[ ::oBrw:narrayat, 8 ] - ::aproductos[ ::oBrw:narrayat, 4 ], ;
                                     oCol:VALUE := xVal,  ;
                                     ::aproductos[ ::oBrw:narrayat, 8 ] := ::aproductos[ ::oBrw:narrayat, 8 ] + xVal ;}
       :aCols[ 4 ]:bEditValid    := { | oGet | ::valido( oGet, 4 ) }