Tempo aproximado para leitura :00:02:00 min
Dúvida
Em uma tela MBrowse() onde chamo a FWMBrowse(), está sobrepondo o menu outras ações com o conteúdo da MBrowse().
Ambiente
Cross Segmento - TOTVS Backoffice (Linha Protheus) - ADVPL - A partir da versão 12.1.17
Solução
Quando a FwMBrowse() filha é chamada e encontra uma variável privada aRotina, a mesma é utilizada, sendo assim é necessário criar uma variável por exemplo getArotina para receber o conteúdo da variável privada aRotina, limpar da variável privada aRotina e ao fechar o FwMBrowse() retornar o conteúdo armazenado na variável getArotina.
Segue abaixo um modelo de exemplo:
User Function zMVCMd1()
Local aArea := GetArea()
Local aGetArotina := aRotina
Local oBrowse
//Instânciando FWMBrowse
oBrowse := FWMBrowse():New()
//Setando a tabela
oBrowse:SetAlias("SB1")
//Setando a descrição da rotina
oBrowse:SetDescription(cTitulo)
//CHAMADA DO MENUDEF
aRotina:={} //Limpar arotina PAI
oBrowse:SetMenuDef('ZMVCTDN')
//Ativa a Browse
oBrowse:Activate()
aRotina :=aGetArotina
RestArea(aArea)
Return Nil
1 Comentários