Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 4 Próxima »

Função: GetPvProfString

Recupera o conteúdo caractere de uma chave de um arquivo de configuração (*.INI) qualquer.

GetPvProfString ( < cSecao>, < cChave>, < cPadrao>, < cNomeArqCfg> ) --> cRet

 

NomeTipoDescriçãoObrigatórioReferência
cSecaoCaracterIndica o nome da seção do arquivo a ser considerada.X 
cChaveCaracterIndica o nome da chave a ser considerada.X 
cPadraoCaracterIndica o conteúdo padrão ( default ) a ser retornado , caso a chave não seja encontrada no arquivo de configuração.X 
cNomeArqCfgCaracterIndica o nome do arquivo de configuração (*.INI) a ser utilizado.X 
uParam5NuméricoCompatibilidade  
uParam6NuméricoCompatibilidade  

 

cRet
    (caracter)
  • Retorna o conteúdo da chave especificada, ou o seu valor padrão.

Localização do arquivo de configuração a ser pesquisado

  • Se <cNomeArqCfg> for informado sem caminho, o arquivo será procurado na pasta de instalação do TOTVS Application Server.
  • Se <cNomeArqCfg> for informado com caminho, o arquivo será procurado na estação que executou a função.
#DEFINE CRLF Chr(13)+Chr(10)User Function Exemplo()Local cServerIni := "", cClientIni := "", cMensagem := ""Local cSecao := "", cChave := "", cPadrao := ""//+----------------------------------------------------------------------------+//|Exemplifica o uso da função GetPvProfString                                 |//+----------------------------------------------------------------------------+  cServerIni := GetAdv97()  cClientIni := GetRemoteIniName()  cSecao := "Drivers"  cChave := "Active"  cPadrao := "undefined"  cMensagem += "Arquivo de configuração do servidor: [" + cServerIni + "]" + CRLF  cMensagem += "  Seção [" + cSecao + "] Chave [" + cChave + "] Valor [" + ;    GetPvProfString(cSecao, cChave, cPadrao, cServerIni) + "]" + CRLF  cMensagem += "Arquivo de configuração da estação: [" + cClientIni + "]" + CRLF  cMensagem += "  Seção [" + cSecao + "] Chave [" + cChave + "] Valor [" + ;    GetPvProfString(cSecao, cChave, cPadrao, cClientIni) + "]" + CRLF//+----------------------------------------------------------------------------+//|Apresenta uma mensagem com os resultados obtidos                            |//+----------------------------------------------------------------------------+Return MsgInfo(cMensagem, "Exemplo do GetPvProfString")

Exemplo da função GetPvProfString
Microsiga Protheus 8.11 , Protheus 10

 

  • Sem rótulos