Exibir origem

Retornar um array contendo informações de todas as conexões do Pool de Conexão AdvPL.

Sintaxe

TCPoolInfo()

Retorno

Nome	Tipo	Descrição
aRet	vetor	Retorna um array contendo as informações das conexões do pool. Para mais detalhes, consulte a seção de observações.

Esta função não está disponível para uso com RPODB=SQLITE.

Observações

A TCSetPool retorna falso caso não haja conexão ativa durante sua execução
Não é possível adicionar ao pool uma conexão com transação aberta.
Ao tentar executar esta operação, a seguinte mensagem de erro é exibida: Error - TCSetPool - Invalid connection due active transacion.
Não é possível adicionar ao pool uma conexão com área aberta.
Ao tentar executar esta operação, a seguinte mensagem de erro é exibida: Error - TCSetPool - Invalid connection due opened table - Alias XXX.

Descrição do array retornado pela função:

Informação	Tipo	Descrição
Thread	numérico	Número da thread da conexão com o DBAccess.
Pool	carácter	Nome do pool ao qual a conexão está associada.
Tempo	numérico	Tempo que a thread está disponível no pool.

Exemplos

user function exemplo
  
  local i := 0
  local aInfo := {}
  
  for i := 1 to 5
    TCLink()
    TCSetPool("MYPOOL")
  next
  
  varInfo("Conexoes no Pool: ", TCPoolInfo())
  
  aInfo := TCPoolInfo()
  while (len(aInfo) > 0)
    TCGetPool(aInfo[1,2])
    TCUNLink()
    aInfo := TCPoolInfo()
  end
  
return

Sintaxe

Retorno

Observações

Exemplos

Veja também