Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
Pagetitle | ||||
---|---|---|---|---|
|
Função: GetPvProfileInt
Recupera o conteúdo numérico de uma chave, do arquivo de configuração (*.INI), qualquer.
Sintaxe
Bloco de código | ||
---|---|---|
| ||
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
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#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() Microsiga Protheus 8.11 , Protheus 10
|