ธุรกรรมสําหรับใบแจ้งหนี้การขายที่สร้างขึ้นสําหรับสินทรัพย์ถาวรจะสร้างธุรกรรมกําไรหรือขาดทุนสองรายการที่ไม่สมบูรณ์ถ้ายอด VAT สําหรับการซื้อสินทรัพย์ถาวรจะถูกหักออกใน Microsoft Dynamics NAV เวอร์ชันภาษาอิตาลี

นำไปใช้กับ
Microsoft Dynamics NAV 2009 R2 Dynamics NAV 2009 Service Pack 1 Microsoft Dynamics NAV 5.0 Service Pack 1

บทความนี้ใช้กับ Microsoft Dynamics NAV สําหรับภาษาอิตาลี (it)

อาการ

สมมติว่าคุณมีสินทรัพย์ถาวรใน Microsoft Dynamics NAV เวอร์ชันภาษาอิตาลี ยอดเงินภาษีมูลค่าเพิ่ม (VAT) สําหรับการซื้อสินทรัพย์ถาวรจะถูกหักออกเป็นบางส่วน ในสถานการณ์นี้ ถ้าคุณขายสินทรัพย์ถาวร ธุรกรรมสําหรับอินวอยซ์การขายที่สอดคล้องกันจะสร้างธุรกรรมกําไรหรือขาดทุนสองธุรกรรมแทนที่จะเป็นหนึ่งธุรกรรม
ปัญหานี้เกิดขึ้นในผลิตภัณฑ์ต่อไปนี้:

  • Microsoft Dynamics NAV 2009 R2 เวอร์ชันภาษาอิตาลี
  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) เวอร์ชันภาษาอิตาลี
  • Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1) เวอร์ชันภาษาอิตาลี

การแก้ปัญหา

ข้อมูลโปรแกรมแก้ไขด่วน

โปรแกรมแก้ไขด่วนที่ได้รับการสนับสนุนจาก Microsoft พร้อมใช้งานแล้ว อย่างไรก็ตาม มีไว้เพื่อแก้ไขปัญหาที่อธิบายไว้ในบทความนี้เท่านั้น นําไปใช้กับระบบที่พบปัญหานี้โดยเฉพาะเท่านั้น โปรแกรมแก้ไขด่วนนี้อาจได้รับการทดสอบเพิ่มเติม ดังนั้น ถ้าคุณไม่ได้รับผลกระทบอย่างร้ายแรงจากปัญหานี้ เราขอแนะนําให้คุณรอ Service Pack ถัดไปของ Microsoft Dynamics NAV หรือ Microsoft Dynamics NAV เวอร์ชันถัดไปที่ประกอบด้วยโปรแกรมแก้ไขด่วนนี้

หมายเหตุ ในกรณีพิเศษ ค่าธรรมเนียมสําหรับการโทรติดต่อฝ่ายสนับสนุนตามปกติอาจถูกยกเลิกถ้าผู้เชี่ยวชาญฝ่ายสนับสนุนทางเทคนิคสําหรับ Microsoft Dynamics และผลิตภัณฑ์ที่เกี่ยวข้องระบุว่าการอัปเดตเฉพาะจะแก้ไขปัญหาของคุณได้ ค่าใช้จ่ายในการสนับสนุนปกติจะใช้กับคําถามและปัญหาการสนับสนุนเพิ่มเติมที่ไม่มีคุณสมบัติสําหรับการอัปเดตเฉพาะที่สงสัย

            
          

ข้อมูลการติดตั้ง

Microsoft แสดงตัวอย่างการเขียนโปรแกรมสําหรับภาพประกอบเท่านั้น โดยไม่มีการรับประกันทั้งโดยชัดแจ้งหรือโดยนัย ซึ่งรวมถึงแต่ไม่จํากัดเพียงการรับประกันโดยนัยถึงความสามารถในเชิงพาณิชย์หรือความเหมาะสมสําหรับวัตถุประสงค์เฉพาะ บทความนี้จะถือว่าคุณคุ้นเคยกับภาษาการเขียนโปรแกรมที่กําลังแสดงอยู่ และมีเครื่องมือที่ใช้สําหรับสร้างและแก้ไขจุดบกพร่องของกระบวนการ วิศวกรฝ่ายสนับสนุนของ Microsoft สามารถช่วยอธิบายฟังก์ชันการทํางานของกระบวนการเฉพาะได้ แต่จะไม่ปรับเปลี่ยนตัวอย่างเหล่านี้เพื่อให้มีฟังก์ชันการทํางานที่เพิ่มขึ้นหรือสร้างขั้นตอนต่างๆ เพื่อตอบสนองความต้องการเฉพาะของคุณ

หมายเหตุ ก่อนที่คุณจะติดตั้งโปรแกรมแก้ไขด่วนนี้ ตรวจสอบว่าผู้ใช้ไคลเอนต์ Microsoft Navision ทั้งหมดออกจากระบบ ซึ่งรวมถึงผู้ใช้ไคลเอนต์ Microsoft Navision Application Services (NAS) คุณควรเป็นผู้ใช้ไคลเอนต์เท่านั้นที่เข้าสู่ระบบเมื่อคุณใช้โปรแกรมแก้ไขด่วนนี้

เมื่อต้องการใช้โปรแกรมแก้ไขด่วนนี้

เราขอแนะนําให้ใช้บัญชีผู้ใช้ในหน้าต่าง ล็อกอินของ Windows หรือในหน้าต่าง ล็อกอินของฐานข้อมูล ถูกกําหนด ID บทบาท "SUPER" หากบัญชีผู้ใช้ไม่สามารถกําหนดรหัสบทบาท "SUPER" ได้ คุณต้องตรวจสอบว่าบัญชีผู้ใช้มีสิทธิ์ต่อไปนี้:

  • สิทธิ์ในการปรับเปลี่ยนสําหรับวัตถุที่คุณจะเปลี่ยนแปลง
  • สิทธิ์ Execute สําหรับวัตถุ System Object ID 5210 และสําหรับวัตถุ System Object ID 9015

                
หมายเหตุ คุณไม่มีสิทธิ์ในที่เก็บข้อมูล เว้นแต่คุณจะต้องดําเนินการซ่อมแซมข้อมูล

การเปลี่ยนแปลงโค้ด

หมายเหตุ ทดสอบการแก้ไขรหัสเสมอในสภาพแวดล้อมที่ควบคุมก่อนที่คุณจะนําการแก้ไขไปใช้กับคอมพิวเตอร์การผลิตของคุณ
เมื่อต้องการแก้ไขปัญหานี้ ให้ทําตามขั้นตอนต่อไปนี้:

  1. เปลี่ยนรหัสในหมายเลขสินค้าข้อมูล 3 ในแผ่นงานสมุดบัญชี - พิมพ์รายงาน (12109) ดังนี้:
    รหัสที่มีอยู่

    ...
CurrReport.CREATETOTALS(Amount,IcreasesAmnt,DecreasesAmnt,"Additional-Currency Amount");
END;

// Delete the following lines.
OnAfterGetRecord=BEGIN
CALCFIELDS(Amount,"Debit Amount","Credit Amount","Additional-Currency Amount");

IF NOT UseAmtsInAddCurr THEN BEGIN
Amnt := Amnt + Amount;
IF Amount > 0 THEN
IcreasesAmnt := Amount
ELSE
DecreasesAmnt := ABS(Amount);
END ELSE BEGIN
Amnt := Amnt + "Additional-Currency Amount";
IF "Additional-Currency Amount" > 0 THEN
IcreasesAmnt := "Additional-Currency Amount"
ELSE
DecreasesAmnt := ABS("Additional-Currency Amount");
END;
// End of the lines.

END;

DataItemLinkReference=G/L Account;
...

    รหัสทดแทน

    ...
CurrReport.CREATETOTALS(Amount,IcreasesAmnt,DecreasesAmnt,"Additional-Currency Amount");
END;

// Add the following lines.
OnAfterGetRecord=VAR
GroupAmount@1130001 : Decimal;
BEGIN
CALCFIELDS(Amount,"Debit Amount","Credit Amount","Additional-Currency Amount");
IF TempGLBookEntry.GET("Entry No.") THEN
CurrReport.SKIP
ELSE BEGIN
GroupAmount := GroupBookEntry("GL Book Entry",UseAmtsInAddCurr);
Amnt += GroupAmount;
IF GroupAmount > 0 THEN BEGIN
IcreasesAmnt := ABS(GroupAmount);
DecreasesAmnt := 0;
END ELSE BEGIN
IcreasesAmnt := 0;
DecreasesAmnt := ABS(GroupAmount);
END;
END;
// End of the lines.

END;

DataItemLinkReference=G/L Account;
...

  2. เปลี่ยนรหัสในส่วน หมายเลขสินค้าข้อมูล 3 ในแผ่นงานสมุดบัญชี - พิมพ์รายงาน (12109) ดังนี้:
    รหัสที่มีอยู่

    ...
{ 1130104;TextBox ;18000;423 ;1800 ;423 ;SourceExpr=Amnt;
AutoFormatType=1;
DataSetFieldName=Amnt_Control1130104 }

// Delete the following line.
{ 1130105;TextBox ;18000;846 ;1800 ;423 ;SourceExpr=StartOnHand + Amount;

AutoFormatType=1;
DataSetFieldName=StartOnHand___Amount_Control1130105 }
...

    รหัสทดแทน

    ...
{ 1130104;TextBox ;18000;423 ;1800 ;423 ;SourceExpr=Amnt;
AutoFormatType=1;
DataSetFieldName=Amnt_Control1130104 }

// Add the following line.
{ 1130105;TextBox ;18000;846 ;1800 ;423 ;SourceExpr=StartOnHand + IcreasesAmnt - DecreasesAmnt;

AutoFormatType=1;
DataSetFieldName=StartOnHand___Amount_Control1130105 }
{ 1130111;TextBox ;0 ;846 ;150 ;423 ;Name=TotalAmount;
...

  3. เพิ่มตัวแปรส่วนกลางใหม่ในแผ่นสมุดบัญชี - พิมพ์รายงาน (12109) แล้วระบุตัวแปรดังนี้:

    • ชื่อ: TempGLBookEntry
    • ชนิดข้อมูล: ระเบียนชั่วคราว
    • ประเภทย่อย: รายการสมุด GL (12144)

  4. เพิ่มฟังก์ชันท้องถิ่นในแผ่นงานบัญชี - พิมพ์รายงาน (12109) ดังนี้:

    LOCAL PROCEDURE GroupBookEntry@1130001(GLBookEntry@1130001 : Record 12144;UseAmtsInAddCurr@1130002 : Boolean) GroupAmount@1130003 : Decimal;
VAR
GLBookEntry1@1130004 : Record 12144;
BEGIN
GLBookEntry1.SETRANGE("G/L Account No.",GLBookEntry."G/L Account No.");
GLBookEntry1.SETRANGE("Transaction No.",GLBookEntry."Transaction No.");
IF GLBookEntry1.FINDSET THEN
REPEAT
TempGLBookEntry."Entry No." := GLBookEntry1."Entry No.";
TempGLBookEntry.INSERT;
GLBookEntry1.CALCFIELDS(Amount,"Additional-Currency Amount");
IF UseAmtsInAddCurr THEN
GroupAmount := GroupAmount + GLBookEntry1."Additional-Currency Amount"
ELSE
GroupAmount := GroupAmount + GLBookEntry1.Amount;
UNTIL GLBookEntry1.NEXT = 0;
EXIT(GroupAmount);
END;

  5. เปลี่ยนรหัสในหมายเลขสินค้าข้อมูล 2 ใน G/L Book - พิมพ์รายงาน (12121) ดังนี้:
    รหัสที่มีอยู่ 1

    ...
END;
END;

// Delete the following lines.
OnAfterGetRecord=BEGIN
IF ReportType = ReportType::Reprint THEN
LastNo := "Progressive No."
ELSE
LastNo := LastNo + 1;
// End of the lines.

TotalDebit := TotalDebit + "Debit Amount";
TotalCredit := TotalCredit + "Credit Amount";
...

    รหัสทดแทน 1

    ...
END;
END;

// Add the following lines.
OnAfterGetRecord=VAR
GroupAmount@1130001 : Decimal;
BEGIN
// End of the lines.

TotalDebit := TotalDebit + "Debit Amount";
TotalCredit := TotalCredit + "Credit Amount";
...

    รหัสที่มีอยู่ 2

    ...
END;
"Source Type" :: "Fixed Asset":
BEGIN
FA.GET("Source No.");
Descr := FA.Description;
END;
...

    รหัสทดแทน 2

    ...
END;
"Source Type" :: "Fixed Asset":
BEGIN

// Add the following lines.
IF TempGLBookEntry.GET("Entry No.") THEN
CurrReport.SKIP
ELSE BEGIN
GroupAmount := GroupBookEntry("GL Book Entry");
IF GroupAmount > 0 THEN BEGIN
"Debit Amount" := GroupAmount;
"Credit Amount" := 0;
END ELSE BEGIN
"Debit Amount" := 0;
"Credit Amount" := GroupAmount;
END;
END;
// End of the lines.

FA.GET("Source No.");
Descr := FA.Description;
END;
...

    รหัสที่มีอยู่ 3

    ...
ELSE
Descr := '';
END;


IF (NOT CurrReport.PREVIEW) AND
(ReportType = ReportType::"Final Print")
THEN BEGIN
...

    รหัสทดแทน 3

    ...
ELSE
Descr := '';
END;

// Add the following lines.
IF ReportType = ReportType::Reprint THEN
LastNo := "Progressive No."
ELSE
LastNo := LastNo + 1;
// End of the lines.

IF (NOT CurrReport.PREVIEW) AND
(ReportType = ReportType::"Final Print")
THEN BEGIN
...

  6. เพิ่มตัวแปรส่วนกลางใหม่ในรายงาน G/L Book - พิมพ์ (12121) แล้วระบุตัวแปรดังนี้:

    • ชื่อ: TempGLBookEntry
    • ชนิดข้อมูล: ระเบียนชั่วคราว
    • ประเภทย่อย: รายการสมุด GL (12144)

  7. เปลี่ยนรหัสในคู่มือใน G/L Book - พิมพ์รายงาน (12121) ดังนี้:
    รหัสที่มีอยู่

    ...
EndDate := Date."Period Start" - 1;
END;
...

    รหัสทดแทน

    ...
EndDate := Date."Period Start" - 1;
END;

// Add the following lines.
LOCAL PROCEDURE GroupBookEntry@1130002(GLBookEntry@1130001 : Record 12144) GroupAmount@1130002 : Decimal;
VAR
GLBookEntry1@1130003 : Record 12144;
BEGIN
GLBookEntry1.SETRANGE("G/L Account No.",GLBookEntry."G/L Account No.");
GLBookEntry1.SETRANGE("Transaction No.",GLBookEntry."Transaction No.");
IF GLBookEntry1.FINDSET THEN
REPEAT
TempGLBookEntry."Entry No." := GLBookEntry1."Entry No.";
TempGLBookEntry.INSERT;
GLBookEntry1.CALCFIELDS(Amount);
GroupAmount := GroupAmount + GLBookEntry1.Amount;
UNTIL GLBookEntry1.NEXT = 0;
EXIT(GroupAmount);
END;
// End of the lines.
...

ข้อกำหนดเบื้องต้น

คุณต้องติดตั้งผลิตภัณฑ์ใดผลิตภัณฑ์หนึ่งต่อไปนี้เพื่อใช้โปรแกรมแก้ไขด่วนนี้:

  • Microsoft Dynamics NAV 2009 R2 เวอร์ชันภาษาอิตาลี
  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) เวอร์ชันภาษาอิตาลี
  • Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1) เวอร์ชันภาษาอิตาลี

ลบข้อมูลออก

คุณไม่สามารถลบโปรแกรมแก้ไขด่วนนี้ได้

สถานะ

Microsoft ได้ยืนยันว่านี่เป็นปัญหาที่เกิดขึ้นกับผลิตภัณฑ์ของ Microsoft ที่แสดงไว้ในส่วน "นำไปใช้กับ"

หมายเหตุ นี่คือบทความ "เผยแพร่อย่างรวดเร็ว" ที่สร้างขึ้นโดยตรงจากภายในองค์กรสนับสนุนของ Microsoft ข้อมูลที่อยู่ในที่นี้มีให้เพื่อตอบสนองต่อปัญหาที่เกิดขึ้นใหม่ เนื่องจากความเร็วในการทําให้พร้อมใช้งานวัสดุอาจรวมถึงข้อผิดพลาดในการพิมพ์และอาจได้รับการแก้ไขได้ตลอดเวลาโดยไม่ต้องแจ้งให้ทราบ ดู ข้อตกลงการใช้งาน สําหรับข้อควรพิจารณาอื่นๆ