Nesse vídeo demonstraremos a utilização da função WSPLRelDir, que serve para buscar a pasta padrão de relatórios configurada no ERP.
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas
#Include "TOTVS.ch"
/*/{Protheus.doc} User Function zExe533
Retorna a pasta padrão de relatórios conforme a chave WSPReldir no environment ou nas configurações como MV_RELT
@type Function
@author Atilio
@since 07/04/2023
@see https://tdn.totvs.com/display/tec/WSPLReldir
@obs
**** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/
User Function zExe533()
Local aArea := FWGetArea()
Local cPasta := ""
//Busca a pasta e exibe
cPasta := WSPLRelDir()
FWAlertInfo("A pasta de relatórios é: " + cPasta, "Teste WSPLRelDir")
FWRestArea(aArea)
Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.