Erro CONSISTENTE se você publicar uma lista no diário de Cartera na compra na versão espanhola do Microsoft Dynamics NAV 2009

Quando você tentar lançar uma fatura no diário Cartera com moeda no lado da compra na versão espanhola do Microsoft Dynamics NAV 2009, você recebe a seguinte mensagem de erro:

"A transação não pode ser concluída porque irá causar inconsistências na tabela mov. Verifique onde e como a função CONSISTENTE é usada na transação para localizar o motivo do erro. Contate o administrador do sistema. Tabelas podem ser marcadas como inconsistentes durante tarefas abrangentes, como lançamento. Isso impede que dados sejam atualizados corretamente."

Isso ocorre apenas quando "Moeda de relatório adicional" = moeda. Siga as etapas na seção alterações de código para resolver o problema. Esse problema ocorre nos seguintes produtos:

A versão em espanhol do Microsoft Dynamics NAV 2009 R2
A versão em espanhol do Microsoft Dynamics NAV 2009 SP1

Resolução

Informações sobre o hotfix

Um hotfix suportado está disponível agora na Microsoft. No entanto, apenas destina-se a corrigir o problema descrito neste artigo. Aplique-o somente aos sistemas que apresentarem esse problema específico. Esta correção poderá ser submetida a testes adicionais. Portanto, se esse problema não o prejudicar, recomendamos que você aguarde o próximo service pack do Microsoft Dynamics NAV 2009 ou a próxima versão do Microsoft Dynamics NAV que contém esse hotfix.

Observação: Em alguns casos, as taxas cobradas para suporte a chamadas podem ser canceladas se um profissional de suporte técnico do Microsoft Dynamics e produtos relacionados determina que uma atualização específica resolverá o problema. Os custos normais de suporte serão aplicados para questões de suporte adicionais e problemas que não se qualificam à atualização específica em questão.

Informações sobre a instalação

A Microsoft fornece exemplos de programação somente para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não está limitado a, garantias implícitas de comercialização ou adequação a um propósito específico. Este artigo presume que você esteja familiarizado com a linguagem de programação que está sendo demonstrada e com as ferramentas usadas para criar e depurar procedimentos. Os engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento. No entanto, eles não modificarão esses exemplos para fornecer funcionalidades adicionais ou construir procedimentos para atender às suas necessidades específicas.

Observação: Antes de instalar esse hotfix, verifique se todos os usuários do cliente do Microsoft Dynamics NAV estiver desconectados do sistema. Isso inclui os serviços do Microsoft Dynamics NAV Application Server (NAS). Você deve ser o único usuário do cliente conectado ao implementar esse hotfix.

Para implementar esse hotfix, você deve ter uma licença de desenvolvedor.

É recomendável que a conta de usuário na janela de Logins do Windows ou na janela banco de dados seja atribuída a ID de função "SUPER". Se a conta de usuário não pode ser atribuída a ID de função "SUPER", você deverá verificar se a conta de usuário tem as seguintes permissões:

A permissão Modificar para o objeto que será alterado.
A permissão de execução para o objeto 5210 de identificação de objeto de sistema e o sistema 9015 de identificação de objeto

objeto.

Observação: Você não precisa ter direitos para os armazenamentos de dados, a menos que você precise executar o reparo de dados.

Alterações de código

Observação sempre testar código correções em um ambiente controlado, antes de aplicar as correções para os computadores de produção. Antes de aplicar a alteração, importe todas as atualizações SEPA.

Para resolver esse problema, altere o código da função PostPayableDocs em geral Jnl.-lançar linha Codeunit (12) da seguinte maneira:

1 de código existente

...END;

    LOCAL PROCEDURE PostPayableDocs@1100009(EntryUnapplied@1100001 : Boolean);
    BEGIN
      // es0012.begin
      IF (DocAmountLCY <> 0) OR (CollDocAmountLCY <> 0) THEN
...

1 código de substituição

...END;

    LOCAL PROCEDURE PostPayableDocs@1100009(EntryUnapplied@1100001 : Boolean);

// Add the following lines.
VAR
DocAmountAddCurr@1100003 : Decimal;
// End of the added lines.

    BEGIN
      // es0012.begin
      IF (DocAmountLCY <> 0) OR (CollDocAmountLCY <> 0) THEN
...

2 de código existente

...NextEntryNo := NextEntryNo - 1;
      // es0012.end
      IF DocAmountLCY <> 0 THEN BEGIN
        IF (GenJnlLine."Applies-to Doc. Type" = GenJnlLine."Applies-to Doc. Type"::Invoice) OR
          EntryUnapplied
        THEN BEGIN
...

Código de substituição 2

...NextEntryNo := NextEntryNo - 1;
      // es0012.end
      IF DocAmountLCY <> 0 THEN BEGIN

// Add the following lines.
IF GenJnlLine."Currency Code" = AddCurrency.Code THEN
DocAmountAddCurr := GenJnlLine.Amount
ELSE
DocAmountAddCurr := DocAmtCalcAddCurrency(DocAmountLCY);
// End of the added lines.

        IF (GenJnlLine."Applies-to Doc. Type" = GenJnlLine."Applies-to Doc. Type"::Invoice) OR
          EntryUnapplied
        THEN BEGIN
...

3 de código existente

...EntryUnapplied
        THEN BEGIN
          VendPostingGr.TESTFIELD("Payables Account");

// Delete the following line.
InitGLEntry(VendPostingGr."Payables Account",DocAmountLCY,DocAmtCalcAddCurrency(DocAmountLCY),TRUE,TRUE);
// End of the deleted line.

          GLEntry."Bal. Account Type" := GenJnlLine."Bal. Account Type";
          GLEntry."Bal. Account No." := GenJnlLine."Bal. Account No.";
          InsertGLEntry(TRUE);
...

Código de substituição 3

...EntryUnapplied
        THEN BEGIN
          VendPostingGr.TESTFIELD("Payables Account");

// Add the following line.
InitGLEntry(VendPostingGr."Payables Account",DocAmountLCY,DocAmountAddCurr,TRUE,TRUE);
// End of the added line.

          GLEntry."Bal. Account Type" := GenJnlLine."Bal. Account Type";
          GLEntry."Bal. Account No." := GenJnlLine."Bal. Account No.";
          InsertGLEntry(TRUE);
...

4 de código existente

... InsertGLEntry(TRUE);
        END ELSE BEGIN
          VendPostingGr.TESTFIELD("Bills Account");

// Delete the following line.
InitGLEntry(VendPostingGr."Bills Account",DocAmountLCY,DocAmtCalcAddCurrency(DocAmountLCY),TRUE,TRUE);
// End of the deleted line.

          GLEntry."Bal. Account Type" := GenJnlLine."Bal. Account Type";
          GLEntry."Bal. Account No." := GenJnlLine."Bal. Account No.";
          InsertGLEntry(TRUE);
...

Código de substituição 4

...InsertGLEntry(TRUE);
        END ELSE BEGIN
          VendPostingGr.TESTFIELD("Bills Account");

// Add the following line.
InitGLEntry(VendPostingGr."Bills Account",DocAmountLCY,DocAmountAddCurr,TRUE,TRUE);
// End of the added line.

          GLEntry."Bal. Account Type" := GenJnlLine."Bal. Account Type";
          GLEntry."Bal. Account No." := GenJnlLine."Bal. Account No.";
          InsertGLEntry(TRUE);
...

Pré-requisitos:

Você deve ter um dos seguintes produtos instalados para aplicar esse hotfix:

A versão em espanhol do Microsoft Dynamics NAV 2009 R2
A versão em espanhol do Microsoft Dynamics NAV 2009 SP1

Informações sobre remoção

Você não pode remover esse hotfix.

Status

A Microsoft confirma que este é um problema em seus produtos listados na seção "Aplica-se a".

Consulte o artigo CONSISTENTE erro se você publicar uma lista em Cartera diário nas vendas na versão espanhola do Microsoft Dynamics NAV 2009 para obter mais informações.

Observação: Este é um artigo de "PUBLICAÇÃO RÁPIDA" criado diretamente de dentro da organização de suporte da Microsoft. As informações contidas neste documento são fornecidas desta maneira, em resposta a problemas emergentes. Como um dos resultados da velocidade da publicação, os materiais podem incluir erros tipográficos e podem ser revisados a qualquer momento sem aviso prévio. Consulte os Termos de usopara outras considerações.