Nesse vídeo demonstraremos a utilização da classe FWSIXUtil, que serve para buscar informações dos índices (SIX) do dicionário de dados.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas #Include "TOTVS.ch" /*/{Protheus.doc} User Function zExe246 Classe para buscar informações da SIX (Índices) @type Function @author Atilio @since 20/02/2023 @see https://tdn.totvs.com/display/public/framework/FWSIXUtil @obs **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao **** /*/ User Function zExe246() Local aArea := FWGetArea() Local aIndices := {} //Busca os índices da SB1 aIndices := FWSIXUtil():GetAliasIndexes("SB1") //Exibe uma mensagem FWAlertInfo("Foi encontrado " + cValToChar(Len(aIndices)) + " índice(s)", "Teste FWSIXUtil") FWRestArea(aArea) Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.