A tabela Dimensão da Linha do Diário (356) é preenchida inesperadamente quando publica um grupo cartera bill na versão espanhola do Microsoft Dynamics NAV

Aplica-se a
Dynamics NAV 2009 Microsoft Dynamics NAV 5.0

Os artigos publicados rapidamente fornecem informações diretamente a partir da organização de suporte da Microsoft. As informações aqui contidas são criadas em resposta a tópicos emergentes ou exclusivos ou destinam-se a complementar outras informações da Base de Dados de Conhecimento.
 O Microsoft Business Solutions-Navision 4.0 e o Microsoft Navision 4.0 fazem agora parte do Microsoft Dynamics NAV 4.0. Todas as referências ao Microsoft Business Solutions-Navision ou ao Microsoft Navision 4.0 estão relacionadas com o Microsoft Dynamics NAV.

Este artigo aplica-se ao Microsoft Dynamics NAV 5.0 para a região de idioma espanhol (es).

Sintomas

Quando cria faturas que contêm dimensões ao publicar um grupo de faturas cartera diretamente em vez de ao publicar um diário na versão espanhola do Microsoft Dynamics NAV, a tabela Dimensão da Linha do Diário (356) é preenchida inesperadamente.

Este problema ocorre nos seguintes produtos:

  • A versão espanhola do Microsoft Dynamics NAV 2009

  • A versão espanhola do Microsoft Dynamics NAV 5.0

  • A versão espanhola do Microsoft Dynamics NAV 4.0

Resolução

Informações sobre o hotfix

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 do Microsoft Dynamics e produtos relacionados determinar que uma atualização específica irá resolve o 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.

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 aplicar esta correção, siga estes passos:

  1. Altere o código no acionador InsertGenJournalLine no relatório Post Payment Order (7000080) da seguinte forma:
    Código existente

    ...
      ELSE BEGIN
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine,JnlLineDim);
      END;
    ...
    
    

    Código de substituição

    ...
      ELSE BEGIN
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine,JnlLineDim);
    
    // Add the following line.
        JnlLineDim.DELETEALL;
    
      END;
    ...
    
    
  2. Altere o código no acionador PostedDoc – OnPostDataItem no Settle Docs. no Relatório de nota de encomenda publicado (7000082) da seguinte forma:
    Código existente

    ...
    IF GenJnlLine.FIND('-') THEN
      REPEAT
        GenJnlLine2 := GenJnlLine;
        GenJnlPostLine.SetFromSettlement(TRUE);
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine2."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine2."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine2."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine2,JnlLineDim);
        IF PostedPmtOrd.GET(GenJnlLine."Document No.") THEN
    ...
    
    

    Código de substituição

    ...
    IF GenJnlLine.FIND('-') THEN
      REPEAT
        GenJnlLine2 := GenJnlLine;
        GenJnlPostLine.SetFromSettlement(TRUE);
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine2."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine2."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine2."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine2,JnlLineDim);
    
    // Add the following line.
        JnlLineDim.DELETEALL;
    
        IF PostedPmtOrd.GET(GenJnlLine."Document No.") THEN
    ...
    
    
  3. Altere o código no acionador PostedDoc – OnPostDataItem no relatório Partial Settl.- Receivable (7000084) da seguinte forma:
    Código existente

    ...
    IF GenJnlLine.FIND('-') THEN
      REPEAT
        GenJnlLine2 := GenJnlLine;
        GenJnlPostLine.SetFromSettlement(TRUE);
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine2."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine2."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine2."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine2,JnlLineDim);
      UNTIL GenJnlLine.NEXT = 0;
    
    CustLedgEntry.GET(PostedDoc."Entry No.");
    ...
    
    

    Código de substituição

    ...
    IF GenJnlLine.FIND('-') THEN
      REPEAT
        GenJnlLine2 := GenJnlLine;
        GenJnlPostLine.SetFromSettlement(TRUE);
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine2."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine2."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine2."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine2,JnlLineDim);
    
    // Add the following line.
        JnlLineDim.DELETEALL;
    
      UNTIL GenJnlLine.NEXT = 0;
    
    CustLedgEntry.GET(PostedDoc."Entry No.");
    ...
    
    
  4. Altere o código no acionador PostedDoc – OnPostDataItem no Settl Parcial. – Relatório a pagar (7000085) da seguinte forma:
    Código existente

    ...
    IF GenJnlLine.FIND('-') THEN
      REPEAT
        GenJnlLine2 := GenJnlLine;
        GenJnlPostLine.SetFromSettlement(TRUE);
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine2."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine2."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine2."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine2,JnlLineDim);
      UNTIL GenJnlLine.NEXT = 0;
    
    
    VendLedgEntry.GET(PostedDoc."Entry No.");
    ...
    
    

    Código de substituição

    ...
    IF GenJnlLine.FIND('-') THEN
      REPEAT
        GenJnlLine2 := GenJnlLine;
        GenJnlPostLine.SetFromSettlement(TRUE);
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine2."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine2."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine2."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine2,JnlLineDim);
    
    // Add the following line.
        JnlLineDim.DELETEALL;
    
      UNTIL GenJnlLine.NEXT = 0;
    
    
    VendLedgEntry.GET(PostedDoc."Entry No.");
    ...
    
    
  5. Altere o código no acionador PostedDoc – OnPostDataItem no Settle Docs. em Publicação. Bill Gr. relatório (7000098) da seguinte forma:
    Código existente

    ...
    IF GenJnlLine.FIND('-') THEN
      REPEAT
        GenJnlLine2 := GenJnlLine;
        GenJnlPostLine.SetFromSettlement(TRUE);
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine2."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine2."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine2."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine2,JnlLineDim);
        IF PostedBillGr.GET(GenJnlLine."Document No.") THEN
          DocPost.CloseBillGroupIfEmpty(PostedBillGr,PostingDate);
      UNTIL GenJnlLine.NEXT = 0;
    
    Window.CLOSE;
    ...
    
    

    Código de substituição

    ...
    IF GenJnlLine.FIND('-') THEN
      REPEAT
        GenJnlLine2 := GenJnlLine;
        GenJnlPostLine.SetFromSettlement(TRUE);
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine2."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine2."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine2."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine2,JnlLineDim);
    
    // Add the following line.
        JnlLineDim.DELETEALL;
    
        IF PostedBillGr.GET(GenJnlLine."Document No.") THEN
          DocPost.CloseBillGroupIfEmpty(PostedBillGr,PostingDate);
      UNTIL GenJnlLine.NEXT = 0;
    
    Window.CLOSE;
    ...
    
    
  6. Altere o código no acionador InsertGenJournalLine no relatório Post Bill Group (7000099) da seguinte forma:
    Código existente

    ...
      IF CurrReport.USEREQUESTFORM THEN
        INSERT
      ELSE BEGIN
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine,JnlLineDim);
      END;
    END;
    ...
    
    

    Código de substituição

    ...
      IF CurrReport.USEREQUESTFORM THEN
        INSERT
      ELSE BEGIN
        JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
        JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine."Journal Template Name");
        JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine."Journal Batch Name");
        JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine."Line No.");
        GenJnlPostLine.RunWithCheck(GenJnlLine,JnlLineDim);
    
    // Add the following line.
        JnlLineDim.DELETEALL;
    
      END;
    END;
    ...
    
    
  7. Altere o código no acionador Código no Gen. Jnl.-Post Batch codeunit (13) da seguinte forma:
    Código existente

    ...
          IF GenJnlLine3.FINDSET(TRUE,FALSE) THEN
            REPEAT
              JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine3."Line No.");
              JnlLineDim.DELETEALL;
              GenJnlLine3.DELETE;
    ...
    
    

    Código de substituição

    ...
          IF GenJnlLine3.FINDSET(TRUE,FALSE) THEN
            REPEAT
    
    // Add the following lines.
              JnlLineDim.SETRANGE("Table ID",DATABASE::"Gen. Journal Line");
              JnlLineDim.SETRANGE("Journal Template Name",GenJnlLine3."Journal Template Name"); 
              JnlLineDim.SETRANGE("Journal Batch Name",GenJnlLine3."Journal Batch Name"); 
    // End of the added lines.
    
              JnlLineDim.SETRANGE("Journal Line No.",GenJnlLine3."Line No.");
              JnlLineDim.DELETEALL;
              GenJnlLine3.DELETE;
    ...
    
    

Pré-requisitos

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

  • A versão espanhola do Microsoft Dynamics NAV 2009 Service Pack 1
  • A versão espanhola do Microsoft Dynamics NAV 2009
  • A versão espanhola do Microsoft Dynamics NAV 5.0 Service Pack 1
  • A versão espanhola do Microsoft Dynamics NAV 4.0 Service pack 3

              

Informações sobre remoção

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

Status

A Microsoft confirmou que este é um problema nos produtos da Microsoft listados na seção "Aplica-se a".

A MICROSOFT E/OU OS RESPETIVOS FORNECEDORES NÃO FAZEM DECLARAÇÕES OU GARANTIAS SOBRE A ADEQUAÇÃO, A FIABILIDADE OU A PRECISÃO DAS INFORMAÇÕES CONTIDAS NOS DOCUMENTOS E OS GRÁFICOS RELACIONADOS PUBLICADOS NESTE WEB SITE (OS "MATERIAIS") PARA QUALQUER FIM.

O MATERIAL PODE INCLUIR IMPRECISÕES TÉCNICAS OU ERROS TIPOGRÁFICOS E PODE SER REVISADO A QUALQUER MOMENTO SEM AVISO PRÉVIO. ATÉ À EXTENSÃO MÁXIMA PERMITIDA PELA LEI APLICÁVEL, A MICROSOFT E/OU OS RESPETIVOS FORNECEDORES EXCLUEM TODAS AS REPRESENTAÇÕES, GARANTIAS E CONDIÇÕES EXPRESSAS, IMPLÍCITAS OU ESTATUTÁRIAS, INCLUINDO, MAS NÃO SE LIMITANDO A REPRESENTAÇÕES, GARANTIAS OU CONDIÇÕES DE TÍTULO, NÃO INFRAÇÃO, CONDIÇÃO OU QUALIDADE SATISFATÓRIA, COMERCIALIZAÇÃO E ADEQUAÇÃO A UM FIM ESPECÍFICO, NO QUE DIZ RESPEITO AOS MATERIAIS.