TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 6

changes.mady.by.user Carlos Sampa Junior

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Carlos Sampa Junior

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
collapsefalse
TCGetDB()

Retorno

Nome

Tipo

Descrição

cRet

caractere

Retorna uma string contendo um identificador do banco de dados em uso pela conexão atual.

Observações

A função TCGetDB retorna uma string contendo um identificador que representa o banco de dados relacional (SGBD) em uso pela conexão atual/ativa com o DBAccess.

...

A seguir, observe na tabela a string que será retornada:

Banco de Dados

String retornada

Microsoft SQL Server

MSSQL

Oracle

ORACLE

IBM DB2 ( UDB )

DB2

(*) IBM DB2 ( AS400 / iSeries )

DB2/400

IBM Informix

INFORMIX

Sybase

SYBASE

PostgreSQL

POSTGRES

Generic ODBC Connection

ODBC

MySQL

MYSQL

c-treeACE SQL

CTREESQL

OpenEdge

OPENEDGE

Caso não haja nenhuma conexão ativa com DBAccess no momento da chamada da função, é retornada uma string em branco ( "" ) e no log de console do Application Server será registrada uma advertência: "Warning - TCGetDB - statement ignored - No connection.".

...

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
user function teste()
  Local nHandle := TCLink( "MSSQL/DSNP11-MSSQL", "127.0.0.1", 7890 )
  Local cDB := TcGetDB()
  
  If Empty( cBDcDB )
     MsgStop( "Não há conexão ativa." )
  Else
     MsgInfo( "Conectado com " + cBDcDB )
  Endif
  
  TCUnlink( nHandle )
return

...