Os valores nos campos quantidade e a amortização acumulada somar todos os valores de imobilizado incorrectamente quando executar o relatório de livro de amortização (12119) na versão italiana do Microsoft Dynamics NAV 2009

Informações sobre correção

Agora tem uma correcção suportada disponível na Microsoft. Contudo, destina-se apenas a corrigir o problema descrito neste artigo. Aplique-a apenas em sistemas que tenham este problema específico. Esta correcção poderá ser submetida a testes adicionais. Por conseguinte, se não estiver a ser gravemente afectado por este problema, recomendamos que aguarde o próximo service pack do Microsoft Dynamics NAV 2009 ou a próxima versão do Microsoft Dynamics NAV que contenha esta correcção.

Nota Em casos especiais, os custos normalmente inerentes para suporte chamadas poderão ser anuladas se um técnico de suporte técnico do Microsoft Dynamics e produtos relacionados determina que uma actualização específica resolverá o problema. Os custos de normais do suporte serão aplicados a questões de suporte adicionais e problemas que não se enquadrem na atualização específica em questão.

Alterações de código

Nota Sempre o código de ensaio corrige num ambiente controlado antes de aplicar as correcções para os computadores de produção.
Para resolver este problema, siga estes passos:

1. Adicionar uma nova variável global no relatório de livro de amortização (12119) e, em seguida, especifique a variável da seguinte forma:

   • Nome: TotalAmounts

   • Tipo de dados: matriz de [6] Decimal

2. Altere o código na função UpdateTotals no relatório de livro de amortização (12119) do seguinte modo:
   Código existente

   ...FOR J := 1 TO NumberOfTypes DO BEGIN
   GroupStartAmounts[J] := GroupStartAmounts[J] + StartAmounts[J];
   GroupNetChangeAmounts[J] := GroupNetChangeAmounts[J] + NetChangeAmounts[J];
   GroupDisposalAmounts[J] := GroupDisposalAmounts[J] + DisposalAmounts[J];
   TotalStartAmounts[J] := TotalStartAmounts[J] + StartAmounts[J];
   TotalNetChangeAmounts[J] := TotalNetChangeAmounts[J] + NetChangeAmounts[J];
   TotalDisposalAmounts[J] := TotalDisposalAmounts[J] + DisposalAmounts[J];
   END;
   ...
   

   Código de substituição

   ...// Add the following lines.
   FOR J := 1 TO NumberOfTypes DO BEGIN
   GroupStartAmounts[J] := 0;
   GroupNetChangeAmounts[J] := 0;
   GroupDisposalAmounts[J] := 0;
   END;
   // End of the lines.
   
   FOR J := 1 TO NumberOfTypes DO BEGIN
   GroupStartAmounts[J] := GroupStartAmounts[J] + StartAmounts[J];
   GroupNetChangeAmounts[J] := GroupNetChangeAmounts[J] + NetChangeAmounts[J];
   GroupDisposalAmounts[J] := GroupDisposalAmounts[J] + DisposalAmounts[J];
   TotalStartAmounts[J] := TotalStartAmounts[J] + StartAmounts[J];
   TotalNetChangeAmounts[J] := TotalNetChangeAmounts[J] + NetChangeAmounts[J];
   TotalDisposalAmounts[J] := TotalDisposalAmounts[J] + DisposalAmounts[J];
   END;
   ...
   

3. Altere o código na função CreateTotals no relatório de livro de amortização (12119) do seguinte modo:
   Código existente

   ...// Delete the following lines.
   TotalEndingAmounts[J] := TotalStartAmounts[J] + TotalNetChangeAmounts[J] + TotalDisposalAmounts[J]; // IT0007
   BookValueAtEndingDate := BookValueAtEndingDate + TotalEndingAmounts[J];
   // End of the lines.
   ...
   

   Código de substituição

   ...// Add the following line.
   TotalAmounts[J] := TotalStartAmounts[J] + TotalNetChangeAmounts[J] + TotalDisposalAmounts[J]; // IT0007
   BookValueAtEndingDate := BookValueAtEndingDate + TotalAmounts[J];
   // End of the lines.
   ...
   

4. Alterar o código da propriedade SourceExpr do 1130078 a caixa de texto na secção de rodapé na amortização no livro de relatório (12119) do seguinte modo:
   Código existente

   TotalEndingAmounts[1]+TotalEndingAmounts[3]+TotalEndingAmounts[4];

   Código de substituição

   TotalAmounts[1]+TotalAmounts[3]+TotalAmounts[4];

5. Alterar o código da propriedade SourceExpr do 1130083 a caixa de texto na secção de rodapé na amortização no livro de relatório (12119) do seguinte modo:
   Código existente

   ABS(TotalEndingAmounts[2]+TotalEndingAmounts[5]+TotalEndingAmounts[6]);

   Código de substituição

   ABS(TotalAmounts[2]+TotalAmounts[5]+TotalAmounts[6]);