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 Parâmetros/Elementos < 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
|