Tempo aproximado para leitura: 00:01:00 min
Dúvida
É possível utilizar duas colunas de legenda na FWMBrowse?
Ambiente
Cross Segmento - TOTVS Backoffice (Linha Protheus) - ADVPL - Todas as versões
Solução
Com o método AddLegend é possível passar o 4º parâmetro determinando um ID, informando ID´s diferentes será considerado uma nova legenda.
#INCLUDE "TOTVS.CH"
USER Function FwBrwQry()
Local oBrowse
Local oColumn
oBrowse := FWMBrowse():New()
oBrowse:SetAlias('ZA0')
oBrowse:SetDescription('Cadastro de Autor/Interprete')
oColumn := oBrowse:AddMarkColumns({||If(.T./*Função de Marca/desmaca*/,'LBOK','LBNO')},;
{|oBrowse|/*Função de DOUBLECLICK*/},{|oBrowse|/* Função de HEADERCLICK*/})
oBrowse:AddLegend( "ZA0_TIPO=='1'", "YELLOW", "Autor","001" )
oBrowse:AddLegend( "ZA0_CODIGO=='000002'", "BLUE" , "Interprete","002" )
oBrowse:SetMenuDef("COMP011_MVC")
oBrowse:Activate()
Saiba mais:
0 Comentários