Histórico da Página

...

TCObject( < cObjcObject >, [ @cType ] )

Parâmetros

Retorno

...

• É necessário conexão com o DBAccess para uso desta função.
• Esta função é utilizada quando se tem uma tabela aberta, compartilhada e se deseja bloquear um registro para que outros usuários não possam alterá-lo.
• Caso a função não esteja na DBAPI (biblioteca client do DBAccess), o programa será encerrado com ocorrência de erro recuperável "TC_Object NOT FOUND - Check DBAPI and DBAccess version".
• Caso haja erro de conexão com o DBAccess, o programa será encerrado com ocorrência de erro recuperável "TC_Object - NO CONNECTION".
• Não é necessário ter um alias aberto para o uso da função.
• Se for informado, o parâmetro cType conterá o nome do tipo do objeto que é informado pelo SGBD.

Considerações sobre os diversos SGBDs

...

user function test1()
  Local nHandle := -1
  Local cType := ""
  Local lRet := ""
  
  // Conecta no SGBD
  nHandle := TCLink( "MSSQL/DSN1", "127.0.0.1", 7890 )
  
  conout( TCObject( "TOPFIELD" ) ) // Exibe: .F.

  lRet := TCObject( "TOPFIELD", @cType )
  conout( lRet ) // Exibe: .F.
  conout( cType ) // Exibe um string vazia
  
  conout( TCObject( "TOP_FIELD" ) ) // Exibe: .T.
  
  conout(lRet := TCObject( "TOPFIELDTOP_FIELD", @cType )
  conout( lRet ) // Exibe: .F.T.
  conout( cType ) // Exibe o nome do tipo tabela que é utilizado pelo SGBD
  
  // Desconecta do SGBD
  TCUnlink( nHandle )
return

...

TCObject está disponível a partir da build 7.00.170117A do AppServer com data de geração superior a 23/03/2017 e a partir da build 20170202 do DBAccess com data de geração superior a 23/03/2017.

O parâmetro cType está disponível a partir da build 7.00.170117A do AppServer com data de geração superior a 31/03/2017 e a partir da build 20170202 do DBAccess com data de geração superior a 31/03/2017.

A DBAPI que será utilizada com o AppServer deve ser compatível com o DBAccess que será utilizado.

...