Somas de totais para cada parceiro se você usar IVA discriminada na versão em húngaro do Microsoft Dynamics NAV 2009 R2

Modelo: CPR - Navision código Fiacx modelo

BUG n º: 216706 (Manutenção do conteúdo)

Sintomas

Após a instalação do KB2982157, se você usar o recurso IVA discriminado com mais de um parceiro, os totais de soma para cada parceiro sem ser redefinido para zero na versão em húngaro do Microsoft Dynamics NAV 2009 R2. 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 húngaro do Microsoft Dynamics NAV 2009 R2

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.

Se esse hotfix não está disponível para download público (ou seja, que não é fornecido um URL público para esse hotfix neste artigo), a distribuição requer conhecimento técnico, membro da equipe de escalação ou aprovação gerencial e as seguintes informações se aplicam:

  • Para receber o hotfix, é necessário tendo o erro mencionado na seção "Sintomas".

  • Você deve controlar os clientes enviá-lo para e forneça o próximo service pack quando estiver disponível (se um service pack for lançado).

Esse hotfix não está programado para ser incluído em um Service Pack do Microsoft Dynamics NAV.

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. Altere o código no relatório de declaração de IVA discriminado (14522) da seguinte forma:
    Código existente

    ...PartnerId := PartnerBuffer."Partner ID";
    PartnerVatId := PartnerBuffer."VAT Registration No.";
    PartnerName := GetPartnerName(PartnerType,PartnerId);

    Buffer.RESET;
    SetBufferFilters(PartnerType,PartnerId,PartnerVatId);
    ...

    Código de substituição

    ...PartnerId := PartnerBuffer."Partner ID";
    PartnerVatId := PartnerBuffer."VAT Registration No.";
    PartnerName := GetPartnerName(PartnerType,PartnerId);

    // Add the following line.
    PartnerBufferIsSet := TRUE;
    // End of the added line.

    Buffer.RESET;
    SetBufferFilters(PartnerType,PartnerId,PartnerVatId);
    ...
  2. Altere o código em variáveis globais no relatório de declaração de IVA discriminado (14522) da seguinte forma:
    1 de código existente

    ...VAR
    CompanyInfo@1170000002 : Record 79;
    Buffer@1170000007 : TEMPORARY Record 14550;
    PartnerBuffer@1170000008 : TEMPORARY Record 14551;
    PartnerName@1170000012 : Text[250];
    PartnerVatId@1170000013 : Text[30];
    ...

    1 código de substituição

    ...VAR
    CompanyInfo@1170000002 : Record 79;
    Buffer@1170000007 : TEMPORARY Record 14550;

    // Add the following line.
    TempBuffer@1170000059 : TEMPORARY Record 14550;
    // End of the added line.

    PartnerBuffer@1170000008 : TEMPORARY Record 14551;
    PartnerName@1170000012 : Text[250];
    PartnerVatId@1170000013 : Text[30];
    ...

    2 de código existente

    ...VatAmount6@1170000050 : Decimal;
    TotalOf1365Mline@1170000057 : TextConst 'ENU=Total of %1 line %2';
    TotalOf1365M@1170000058 : TextConst 'ENU=Total of %1';

    PROCEDURE SetBuffer@1170000000(VAR Buff@1170000000 : Record 14550;StartPeriod@1170000001 : Date;EndPeriod@1170000002 : Date;VATThresholdAmt@1170000003 : Decimal);
    BEGIN
    ...

    Código de substituição 2

    ...VatAmount6@1170000050 : Decimal;
    TotalOf1365Mline@1170000057 : TextConst 'ENU=Total of %1 line %2';
    TotalOf1365M@1170000058 : TextConst 'ENU=Total of %1';

    // Add the following line.
    PartnerBufferIsSet@1170000056 : Boolean;
    // End of the added line.

    PROCEDURE SetBuffer@1170000000(VAR Buff@1170000000 : Record 14550;StartPeriod@1170000001 : Date;EndPeriod@1170000002 : Date;VATThresholdAmt@1170000003 : Decimal);
    BEGIN
    ...
  3. Altere o código da função CalcPartnerTotals no relatório de declaração de IVA discriminado (14522) da seguinte forma:
    Código existente

    ... LOCAL PROCEDURE CalcPartnerTotals@1170000006(VAR Buff@1170000003 : Record 14550;VAR NumInvoices@1170000001 : Integer;VAR VatBase@1170000002 : Decimal;VAR VatAmount@1170000004 : Decimal);
    BEGIN

    // Delete the following lines.
    NumInvoices := Buff.COUNT;
    IF Buff.FINDSET THEN
    REPEAT
    VatBase += ConvertToThousands(Buff."VAT Base");
    VatAmount += ConvertToThousands(Buff."VAT Amount");
    UNTIL Buff.NEXT = 0;
    END;

    LOCAL PROCEDURE CalcAllTotals@1170000015();
    // End of the deleted lines.
    ...

    Código de substituição

    ...LOCAL PROCEDURE CalcPartnerTotals@1170000006(VAR Buff@1170000003 : Record 14550;VAR NumInvoices@1170000001 : Integer;VAR VatBase@1170000002 : Decimal;VAR VatAmount@1170000004 : Decimal);
    BEGIN

    // Add the following lines.
    VatBase := 0;
    VatAmount := 0;
    NumInvoices := Buff.COUNT;
    IF Buff.FINDSET THEN BEGIN
    IF Buff."1365M" THEN BEGIN
    IF PartnerBufferIsSet THEN BEGIN
    Buff.CALCSUMS("VAT Base", "VAT Amount");
    VatBase := ConvertToThousands(Buff."VAT Base");
    VatAmount := ConvertToThousands(Buff."VAT Amount");
    END ELSE BEGIN
    REPEAT
    VatAmount += CalcPartnerSubTotal(Buff."VAT Registration No.");
    UNTIL Buff.NEXT = 0;
    END;
    END ELSE
    REPEAT
    VatBase += ConvertToThousands(Buff."VAT Base");
    VatAmount += ConvertToThousands(Buff."VAT Amount");
    UNTIL Buff.NEXT = 0;
    END;
    END;

    LOCAL PROCEDURE CalcPartnerSubTotal@1170000004(VATRegNo@1170000000 : Text[20]) VatAmount : Decimal;
    VAR
    Buffer2@1170000001 : Record 14550;
    EntryNo@1170000002 : Integer;
    BEGIN
    TempBuffer.RESET;
    TempBuffer.SETRANGE("VAT Registration No.",VATRegNo);
    IF NOT TempBuffer.FINDFIRST THEN BEGIN
    EntryNo := 0;
    TempBuffer.RESET;
    IF TempBuffer.FINDLAST THEN
    EntryNo := TempBuffer.EntryNo + 1;

    TempBuffer.INIT;
    TempBuffer.EntryNo := EntryNo;
    TempBuffer."VAT Registration No." := VATRegNo;
    TempBuffer.INSERT;

    Buffer2.RESET;
    Buffer2.SETRANGE("1365M-01");
    Buffer2.SETRANGE("1365M-01K");
    Buffer2.SETRANGE("1365M-02");
    Buffer2.SETRANGE("1365M-02K");
    Buffer2.SETRANGE("1365M",TRUE);
    Buffer2.SETRANGE("K-Correction Type");
    Buffer2.SETRANGE("VAT Registration No.",VATRegNo);
    IF Buffer2.FINDSET THEN
    REPEAT
    VatAmount += Buffer2."VAT Amount";
    UNTIL Buffer2.NEXT = 0;
    EXIT(ConvertToThousands(VatAmount));
    END;
    END;

    LOCAL PROCEDURE CalcAllTotals@1170000015();
    // End of the added lines.
    ...

Pré-requisitos:

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

  • A versão em húngaro do Microsoft Dynamics NAV 2009 R2

Além disso, você deve ter o KB2982157 e o MSDNAV2009R2ItemizedVAtHungary instalado.

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".

Referências

VSFT DynamicsNAVSE: 358740, 359033

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.

Author: Andreas.Guenther
Writer: v-luzo
Revisor técnico: Andreas.Guenther
Editor:

Precisa de mais ajuda?

Expanda suas habilidades
Explore o treinamento
Obtenha novos recursos primeiro
Ingressar no Microsoft Insider

Estas informações foram úteis?

Qual é o seu grau de satisfação com a qualidade da tradução?

O que afetou sua experiência?

Algum comentário adicional? (Opcional)

Obrigado por seus comentários!

×