Mensagem de erro "Documentos não não possível anular aplicados como imposto de crédito de serviço foi já utilizado" quando executa a função de anular a liquidação de movimentos numa factura de compra registada para os fornecedores GTA especificada na Índia versão do Microsoft Dynamics NAV 2009

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

BUGS #: do 161748 (Manutenção do conteúdo)erros #: 58166 (arquivo SE)

Este artigo aplica-se para o Microsoft Dynamics NAV para indiano (idioma no).

Sintomas

Quando executa a função de Anular a liquidação de movimentos numa factura de compra registada com uma taxa de serviço para fornecedores GTA especificada na Índia versão do Microsoft Dynamics NAV 2009 R2 e do Microsoft Dynamics NAV 2009 Service Pack 1 (SP1), recebe a seguinte mensagem de erro:

Documentos não podem ser anulado aplicados como imposto de crédito de serviço foram já utilizado.

Resolução

Informações sobre correção

Agora tem uma correcção suportada disponível na Microsoft. Contudo, destina-se apenas a corrigir o problema descrito neste artigo. Aplique-a apenas em sistemas que tenham este problema específico. Esta correcção poderá ser submetida a testes adicionais. Por conseguinte, se não estiver a ser gravemente afectado por este problema, recomendamos que aguarde o próximo service pack do Microsoft Dynamics NAV 2009 ou a próxima versão do Microsoft Dynamics NAV que contenha esta correcção.

Nota Em casos especiais, os custos normalmente inerentes para suporte chamadas poderão ser anuladas se um técnico de suporte técnico do Microsoft Dynamics e produtos relacionados determina que uma actualização específica resolverá o problema. Os custos de normais do suporte serão aplicados a questões de suporte adicionais e problemas que não se enquadrem na atualização específica em questão.

Se esta correcção não está registada para transferência pública (ou seja, que um URL público para esta correcção não é fornecido neste artigo), a distribuição requer responsável técnico, o membro da equipa de escalamento ou aprovação do gestor e aplicam as seguintes informações:

  • Para receber a correcção, os clientes tem de estar a ocorrer o erro mencionada na secção "Sintomas".

  • Terá de controlar os clientes, esta opção para enviar e fornecer-lhes o próximo service pack quando se tornar disponível (se é lançado um service pack).

Esta correcção não está agendada para ser incluída num service pack do Microsoft Dynamics NAV.



Informações de instalação

A Microsoft fornece exemplos de programação apenas a título ilustrativo, sem garantia expressa ou implícita. Isto inclui, mas não está limitado a, garantias implícitas de comercialização ou adequação a um fim específico. Este artigo pressupõe que está familiarizado com a linguagem de programação que está a ser demonstrada e com as ferramentas que são utilizadas para criar e depurar procedimentos. Técnicos de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas não modificarão estes exemplos para proporcionarem funcionalidades adicionais nem criarão procedimentos adaptados às necessidades específicas do utilizador.

Nota Antes de instalar esta correcção, certifique-se de que todos os utilizadores de cliente do Microsoft Navision são registados no sistema. Isto inclui os utilizadores de clientes do Microsoft Navision Application Server (NAS). Deve ser o único usuário do cliente que tem sessão iniciada quando implementar esta correcção.

Para implementar esta correcção, tem de ter uma licença de desenvolvedor.

Recomendamos que a conta de utilizador na janela Logins do Windows ou na janela Logins de base de dados seja atribuída a ID de função "SUPER". Se a conta de utilizador não é possível atribuir o ID de função "SUPER", tem de verificar que a conta de utilizador tem as seguintes permissões:

  • A permissão Modificar para o objecto que estará a alterar.

  • A permissão executar para o objecto 5210 de ID de objecto de sistema e para o objecto 9015 de ID de objecto de sistema .



Nota Não tem de ter direitos para os arquivos de dados, excepto se tiver de efectuar a reparação de dados.

Alterações de código

Nota Sempre o código de ensaio corrige num ambiente controlado antes de aplicar as correcções para os computadores de produção.
Para resolver este problema, siga estes passos:

  1. Adicionar a seguinte variável global no diário de Gr.-linha colocar codeunit (12):

    • TempServiceTaxEntry3@1500076: Registo temporário 16473

  2. Adicionar a seguinte variável local na função UnApplyVendSTEntries no diário de Gr.-linha colocar codeunit (12):

    • STEntryDetail2@1500000: Registo 16474

  3. Alterar o código na função UnApplyVendSTEntries no diário de Gr.-linha colocar codeunit (12), da seguinte forma:
    Código existente 1

    ...        STaxApplBuffer[1].DELETEALL;
    WITH DtldVendLedgEntry2 DO BEGIN
    ...

    Código de substituição 1

    ...        STaxApplBuffer[1].DELETEALL;

    // Add the following line.
    TempServiceTaxEntry3.DELETEALL;
    // End of the line.

    WITH DtldVendLedgEntry2 DO BEGIN
    ...

    Código existente 2

    ...              ServiceTaxMgt.UnApplyVendPmtEntries(STEntryDetail,NextTransactionNo);

    // Delete the following line.
    Sign := -1;
    FillSvcTaxApplication4(STEntryDetail,Sign);
    Sign := 1;
    FillSvcTaxApplication4(STEntryDetail,Sign);
    ServiceTaxEntry.GET(STEntryDetail."Service Tax Entry No.");
    IF ServiceTaxEntry."Serv. Tax on Advance Payment" THEN BEGIN
    // End of the line.
    ...

    Código de substituição 2

    ...              ServiceTaxMgt.UnApplyVendPmtEntries(STEntryDetail,NextTransactionNo);

    // Add the following lines.
    ServiceTaxEntry.GET(STEntryDetail."Service Tax Entry No.");
    ServiceTaxSetup.RESET;
    ServiceTaxSetup.SETRANGE(Code,STEntryDetail."Service Tax Group Code");
    ServiceTaxSetup.SETRANGE("From Date",0D,STEntryDetail."Posting Date");
    TempServiceTaxEntry3.TRANSFERFIELDS(ServiceTaxEntry);
    IF NOT STEntryDetail.GTA THEN BEGIN
    TempServiceTaxEntry3.INSERT;
    Sign := -1;
    END ELSE BEGIN
    TempServiceTaxEntry3."G/L Account" := STEntryDetail."GL Account";
    TempServiceTaxEntry3.INSERT;
    Sign := 1;
    END;

    FillSvcTaxApplication4(STEntryDetail,Sign);

    STEntryDetail2 := STEntryDetail;
    IF NOT STEntryDetail.GTA THEN
    Sign := 1
    ELSE BEGIN
    IF ServiceTaxSetup.FINDLAST THEN
    STEntryDetail2."GL Account" := ServiceTaxSetup."Payables Account (Interim)";
    Sign := -1;
    END;

    FillSvcTaxApplication4(STEntryDetail2,Sign);
    IF ServiceTaxEntry."Serv. Tax on Advance Payment" THEN BEGIN
    // End of the lines.
    ...

    Código existente 3

    ...                  ServiceTaxEntry."From Excise" := STEntryDetail."From Excise";

    // Delete the following lines.
    ServiceTaxSetup.RESET;
    ServiceTaxSetup.SETRANGE(Code,STEntryDetail."Service Tax Group Code");
    ServiceTaxSetup.SETRANGE("From Date",0D,STEntryDetail."Posting Date");
    // End of the lines.

    IF ServiceTaxSetup.FINDLAST THEN BEGIN
    ...

    Código de substituição 3

    ...                  ServiceTaxEntry."From Excise" := STEntryDetail."From Excise";
    IF ServiceTaxSetup.FINDLAST THEN BEGIN
    ...

  4. Eliminar a seguinte variável local na função FillSvcTaxApplication4 no diário de Gr.-linha colocar codeunit (12):

    • VAR ServiceTaxEntry@1002: Registo 16473

  5. Alterar o código na função FillSvcTaxApplication4 no diário de Gr.-linha colocar codeunit (12), da seguinte forma:
    Código existente

    ...          IF Sign < 0 THEN

    // Delete the following lines.
    STaxApplBuffer[1]."G/L Account" := "GL Account"
    ELSE BEGIN
    ServiceTaxEntry.GET("Service Tax Entry No.");
    STaxApplBuffer[1]."G/L Account" := ServiceTaxEntry."G/L Account";
    END;
    // End of the lines.

    STaxApplBuffer[1]."Amount to Apply (LCY)" := Sign * ("Service Tax Amount" + "Service Tax eCess Amount" +
    ...

    Código de substituição

    ...IF Sign < 0 THEN

    // Add the following lines.
    STaxApplBuffer[1]."G/L Account" := "GL Account"
    ELSE
    STaxApplBuffer[1]."G/L Account" := TempServiceTaxEntry3."G/L Account";
    // End of the lines.

    STaxApplBuffer[1]."Amount to Apply (LCY)" := Sign * ("Service Tax Amount" + "Service Tax eCess Amount" +
    ...

  6. Altere o código na função UnApplyVendPmtEntries na codeunit gestão do serviço fiscal (16471) do seguinte modo:
    Código existente 1

    ...        WITH STEntryDetail DO BEGIN

    // Delete the following lines.
    IF ("Service Tax Amount" <> "Remaining Credit") OR ("Service Tax eCess Amount" <> "Remaining Credit (eCess)") OR
    ("Service Tax SHE Cess Amount" <> "Remaining Credit (SHECess)")
    THEN
    ERROR(Text16535,"Document No.");
    // End of the lines.

    STEntryDetail2.RESET;
    ...

    Código de substituição 1

    ...        WITH STEntryDetail DO BEGIN

    // Add the following lines.
    IF GTA THEN BEGIN
    IF ("Service Tax Amount" <> "GTA Remaining Credit") OR ("Service Tax eCess Amount" <> "GTA Remaining Credit (eCess)") OR
    ("Service Tax SHE Cess Amount" <> "GTA Remaining Credit (SHECess)")
    THEN
    ERROR(Text16535,"Document No.");
    END ELSE BEGIN
    IF ("Service Tax Amount" <> "Remaining Credit") OR ("Service Tax eCess Amount" <> "Remaining Credit (eCess)") OR
    ("Service Tax SHE Cess Amount" <> "Remaining Credit (SHECess)")
    THEN
    ERROR(Text16535,"Document No.");
    END;
    // End of the lines.

    STEntryDetail2.RESET;
    ...

    Código existente 2

    ...          STEntryDetail2."Remaining S.T. Base Amount" := - STEntryDetail2."Remaining S.T. Base Amount";
    STEntryDetail2.INSERT;
    ...

    Código de substituição 2

    ...          STEntryDetail2."Remaining S.T. Base Amount" := - STEntryDetail2."Remaining S.T. Base Amount";

    // Add the following lines.
    STEntryDetail2."GTA Remaining Credit" := - STEntryDetail2."GTA Remaining Credit";
    STEntryDetail2."GTA Remaining Credit (eCess)" := - STEntryDetail2."GTA Remaining Credit (eCess)";
    STEntryDetail2."GTA Remaining Credit (SHECess)" := - STEntryDetail2."GTA Remaining Credit (SHECess)";
    // End of the lines.

    STEntryDetail2.INSERT;
    ...

Pré-requisitos

Tem de ter um dos seguintes produtos instalado para aplicar esta correcção:

  • A versão indiana do Microsoft Dynamics NAV 2009 R2

  • A versão indiana do Microsoft Dynamics NAV 2009 Service Pack 1

Informações de remoção

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

Estado

A Microsoft confirmou que este é um problema nos produtos da 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 contidas neste documento são fornecidas como-se em resposta a questões emergentes. Como resultado da urgência na sua disponibilização, os materiais podem incluir erros tipográficos e podem ser revistos em qualquer altura sem aviso prévio. Para outras considerações, consulte os Termos de utilização .

Autor: pallabm
Writer: v-brialu
Revisor técnico: pallabm
Editor:

Precisa de mais ajuda?

Aumente os seus conhecimentos
Explore as formações
Seja o primeiro a obter novas funcionalidades
Aderir ao Microsoft insiders

As informações foram úteis?

Obrigado pelos seus comentários!

Obrigado pelo seu feedback! Parece que poderá ser benéfico reencaminhá-lo para um dos nossos agentes de suporte do Office.

×