TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 6

changes.mady.by.user Daniel Otto Bolognani

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Oberdan de Almeida Santos

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
collapsefalse
GetPvProfileInt( < cSecao >, < cChave >, < nPadrao >, < 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

...

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")

Veja também