Como cambiar el dato de una columna en xbrowse

Como cambiar el dato de una columna en xbrowse

Postby horacio » Sat Sep 26, 2020 2:58 pm

Amigos, tengo un xbrowse y debo cambiar el dato de una columna en tiempo de ejecución. E intentado de esta manera

Code: Select all  Expand view  RUN

oBrw : aCols[ 8 ] : bEditValue := { || oRs : sec1 }
 


Pero no funciona. Alguna idea? Muchísimas gracias.

Saludos
horacio
 
Posts: 1363
Joined: Wed Jun 21, 2006 12:39 am
Location: Capital Federal Argentina

Re: Como cambiar el dato de una columna en xbrowse

Postby VitalJavier » Sat Sep 26, 2020 3:55 pm

Espero y te sirva

Code: Select all  Expand view  RUN

oBrow2:aCols[03]:bEditValid   := { | oLeo, oCol | ValidaCntidad( oLeo, oCol, oBrow2 ) }


FUNCTION ValidaCntidad( oLeo, oCol, oBrow2 )
    IF oLeo:Value() < 0
        RETURN .T.
    ENDIF
    SELECT INVENTADET
    IF ARLock()
        REPLACE INVENTADET->CONTADO     WITH    oLeo:Value()
    ENDIF
    DbUnLock()
    oBrow2:Refresh()
RETURN .T.
 
User avatar
VitalJavier
 
Posts: 241
Joined: Mon Jun 10, 2013 6:40 pm

Re: Como cambiar el dato de una columna en xbrowse

Postby horacio » Sun Sep 27, 2020 12:11 am

Muchas gracias, funcionó perfectamente.

Gracias
horacio
 
Posts: 1363
Joined: Wed Jun 21, 2006 12:39 am
Location: Capital Federal Argentina


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 57 guests