Este artigo se aplica ao Microsoft Dynamics NAV para a região do Leste Europeu (EE).
Sintomas
Suponha que você tenha duas contas bancárias definidas como a mesma moeda estrangeira na versão do Leste Europeu do Microsoft Dynamics NAV 2009 R2. Depois de executar o trabalho do lote Ajustar Taxas de Câmbio para as duas contas bancárias, o sistema publica inesperadamente a quantidade resumida dos ganhos e perdas em uma conta, seja ganhos ou perdas, no razão de entrada geral.
Resolução
Informações sobre o hotfix
Um hotfix com suporte agora está disponível na Microsoft. No entanto, ele destina-se apenas a corrigir o problema descrito neste artigo. Aplique-o somente a sistemas que estão enfrentando esse problema específico. Esse hotfix pode receber testes adicionais. Portanto, se você não for severamente afetado por esse problema, recomendamos aguardar o próximo pacote de serviços do Microsoft Dynamics NAV ou a próxima versão do Microsoft Dynamics NAV que contém esse hotfix.
Observação Em casos especiais, os encargos que normalmente são incorridos para chamadas de suporte podem ser cancelados se um profissional de suporte técnico do Microsoft Dynamics e produtos relacionados determinar que uma atualização específica resolve seu problema. Os custos de suporte em geral aplicam-se a questões e problemas de suporte adicionais que não se enquadrem na atualização específica em questão.
Informações de instalação
A Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não se limita a, as garantias implícitas de comercialização ou adequação a uma finalidade específica. Este artigo pressupõe 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 ajudá-lo, fornecendo a explicação da funcionalidade de determinado procedimento, mas não modificarão estes exemplos para fornecer funcionalidade adicional nem criarão procedimentos específicos para atender às suas necessidades específicas.
Observação Antes de instalar esse hotfix, verifique se todos os usuários cliente do Microsoft Navision estão conectados ao sistema. Isso inclui usuários cliente do NAS (Microsoft Navision Application Services). Você deve ser o único usuário cliente que está conectado ao implementar esse hotfix.
Para implementar esse hotfix, você deve ter uma licença de desenvolvedor.
Recomendamos que a conta de usuário na janela Logons do Windows ou na janela Logons de Banco de Dados seja atribuída à ID da função "SUPER". Se a conta de usuário não puder ser atribuída à ID da 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 você estará alterando.
- A permissão Executar para o objeto System Object ID 5210 e para o objeto System Object ID 9015.
Observação Você não precisa ter direitos para os armazenamentos de dados, a menos que precise executar o reparo de dados.
Alterações de código
Observação Sempre teste correções de código em um ambiente controlado antes de aplicar as correções aos computadores de produção.
Para resolve esse problema, altere o código no relatório Ajustar taxas de câmbio (595). Para fazer isso, siga estas etapas:
Altere o código na conta bancária – gatilho OnPreDataItem da seguinte maneira:
Código existente... CurrReport.CREATETOTALS(AdjBase,AdjBaseLCY,AdjAmount); SETRANGE("Date Filter",StartDate,EndDate); // Delete the following line. TempEntryNoAmountBuf.DELETEALL; ...Código de substituição
... CurrReport.CREATETOTALS(AdjBase,AdjBaseLCY,AdjAmount); SETRANGE("Date Filter",StartDate,EndDate); ...Altere o código na conta bancária – gatilho OnAfterGetRecord da seguinte maneira:
Código 1 existente... AdjCredit := 0; AdjDebit := 0; BankAccNo := BankAccNo + 1; ...Código de substituição 1
... // Add the following line. TempEntryNoAmountBuf.DELETEALL; AdjCredit := 0; AdjDebit := 0; BankAccNo := BankAccNo + 1; ...Código 2 existente
... IF AdjAmount > 0 THEN GainOrLoss := Text26501 ELSE GainOrLoss := Text26502; SetAdjDebitCredit(Amount,AdjCredit,AdjDebit); END; // Delete the following line. END; ...Código de substituição 2
... IF AdjAmount > 0 THEN GainOrLoss := Text26501 ELSE GainOrLoss := Text26502; SetAdjDebitCredit(Amount,AdjCredit,AdjDebit); END; // Add the following lines. IF (TempEntryNoAmountBuf.Amount <> 0) AND (NOT TestMode) THEN BEGIN TempJnlLineDim.RESET; TempJnlLineDim.DELETEALL; TempDimBuf.RESET; TempDimBuf.DELETEALL; DimBufMgt.GetDimensions(TempEntryNoAmountBuf."Entry No.",TempDimBuf); DimMgt.CopyDimBufToJnlLineDim( TempDimBuf,TempJnlLineDim,GenJnlLine."Journal Template Name", GenJnlLine."Journal Batch Name",GenJnlLine."Line No."); IF TempEntryNoAmountBuf.Amount > 0 THEN BEGIN Currency.TESTFIELD("Realized Gains Acc."); PostAdjmt( Currency."Realized Gains Acc.",-TempEntryNoAmountBuf.Amount,TempEntryNoAmountBuf.Amount2, "Currency Code",TempJnlLineDim,PostingDate,''); END ELSE BEGIN Currency.TESTFIELD("Realized Losses Acc."); PostAdjmt( Currency."Realized Losses Acc.",-TempEntryNoAmountBuf.Amount,TempEntryNoAmountBuf.Amount2, "Currency Code",TempJnlLineDim,PostingDate,''); END; END; END; // End of the added lines. ...Exclua o código na conta bancária – gatilho OnPostDataItem da seguinte maneira:
... // Delete the following lines. IF TempEntryNoAmountBuf.FINDSET THEN REPEAT IF (TempEntryNoAmountBuf.Amount <> 0) AND (NOT TestMode) THEN BEGIN TempJnlLineDim.RESET; TempJnlLineDim.DELETEALL; TempDimBuf.RESET; TempDimBuf.DELETEALL; DimBufMgt.GetDimensions(TempEntryNoAmountBuf."Entry No.",TempDimBuf); DimMgt.CopyDimBufToJnlLineDim( TempDimBuf,TempJnlLineDim,GenJnlLine."Journal Template Name", GenJnlLine."Journal Batch Name",GenJnlLine."Line No."); IF TempEntryNoAmountBuf.Amount > 0 THEN BEGIN Currency.TESTFIELD("Realized Gains Acc."); PostAdjmt( Currency."Realized Gains Acc.",-TempEntryNoAmountBuf.Amount,TempEntryNoAmountBuf.Amount2, "Currency Code",TempJnlLineDim,PostingDate,''); END ELSE BEGIN Currency.TESTFIELD("Realized Losses Acc."); PostAdjmt( Currency."Realized Losses Acc.",-TempEntryNoAmountBuf.Amount,TempEntryNoAmountBuf.Amount2, "Currency Code",TempJnlLineDim,PostingDate,''); END; END; UNTIL TempEntryNoAmountBuf.NEXT = 0; TempEntryNoAmountBuf.DELETEALL; // End of the deleted lines. ...
Pré-requisitos
Você deve ter a versão do Leste Europeu do Microsoft Dynamics NAV 2009 R2 instalada para aplicar esse hotfix.
Informações sobre remoção
Você não pode remover esse hotfix.
Status
A Microsoft confirmou que este é um problema nos produtos da Microsoft listados na seção "Aplica-se a".
Observação Este é um artigo "FAST PUBLISH" criado diretamente na organização de suporte da Microsoft. As informações contidas aqui são fornecidas como resposta aos problemas possíveis. Como resultado da prontidão de disponibilizá-lo, os materiais pode conter erros tipográficos e podem ser revisados a qualquer momento são aviso prévio. Consulte Termos de Uso para obter outras considerações.