"Linha de fatura de vendas: não há nenhuma linha de fatura de vendas no filtro" mensagem de erro ao executar a função "Obter lançado documento linhas para reverter" no Microsoft Dynamics NAV 2009

Modelo: CPR - modelo de correção de código Navision

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

Este artigo se aplica ao Microsoft Dynamics NAV para todos os países e todas as localidades de idiomas.

Sintomas

Suponha que você execute a função de Obter linhas de documento lançado para reversão na página ordem de devolução de vendas no Microsoft Dynamics NAV 2009. Quando você define um filtro para um item, você recebe a seguinte mensagem de erro:

Linha de fatura de vendas: Não há nenhuma linha de fatura de vendas no filtro. N º de documento de filtros:X, não: @Y


Observação: O espaço reservado X substitui o número de documentos a partir da linha onde o cursor está e o espaço reservado Y substitui o número de item inserido no filtro.

Esse problema ocorre nos seguintes produtos:

  • Microsoft Dynamics NAV 2009 R2

  • Microsoft Dynamics NAV 2009 Service Pack 1

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 está programado para ser incluído no Microsoft Dynamics NAV 2013.


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 de cliente do Microsoft Navision estiver desconectados do sistema. Isso inclui usuários de cliente do Microsoft Navision 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 de sistema 5210 de identificação de objeto e do objeto de sistema 9015 de identificação de 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 na função IsFirstDocLine obter Post.Doc - página de Sbfrm de S.ShptLn (5851) da seguinte forma:
    Código existente

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    SalesShptLine2.COPYFILTERS(Rec);
    SalesShptLine2.SETRANGE("Document No.","Document No.");
    SalesShptLine2.FINDSET;
    REPEAT
    ShowRec := IsShowRec(SalesShptLine2);
    IF ShowRec THEN BEGIN
    ...

    Código de substituição

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    SalesShptLine2.COPYFILTERS(Rec);
    SalesShptLine2.SETRANGE("Document No.","Document No.");
    IF NOT SalesShptLine2.FINDSET THEN
    EXIT(FALSE);
    REPEAT
    ShowRec := IsShowRec(SalesShptLine2);
    IF ShowRec THEN BEGIN

  2. Altere o código na função IsFirstDocLine obter Post.Doc - página de subformulário de S.InvLn (5852) da seguinte forma:
    Código existente

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    SalesInvLine2.COPYFILTERS(Rec);
    SalesInvLine2.SETRANGE("Document No.","Document No.");
    SalesInvLine2.FINDSET;
    REPEAT
    ShowRec := IsShowRec(SalesInvLine2);
    IF ShowRec THEN BEGIN
    ...

    Código de substituição

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    SalesInvLine2.COPYFILTERS(Rec);
    SalesInvLine2.SETRANGE("Document No.","Document No.");
    IF NOT SalesInvLine2.FINDSET THEN
    EXIT(FALSE);
    REPEAT
    ShowRec := IsShowRec(SalesInvLine2);
    IF ShowRec THEN BEGIN

  3. Altere o código na função IsFirstDocLine obter Post.Doc - página de Sbfrm de P.RcptLn (5856) da seguinte forma:
    Código existente

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    PurchRcptLine2.COPYFILTERS(Rec);
    PurchRcptLine2.SETRANGE("Document No.","Document No.");
    PurchRcptLine2.FINDSET;
    REPEAT
    ShowRec := IsShowRec(PurchRcptLine2);
    IF ShowRec THEN BEGIN
    ...

    Código de substituição

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    PurchRcptLine2.COPYFILTERS(Rec);
    PurchRcptLine2.SETRANGE("Document No.","Document No.");
    IF NOT PurchRcptLine2.FINDSET THEN
    EXIT(FALSE);
    REPEAT
    ShowRec := IsShowRec(PurchRcptLine2);
    IF ShowRec THEN BEGIN

  4. Altere o código na função IsFirstDocLine obter Post.Doc - página de subformulário de P.InvLn (5857) da seguinte forma:
    Código existente

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    PurchInvLine2.COPYFILTERS(Rec);
    PurchInvLine2.SETRANGE("Document No.","Document No.");
    PurchInvLine2.FINDSET;
    REPEAT
    ShowRec := IsShowRec(PurchInvLine2);
    IF ShowRec THEN BEGIN
    ...

    Código de substituição

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    PurchInvLine2.COPYFILTERS(Rec);
    PurchInvLine2.SETRANGE("Document No.","Document No.");
    IF NOT PurchInvLine2.FINDSET THEN
    EXIT(FALSE);
    REPEAT
    ShowRec := IsShowRec(PurchInvLine2);
    IF ShowRec THEN BEGIN

  5. Altere o código na função IsFirstDocLine da compra. Recebimento de formulário de linhas (5806) da seguinte forma:
    Código existente

    ...          FILTERGROUP(2);
    PurchRcptLine.COPYFILTERS(Rec);
    FILTERGROUP(0);
    PurchRcptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    PurchRcptLine.FIND('-');

    TempPurchRcptLine := PurchRcptLine;
    TempPurchRcptLine.INSERT;
    END;
    IF "Line No." = TempPurchRcptLine."Line No." THEN
    ...

    Código de substituição

    ...          FILTERGROUP(2);
    PurchRcptLine.COPYFILTERS(Rec);
    FILTERGROUP(0);
    PurchRcptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT PurchRcptLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempPurchRcptLine := PurchRcptLine;
    TempPurchRcptLine.INSERT;
    END;
    IF "Line No." = TempPurchRcptLine."Line No." THEN

  6. Altere o código na função IsFirstDocLine no formulário do subformulário de RtrnRcptLn de Pst.Doc obter (5853) da seguinte forma:
    Código existente

    ...        TempReturnRcptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnRcptLine.FINDFIRST THEN BEGIN
    ReturnRcptLine.COPYFILTERS(Rec);
    ReturnRcptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ReturnRcptLine.FINDSET;

    TempReturnRcptLine := ReturnRcptLine;
    TempReturnRcptLine.INSERT;
    END;
    ...

    Código de substituição

    ...        TempReturnRcptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnRcptLine.FINDFIRST THEN BEGIN
    ReturnRcptLine.COPYFILTERS(Rec);
    ReturnRcptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ReturnRcptLine.FINDSET THEN
    EXIT(FALSE);
    // End of the lines.

    TempReturnRcptLine := ReturnRcptLine;
    TempReturnRcptLine.INSERT;
    END;

  7. Altere o código na função IsFirstDocLine na forma de obter Sbfrm de S.Cr.MemoLn de Post.Doc (5854) da seguinte forma:
    Código existente

    ...        TempSalesCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempSalesCrMemoLine.FINDFIRST THEN BEGIN
    SalesCrMemoLine.COPYFILTERS(Rec);
    SalesCrMemoLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    SalesCrMemoLine.FIND('-');

    TempSalesCrMemoLine := SalesCrMemoLine;
    TempSalesCrMemoLine.INSERT;
    END;
    ...

    Código de substituição

    ...        TempSalesCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempSalesCrMemoLine.FINDFIRST THEN BEGIN
    SalesCrMemoLine.COPYFILTERS(Rec);
    SalesCrMemoLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT SalesCrMemoLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempSalesCrMemoLine := SalesCrMemoLine;
    TempSalesCrMemoLine.INSERT;
    END;

  8. Altere o código na função IsFirstDocLine no formulário do subformulário de RtrnShptLn de Pst.Doc obter (5858) da seguinte forma:
    Código existente

    ...        TempReturnShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnShptLine.FINDFIRST THEN BEGIN
    ReturnShptLine.COPYFILTERS(Rec);
    ReturnShptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ReturnShptLine.FINDSET;

    TempReturnShptLine := ReturnShptLine;
    TempReturnShptLine.INSERT;
    END;
    ...

    Código de substituição

    ...        TempReturnShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnShptLine.FINDFIRST THEN BEGIN
    ReturnShptLine.COPYFILTERS(Rec);
    ReturnShptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ReturnShptLine.FINDSET THEN
    EXIT(FALSE);
    // End of the lines.

    TempReturnShptLine := ReturnShptLine;
    TempReturnShptLine.INSERT;
    END;

  9. Altere o código na função IsFirstDocLine na forma de obter Sbfrm de P.Cr.MemoLn de Post.Doc (5859) da seguinte forma:
    Código existente

    ...        TempPurchCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempPurchCrMemoLine.FINDFIRST THEN BEGIN
    PurchCrMemoLine.COPYFILTERS(Rec);
    PurchCrMemoLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    PurchCrMemoLine.FINDSET;

    TempPurchCrMemoLine := PurchCrMemoLine;
    TempPurchCrMemoLine.INSERT;
    END;
    ...

    Código de substituição

    ...        TempPurchCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempPurchCrMemoLine.FINDFIRST THEN BEGIN
    PurchCrMemoLine.COPYFILTERS(Rec);
    PurchCrMemoLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT PurchCrMemoLine.FINDSET THEN
    EXIT(FALSE);
    // End of the lines.

    TempPurchCrMemoLine := PurchCrMemoLine;
    TempPurchCrMemoLine.INSERT;
    END;

  10. Altere o código na função IsFirstDocLine na forma de obter linhas de remessa de serviço (5994) da seguinte forma:
    Código existente

    ...        TempServiceShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServiceShptLine.FIND('-') THEN BEGIN
    ServiceShptLine.COPYFILTERS(Rec);
    ServiceShptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ServiceShptLine.FIND('-');

    TempServiceShptLine := ServiceShptLine;
    TempServiceShptLine.INSERT;
    END;
    IF "Line No." = TempServiceShptLine."Line No." THEN
    ...

    Código de substituição

    ...        TempServiceShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServiceShptLine.FIND('-') THEN BEGIN
    ServiceShptLine.COPYFILTERS(Rec);
    ServiceShptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ServiceShptLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempServiceShptLine := ServiceShptLine;
    TempServiceShptLine.INSERT;
    END;
    IF "Line No." = TempServiceShptLine."Line No." THEN

  11. Altere o código na função IsFirstDocLine no formulário do subformulário de linhas de serviço (6036) da seguinte forma:
    Código existente

    ...        IF NOT TempServLine.FIND('-') THEN BEGIN
    ServLine.COPYFILTERS(Rec);
    ServLine.SETRANGE("Document Type","Document Type");
    ServLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ServLine.FIND('-');

    TempServLine := ServLine;
    TempServLine.INSERT;
    END;
    IF "Line No." = TempServLine."Line No." THEN
    IF "Line No." = TempServiceShptLine."Line No." THEN
    ...

    Código de substituição

    ...        IF NOT TempServLine.FIND('-') THEN BEGIN
    ServLine.COPYFILTERS(Rec);
    ServLine.SETRANGE("Document Type","Document Type");
    ServLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ServLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempServLine := ServLine;
    TempServLine.INSERT;
    END;
    IF "Line No." = TempServLine."Line No." THEN

  12. Altere o código na função IsFirstDocLine no formulário do subformulário de linhas de remessa de serviço (6037) da seguinte forma:
    Código existente

    ...        TempServShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServShptLine.FIND('-') THEN BEGIN
    ServShptLine.COPYFILTERS(Rec);
    ServShptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ServShptLine.FIND('-');

    TempServShptLine := ServShptLine;
    TempServShptLine.INSERT;
    END;
    IF "Line No." = TempServShptLine."Line No." THEN
    ...

    Código de substituição

    ...        TempServShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServShptLine.FIND('-') THEN BEGIN
    ServShptLine.COPYFILTERS(Rec);
    ServShptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ServShptLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.
    TempServShptLine := ServShptLine;
    TempServShptLine.INSERT;
    END;
    IF "Line No." = TempServShptLine."Line No." THEN

  13. Altere o código na função IsFirstDocLine no formulário do subformulário de linhas de nota fiscal de serviço (6038) da seguinte forma:
    Código existente

    ...        TempServInvLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServInvLine.FIND('-') THEN BEGIN
    ServInvLine.COPYFILTERS(Rec);
    ServInvLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ServInvLine.FIND('-');

    TempServInvLine := ServInvLine;
    TempServInvLine.INSERT;
    END;
    EXIT("Line No." = TempServInvLine."Line No.");
    ...

    Código de substituição

    ...        TempServInvLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServInvLine.FIND('-') THEN BEGIN
    ServInvLine.COPYFILTERS(Rec);
    ServInvLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ServInvLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempServInvLine := ServInvLine;
    TempServInvLine.INSERT;
    END;
    EXIT("Line No." = TempServInvLine."Line No.");

  14. Altere o código na função IsFirstDocLine no formulário do subformulário de linhas de memorando de Cr. de serviço (6039) da seguinte forma:
    Código existente

    ...        TempServCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServCrMemoLine.FIND('-') THEN BEGIN
    ServCrMemoLine.COPYFILTERS(Rec);
    ServCrMemoLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ServCrMemoLine.FIND('-');

    TempServCrMemoLine := ServCrMemoLine;
    TempServCrMemoLine.INSERT;
    END;
    EXIT("Line No." = TempServCrMemoLine."Line No.");
    ...

    Código de substituição

    ...        TempServCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServCrMemoLine.FIND('-') THEN BEGIN
    ServCrMemoLine.COPYFILTERS(Rec);
    ServCrMemoLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ServCrMemoLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempServCrMemoLine := ServCrMemoLine;
    TempServCrMemoLine.INSERT;
    END;
    EXIT("Line No." = TempServCrMemoLine."Line No.");

  15. Altere o código na função IsFirstDocLine na forma de obter retorno de linhas de recebimento (6638) da seguinte forma:
    Código existente

    ...        TempReturnRcptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnRcptLine.FIND('-') THEN BEGIN
    ReturnRcptLine.COPYFILTERS(Rec);
    ReturnRcptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ReturnRcptLine.FIND('-');

    TempReturnRcptLine := ReturnRcptLine;
    TempReturnRcptLine.INSERT;
    END;
    IF "Line No." = TempReturnRcptLine."Line No." THEN
    ...

    Código de substituição

    ...        TempReturnRcptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnRcptLine.FIND('-') THEN BEGIN
    ReturnRcptLine.COPYFILTERS(Rec);
    ReturnRcptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ReturnRcptLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempReturnRcptLine := ReturnRcptLine;
    TempReturnRcptLine.INSERT;
    END;
    IF "Line No." = TempReturnRcptLine."Line No." THEN

  16. Altere o código na função IsFirstDocLine na forma de obter retorno de linhas de remessa (6648) da seguinte forma:
    Código existente

    ...        TempReturnShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnShptLine.FIND('-') THEN BEGIN
    ReturnShptLine.COPYFILTERS(Rec);
    ReturnShptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ReturnShptLine.FIND('-');

    TempReturnShptLine := ReturnShptLine;
    TempReturnShptLine.INSERT;
    END;
    IF "Line No." = TempReturnShptLine."Line No." THEN
    ...

    Código de substituição

    ...        TempReturnShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnShptLine.FIND('-') THEN BEGIN
    ReturnShptLine.COPYFILTERS(Rec);
    ReturnShptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ReturnShptLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempReturnShptLine := ReturnShptLine;
    TempReturnShptLine.INSERT;
    END;
    IF "Line No." = TempReturnShptLine."Line No." THEN

Pré-requisitos:

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

  • Microsoft Dynamics NAV 2009 R2

  • Microsoft Dynamics NAV 2009 Service Pack 1

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: 351438

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 uso para outras considerações.

Autor: mmels
Gravador: v-brialu
Revisor técnico: mmels
Editor:

Precisa de mais ajuda?

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

Estas informações foram úteis?

Obrigado por seus comentários!

×