Este artigo aplica-se ao Microsoft Dynamics NAV para a região de idioma sueco (se).
Sintomas
Considere o seguinte cenário na versão sueca do Microsoft Dynamics NAV 2009:
- Aplica a correção 2801885.
- Publica uma entrada de registo interno para uma fatura de compra de um fornecedor.
- Feche a entrada de registo interno ao publicar a fatura de compra.
- Executa o relatório "Fornecedor – Saldo até à Data" (321) para o fornecedor ao filtrar até uma data que inclui as datas de publicação da entrada de registo interno e a fatura de compra.
Neste cenário, a entrada de registo para dentro é impressa inesperadamente. Este problema ocorre nos seguintes produtos:
- A versão sueca do Microsoft Dynamics NAV 2009 R2
- A versão sueca do Microsoft Dynamics NAV 2009 Service Pack 1
Para obter mais informações sobre a correção 2801885, clique no seguinte número de artigo para ver o artigo na Base de Dados de Conhecimento Microsoft:
2801885 as entradas de registo interno não aparecem no relatório "Fornecedor – Saldo até à Data" se tiver fechado as entradas de registo interno numa data após a data de filtragem do relatório na versão sueca do Microsoft Dynamics NAV 2009
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 2009 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 resolver este problema, execute as seguintes etapas:
Altere o código na secção Número de Item de Dados 4 no relatório "Fornecedor – Saldo para Data" (321) da seguinte forma:
Código existente... IF FINDSET THEN REPEAT IF Open THEN MARK(TRUE); // Delete the following lines. IF AppliedInwardRegEntry.GET("Applies-to Entry") THEN MARK(AppliedInwardRegEntry."Posting Date" <= MaxDate); // End of the lines. UNTIL NEXT = 0; SETCURRENTKEY("Entry No."); SETRANGE(Open); ...Código de substituição
... IF FINDSET THEN REPEAT IF Open THEN MARK(TRUE); // Add the following lines. IF AppliedInwardRegEntry.GET("Applies-to Entry") THEN MARK(AppliedInwardRegEntry."Posting Date" > MaxDate); // End of the lines. UNTIL NEXT = 0; SETCURRENTKEY("Entry No."); SETRANGE(Open); ...Altere o código na secção Propriedades na codeunit "Purch.-Post" (90) da seguinte forma:
Código existente... PurchSetup.GET; InwRegHeader.SETRANGE("Document Type",PurchHeader."Document Type"); InwRegHeader.SETRANGE("Document No.",PurchHeader."No."); InwRegHeader.SETRANGE(Status, InwRegHeader.Status::Posted); // Delete the following lines. IF InwRegHeader.FIND('-') THEN InwRegReverse.RUN(InwRegHeader); // End of the lines. PurchInvHeader.INIT; PurchInvHeader.TRANSFERFIELDS(PurchHeader); IF "Document Type" = "Document Type"::Order THEN BEGIN PurchInvHeader."Pre-Assigned No. Series" := ''; ...Código de substituição
... PurchSetup.GET; InwRegHeader.SETRANGE("Document Type",PurchHeader."Document Type"); InwRegHeader.SETRANGE("Document No.",PurchHeader."No."); InwRegHeader.SETRANGE(Status, InwRegHeader.Status::Posted); // Add the following lines. IF InwRegHeader.FINDFIRST THEN BEGIN InwRegReverse.SetPostingDate("Posting Date"); InwRegReverse.RUN(InwRegHeader); END; // End of the lines. PurchInvHeader.INIT; PurchInvHeader.TRANSFERFIELDS(PurchHeader); IF "Document Type" = "Document Type"::Order THEN BEGIN PurchInvHeader."Pre-Assigned No. Series" := ''; ...Altere o código na secção Variáveis Globais na codeunit "Inward Reg.-Reverse" (11203) da seguinte forma:
Código existente... PreviousDim1Code@1070021 : Code[20]; PreviousDim2Code@1070022 : Code[20]; DimensionsOnTotalTrans@1070023 : Boolean; GenJnlCheckLine@1070024 : Codeunit 11; Text005@1070025 : TextConst 'ENU=is not within your range of allowed posting dates;SVE=„r inte i ditt till†tna intervall f”r bokf”ringsdatum'; PROCEDURE MakeInwRegEntriesReverse@1070000(); BEGIN IF InwRegEntry.FIND('+') THEN ...Código de substituição
... PreviousDim1Code@1070021 : Code[20]; PreviousDim2Code@1070022 : Code[20]; DimensionsOnTotalTrans@1070023 : Boolean; GenJnlCheckLine@1070024 : Codeunit 11; Text005@1070025 : TextConst 'ENU=is not within your range of allowed posting dates;SVE=„r inte i ditt till†tna intervall f”r bokf”ringsdatum'; // Add the following line. PostingDate@1070030 : Date; PROCEDURE MakeInwRegEntriesReverse@1070000(); BEGIN IF InwRegEntry.FIND('+') THEN ...Altere o código na função MakeInwRegEntryReverse na codeunit "Inward Reg.-Reverse" (11203) da seguinte forma:
Código existente... InwRegEntry."Entry No." := NextEntryNo; InwRegEntry."Applies-to Entry" := "Entry No."; InwRegEntry.Open := FALSE; InwRegEntry."Source Type" := "Source Type"; InwRegEntry."Source No." := "Source No."; // Delete the following line. InwRegEntry."Posting Date" := InwHeader."Posting Date"; InwRegEntry."Vendor Posting Group" := "Vendor Posting Group"; InwRegEntry."Gen. Bus. Posting Group" := "Gen. Bus. Posting Group"; InwRegEntry."Vendor No." := "Vendor No."; InwRegEntry."Document No." := "Document No."; InwRegEntry."Line No." := "Line No."; ...Código de substituição
... InwRegEntry."Entry No." := NextEntryNo; InwRegEntry."Applies-to Entry" := "Entry No."; InwRegEntry.Open := FALSE; InwRegEntry."Source Type" := "Source Type"; InwRegEntry."Source No." := "Source No."; // Add the following line. InwRegEntry."Posting Date" := PostingDate; InwRegEntry."Vendor Posting Group" := "Vendor Posting Group"; InwRegEntry."Gen. Bus. Posting Group" := "Gen. Bus. Posting Group"; InwRegEntry."Vendor No." := "Vendor No."; InwRegEntry."Document No." := "Document No."; InwRegEntry."Line No." := "Line No."; ...
Pré-requisitos
Tem de ter um dos seguintes produtos instalados para aplicar esta correção:
- A versão sueca do Microsoft Dynamics NAV 2009 R2
- A versão sueca do Microsoft Dynamics NAV 2009 Service Pack 1
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".
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.