Frameworksp

Atalhos

Páginas filhas
  • MsAppend - Adiciona registros

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

  • Sem rótulos