เขตข้อมูล "ยอดการชําระเงินล่วงหน้าไม่รวม VAT" ถูกคํานวณอย่างไม่ถูกต้องหลังจากที่คุณเปลี่ยนค่า "%การชําระเงินล่วงหน้า" ในใบสั่ง แม้ว่าคุณจะนํา 2558516 โปรแกรมแก้ไขด่วนไปใช้ใน Microsoft Dynamics NAV 2009

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

บทความนี้ใช้กับ Microsoft Dynamics NAV สําหรับทุกประเทศและทุกภาษา

อาการ

พิจารณาสถานการณ์สมมติต่อไปนี้ใน Microsoft Dynamics NAV 2009:

  • คุณใช้ 2558516 โปรแกรมแก้ไขด่วน
      สําหรับข้อมูลเพิ่มเติม ให้คลิกหมายเลขบทความต่อไปนี้เพื่อดูบทความในฐานความรู้ของ Microsoft:
    2558516 เขตข้อมูล "ยอดการชําระเงินล่วงหน้าไม่รวม VAT" ถูกคํานวณอย่างไม่ถูกต้องหลังจากที่คุณเปลี่ยนค่า "%การชําระเงินล่วงหน้า" ในใบสั่งใน Microsoft Dynamics NAV 2009
  • คุณลงรายการบัญชีใบแจ้งหนี้การชําระเงินล่วงหน้าสําหรับใบสั่งที่มีฟิลด์ % การชําระเงินล่วงหน้า ที่ระบุ
  • คุณบางส่วนที่จัดส่งและออกใบแจ้งหนี้บางหน่วยสําหรับใบสั่ง
  • คุณเปิดใบสั่งอีกครั้ง
  • คุณเปลี่ยนค่า % การชําระเงินล่วงหน้า ในใบสั่ง

ในสถานการณ์สมมตินี้ ฟิลด์ ยอดการชําระเงินล่วงหน้าไม่รวม VAT ถูกคํานวณอย่างไม่ถูกต้อง
ปัญหานี้เกิดขึ้นในผลิตภัณฑ์ต่อไปนี้:

  • Microsoft Dynamics NAV 2009 R2
  • Microsoft Dynamics NAV 2009 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. เปลี่ยนรหัสในฟังก์ชัน UpdateAmounts ในตารางบรรทัดการขาย (37) ดังนี้:
    รหัสที่มีอยู่

    ...
    FIELDERROR("Unit Price",STRSUBSTNO(Text047,FIELDCAPTION("Prepayment %")));
    END;
    IF SalesHeader."Document Type" <> SalesHeader."Document Type"::Invoice THEN BEGIN
    "Prepayment VAT Difference" := 0;
    
    // Delete the following lines.
    IF "Quantity Invoiced" = 0 THEN BEGIN
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text049,"Prepmt. Amt. Inv."));
    END ELSE BEGIN
    IF "Prepayment %" <> 0 THEN
    "Prepmt. Line Amount" := "Prepmt. Amt. Inv." +
    ROUND("Line Amount" * (Quantity - "Quantity Invoiced") / Quantity * "Prepayment %" / 100,
    Currency."Amount Rounding Precision")
    ELSE
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" > "Line Amount" THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text049,"Prepmt. Line Amount"));
    END;
    // End of the lines.
    
    END;
    InitOutstandingAmount;
    IF (CurrFieldNo <> 0) AND
    NOT ((Type = Type::Item) AND (CurrFieldNo = FIELDNO("No.")) AND (Quantity <> 0) AND
    ...
    

    รหัสทดแทน

    ...
    FIELDERROR("Unit Price",STRSUBSTNO(Text047,FIELDCAPTION("Prepayment %")));
    END;
    IF SalesHeader."Document Type" <> SalesHeader."Document Type"::Invoice THEN BEGIN
    "Prepayment VAT Difference" := 0;
    
    // Add the following lines.
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text049,"Prepmt. Amt. Inv."));
    // End of the lines.
    
    END;
    InitOutstandingAmount;
    IF (CurrFieldNo <> 0) AND
    NOT ((Type = Type::Item) AND (CurrFieldNo = FIELDNO("No.")) AND (Quantity <> 0) AND
    ...
    
  2. เปลี่ยนรหัสในฟังก์ชัน UpdateAmounts ในตารางบรรทัดการซื้อ (39) ดังนี้:
    รหัสที่มีอยู่

    ...
    FIELDERROR("Direct Unit Cost",STRSUBSTNO(Text043,FIELDCAPTION("Prepayment %")));
    END;
    IF PurchHeader."Document Type" <> PurchHeader."Document Type"::Invoice THEN BEGIN
    "Prepayment VAT Difference" := 0;
    
    // Delete the following lines.
    IF "Quantity Invoiced" = 0 THEN BEGIN
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text037,"Prepmt. Amt. Inv."));
    END ELSE BEGIN
    IF "Prepayment %" <> 0 THEN
    "Prepmt. Line Amount" := "Prepmt. Amt. Inv." +
    ROUND("Line Amount" * (Quantity - "Quantity Invoiced") / Quantity * "Prepayment %" / 100,
    Currency."Amount Rounding Precision")
    ELSE
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" > "Line Amount" THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text037,"Prepmt. Line Amount"));
    END;
    // End of the lines.
    
    END;
    IF PurchHeader.Status = PurchHeader.Status::Released THEN
    UpdateVATAmounts;
    ...
    

    รหัสทดแทน

    ...
    FIELDERROR("Direct Unit Cost",STRSUBSTNO(Text043,FIELDCAPTION("Prepayment %")));
    END;
    IF PurchHeader."Document Type" <> PurchHeader."Document Type"::Invoice THEN BEGIN
    "Prepayment VAT Difference" := 0;
    
    // Add the following lines.
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text037,"Prepmt. Amt. Inv."));
    // End of the lines.
    
    END;
    IF PurchHeader.Status = PurchHeader.Status::Released THEN
    UpdateVATAmounts;
    ...
    
  3. เปลี่ยนรหัสในฟังก์ชัน Code ในโค้ดโค้ดของ Sales-Post Codeunit การชําระเงินล่วงหน้า (442) ดังนี้
    รหัสที่มีอยู่

    ...
    REPEAT
    IF SalesLine."Prepmt. Line Amount" <> SalesLine."Prepmt. Amt. Inv." THEN BEGIN
    SalesLine."Prepmt. Amt. Inv." := SalesLine."Prepmt. Line Amount";
    SalesLine."Prepmt. Amount Inv. Incl. VAT" := SalesLine."Prepmt. Amt. Incl. VAT";
    
    // Delete the following line.
    SalesLine.CalcPrepaymentToDeduct;
    
    SalesLine."Prepmt VAT Diff. to Deduct" :=
    SalesLine."Prepmt VAT Diff. to Deduct" + SalesLine."Prepayment VAT Difference";
    SalesLine."Prepayment VAT Difference" := 0;
    SalesLine.MODIFY;
    ...
    

    รหัสทดแทน

    ...
    REPEAT
    IF SalesLine."Prepmt. Line Amount" <> SalesLine."Prepmt. Amt. Inv." THEN BEGIN
    SalesLine."Prepmt. Amt. Inv." := SalesLine."Prepmt. Line Amount";
    SalesLine."Prepmt. Amount Inv. Incl. VAT" := SalesLine."Prepmt. Amt. Incl. VAT";
    
    // Add the following line.
    SalesLine."Prepmt Amt to Deduct" := SalesLine."Prepmt. Amt. Inv." - SalesLine."Prepmt Amt Deducted";
    
    SalesLine."Prepmt VAT Diff. to Deduct" :=
    SalesLine."Prepmt VAT Diff. to Deduct" + SalesLine."Prepayment VAT Difference";
    SalesLine."Prepayment VAT Difference" := 0;
    SalesLine.MODIFY;
    ...
    
  4. เปลี่ยนรหัสในฟังก์ชัน Code ในโค้ดโค้ดของ Purchase-Post Codeunit การชําระเงินล่วงหน้า (444) ดังนี้
    รหัสที่มีอยู่

    ...
    REPEAT
    IF PurchLine."Prepmt. Line Amount" <> PurchLine."Prepmt. Amt. Inv." THEN BEGIN
    PurchLine."Prepmt. Amt. Inv." := PurchLine."Prepmt. Line Amount";
    PurchLine."Prepmt. Amount Inv. Incl. VAT" := PurchLine."Prepmt. Amt. Incl. VAT";
    
    // Delete the following line.
    PurchLine.CalcPrepaymentToDeduct;
    
    PurchLine."Prepmt VAT Diff. to Deduct" :=
    PurchLine."Prepmt VAT Diff. to Deduct" + PurchLine."Prepayment VAT Difference";
    PurchLine."Prepayment VAT Difference" := 0;
    PurchLine.MODIFY;
    ...
    

    รหัสทดแทน

    ...
    REPEAT
    IF PurchLine."Prepmt. Line Amount" <> PurchLine."Prepmt. Amt. Inv." THEN BEGIN
    PurchLine."Prepmt. Amt. Inv." := PurchLine."Prepmt. Line Amount";
    PurchLine."Prepmt. Amount Inv. Incl. VAT" := PurchLine."Prepmt. Amt. Incl. VAT";
    
    // Add the following line.
    PurchLine."Prepmt Amt to Deduct" := PurchLine."Prepmt. Amt. Inv." - PurchLine."Prepmt Amt Deducted";
    
    PurchLine."Prepmt VAT Diff. to Deduct" :=
    PurchLine."Prepmt VAT Diff. to Deduct" + PurchLine."Prepayment VAT Difference";
    PurchLine."Prepayment VAT Difference" := 0;
    PurchLine.MODIFY;
    ...
    

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

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

  • Microsoft Dynamics NAV 2009 R2
  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)

ลบข้อมูลออก

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

สถานะ

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

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