TCUnlink

TCUnlink ( [ nHndConn] ) --> lRet

(logico)
• Retorna verdadeiro (.T.), se a conexão for encerrada com sucesso; caso contrário, falso (.F.), se houver falha de execução. Geralmente, as falhas de execução ocorrem quando tentamos encerrar uma conexão informando um handler inexistente ou já fechada anteriormente.

• Se o parâmetro <nHndConn> não for informado, a conexão atualmente ativa será encerrada.
• Em um ambiente com mais de uma conexão simultânea realizada via TCLink(), duas ou mais conexões estão ativas, o fechamento de uma automaticamente coloca a conexão anteriormente aberta como ativa.
• O número da conexão é obtido no momento que a conexão é estabelecida, através da função TCLink().
• Ao executar a função TCUnlink(), não deve mais haver tabelas abertas utilizando a conexão que está sendo fechada. Caso existam, elas serão fechadas automaticamente, porém vão gerar mensagens de advertência no log de console do Application Server.

_nCon1 := TCLink('MSSQL7/TOPSQL1', 'TOPSERVER1')
_nCon2 := TCLink('MSSQL7/TOPSQL2', 'TOPSERVER2')
......
TCUNLINK(_nCon1) // Finaliza a conexão _nCon1