Work area not in use on MSCOPYFILE(APLIB070.PRW)

Estou escrevendo um fonte para copiar algumas tabelas, porém está dando este erro do título. Alguém sabe o que pode ser o erro? Segue trecho do fonte:

#include "protheus.ch"

User Function TestCopy()

DBUSEAREA(.T.,"CTREECDX",'SED0101', "SED", .F., .T.)

cFileIni := 'system\sed0101.dtc'
cFileFim := 'BACKUP\sed0101_bkp.dtc'

 If ! MsCopyFile(cFileIni, cFileFim)
     MsgAlert("O arquivo não pôde ser copiado.")

    Else    
    MsgAlert("O arquivo foi copiado com sucesso.")

    EndIf

    Return

ERRO: Capturar.PNG

compartilhar
  • Sua tabela SED010 original está em CTREE ou TOPCONN, sua origem digamos assim.

    Daniel Mendes   27 de Feb de 2023
  • A tabela está em Ctree

    Anne Cavalcante   27 de Feb de 2023
  1. Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
  2. Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
  3. Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
  4. Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
  5. Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

1 resposta

Não é a resposta que estava procurando? Procure outras perguntas com as tags fonte advpl tabela copiar erro ou faça a sua própria pergunta.