Retorna o número da porta que o servidor de aplicação, license, http ou https está escutando.
GetPort( < nType > [, <lIsSSL>, <lHasMPP> ] )
Nome | Tipo | Descrição | Obrigatório | Referência |
|---|---|---|---|---|
nType | numérico | Indica o tipo da porta (1 - Application, 2 - License, 3 - HTTP, 4 - HTTPS). | X | |
| lIsSSL | lógico | Recebe por referência a informação se esta porta está ou não usando conexão segura | X | |
| lHasMPP | lógico | Recebe por referência a informação se esta porta está com Porta Multi Protocolo habilitada | X |
Obs. Para a porta do Application Server o valor de lIsSSL segue Seção [Drivers], chave MultiProtocolPortSecure e a indicação de porta multi protocolo lHasMPP segue Seção [Drivers], chave MultiProtocolPort.
Ref. Application Server - Porta Multiprotocolo
Nome | Tipo | Descrição |
|---|---|---|
nPort | numérico | Retorna o número da porta em formato númerico, caso a porta não esteja habilitada ou o tipo da porta não esteja no intervalo de 1 a 4, retorna -1. |
User Function exemplo()
Local lIsSSL := .F.
Local lHasMPP := .F.
Conout(GetPort(0)) // Erro -1
Conout(GetPort(1)) // Application
Conout(GetPort(2)) // License
Conout(GetPort(3)) // HTTP
Conout(GetPort(4)) // HTTPS
GetPort(1, @lIsSSL, @lHasMPP)
Conout("Application Server SSL: " + cValToChar(lIsSSL)) // Application - SSL
Conout("Application Server MPP enable: " + cValToChar(lHasMPP)) // Application - Multi protocol port
Return
AppServer 17.1.1.7 e 17.2.1.7
Obs. Os parâmetros "lIsSSL" e "lHasMPP" somente podem ser recuperados em versões superiores a 19.3.0.2