Erro ao utilizar Reclock na tabela AD1

Tenho uma customização no ponto de entrada FT300GRA, em uma parte do fonte utilizo RecLock( "AD1", .T. ) faço o processo de gravação dos dados e no AD1->( MsUnlock() ) o sistema apresenta o erro abaixo.

AD1010: DB error (Insert): -27 File: AD1010 - Error : 904 - ORA-00904: "B1DESC": invalid identifier ( From tISAMFile::Write ) Thread ID [3312] User [dayana.queiroz] IO [6015] Tables [69] MaxTables [69] Comment [AFAT006 - TCPIP - ThreadID(5100)] SP [ ] Traced [No] SQLReplay [No] InTran [No] DBEnv [ORACLE/TOTVS_PRODUCAO] DBThread [(SID 1539,55784,2)] Started [22/01/2020 14:02:18] IP [10.1.0.190:2578] IDLE [ ] InTransact [ ] Memory [-10359480] Running [ROP_WRITE] RCV [997428] SND [4740541] TCBuild [20181212-20190924] TCVersion [18.2.1.3] ARCH [64] OS [WINDOWS] BUILD [RELEASE]INSERT INTO AD1010(AD1_FILIAL,AD1_NROPOR,AD1_REVISA,AD1_DESCRI,AD1_HORA,AD1_USER,AD1_VEND,AD1_CODCLI,AD1_LOJCLI,AD1_PROVEN,AD1_STAGE,AD1_FEELIN,AD1_VERBA,AD1_MOEDA,AD1_CODPRO,AD1_PRIOR,AD1_STATUS,AD1_MODO,AD1_USERGI,AD1_MSFIL,AD1_MSEMP,AD1_ADITIV,AD1_XOPORI,AD1_XFILOR,AD1_VISTEC,AD1_SITVIS,AD1_XOPPAI,AD1_MSBLQL,AD1_DATA,AD1_DTINI,AD1_DTPFIM,B1_DESC,R_E_C_N_O) VALUES ( :1,:2,:3,:4,:5,:6,:7,:8,:9,:10,:11,:12,:13,:14,:15,:16,:17,:18,:19,:20,:21,:22,:23,:24,:25,:26,:27,:28,:29,:30,:31,:32,:33)

A minha dúvida é por que está saindo nos campos do INSERT o B1_DESC?

compartilhar
  • Boa Tarde, para melhor análise, coloque todas as parte do seu código que está entre o RecLock e MsUnlock!

    Douglas Bichir   30 de Jan de 2020
  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!

3 respostas

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