Função: MsAppend - Adiciona registros
Versões: | Advanced Protheus 5.07 , Advanced Protheus 5.08 , Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Idiomas: | Espanhol , Inglês |
Descrição:
Adiciona registros/linhas de um arquivo/tabela para outro arquivo/tabela já existente.
Programa Fonte:
APLIB070.PRW
Sintaxe:
MsAppend - Adiciona registros ( cTargecSource ) --> lBack
Retorno:
-
lBack(logico)
- .T. se conseguiu adicionar os registros/linhas
Observações
Caso a RDD corrente não seja TOPCONN (Top Connect), o arquivo/tabela informado no parâmetro cTarget deverá estar aberto para executar a função MsAppend.
Exemplos
#include "protheus.ch"User Function TestCreate()Local cFile := '\DATA\SA1990'Local cTarget := '\DATA\XXX'Local aStru := {}Local lBack := .F.DbUseArea(.T., "DBFCDX",cFile,"TMP", .T., .F.) aStru := dbStruct()DbcloseArea()If (lBack := MsCreate(cTarget,aStru)) // Cria Arquivo de Destino) DbUseArea(.T., "DBFCDX",cTarget,"TARGET", .T., .F.) lBack := MsAppEnd(cTarget,cFile) // Transfere de cSource para cTarget DbSelectArea("TARGET") dbCloseArea() If lBack ApMsgAlert("Arquivo criado.") EndIfEndIfReturn
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
cTarge | Caracter | Arquivo/tabela destino | X | ||||||||||||||
cSource | Caracter | Arquivo/tabela origem | X |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas