Histórico da Página

...

Como os includes fazem parte do RPO (tlpp.rpo), basta executar a função tlpp.environment.getIncludesTLPP para extraí-los.

Após executar esta função os includes serão extraídos na pasta do AppServer dentro do diretório do "RootPath" do seu ambiente, em um diretório chamado "includes".

Basta então Tendo isto basta adcionar este diretório nos seus PATH  "PATHs de includes do " no seu ambiente de compilação.

• Exemplo de configuração no VS Code com o plugin da TOTVS
  
  

Para extrair podemos executar esta função de diversas maneiras:

• Usando o próprio AppServer via linha de comandos:
  [AppServer] -env=[seu ambiente] -run=tlpp.environment.getIncludesTLPP
  Ex:
  appserver.exe -env="TLPPCORE" -run=tlpp.environment.getIncludesTLPP
  
  

• Usando o SmartClient:
  Abrir o SmartClient e digitar na tela:

  • Programa inicial: tlpp.environment.getIncludesTLPP
  • Comunicação no cliente: [seu serviço]
  • Ambiente no servidor: [seu ambiente]
    
    

• Usando o SmartClient via linha de comandos:
  [SmartClient] -M -Q -E=[seu ambiente] -Z=[hostname / IP] -Y=[Porta] -P=tlpp.environment.getIncludesTLPP
  Ex:
  smartclient.exe -M -Q -E=TLPPCORE -Z=localhost -Y=5012 -P=tlpp.environment.getIncludesTLPP
  
  

• Via código tl++ ou advpl:

  Function u_TLPPIncs()
  Return
    Local lRet := .F.
    Local cRet := ""
    Local aMessages := {}
    Local nI := 0
  
    ConOut("Getting TLPP includes ...")
    lRet := tlpp.environment.getIncludesTLPP(@cRet, @aMessages)
  
    If(lRet != .T.)
      ConOut("Error: " + cValToChar(cRet))
      For nI := 1 to Len(aMessages)
        ConOut(cValToChar(nI) + " Erro: " + cValToChar(aMessages[nI]))
      Next
    Else
      ConOut("OK. 'includes' are on path: " + cValToChar(cRet))
    EndIf
  Return lRet
  

Obs. Você pode criar fontes .tlpp e/ou .prw sem nenhum include se eles não tiverem nenhuma dependência