ข้อผิดพลาดที่สอดคล้องกันเมื่อคุณลงรายการบัญชีใบแจ้งหนี้และการชำระเงินจากสมุดรายวันใน Microsoft Dynamics NAV 2009 รุ่นโปรตุเกส

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

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

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

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

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

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

เมื่อต้องการใช้โปรแกรมแก้ไขด่วนนี้ คุณต้องมีสิทธิ์การใช้งานสำหรับนักพัฒนา

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

• สิทธิ์การปรับเปลี่ยนสำหรับออปเจ็กต์ที่คุณจะสามารถเปลี่ยน

• สิทธิ์ในการดำเนินการ สำหรับออบเจ็กต์5210 รหัสวัตถุของระบบและระบบ 9015 ID ของวัตถุ
  
  วัตถุ

หมายเหตุ คุณไม่จำเป็นต้องมีสิทธิ์ไปยังร้านค้าข้อมูลยกเว้นว่าคุณจำเป็นต้องซ่อมแซมข้อมูล

การเปลี่ยนแปลงรหัส

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

เมื่อต้องการแก้ไขปัญหานี้ ให้ทำตามขั้นตอนเหล่านี้:

1. เปลี่ยนแปลงรหัสนี้ในฟังก์ชันInsertVATในแบบทั่วไปงานสมุดรายวัน-ยูนิตบรรทัดการลงรายการบัญชี (12) ดัง:
   รหัสที่อยู่ 1

   ...VATDifferenceLCY@1013 : Decimal;
           SrcCurrVATDifference@1014 : Decimal;
         BEGIN
           WITH GenJnlLine DO BEGIN
   ...
   

   รหัสแทนที่ 1

   ...VATDifferenceLCY@1013 : Decimal;
           SrcCurrVATDifference@1014 : Decimal;
   
   // Add the following line.
   VATAmountTotal@1015 : Decimal;
   // End of the added line.
   
         BEGIN
           WITH GenJnlLine DO BEGIN
   ...
   

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

   ...GLEntryVATAmount,SrcCurrGLEntryVATAmt,TRUE,TRUE);
                                 InsertGLEntry(TRUE);
   
   // Delete the following lines.
   VATPostingSetup.TESTFIELD("Return VAT account (Sales)");
   InitGLEntry(
   VATPostingSetup."Return VAT account (Sales)",
   //                        -GLEntryVATAmount - VATBase * VATPostingSetup."VAT N.D. %" / 100,
   -TempVATAmount,
   //                        -SrcCurrGLEntryVATAmt - SrcCurrVATBase * VATPostingSetup."VAT N.D. %" / 100,
   ROUND(-SrcCurrGLEntryVATAmt - SrcCurrVATBase * VATPostingSetup."VAT N.D. %" / 100),
   TRUE,TRUE);
   InsertGLEntry(TRUE);
   // End of the deleted lines.
   
                             END
                           ELSE
   ...
   

   รหัสแทนที่ 2

   ...GLEntryVATAmount,SrcCurrGLEntryVATAmt,TRUE,TRUE);
                                 InsertGLEntry(TRUE);
                             END
                           ELSE
   ...
   

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

   ...END
                         ELSE
   
   // Delete the following lines.
   BEGIN
   IF NOT GenJnlLine."UE Aquisition Not Accep." THEN BEGIN
   VATPostingSetup.TESTFIELD("Purchase VAT Account");
   InitGLEntry(
   VATPostingSetup."Purchase VAT Account",
   GLEntryVATAmount,SrcCurrGLEntryVATAmt,TRUE,TRUE);
   InsertGLEntry(TRUE);
   END;
   //--------
   
    VATPostingSetup.TESTFIELD("Reverse Chrg. VAT Acc.");
   InitGLEntry(
   VATPostingSetup."Reverse Chrg. VAT Acc.",
   //                    -GLEntryVATAmount - VATBase * VATPostingSetup."VAT N.D. %" / 100,
   //                    ROUND(-GLEntryVATAmount - VATBase * VATPostingSetup."VAT N.D. %" / 100),
   ROUND((- VATBase * VATPostingSetup."VAT D. %" / 100) - (VATBase * VATPostingSetup."VAT N.D. %" / 100)),
   //                    -SrcCurrGLEntryVATAmt - SrcCurrVATBase * VATPostingSetup."VAT N.D. %" / 100,
   ROUND(-SrcCurrGLEntryVATAmt - SrcCurrVATBase * VATPostingSetup."VAT N.D. %" / 100),
   TRUE,TRUE);
   // End of the deleted lines.
   
                             InsertGLEntry(TRUE);
                           END;
   ...
   

   รหัสแทนที่ 3

   ...END
                         ELSE
   
   // Add the following lines.
   IF NOT GenJnlLine."UE Aquisition Not Accep." THEN BEGIN
   VATPostingSetup.TESTFIELD("Purchase VAT Account");
   InitGLEntry(
   VATPostingSetup."Purchase VAT Account",
   GLEntryVATAmount,SrcCurrGLEntryVATAmt,TRUE,TRUE);
   // End of the added lines.
   
                             InsertGLEntry(TRUE);
                           END;
   ...
   

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

   ...END;
             END;
           END;
         END;
   ...
   

   รหัสแทนที่ 4

   ...  END;
             END;
   
   // Add the following lines.
   IF IsPurchaseReverseChargeVAT(UnrealizedVAT) THEN
   IF "Document Type"= "Document Type"::"Credit Memo" THEN BEGIN
   IF (NOT GenJnlLine."UE Aquisition Not Accep.") AND (TempVATAmount <> 0) THEN BEGIN
   VATPostingSetup.TESTFIELD("Return VAT account (Sales)");
   InitGLEntry(
   VATPostingSetup."Return VAT account (Sales)",
   -TempVATAmount,
   ROUND(-SrcCurrGLEntryVATAmt - SrcCurrVATBase * VATPostingSetup."VAT N.D. %" / 100),
   TRUE,TRUE);
   InsertGLEntry(TRUE);
   END;
   END ELSE BEGIN
   VATAmountTotal 
   := ROUND((- VATBase * VATPostingSetup."VAT D. %" / 100) - (VATBase * VATPostingSetup."VAT N.D. %" / 100));
   IF VATAmountTotal <> 0 THEN BEGIN
    VATPostingSetup.TESTFIELD("Reverse Chrg. VAT Acc.");
   InitGLEntry(
   VATPostingSetup."Reverse Chrg. VAT Acc.",VATAmountTotal,
   ROUND(-SrcCurrGLEntryVATAmt - SrcCurrVATBase * VATPostingSetup."VAT N.D. %" / 100),
   TRUE,TRUE);
   InsertGLEntry(TRUE);
   END;
   END;
   // End of the added lines.
   
           END;
         END;
   ...
   

2. เปลี่ยนแปลงรหัสนี้ในฟังก์ชันIsPurchaseReverseChargeVATในแบบทั่วไปงานสมุดรายวัน-ยูนิตบรรทัดการลงรายการบัญชี (12) ดัง:
   รหัสที่มีอยู่

   ...END;
   
         BEGIN
         END.
   ...
   

   รหัสแทน

   ...END;
   
   // Add the following lines.
   LOCAL PROCEDURE IsPurchaseReverseChargeVAT@1110015(UnrealizedVAT@1110000 : Boolean) : Boolean;
   BEGIN
   EXIT(
   (GenJnlLine."Gen. Posting Type" = GenJnlLine."Gen. Posting Type"::Purchase) AND (NOT UnrealizedVAT) AND
   (VATPostingSetup."VAT Calculation Type" = VATPostingSetup."VAT Calculation Type"::"Reverse Charge VAT" ));
   END;
   
   // End of the added lines.
   
         BEGIN
         END.
   ...
   
   

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

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

• Microsoft Dynamics NAV 2009 R2 รุ่นโปรตุเกส

• SP1 2009 นำทางของ Dynamics Microsoft รุ่นโปรตุเกส

ข้อมูลการเอาออก

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