so executa UMA vez ao entrar no browser...
quando movimento as teclas para baixo ou para cima, Não passa pela função
como fazer ?
ob
PAiva
oBrowse1:AddColumn( HColumn():New('Nome' , FieldBlock(_obter_nome()) ,'C',35, 0 ,.T.,1))
static function _obter_nome()
if cbmovi->operacao = [C]
select client
seek pempresa+pfilial+cbmovi->cliente
if found()
msgstop("fold c "+cbmovi->cliente)
else
msgstop("not c "+cbmovi->cliente)
endif
select cbmovi
return substr(client->nome,1,35)
else
select fornec
seek pempresa+pfilial+cbmovi->fornecedor
if found()
msgstop("fold f "+cbmovi->fornecedor )
else
msgstop("not f "+cbmovi->fornecedor )
endif
select cbmovi
return substr(fornec->nome,1,35)
endif