xBrowse validar e atualizar célula?

Post Reply
FWHISHOW
Posts: 80
Joined: Thu Nov 29, 2007 2:01 pm

xBrowse validar e atualizar célula?

Post by FWHISHOW »

Antonio, usando a xbrowse não estou conseguindo atualizar o conteudo de uma célula, ex:

obRW:aCols[1]:bOnPostEdit := {|o,x| aprod[ obRW:nArrayAt,1] := x }
obRW:aCols[1]:bStrData := { || trans(aprod[ obRW:nArrayAt,1],'999') }
obRW:aCols[1]:bEditValue:= { || aprod[ obRW:nArrayAt,1] }
obRW:aCols[1]:nEditType := EDIT_GET
obRW:aCols[1]:bEditValid := {|oGet| Seekproduto(oget) }

STATIC Function Seekproduto(oget)

local ubuffer:= oGet:Value()

if ! existe_prods(ubuffer)
// aqui preciso atualizar o valor de ubuffer, como fazer?
// algo assim oget:=0
return (.f.)
endif

return(.t.)
Rossine
Posts: 343
Joined: Tue Oct 11, 2005 11:33 am

Post by Rossine »

Olá,

Tente isto:

Code: Select all

STATIC Function Seekproduto(oget) 

local ubuffer:= oGet:Value() 

if ! existe_prods(ubuffer) 
   oGet:varput( 0 )
   oGet:refresh()
   return (.f.) 
endif 

return(.t.)
Abraços,

Rossine.
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Revisa fwh\samples\mallorca.prg

Que ha sido modificado y probado a fondo en FWH 8.01, por lo que es distinto y funciona distinto del que se incluye en FWH 7.12
regards, saludos

Antonio Linares
www.fivetechsoft.com
FWHISHOW
Posts: 80
Joined: Thu Nov 29, 2007 2:01 pm

Post by FWHISHOW »

GRATO
Post Reply