Diferença de arredondamento existe depois que você alterar manualmente um valor de IVA em uma fatura que tem uma compra não deductable IVA aplicada na versão português do Microsoft Dynamics NAV 2009

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 teste código correções em um ambiente controlado antes de aplicar as correções para os computadores de produção.

Para resolver esse problema, execute as seguintes etapas:

1. Alterar o código da função PostItemJnlLine na compra.-lançar codeunit (90) da seguinte forma:
   Código existente

   ...ELSE
     Factor := QtyToBeInvoiced / "Qty. to Invoice";
   IF (GLSetup."Payment Discount Type" = GLSetup."Payment Discount Type"::"Calc. Pmt. Disc. on Lines") AND
      (PurchSetup."Post Payment Discount") THEN
   ItemJnlLine.Amount :=
   
   // Delete the following lines.
     Amount * (100 + TempVATAmountLine."ND %") / 100 * Factor + RemAmt + PurchLine."Pmt. Disc. Rcd. Amount"
   ELSE
     ItemJnlLine.Amount :=
     Amount * (100 + TempVATAmountLine."ND %") / 100 * Factor + RemAmt;
   // End of the lines.
   
   IF PurchHeader."Prices Including VAT" THEN
     ItemJnlLine."Discount Amount" :=
     ("Line Discount Amount" + "Inv. Discount Amount") / (1 + "VAT %" / 100) * Factor + RemDiscAmt
   ...
   

   Código de substituição

   ...ELSE
     Factor := QtyToBeInvoiced / "Qty. to Invoice";
   IF (GLSetup."Payment Discount Type" = GLSetup."Payment Discount Type"::"Calc. Pmt. Disc. on Lines") AND
      (PurchSetup."Post Payment Discount") THEN
   ItemJnlLine.Amount :=
   
   // Add following lines
     Amount * (100 + TempVATAmountLine."ND %") / 100 * Factor + RemAmt + PurchLine."Pmt. Disc. Rcd. Amount" +
     PurchLine."ND Difference"
   ELSE
      ItemJnlLine.Amount :=
   Amount * (100 + TempVATAmountLine."ND %") / 100 * Factor + RemAmt + PurchLine."ND Difference";
   // End of the lines.
   
   IF PurchHeader."Prices Including VAT" THEN
      ItemJnlLine."Discount Amount" :=
      ("Line Discount Amount" + "Inv. Discount Amount") / (1 + "VAT %" / 100) * Factor + RemDiscAmt
   ...
   

2. Alterar o código da função PostItemChargePerOrder na compra.-lançar codeunit (90) da seguinte forma:
   Código existente

   ...IF ItemJnlLine2."Invoiced Quantity" = 0 THEN BEGIN
       ItemJnlLine2."Invoiced Quantity" := ItemJnlLine2.Quantity;
       ItemJnlLine2."Invoiced Qty. (Base)" := ItemJnlLine2."Quantity (Base)";
   END;
   ItemJnlLine2.Amount :=
        ("Amount to Assign" * ItemJnlLine2."Invoiced Qty. (Base)" / QtyToInvoice) *
   
   // Delete the following line.
   (100 + TempVATAmountLine."ND %") / 100;                    
   
   IF "Document Type" IN ["Document Type"::"Return Order","Document Type"::"Credit Memo"] THEN
        ItemJnlLine2.Amount := -ItemJnlLine2.Amount;
        ItemJnlLine2."Unit Cost (ACY)" :=
        ROUND(
        ItemJnlLine2.Amount / ItemJnlLine2."Invoiced Qty. (Base)",
   ...
   

   Código de substituição

   ...IF ItemJnlLine2."Invoiced Quantity" = 0 THEN BEGIN
       ItemJnlLine2."Invoiced Quantity" := ItemJnlLine2.Quantity;
       ItemJnlLine2."Invoiced Qty. (Base)" := ItemJnlLine2."Quantity (Base)";
   END;
       ItemJnlLine2.Amount :=
      ("Amount to Assign" * ItemJnlLine2."Invoiced Qty. (Base)" / QtyToInvoice) *
   
   // Add the following line.
      (100 + ItemChargePurchLine."ND %") / 100;        
   
   IF "Document Type" IN ["Document Type"::"Return Order","Document Type"::"Credit Memo"] THEN
        ItemJnlLine2.Amount := -ItemJnlLine2.Amount;
        ItemJnlLine2."Unit Cost (ACY)" :=
        ROUND(
        ItemJnlLine2.Amount / ItemJnlLine2."Invoiced Qty. (Base)",
   ...
   

Pré-requisitos:

Você deve ter um dos seguintes produtos instalados e o seguinte hotfix aplicado para aplicar esse hotfix:

• A versão em português do Microsoft Dynamics NAV 2009 R2

• A versão em português do Microsoft Dynamics NAV 2009 Service Pack 1

Além disso, você deve ter o hotfix 2479082 e 2479102 instalado para aplicar esse hotfix. Para obter mais informações sobre o hotfix 2479082 e o hotfix 2479102, clique nos números abaixo para visualizar os artigos na Base de Conhecimento da Microsoft:

2479082 o valor no campo "Valor de custo (real)" é calculado incorretamente em entradas de valor depois que você lançar uma nota de crédito de compra na versão português do Microsoft Dynamics NAV 2009 Service Pack 1

2479102 o valor no campo "Valor de custo (real)" é calculado incorretamente em entradas de valor se um item no memorando de crédito de compra lançados usa o método de avaliação de custo médio a versão em português do Microsoft Dynamics NAV 2009 Service Pack 1