"Não foi possível encontrar um registo de Detalhe Fiscal nos seguintes parâmetros:/Código de Jurisdição Fiscal:[código], Tax GroupCode:[código do grupo], Data Efetiva:<=[data]" ao imprimir uma fatura de vendas na versão NA do Microsoft Dynamics NAV 2009

Aplica-se A
Microsoft Dynamics NAV 2009 R2 Dynamics NAV 2009 Service Pack 1

Este artigo aplica-se ao Microsoft Dynamics NAV para os seguintes países e regiões de idioma.

  • Inglês (Canadá) (en-ca)
  • Inglês (Estados Unidos) (en-us)
  • Espanhol (México) (es-mx)
  • Francês (Canadá) (fr-ca)

Sintomas

Suponha que publica uma fatura de vendas com um código de área fiscal especificado na versão norte-americana do Microsoft Dynamics 2009. Adiciona uma nova jurisdição fiscal ao código da área fiscal. Nesta situação, quando imprime a fatura de vendas publicada, recebe a seguinte mensagem de erro:

Nota

Não foi possível encontrar um registo de Detalhe Fiscal nos seguintes parâmetros:/Código de Jurisdição Fiscal:código, Código do Grupo FiscalCodificador:código do grupo, Data Efetiva: <=data.

Este problema ocorre nos seguintes produtos:

  • A versão norte-americana do Microsoft Dynamics NAV 2009 R2
  • A versão norte-americana do Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)

Resolução

Informações de correção

Uma correção suportada está agora disponível na Microsoft. No entanto, destina-se apenas a corrigir o problema descrito neste artigo. Aplique-o apenas a sistemas com este problema específico. Esta correção pode receber testes adicionais. Por conseguinte, se não for gravemente afetado por este problema, recomendamos que aguarde pelo próximo service pack do Microsoft Dynamics NAV ou pela próxima versão do Microsoft Dynamics NAV que contém esta correção.

Nota Em casos especiais, os custos normalmente incorridos para chamadas de suporte poderão ser cancelados se um Profissional de Suporte Técnico para o Microsoft Dynamics e produtos relacionados determinar que uma atualização específica irá resolver o problema. Os custos de suporte habituais serão aplicados a questões e problemas de suporte adicionais que não se qualificam para a 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. Isto inclui, mas não se limita às garantias implícitas de comercialização ou adequação a um fim específico. Este artigo parte do princípio de que está familiarizado com a linguagem de programação que está a ser demonstrada e com as ferramentas utilizadas para criar e depurar procedimentos. Os engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas não modificarão estes exemplos para fornecer funcionalidades adicionais ou criar procedimentos para satisfazer os seus requisitos específicos.

Nota Antes de instalar esta correção, verifique se todos os utilizadores cliente do Microsoft Navision têm sessão iniciada no sistema. Isto inclui utilizadores cliente do Microsoft Navision Application Services (NAS). Deve ser o único utilizador cliente com sessão iniciada quando implementa esta correção.

Para implementar esta correção, tem de ter uma licença de programador.

Recomendamos que a conta de utilizador na janela Inícios de Sessão do Windows ou na janela Inícios de Sessão da Base de Dados seja atribuída ao ID da função "SUPER". Se não for possível atribuir à conta de utilizador o ID de função "SUPER", tem de verificar se a conta de utilizador tem as seguintes permissões:

  • A permissão Modificar para o objeto que irá alterar.
  • A permissão Executar para o objeto ID de Objeto de Sistema 5210 e para o objeto ID de Objeto do Sistema 9015.

                
Nota Não tem de ter direitos sobre os arquivos de dados, a menos que tenha de efetuar a reparação de dados.

Alterações de código

Nota Teste sempre as correções de código num ambiente controlado antes de aplicar as correções aos seus computadores de produção.
Para resolver este problema, siga estes passos:

  1. Altere o código na função AddSalesInvoiceLines na codeunit Sales Tax Calculate (398) da seguinte forma:
    Código existente

        PROCEDURE AddSalesInvoiceLines@1020003(DocNo@1020004 : Code[20]);
        VAR
          SalesInvoiceHeader@1020000 : Record 112;
          SalesInvoiceLine@1020001 : Record 113;
          InsertRec@1020002 : Boolean;
        BEGIN
          SalesInvoiceHeader.GET(DocNo);
          SalesInvoiceHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(SalesInvoiceHeader."Tax Area Code") THEN
            EXIT;
          SetUpCurrency(SalesInvoiceHeader."Currency Code");
    ...
    

    Código de substituição

        PROCEDURE AddSalesInvoiceLines@1020003(DocNo@1020004 : Code[20]);
        VAR
          SalesInvoiceHeader@1020000 : Record 112;
          SalesInvoiceLine@1020001 : Record 113;
          InsertRec@1020002 : Boolean;
        BEGIN
    
          // Add the following line.
          Posted := TRUE;
    
          SalesInvoiceHeader.GET(DocNo);
          SalesInvoiceHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(SalesInvoiceHeader."Tax Area Code") THEN
            EXIT;
          SetUpCurrency(SalesInvoiceHeader."Currency Code");
    ...
    
  2. Altere o código na função AddSalesCrMemoLines na codeunit Sales Tax Calculate (398) da seguinte forma:
    Código existente

        PROCEDURE AddSalesCrMemoLines@1020006(DocNo@1020000 : Code[20]);
        VAR
          SalesCrMemoHeader@1020001 : Record 114;
          SalesCrMemoLine@1020002 : Record 115;
          InsertRec@1020003 : Boolean;
        BEGIN
          SalesCrMemoHeader.GET(DocNo);
          SalesCrMemoHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(SalesCrMemoHeader."Tax Area Code") THEN
            EXIT;
    ...
    

    Código de substituição

        PROCEDURE AddSalesCrMemoLines@1020006(DocNo@1020000 : Code[20]);
        VAR
          SalesCrMemoHeader@1020001 : Record 114;
          SalesCrMemoLine@1020002 : Record 115;
          InsertRec@1020003 : Boolean;
        BEGIN
    
          // Add the following line.
          Posted := TRUE; 
    
          SalesCrMemoHeader.GET(DocNo);
          SalesCrMemoHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(SalesCrMemoHeader."Tax Area Code") THEN
            EXIT;
    ...
    
  3. Altere o código na função AddPurchInvoiceLines na codeunit Sales Tax Calculate (398) da seguinte forma:
    Código existente

        PROCEDURE AddPurchInvoiceLines@1020008(DocNo@1020000 : Code[20]);
        VAR
          PurchInvHeader@1020001 : Record 122;
          PurchInvLine@1020002 : Record 123;
          InsertRec@1020003 : Boolean;
        BEGIN
          PurchInvHeader.GET(DocNo);
          PurchInvHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(PurchInvHeader."Tax Area Code") THEN
            EXIT;
    ...
    

    Código de substituição

        PROCEDURE AddPurchInvoiceLines@1020008(DocNo@1020000 : Code[20]);
        VAR
          PurchInvHeader@1020001 : Record 122;
          PurchInvLine@1020002 : Record 123;
          InsertRec@1020003 : Boolean;
        BEGIN
    
          // Add the following line.
          Posted := TRUE; 
    
          PurchInvHeader.GET(DocNo);
          PurchInvHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(PurchInvHeader."Tax Area Code") THEN
            EXIT;
    ...
    
  4. Altere o código na função AddPurchCrMemoLines na codeunit Sales Tax Calculate (398) da seguinte forma:
    Código existente

        PROCEDURE AddPurchCrMemoLines@1020004(DocNo@1020000 : Code[20]);
        VAR
          PurchCrMemoHeader@1020001 : Record 124;
          PurchCrMemoLine@1020002 : Record 125;
          InsertRec@1020003 : Boolean;
        BEGIN
          PurchCrMemoHeader.GET(DocNo);
          PurchCrMemoHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(PurchCrMemoHeader."Tax Area Code") THEN
            EXIT;
    ...
    

    Código de substituição

        PROCEDURE AddPurchCrMemoLines@1020004(DocNo@1020000 : Code[20]);
        VAR
          PurchCrMemoHeader@1020001 : Record 124;
          PurchCrMemoLine@1020002 : Record 125;
          InsertRec@1020003 : Boolean;
        BEGIN
    
          // Add the following line.
          Posted := TRUE;
    
          PurchCrMemoHeader.GET(DocNo);
          PurchCrMemoHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(PurchCrMemoHeader."Tax Area Code") THEN
            EXIT;
    ...
    
  5. Altere o código na função AddServInvoiceLines na codeunit Sales Tax Calculate (398) da seguinte forma:
    Código existente

        PROCEDURE AddServInvoiceLines@1480008(DocNo@1020000 : Code[20]);
        VAR
          ServInvHeader@1020001 : Record 5992;
          ServInvLine@1020002 : Record 5993;
          InsertRec@1020003 : Boolean;
        BEGIN
          ServInvHeader.GET(DocNo);
          ServInvHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(ServInvHeader."Tax Area Code") THEN
            EXIT;
    ...
    

    Código de substituição

        PROCEDURE AddServInvoiceLines@1480008(DocNo@1020000 : Code[20]);
        VAR
          ServInvHeader@1020001 : Record 5992;
          ServInvLine@1020002 : Record 5993;
          InsertRec@1020003 : Boolean;
        BEGIN
    
          // Add the following line.
          Posted := TRUE; 
    
          ServInvHeader.GET(DocNo);
          ServInvHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(ServInvHeader."Tax Area Code") THEN
            EXIT;
    ...
    
  6. Altere o código na função AddServCrMemoLines na unidade de código Cálculo do Imposto sobre Vendas (398) da seguinte forma:
    Código existente

        PROCEDURE AddServCrMemoLines@1480004(DocNo@1020000 : Code[20]);
        VAR
          ServCrMemoHeader@1020001 : Record 5994;
          ServCrMemoLine@1020002 : Record 5995;
          InsertRec@1020003 : Boolean;
        BEGIN
          ServCrMemoHeader.GET(DocNo);
          ServCrMemoHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(ServCrMemoHeader."Tax Area Code") THEN
            EXIT;
    ...
    

    Código de substituição

        PROCEDURE AddServCrMemoLines@1480004(DocNo@1020000 : Code[20]);
        VAR
          ServCrMemoHeader@1020001 : Record 5994;
          ServCrMemoLine@1020002 : Record 5995;
          InsertRec@1020003 : Boolean;
        BEGIN
    
          // Add the following line.
          Posted := TRUE; 
    
          ServCrMemoHeader.GET(DocNo);
          ServCrMemoHeader.TESTFIELD("Prices Including VAT",FALSE);
          IF NOT GetSalesTaxCountry(ServCrMemoHeader."Tax Area Code") THEN
            EXIT;
    ...
    
  7. Altere o código na função EndSalesTaxCalculation na codeunit Sales Tax Calculate (398) da seguinte forma:
    Código existente

    ...
                TaxDetail.SETRANGE("Tax Type",TaxDetail."Tax Type"::"Excise Tax");
                IF TaxDetail.FIND('+') THEN BEGIN
                  TaxDetailFound := TRUE;
                  "Tax Type" := "Tax Type"::"Excise Tax";
                  INSERT;
                  "Tax Type" := "Tax Type"::"Sales and Use Tax"; 
                END;
    
                // Delete the following line.
                IF NOT TaxDetailFound THEN
    
                  ERROR(
                    Text1020002,
                    TaxDetail.TABLECAPTION,
                    FIELDCAPTION("Tax Jurisdiction Code"),"Tax Jurisdiction Code",
                    FIELDCAPTION("Tax Group Code"),"Tax Group Code",
                    TaxDetail.FIELDCAPTION("Effective Date"),TaxDetail.GETFILTER("Effective Date"));
              UNTIL NEXT = 0;
            RESET;
    ...
    

    Código de substituição

    ...
                TaxDetail.SETRANGE("Tax Type",TaxDetail."Tax Type"::"Excise Tax");
                IF TaxDetail.FIND('+') THEN BEGIN
                  TaxDetailFound := TRUE;
                  "Tax Type" := "Tax Type"::"Excise Tax";
                  INSERT;
                  "Tax Type" := "Tax Type"::"Sales and Use Tax"; // NA0012
                END;
    
                // Add the following line.
                IF NOT TaxDetailFound AND NOT Posted THEN
    
                  ERROR(
                    Text1020002,
                    TaxDetail.TABLECAPTION,
                    FIELDCAPTION("Tax Jurisdiction Code"),"Tax Jurisdiction Code",
                    FIELDCAPTION("Tax Group Code"),"Tax Group Code",
                    TaxDetail.FIELDCAPTION("Effective Date"),TaxDetail.GETFILTER("Effective Date"));
              UNTIL NEXT = 0;
            RESET;
    ...
    

Pré-requisitos

Tem de ter um dos seguintes produtos instalados para aplicar esta correção:

  • A versão norte-americana do Microsoft Dynamics NAV 2009 R2
  • A versão norte-americana do Microsoft Dynamics NAV 2009 Service Pack 1

Informações de remoção

Não é possível remover esta correção.

Estado

A Microsoft confirmou que se trata de um problema nos produtos Microsoft listados na secção "Aplica-se a".

Nota Este é um artigo "PUBLICAÇÃO RÁPIDA" criado diretamente a partir da organização de suporte da Microsoft. As informações aqui contidas são fornecidas tal como estão em resposta a problemas emergentes. Como resultado da velocidade de disponibilização, os materiais podem incluir erros tipográficos e podem ser revistos em qualquer altura sem aviso prévio. Veja Termos de Utilização para outras considerações.