No vídeo de hoje, vamos ver como criar uma pasta de impressora automaticamente no Protheus.
Hoje, a dúvida foi feita pelo grande Renato, onde ele possuía uma dúvida em como configurar o Protheus para sempre criar uma pasta de Spool.
Com isso em mente, fiz um vídeo explicando como sobre usar um ponto de entrada para que se a pasta não existir, criá-la automaticamente.
E abaixo o código fonte desenvolvido para exemplificar:
//Bibliotecas
#Include "TOTVS.ch"
/*/{Protheus.doc} User Function zVid0028
Função para criar uma pasta padrão de impressora
@type Function
@author Atilio
@since 19/04/2022
@obs Acionar essa função dentro do P.E. AfterLogin ou ChkExec
@example
User Function AfterLogin()
Local aArea := FWGetArea()
u_zVid0028()
FWRestArea(aArea)
Return
/*/
User Function zVid0028()
Local aArea := FWGetArea()
Local cPasta := "C:\spool\"
//Se a pasta não existir, irá criar
If ! ExistDir(cPasta)
MakeDir(cPasta)
EndIf
FWRestArea(aArea)
Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.