Este artigo se aplica ao Microsoft Dynamics NAV para Índico (idioma no).
Sintomas
Na versão Indiana do Microsoft Dynamics NAV 2009 Service Pack 1 (SP1), o valor exibido "imposto %" é incorreto em uma linha de ordem de venda e na linha de nota fiscal de venda lançadas. Você espera que o valor de "Imposto %" para ser consistente com o valor de imposto abaixo mínimo na configuração de detalhes de imposto. O mesmo problema também ocorre para os documentos de compra.
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.
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. Engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas 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:
-
Altere o código no disparador OnValidate no Valor incluindo o imposto sobre a tabela Linha de vendas (37) da seguinte forma:
Código existente... ELSE
"Amount To Customer" :=
ROUND("Line Amount" - "Inv. Discount Amount" + "Excise Amount" + "Charges To Customer" -
"Bal. TDS/TCS Including SHECESS" + "Service Tax Amount" +"Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision");
END;
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" := ROUND(100 * ("Amount Including Tax" - "Tax Base Amount") / "Tax Base Amount",Currency."Amount Rounding Precision")
//ELSE
// "Tax %" := 0;
// End of the deleted lines.
InitOutstandingAmount;
END;
...Código de substituição
... ELSE
"Amount To Customer" :=
ROUND("Line Amount" - "Inv. Discount Amount" + "Excise Amount" + "Charges To Customer" -
"Bal. TDS/TCS Including SHECESS" + "Service Tax Amount" +"Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision");
END;
// Add the following lines.
IF "Tax Base Amount" = 0 THEN
"Tax %" := 0;
// End of the added lines.
InitOutstandingAmount;
END;
... -
Altere o código na função UpdateTaxAmounts da tabela da Linha de vendas (37) da seguinte forma:
1 de código existente... "Bal. TDS/TCS Including SHECESS" + "Service Tax Amount" + "Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision")
END;
IndianSalesTaxCalculate.SetCurrency("Currency Code" <>'');
// Delete the following lines.
//LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
// "Tax Area Code","Tax Group Code","Tax Liable",SalesHeader."Posting Date",
// "Tax Base Amount",Quantity,SalesHeader."Currency Factor","Form Code");
// End of the deleted lines.
TotalTaxAmount := 0;
TotalStdDeductionAmt := 0;
...1 código de substituição
... "Bal. TDS/TCS Including SHECESS" + "Service Tax Amount" + "Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision")
END;
IndianSalesTaxCalculate.SetCurrency("Currency Code" <>'');
// Add the following lines.
LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
"Tax Area Code","Tax Group Code","Tax Liable",SalesHeader."Posting Date",
"Tax Base Amount",Quantity,SalesHeader."Currency Factor","Form Code","Tax %");
// End of the added lines.
TotalTaxAmount := 0;
TotalStdDeductionAmt := 0;
...2 de código existente
... END ELSE
IndianSalesTaxCalculate.GetStandardDeductionAmt(Rec,StandardDeductionAmount,LineTaxAmount);
END
END;
"Amount Including Tax" := ROUND("Tax Base Amount" + LineTaxAmount,Currency."Amount Rounding Precision");
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" :=
// ROUND(100 * ("Amount Including Tax" - "Tax Base Amount") / "Tax Base Amount",Currency."Amount Rounding Precision")
//ELSE
// "Tax %" := 0;
// End of the deleted lines.
IF "Standard Deduction %" <>0 THEN
"Standard Deduction Amount" := ("Tax Base Amount" * "Standard Deduction %" / 100)
...Código de substituição 2
... END ELSE
IndianSalesTaxCalculate.GetStandardDeductionAmt(Rec,StandardDeductionAmount,LineTaxAmount);
END
END;
"Amount Including Tax" := ROUND("Tax Base Amount" + LineTaxAmount,Currency."Amount Rounding Precision");
// Add the following lines.
IF "Tax Base Amount" = 0 THEN
"Tax %" := 0;
// End of the added lines.
IF "Standard Deduction %" <>0 THEN
"Standard Deduction Amount" := ("Tax Base Amount" * "Standard Deduction %" / 100)
... -
Altere o código no disparador OnValidate no Valor incluindo o imposto sobre a tabela Linha de compra (39) da seguinte forma:
Código existente... "Amount To Vendor" := ROUND("Line Amount" -"Inv. Discount Amount" + "Excise Amount" + "Tax Amount" -
"Bal. TDS Including SHE CESS" + "Charges To Vendor" + "Service Tax Amount" +
"Service Tax eCess Amount" + "Service Tax SHE Cess Amount");
END;
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" := ROUND(100 * ("Amount Including Tax" - "Tax Base Amount") / "Tax Base Amount",
// Currency."Amount Rounding Precision")
//ELSE // Delete
// "Tax %" := 0;
// End of the deleted lines.
InitOutstandingAmount;
...Código de substituição
... "Amount To Vendor" := ROUND("Line Amount" -"Inv. Discount Amount" + "Excise Amount" + "Tax Amount" -
"Bal. TDS Including SHE CESS" + "Charges To Vendor" + "Service Tax Amount" +
"Service Tax eCess Amount" + "Service Tax SHE Cess Amount");
END;
// Add the following lines.
IF "Tax Base Amount" = 0 THEN // Add
// End of the added lines.
InitOutstandingAmount;
... -
Altere o código na função UpdateTaxAmounts a tabela Linha de compra (39) da seguinte forma:
1 de código existente... "Bal. TDS Including SHECESS" + "Service Tax Amount" + "Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision")
END;
IndianSalesTaxCalculate.SetCurrency("Currency Code" <>'');
// Delete the following lines.
//LineTaxAmount := ROUND(IndianSalesTaxCalculate.CalculateTax(
// "Tax Area Code","Tax Group Code","Tax Liable",PurchHeader."Posting Date",
// "Tax Base Amount",Quantity,PurchHeader."Currency Factor","Form Code"),Currency."Amount Rounding Precision");
// End of the deleted lines.
AmountonInventory := 0;
InputTaxCreditAmount := 0;
...1 código de substituição
... "Bal. TDS Including SHECESS" + "Service Tax Amount" + "Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision")
END;
IndianSalesTaxCalculate.SetCurrency("Currency Code" <>'');
// Add the following lines.
LineTaxAmount := ROUND(IndianSalesTaxCalculate.CalculateTax(
"Tax Area Code","Tax Group Code","Tax Liable",PurchHeader."Posting Date",
"Tax Base Amount",Quantity,PurchHeader."Currency Factor","Form Code","Tax %"),Currency."Amount Rounding Precision");
// End of the added lines.
AmountonInventory := 0;
InputTaxCreditAmount := 0;
...2 de código existente
... "Tax Amount" := ROUND(TaxAmount,Currency."Amount Rounding Precision");
"Amount Including Tax" := ("Tax Base Amount" + "Tax Amount");
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" := ROUND(100 * ("Amount Including Tax" - "Tax Base Amount") / "Tax Base Amount",
// Currency."Amount Rounding Precision")
//ELSE
// "Tax %" := 0;
// End of the deleted lines.
ServiceTaxSetup.RESET;
...Código de substituição 2
... "Tax Amount" := ROUND(TaxAmount,Currency."Amount Rounding Precision");
"Amount Including Tax" := ("Tax Base Amount" + "Tax Amount");
// Add the following lines.
IF "Tax Base Amount" = 0 THEN
"Tax %" := 0;
// End of the added lines.
ServiceTaxSetup.RESET;
... -
Altere o código na função da tabela de IVA abertura diário de UpdateTaxAmount (16569) da seguinte forma:
Código existente... IF "Transaction Type" = "Transaction Type"::Purchase THEN BEGIN
// Delete the following lines.
//LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
// "Tax Area Code","Tax Group Code",TRUE,"Posting Date",
// "Tax Base Amount",Quantity,0,'');
// End of the deleted lines.
IF LineTaxAmount <> 0 THEN
IndianSalesTaxCalculate.GetVATOpeningInputTaxCredit(Rec,"Amount Loaded on Item",
"Input Credit/Output Tax Amount",TRUE,TaxAmount);
"Tax Amount" := TaxAmount;
IF GLSetup."VAT Rounding Precision" <> 0 THEN
"Tax Amount" := ROUND("Tax Amount",GLSetup."VAT Rounding Precision",Direction);
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" := 100 * (("Tax Base Amount" + "Tax Amount") - "Tax Base Amount") / "Tax Base Amount"
//ELSE
// "Tax %" := 0;
// End of the deleted lines.
END ELSE IF "Transaction Type" = "Transaction Type"::Sale THEN BEGIN
IF ("Export or Deemed Export") THEN
EXIT;
// Delete the following lines.
//LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
// "Tax Area Code","Tax Group Code",TRUE,"Posting Date",
// "Tax Base Amount",Quantity,0,'');
// End of the deleted lines.
IF LineTaxAmount <> 0 THEN
IndianSalesTaxCalculate.GetVATOpeningSTD(Rec,StandardDeductionAmount,TaxAmount);
"Tax Amount" := TaxAmount - StandardDeductionAmount;
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" := 100 * (("Tax Base Amount" + "Tax Amount") - "Tax Base Amount") / "Tax Base Amount"
//ELSE
// "Tax %" := 0;
// End of the deleted lines.
"Input Credit/Output Tax Amount" := "Tax Amount";
"Amount Loaded on Item" := 0;
END;
...Código de substituição
... IF "Transaction Type" = "Transaction Type"::Purchase THEN BEGIN
// Add the following lines.
LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
"Tax Area Code","Tax Group Code",TRUE,"Posting Date",
"Tax Base Amount",Quantity,0,'',"Tax %");
// End of the added lines.
IF LineTaxAmount <> 0 THEN
IndianSalesTaxCalculate.GetVATOpeningInputTaxCredit(Rec,"Amount Loaded on Item",
"Input Credit/Output Tax Amount",TRUE,TaxAmount);
"Tax Amount" := TaxAmount;
IF GLSetup."VAT Rounding Precision" <> 0 THEN
"Tax Amount" := ROUND("Tax Amount",GLSetup."VAT Rounding Precision",Direction);
// Add the following lines.
IF "Tax Base Amount" = 0 THEN
"Tax %" := 0;
// End of the added lines.
END ELSE IF "Transaction Type" = "Transaction Type"::Sale THEN BEGIN
IF ("Export or Deemed Export") THEN
EXIT;
// Add the following lines.
LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
"Tax Area Code","Tax Group Code",TRUE,"Posting Date",
"Tax Base Amount",Quantity,0,'',"Tax %");
// End of the added lines.
IF LineTaxAmount <> 0 THEN
IndianSalesTaxCalculate.GetVATOpeningSTD(Rec,StandardDeductionAmount,TaxAmount);
"Tax Amount" := TaxAmount - StandardDeductionAmount;
// Add the following lines.
IF "Tax Base Amount" = 0 THEN // Add
"Tax %" := 0; // Add
// End of the added lines.
"Input Credit/Output Tax Amount" := "Tax Amount";
"Amount Loaded on Item" := 0;
END;
... -
Altere o código na codeunit Indiano calcular o imposto sobre vendas (13704) da seguinte forma:
Código existente... Taxamount := TaxBaseAmount * TaxDetail."Tax Below Maximum" / 100;
IF (TaxJurisdiction."Tax Type" = TaxJurisdiction."Tax Type"::VAT) OR
(TaxJurisdiction."Tax Type" = TaxJurisdiction."Tax Type"::CST)
...Código de substituição
... Taxamount := TaxBaseAmount * TaxDetail."Tax Below Maximum" / 100;
// Add the following line.
TaxPercent := TaxDetail."Tax Below Maximum";
// End of the added line.
IF (TaxJurisdiction."Tax Type" = TaxJurisdiction."Tax Type"::VAT) OR
(TaxJurisdiction."Tax Type" = TaxJurisdiction."Tax Type"::CST)
...
7. Codeunit 13704 Indian Sales Tax Calculate
Function CalculateTax
Add the below Parameter
VAR TaxPercent Type Decimal
Pré-requisitos:
Você deve ter a versão Indiana do Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) instalada para aplicar esse hotfix.
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
VSTF DynamicsNAV SE: 252133
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.
