Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
portuguese
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css

Pagetitle

...

GetPvProfString

...

...

...

GetPvProfString

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

Sintaxe

Bloco de código
collapsefalse
GetPvProfString( <
cSecao>
 cSecao >, <
cChave>
 cChave >, <
cPadrao>
 cPadrao >,
< cNomeArqCfg> ) --> cRet

 

 < cNomeArqCfg >, [ uParam5 ], [ uParam6 ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cSecao

...

caractere

Indica o nome da seção do arquivo a ser considerada.

X

 

cChave

...

caractere

Indica o nome da chave a ser considerada.

X

 

cPadrao

...

caractere

Indica o conteúdo padrão ( default ) a ser retornado , caso a chave não seja encontrada no arquivo de configuração.

X

 

cNomeArqCfg

...

caractere

Indica o nome do arquivo de configuração (*.INI) a ser utilizado.

X

 

uParam5

...

numérico

Compatibilidade

 

 

uParam6

...

numérico

Compatibilidade

 

 

 

Retorno

Nome

Tipo

Descrição

...

cRet

...

caractere

Retorna o conteúdo da chave especificada, ou o seu valor padrão

...

Observações

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.

Exemplos

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
#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")

Preview

Exemplo da função GetPvProfString
Image Modified

...

Microsiga Protheus 8.11 , Protheus 10

...

Veja também

...