Á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
GetPvProfileInt
GetPvProfileInt

Função: GetPvProfileInt

Recupera o conteúdo numérico de uma chave, do arquivo de configuração (*.INI), qualquer.

Sintaxe

Bloco de código
collapsefalse
GetPvProfileInt( <
cSecao>
 cSecao >, <
cChave>
 cChave >, <
nPadrao>
 nPadrao >,
< cNomeArqCfg> ) --> nRet

 

 < 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

...


nPadrao

...

numérico

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

nRet

...

numérico

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

 

 

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 := ""
  Local nPadrao := 0
  //+----------------------------------------------------------------------------+
  //|Exemplifica o uso da função GetPvProfInt                                    |
  //+----------------------------------------------------------------------------+
  cServerIni := GetAdv97()
  cClientIni := GetRemoteIniName()
  cSecao := "TCP"
  cChave := "Port"
  nPadrao := 0
  cMensagem += "Arquivo de configuração do servidor: [" + cServerIni + "]" + CRLF
  cMensagem += "  Seção [" + cSecao + "] Chave [" + cChave + "] Valor [" + ;
               NToC(GetPvProfileInt(cSecao, cChave, nPadrao, cServerIni), 10) + "]" + CRLF
  cMensagem += "Arquivo de configuração da estação: [" + cClientIni + "]" + CRLF
  cMensagem += "  Seção [" + cSecao + "] Chave [" + cChave + "] Valor [" + ;
               NToC(GetPvProfileInt(cSecao, cChave, nPadrao, cClientIni), 10) + "]" + CRLF
  //+----------------------------------------------------------------------------+
  //|Apresenta uma mensagem com os resultados obtidos                            |
  //+----------------------------------------------------------------------------+
Return MsgInfo(cMensagem, "Exemplo do GetPvProfInt")
Exemplo da função GetPvProfInt()
Image Removed
Microsiga Protheus 8.11 , Protheus 10
 

Veja também