Nesse vídeo demonstraremos a utilização da função fGetSM0, que serve para nos retornar um array, com as empresas que o usuário tem acesso.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas
#Include "TOTVS.ch"
/*/{Protheus.doc} User Function zExe176
Retorna um array com os dados das empresas que o usuário tem acesso (através da FWLoadSM0)
@type Function
@author Atilio
@since 20/12/2022
@obs
Função fGetSM0
Parâmetros
+ Define se irá filtrar somente o que for da mesma cEmpAnt logada
Retorno
+ Retorna um array com os campos da SM0 (consultar FWLoadSM0 para saber as posições)
**** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/
User Function zExe176()
Local aArea := FWGetArea()
Local aDados := {}
//Busca os dados da empresa
aDados := fGetSM0()
FWAlertInfo("Foi encontrado " + cValToChar(Len(aDados)) + " empresa(s)", "Teste com fGetSM0")
FWRestArea(aArea)
Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.
