Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
portuguese
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css

Pagetitle
DBCloseAll

...

...

...

DBCloseAll

Fecha

...

todas

...

as

...

áreas

...

de

...

trabalho

...

em

...

uso.

Sintaxe

Bloco de código
collapsefalse
DBCloseAll()

DBCloseAll ( ) --> Nil

Nil (Nulo)

Observações

  • DBCloseAll

...

  • efetiva as atualizações pendentes, libera todos os registros bloqueados e fecha todas as áreas de trabalho.

...

...

  • para cada área de trabalho.
  • Se as atualizações pendentes falharem, será apresentado no log de console do AppServer a mensagem "Update error: (DBCloseAll)".
  • Se houver erro no fechamento das áreas de trabalho, será apresentado no log de console do AppServer a mensagem "Close error - TTT", onde TTT é o nome da tabela aberta.
  • A existência de mais de uma conexão no mesmo programa para o mesmo SGBD não influencia o funcionamento da função.

Exemplos

O exemplo abaixo utiliza a RDD "TOPCONN", mas a função pode ser utilizada com qualquer uma das RDDs válidas.

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
user function test1()
  Local nHandle1 := TCLink( "MSSQL/DSN1", "127.0.0.1", 7890 )
  Local cTable1 := "MYTABLE1"
  Local cTable2 := "MYTABLE2"
  Local cRDD := "TOPCONN"
  
  // Abre a tabela 1 em modo exclusivo criando uma área de trabalho
  DBUseArea( .T., cRDD, cTable1, (cTable1), .F., .F. )
  
  // Faz operações na tabela 1
  
  // Abre a tabela 2 em modo exclusivo criando uma área de trabalho
  DBUseArea( .T., cRDD, cTable2, (cTable2), .F., .F. )
  
  // Faz operações na tabela 2
  
  // 
//Este exemplo, apresenta como utilizar a função DBCloseAll() para fechar todas as áreas de trabalho abertas.USE Clientes NEWDBSetIndex("Nome") // Abre o arquivo de índice "Nome".USE Fornecedores NEW...DBCloseAll() //
Fecha todas as áreas de trabalho
e todos os índices associados a elas.
Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server
Veja Também

  DBCloseAll()
  
  TCUnlink( nHandle1 )
return

Veja também