สร้างรายการ G/L ที่ไม่ถูกต้องเมื่อคุณชำระตั๋วใน Microsoft Dynamics NAV 2009 รุ่นภาษาสเปน

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

Microsoft Dynamics NAV 2009 R2 รุ่นภาษาสเปน
SP1 2009 นำทางของ Dynamics Microsoft รุ่นภาษาสเปน

การแก้ปัญหา

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

โปรแกรมแก้ไขด่วนจะพร้อมใช้งานได้ในขณะนี้จาก 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 ทั้งหมด

เมื่อต้องการแก้ไขปัญหานี้ เปลี่ยนแปลงรหัสนี้ในฟังก์ชันVendUnrealizedVATในโค้ดยูนิต CarteraManagement (7000000) เป็นดังนี้:

รหัสที่อยู่ 1

...PurchVATAccount@1100016 : Code[20];
        PurchVATUnrealAccount@1100017 : Code[20];
        LastConnectionNo@1100018 : Integer;
        Test1@1100019 : Boolean;
        Test2@1100020 : Boolean;
      BEGIN
        VendLedgEntry2.CALCFIELDS(
          Amount,
          "Amount (LCY)",
          "Remaining Amount",
...

รหัสแทนที่ 1

...PurchVATAccount@1100016 : Code[20];
        PurchVATUnrealAccount@1100017 : Code[20];
        LastConnectionNo@1100018 : Integer;
        Test1@1100019 : Boolean;
        Test2@1100020 : Boolean;

// Add the following lines.
ReverseChrgVATAcc@1000000000 : Code[20];
ReverseChrgVATUnrealAcc@1000000001 : Code[20];
// End of the added lines.

      BEGIN
        VendLedgEntry2.CALCFIELDS(
          Amount,
          "Amount (LCY)",
          "Remaining Amount",
...

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

...VATEntry2."VAT Calculation Type"::"Reverse Charge VAT",
                    VATEntry2."VAT Calculation Type"::"Full VAT":
                      BEGIN
                        VATPostingSetup.TESTFIELD("Purchase VAT Account");
                        VATPostingSetup.TESTFIELD("Purch. VAT Unreal. Account");
                        PurchVATAccount := VATPostingSetup."Purchase VAT Account";
                        PurchVATUnrealAccount := VATPostingSetup."Purch. VAT Unreal. Account";
                      END;

                  END;
...

รหัสแทนที่ 2

...VATEntry2."VAT Calculation Type"::"Reverse Charge VAT",
                    VATEntry2."VAT Calculation Type"::"Full VAT":
                      BEGIN
                        VATPostingSetup.TESTFIELD("Purchase VAT Account");
                        VATPostingSetup.TESTFIELD("Purch. VAT Unreal. Account");

// Add the following lines.
IF VATEntry2."VAT Calculation Type" = VATEntry2."VAT Calculation Type"::"Reverse Charge VAT" THEN BEGIN
VATPostingSetup.TESTFIELD("Reverse Chrg. VAT Acc.");
VATPostingSetup.TESTFIELD("Reverse Chrg. VAT Unreal. Acc.");
ReverseChrgVATAcc := VATPostingSetup."Reverse Chrg. VAT Acc.";
ReverseChrgVATUnrealAcc := VATPostingSetup."Reverse Chrg. VAT Unreal. Acc.";
END;
// End of the added lines.

                        PurchVATAccount := VATPostingSetup."Purchase VAT Account";
                        PurchVATUnrealAccount := VATPostingSetup."Purch. VAT Unreal. Account";
                      END;

                  END;
...

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

...NoRealVATBuffer.Amount := TotalVATAmount;
                    NoRealVATBuffer."Entry No." := VATEntry2."Entry No.";
                    NoRealVATBuffer.INSERT;
                  END;

                  VATEntry := VATEntry2;
                  VATEntry."Entry No." := VATEntryNo;
                  VATEntry."Posting Date" := GenJnlLine."Posting Date";
                  VATEntry."Document No." := GenJnlLine."Document No.";
                  VATEntry."External Document No." := GenJnlLine."External Document No.";
...

รหัสแทนที่ 3

...NoRealVATBuffer.Amount := TotalVATAmount;
                    NoRealVATBuffer."Entry No." := VATEntry2."Entry No.";
                    NoRealVATBuffer.INSERT;
                  END;

// Add the following lines.
IF VATEntry2."VAT Calculation Type" = VATEntry2."VAT Calculation Type"::"Reverse Charge VAT" THEN BEGIN
IF NoRealVATBuffer.GET(ReverseChrgVATAcc,ReverseChrgVATUnrealAcc,VATEntry2."Entry No.") THEN
NoRealVATBuffer.Amount := NoRealVATBuffer.Amount + TotalVATAmount
ELSE BEGIN
NoRealVATBuffer.INIT;
NoRealVATBuffer.Account := ReverseChrgVATAcc;
NoRealVATBuffer."Balance Account" := ReverseChrgVATUnrealAcc;
NoRealVATBuffer.Amount := TotalVATAmount;
NoRealVATBuffer."Entry No." := VATEntry2."Entry No.";
NoRealVATBuffer.INSERT;
END;
END;

// End of the added lines.

                  VATEntry := VATEntry2;
                  VATEntry."Entry No." := VATEntryNo;
                  VATEntry."Posting Date" := GenJnlLine."Posting Date";
                  VATEntry."Document No." := GenJnlLine."Document No.";
                  VATEntry."External Document No." := GenJnlLine."External Document No.";
...

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

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

Microsoft Dynamics NAV 2009 R2 รุ่นภาษาสเปน
SP1 2009 นำทางของ Dynamics Microsoft รุ่นภาษาสเปน

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

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

สถานะ

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

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