В тази статия се отнася за Microsoft Dynamics NAV за езиковата променлива на италиански (it) език.
Симптоми
В италианската версия на Microsoft Dynamics NAV 2009 системата изчислява стойността на "Размер на плащане" и стойността на данък при източника както се очаква. Този проблем възниква в следните продукти:
-
Италианската версия на Microsoft Dynamics NAV 2009 R2
-
Италианската версия на Microsoft Dynamics NAV 2009 Service Pack 1
Решение
Информация за актуалната корекция
Вече се предлага от Microsoft предоставя поддържана актуална корекция. Обаче е предназначена само за коригиране на описания в тази статия. Прилагайте корекцията само към системи, изпитващи този конкретен проблем. Възможно е провеждането на допълнителни тестове на тази актуална корекция. Следователно ако не сте силно засегнати от този проблем, препоръчваме да изчакате следващия сервизен пакет за Microsoft Dynamics NAV 2009 или следващата версия на Microsoft Dynamics NAV, който ще съдържа тази корекция.
Забележка: При специални случаи таксите, които се начисляват за свързани с поддръжката обаждания могат да бъдат отменени, ако специалист по техническа поддръжка за Microsoft Dynamics и свързани с тях продукти определя, че конкретна актуализация може да разреши проблема. Обичайните такси за поддръжката ще важат за допълнителни въпроси и проблеми, които не спадат към съответната актуализация.
Информация за инсталирането
Microsoft предоставя примери само за илюстративни цели без гаранция за определени цели. Това включва, но не е ограничено до, подразбиращи се гаранции за продаваемост или годност за определена цел. Тази статия се предполага, че сте запознати с демонстрирания език за програмиране и инструментите, които се използват за създаване и процедури за отстраняване на грешки. Инженерите на поддръжката на Microsoft могат да помогнат обяснение на функциите на конкретна процедура. Въпреки това те няма да модифицират тези примери с цел осигуряване на допълнителна функционалност или създаване на процедури за удовлетворение на конкретните ви изисквания.
Забележка: Преди да инсталирате тази актуална корекция, уверете се, че всички потребители на Microsoft Navision клиент излезли системата. Това включва Microsoft Navision Application услуги (NAS) клиент потребители. Трябва да бъде само клиент потребител, който е влязъл при прилагане на тази актуална корекция.
За прилагане на тази актуална корекция, трябва да имате лиценз разработчик.
Препоръчително е потребителският акаунт в прозореца влизания в Windows или в прозореца на БД присвояването на "Супер" ИД на роля. Ако потребителският акаунт не може да бъде възложена ИД на роля на "Супер", трябва да проверите, че потребителският акаунт има следните права:
-
Разрешение за промяна на обекта, ще се променя.
-
Разрешението за изпълнение за системата обект номер 5210 обект и системата обект ID 9015 обект.
Забележка: Не трябва да имате права на съхранените данни, освен ако трябва да извършите възстановяване на данни.
Промени код
Забележка: Винаги тест код решава в управлявана среда преди да приложите корекциите производство компютри.
За да разрешите този проблем, изпълнете следните стъпки:
-
Промяна на кода на CreateVendBillWithhTax функцията в таблицата Доставчик бил ред (12182) както следва:
Съществуващ код... VendBillWithhTax."Currency Code" := VendorBillHeader."Currency Code";
VendBillWithhTax."External Document No." := "External Document No.";
VendBillWithhTax."Related Date" := VendorBillHeader."Posting Date";
VendBillWithhTax."Withholding Tax Code" := WithholdCode;
VendBillWithhTax."Social Security Code" := SocialSecurityCode;
// Delete the following line.
VendBillWithhTax.VALIDATE("Total Amount","Remaining Amount");
VendBillWithhTax."Old Withholding Amount" := VendBillWithhTax."Withholding Tax Amount";
VendBillWithhTax."Old Free-Lance Amount" := VendBillWithhTax."Free-Lance Amount";
END;
// IT0007.begin
IF VendBillWithhTax."Withholding Tax Code" <> '' THEN
...Замени код
... VendBillWithhTax."Currency Code" := VendorBillHeader."Currency Code";
VendBillWithhTax."External Document No." := "External Document No.";
VendBillWithhTax."Related Date" := VendorBillHeader."Posting Date";
VendBillWithhTax."Withholding Tax Code" := WithholdCode;
VendBillWithhTax."Social Security Code" := SocialSecurityCode;
// Add the following line.
VendBillWithhTax.VALIDATE("Total Amount","Amount to Pay");
VendBillWithhTax."Old Withholding Amount" := VendBillWithhTax."Withholding Tax Amount";
VendBillWithhTax."Old Free-Lance Amount" := VendBillWithhTax."Free-Lance Amount";
END;
// IT0007.begin
IF VendBillWithhTax."Withholding Tax Code" <> '' THEN
... -
Да променяте контролите в ръчно доставчика плащане линия форма (12188) както следва:
Съществуващ код 1... InPage=0;
CaptionML=ENU=Withholding Tax Code;
SourceExpr=WithholdingTaxCode;
TableRelation="Withhold Code" }
{ 1130006;Label ;440 ;2090 ;3300 ;440 ;ParentControl=1130005 }
// Delete the following line.
{ 1130007;TextBox ;13090;3190 ;1700 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Vendor Bank Account;
SourceExpr=VendorBankAccount;
TableRelation="Vendor Bank Account";
OnLookup=VAR
...Замени код 1
... InPage=0;
CaptionML=ENU=Withholding Tax Code;
SourceExpr=WithholdingTaxCode;
TableRelation="Withhold Code" }
{ 1130006;Label ;440 ;2090 ;3300 ;440 ;ParentControl=1130005 }
// Add the following line.
{ 1130007;TextBox ;13090;3740 ;1700 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Vendor Bank Account;
SourceExpr=VendorBankAccount;
TableRelation="Vendor Bank Account";
OnLookup=VAR
...Съществуващ код 2
... IF FORM.RUNMODAL(FORM::"Vendor Bank Account List",VendBankAcc,VendBankAcc.Code) = ACTION::LookupOK THEN
VendorBankAccount := VendBankAcc.Code;
// IT0001.end
END;
}
// Delete the following line.
{ 1130008;Label ;9680 ;3190 ;3300 ;440 ;ParentControl=1130007 }
{ 1130009;TextBox ;3850 ;3190 ;5500 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Description;
SourceExpr=Desc }
{ 1130010;Label ;440 ;3190 ;3300 ;440 ;ParentControl=1130009 }
...Замени код 2
... IF FORM.RUNMODAL(FORM::"Vendor Bank Account List",VendBankAcc,VendBankAcc.Code) = ACTION::LookupOK THEN
VendorBankAccount := VendBankAcc.Code;
// IT0001.end
END;
}
// Add the following line.
{ 1130008;Label ;9680 ;3740 ;3300 ;440 ;ParentControl=1130007 }
{ 1130009;TextBox ;3850 ;3190 ;5500 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Description;
SourceExpr=Desc }
{ 1130010;Label ;440 ;3190 ;3300 ;440 ;ParentControl=1130009 }
...Съществуващ код 3
... { 1130013;TextBox ;13090;990 ;1700 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Total Amount;
SourceExpr=TotalAmount }
{ 1130014;Label ;9680 ;990 ;3300 ;440 ;ParentControl=1130013 }
// Delete the following line.
{ 1130015;TextBox ;13090;1540 ;2200 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Document Type;
OptionCaptionML=ENU=" ,Payment,Invoice,Credit Memo,Finance Charge Memo,Reminder,Refund";
OptionString=[ ,Payment,Invoice,Credit Memo,Finance Charge Memo,Reminder,Refund];
SourceExpr=DocumentType }
...Замени код 3
... { 1130013;TextBox ;13090;990 ;1700 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Total Amount;
SourceExpr=TotalAmount }
{ 1130014;Label ;9680 ;990 ;3300 ;440 ;ParentControl=1130013 }
// Add the following line.
{ 1130015;TextBox ;13090;2090 ;2200 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Document Type;
OptionCaptionML=ENU=" ,Payment,Invoice,Credit Memo,Finance Charge Memo,Reminder,Refund";
OptionString=[ ,Payment,Invoice,Credit Memo,Finance Charge Memo,Reminder,Refund];
SourceExpr=DocumentType }
...Съществуващ код 4
... InPage=0;
CaptionML=ENU=Document Type;
OptionCaptionML=ENU=" ,Payment,Invoice,Credit Memo,Finance Charge Memo,Reminder,Refund";
OptionString=[ ,Payment,Invoice,Credit Memo,Finance Charge Memo,Reminder,Refund];
SourceExpr=DocumentType }
// Delete the following lines.
{ 1130016;Label ;9680 ;1540 ;3300 ;440 ;ParentControl=1130015 }
{ 1130017;TextBox ;13090;2090 ;1700 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Document No.;
SourceExpr=DocumentNo }
{ 1130018;Label ;9680 ;2090 ;3300 ;440 ;ParentControl=1130017 }
{ 1130019;TextBox ;13090;2640 ;1700 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Document Date;
SourceExpr=DocumentDate }
{ 1130020;Label ;9680 ;2640 ;3300 ;440 ;ParentControl=1130019 }
// End of the lines.
{ 1130024;TextBox ;3850 ;2640 ;2750 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Social Security Code;
SourceExpr=SocialSecurityCode;
TableRelation="Contribution Code" }
...Замени код 4
... InPage=0;
CaptionML=ENU=Document Type;
OptionCaptionML=ENU=" ,Payment,Invoice,Credit Memo,Finance Charge Memo,Reminder,Refund";
OptionString=[ ,Payment,Invoice,Credit Memo,Finance Charge Memo,Reminder,Refund];
SourceExpr=DocumentType }
// Add the following lines.
{ 1130016;Label ;9680 ;2090 ;3300 ;440 ;ParentControl=1130015 }
{ 1130017;TextBox ;13090;2640 ;1700 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Document No.;
SourceExpr=DocumentNo }
{ 1130018;Label ;9680 ;2640 ;3300 ;440 ;ParentControl=1130017 }
{ 1130019;TextBox ;13090;3190 ;1700 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Document Date;
SourceExpr=DocumentDate }
{ 1130020;Label ;9680 ;3190 ;3300 ;440 ;ParentControl=1130019 }
// End of the lines.
{ 1130024;TextBox ;3850 ;2640 ;2750 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Social Security Code;
SourceExpr=SocialSecurityCode;
TableRelation="Contribution Code" }
...Съществуващ код 5
... InPage=0;
CaptionML=ENU=Social Security Code;
SourceExpr=SocialSecurityCode;
TableRelation="Contribution Code" }
{ 1130025;Label ;440 ;2640 ;3300 ;440 ;ParentControl=1130024 }
{ 1130021;CommandButton;14410;5720;2200;550 ;HorzGlue=Right;
VertGlue=Bottom;
PushAction=FormHelp }
{ 1130022;CommandButton;11990;5720;2200;550 ;HorzGlue=Right;
VertGlue=Bottom;
...Замени код 5
... InPage=0;
CaptionML=ENU=Social Security Code;
SourceExpr=SocialSecurityCode;
TableRelation="Contribution Code" }
{ 1130025;Label ;440 ;2640 ;3300 ;440 ;ParentControl=1130024 }
// Add the following lines.
{ 1130026;TextBox ;13090;1540 ;1700 ;440 ;ParentControl=1130000;
InPage=0;
CaptionML=ENU=Tax Base Amount;
SourceExpr=TaxBaseAmount }
{ 1130027;Label ;9680 ;1540 ;3300 ;440 ;ParentControl=1130026 }
// End of the lines.
{ 1130021;CommandButton;14410;5720;2200;550 ;HorzGlue=Right;
VertGlue=Bottom;
PushAction=FormHelp }
{ 1130022;CommandButton;11990;5720;2200;550 ;HorzGlue=Right;
VertGlue=Bottom;
...Съществуващ код 6
... "Due Date" := PostingDate;
"External Document No." := ExternalDocNo;
"Instalment Amount" := TotalAmount;
"Remaining Amount" := TotalAmount;
"Gross Amount to Pay" := TotalAmount;
// Delete the following line.
"Amount to Pay" := TotalAmount;
"Manual Line" := TRUE;
"Cumulative Transfers" := TRUE;
SetWithholdCode(WithholdingTaxCode);
SetSocialSecurityCode(SocialSecurityCode);
INSERT(TRUE)
...Замени код 6
... "Due Date" := PostingDate;
"External Document No." := ExternalDocNo;
"Instalment Amount" := TotalAmount;
"Remaining Amount" := TotalAmount;
"Gross Amount to Pay" := TotalAmount;
// Add the following line.
"Amount to Pay" := TaxBaseAmount;
"Manual Line" := TRUE;
"Cumulative Transfers" := TRUE;
SetWithholdCode(WithholdingTaxCode);
SetSocialSecurityCode(SocialSecurityCode);
INSERT(TRUE)
... -
Добавете следната глобална променлива в ръчно доставчика плащане линия форма (12188):
TaxBaseAmount@1130000 : Decimal;
-
Променете кода в CalculateWithholdingTax функция в източника - принос кодова единица (12101) както следва:
Съществуващ код 1... PROCEDURE CalculateWithholdingTax@1130001(VAR PurchHeader@1130000 : Record 38;Recalculate@1130001 : Boolean);
VAR
PurchWithSoc@1130002 : Record 12137;
PurchLine@1130003 : Record 39;
// Delete the following line.
TotalAmount@1130004 : Decimal;
BEGIN
PurchLine.RESET;
PurchLine.SETRANGE("Document Type",PurchHeader."Document Type");
PurchLine.SETRANGE("Document No.",PurchHeader."No.");
PurchLine.SETRANGE(Type,PurchLine.Type::"G/L Account");
...Замени код 1
... PROCEDURE CalculateWithholdingTax@1130001(VAR PurchHeader@1130000 : Record 38;Recalculate@1130001 : Boolean);
VAR
PurchWithSoc@1130002 : Record 12137;
PurchLine@1130003 : Record 39;
// Add the following lines.
TempPurchLine@1130005 : TEMPORARY Record 39;
TotalAmount@1130004 : Decimal;
VATAmount@1130006 : Decimal;
// End of the lines.
BEGIN
PurchLine.RESET;
PurchLine.SETRANGE("Document Type",PurchHeader."Document Type");
PurchLine.SETRANGE("Document No.",PurchHeader."No.");
PurchLine.SETRANGE(Type,PurchLine.Type::"G/L Account");
...Съществуващ код 2
... PurchLine.SETRANGE(Type,PurchLine.Type::"G/L Account");
TotalAmount := 0;
IF PurchLine.FIND('-') THEN
REPEAT
// Delete the following lines.
TotalAmount := TotalAmount + PurchLine."Line Amount";
UNTIL PurchLine.NEXT = 0;
// End of the lines.
IF PurchWithSoc.GET(PurchHeader."Document Type", PurchHeader."No.") THEN
IF (PurchWithSoc."Total Amount" = 0) OR
Recalculate
THEN BEGIN
PurchWithSoc."Currency Code" := PurchHeader."Currency Code";
...Замени код 2
... PurchLine.SETRANGE(Type,PurchLine.Type::"G/L Account");
TotalAmount := 0;
IF PurchLine.FIND('-') THEN
REPEAT
// Add the following lines.
IF PurchHeader."Prices Including VAT" THEN BEGIN
TempPurchLine := PurchLine;
TempPurchLine.VALIDATE("Amount Including VAT",PurchLine."Line Amount");
TotalAmount += TempPurchLine."VAT Base Amount"
END ELSE
TotalAmount += PurchLine."Line Amount";
UNTIL PurchLine.NEXT = 0;
// End of the lines.
IF PurchWithSoc.GET(PurchHeader."Document Type", PurchHeader."No.") THEN
IF (PurchWithSoc."Total Amount" = 0) OR
Recalculate
THEN BEGIN
PurchWithSoc."Currency Code" := PurchHeader."Currency Code";
...
Необходими условия:
Трябва да имате един от следните продукти, за да приложите тази спешна корекция:
-
Италианската версия на Microsoft Dynamics NAV 2009 R2
-
Италианската версия на Microsoft Dynamics NAV 2009 Service Pack 1
Информация за премахване
Не можете да премахнете тази актуална корекция.
Статус
Microsoft потвърждава, че това е проблем в продуктите на Microsoft, изброени в раздела "Отнася се за".
Забележка: Това е статия "Бърза публикация", създадени директно от организацията за поддръжка на Microsoft. Информацията тук се предоставя "както-е" в отговор на появили се проблеми. В резултат на скоростта на предоставянето му материалите могат да съдържат печатни грешки и могат да бъдат коригирани по всяко време без предизвестие. Вижте Условия за други съображения.
