DBTblCopy

Copia os dados de uma tabela origem para uma tabela destino.

Sintaxe

bRet := DBTblCopy( cSourceAlias, cDestAlias )

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência	Observações
cSourceAlias	Caracter	Alias para a área de dados que será copiada.	X
cDestAlias	Caracter	Alias para a área de dados que receberá a cópia.	X

Retorno

Nome	Tipo	Descrição	Observações
bRet	Lógico	Se a cópia foi realizada com sucesso, o retorno é Verdadeiro. Caso contrário. o retorno é Falso.

Observações

Atualmente, o alias destino (cDestAlias) deve estar associado a algum dos RDDs do SQLite: SLIQTE_SYS, SQLITE_TMP e SQLITE_MEM.

As áreas origem e destino devem ter a mesma estrutura de tabela.

Esta função está disponível a partir do Protheus 12.

Exemplos

Exemplo

// ----------------------------------------------------------------------------------------------
// Este exemplo copia a tabela SA1 do banco principal para uma tabela local, mantida pelo SQLite.
// ----------------------------------------------------------------------------------------------
 
User Function exemplo()


Local _aStruct


// conecta no ambiente Protheus (Empresa e Filial hipotéticos)
PREPARE ENVIRONMENT EMPRESA '99' FILIAL '01' MODULO 'FAT'


// Seleciona a tabela SA1
DBSelectArea("SA1")


// Pega a estrutura da tabela SA1
_aStruct := DBStruct()


// Cria uma tabela chamada mySA1 no SQLITE (usa a mesma estrutura do SA1)
DBCreate( 'mySA1', _aStruct, 'SQLITE_SYS' )


// Coloca a tabela mySA1 em uso
DBUseArea( .T., 'SQLITE_SYS', 'mySA1', 'DEST', .F., .F. )


// #######################################################################
// Faz a cópia da tabela
// #######################################################################
if DBTblCopy('SA1', 'DEST')
   Alert("Tabela copiada com sucesso.")
else
   Alert("Tabela não foi copiada.")
endif
 
return

Árvore de páginas