Existe alguma maneira para fechar uma célula aberta na hBROWSE, tipo o keysec(27,20,,.T.) do READ.
@ 13,400 BROWSE oBrw2 DATABASE SIZE 960,150 STYLE WS_TABSTOP AUTOEDIT ;
FIRST {|| XARDEX->( DBSEEK(xESTOQUE->(SUBSTR(DESCRICAO,1,49)), .F.) ) } ;
WHILE {|| XARDEX->(SUBSTR(DESCRICAO,1,49)) == xESTOQUE->(SUBSTR(DESCRICAO,1,49))} ;
ON UPDATE {|| kardex_onPosChange() }
oBrw2:nHeadHeight := 24
oBrw2:alias := 'xARDEX'
oBrw2:nColumns := 4
Obrw2:freeze := 1
SELECT (oBrw2:alias)
oBrw2:AddColumn( HColumn():New('Descrição', FieldBlock( 'DESCRICAO' ) ,'C',50, 0 ,.F.,0,0,,,,,,,,,)) // ESQUERDA
oBrw2:AddColumn( HColumn():New('N Lote' , FieldBlock( 'nlote' ) ,'C',20, 0 ,.T.,0,0,,,,,,,,,))
oBrw2:AddColumn( HColumn():New('Validade' , FieldBlock( 'validade') ,'C',10, 0 ,.T.,0,0,'99/9999',,,,,,,,)) // CENTRO
oBrw2:AddColumn( HColumn():New('Qtde' , FieldBlock( 'qtde' ) ,'N',06, 0 ,.T.,1,2,'9999999',,,,,,,,))
oBrw2:acolumns[03]:footing := [Qtde Total: ]
oBrw2:acolumns[04]:footing := TRANSF( fVLR01, [@E 999,999] )
oBrw2:aColumns[03]:nJusFoot := DT_RIGHT
oBrw2:aColumns[04]:nJusFoot := DT_RIGHT
O que preciso, e fechar uma coluna que foi deixada aberta depois de um determinado perÃodo, tem como?
Grato