TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Adriana Panseri Santos

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Fernando Gomes Da Silva

Gravado em

Chave

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

Pagetitle
DBCommitAll

...

Colapse ALL

...

...

DBCommitAll

Salva

...

em

...

disco

...

todas

...

as

...

atualizações

...

pendentes na área de trabalho corrente.

Sintaxe

Bloco de código
collapsefalse
DBCommitAll()
--> Nil
Retorno
Nil (Nulo)
Exemplos 
//Este exemplo, apresenta como utilizar a função DBCommitAll() para salvar todas as//alterações realizadas nas áreas de trabalho abertas no momento.USE Clientes NEWDBGOTO(100)Nome := "José"USE Fornecedores NEWDBGOTO(168)Nome := "João"DBCOMMITALL()// Salva em disco as alterações realizadas nas tabelas Clientes e Fornecedores
Abrangência
Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

Retorno

Nome

Tipo

Descrição

uRet

nil

Retorno sempre é nulo.

Observações

  • A nova tabela deve ser aberta atribuindo ao primeiro parâmetro da função DBUseArea como Verdadeiro (.T.) conforme exemplo abaixo, caso contrario as tabelas anteriores serão fechadas e não serão salvas.

Exemplos

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
FUNCTION Example()
  Local cT1 := "T1"
  Local cT2 := "T2"
  
  TCLink()
  
  DBCreate("T1", {{"FIELD_NAME", "C", 10, 0},;
                  {"FIELD_TYPE", "C", 10, 0}}, "TOPCONN")
                  
  DBCreate("T2", {{"FIELD_NAME", "C", 10, 0}, ;
                  {"FIELD_TYPE", "C", 10, 0}}, "TOPCONN")
             
  
  DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.)
 
  (cT1)->( DBAppend( .F. ) )
  (cT1)->FIELD_NAME := "name"
  (cT1)->FIELD_TYPE := "string"
  
  // Deve abrir a tabela com parametro de nova area como Verdadeiro (.T.) ver documentação DBUseArea
  DBUseArea(.T., 'TOPCONN', cT2, (cT2), .F., .F.)
 
  (cT2)->( DBAppend( .F. ) )
  (cT2)->FIELD_NAME := "name"
  (cT2)->FIELD_TYPE := "string"
  
  DBCommitAll()
  
  DBCloseArea()
  
  DBCloseArea()
  
  TCUnlink()
RETURN

Veja também