- Code: Select all Expand view RUN
oBrw : aCols[ 8 ] : bEditValue := { || oRs : sec1 }
Pero no funciona. Alguna idea? Muchísimas gracias.
Saludos
oBrw : aCols[ 8 ] : bEditValue := { || oRs : sec1 }
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.
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: No registered users and 57 guests