บทความนี้นำไปใช้กับ Microsoft Dynamics NAV สำหรับประเทศทั้งหมดและตำแหน่งที่ตั้งภาษาทั้งหมด
อาการ
สมมติว่า คุณเปลี่ยนปริมาณสำหรับบรรทัดการติดตามของการติดตามใบสั่งในชุดงานใน Microsoft Dynamics NAV 2009 เมื่อคุณสร้างการรับของการจัดส่ง ปริมาณของการรับสินค้าการจัดส่งไม่ถูกต้อง
ปัญหานี้เกิดขึ้นในผลิตภัณฑ์ต่อไปนี้:
-
Microsoft Dynamics NAV 2009 R2
-
Microsoft Dynamics NAV 2009 Service Pack ที่ 1 (SP1)
การแก้ปัญหา
ข้อมูลโปรแกรมแก้ไขด่วน
โปรแกรมแก้ไขด่วนจะพร้อมใช้งานได้ในขณะนี้จาก 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 ของวัตถุ
วัตถุ
หมายเหตุ คุณไม่จำเป็นต้องมีสิทธิ์ไปยังร้านค้าข้อมูลยกเว้นว่าคุณจำเป็นต้องซ่อมแซมข้อมูล
การเปลี่ยนแปลงรหัส
หมายเหตุ เสมอทดสอบรหัสแก้ไขในสภาพแวดล้อมการควบคุมก่อนที่คุณนำไปใช้แก้ไขปัญหากับคอมพิวเตอร์ของคุณผลิต
เมื่อต้องการแก้ไขปัญหานี้ เปลี่ยนแปลงรหัสนี้ในการสร้างการรับของโค้ดยูนิต (7312) เป็นดังนี้:
รหัสที่มีอยู่
...CODE
...
PROCEDURE CreateTempLine@29(LocationCode@1002 : Code[10];ItemNo@1003 : Code[20];VariantCode@1004 : Code[10];UnitofMeasureCode@1005 : Code[10];FromBinCode@1000 : Code[20];ToBinCode@1007 : Code[20];QtyPerUnitofMeasure@1010 : Decimal;VAR TotalQtytoPick@1001 : Decimal;VAR TotalQtytoPickBase@1000000000 : Decimal);
...
i@1012 : Integer;
RemQtyToPickBase@1000000002 : Decimal;
QtyToPickBase@1000000001 : Decimal;
QtyToTrackBase@1009 : Decimal;
QtyBaseMaxAvailToPick@1011 : Decimal;
...
TempWhseItemTrkgLine.RESET;
TempWhseItemTrkgLine.SETFILTER("Qty. to Handle",'<> 0');
IF TempWhseItemTrkgLine.FIND('-') THEN BEGIN
REPEAT
IF TempWhseItemTrkgLine."Qty. to Handle (Base)" <> 0 THEN BEGIN
// Delete the following lines.
IF TempWhseItemTrkgLine."Qty. to Handle" > RemQtyToPick THEN BEGIN
TempWhseItemTrkgLine."Qty. to Handle" := RemQtyToPick;
...
TempWhseItemTrkgLine.MODIFY;
END;
// Delete the following lines.
IF TempWhseItemTrkgLine."Qty. to Handle (Base)" > RemQtyToPickBase THEN BEGIN
TempWhseItemTrkgLine."Qty. to Handle (Base)" := RemQtyToPickBase;
// End of the deleted lines.
...
TempWhseItemTrkgLine.MODIFY;
END;
...
QtyToPick := TempWhseItemTrkgLine."Qty. to Handle";
QtyToPickBase := TempWhseItemTrkgLine."Qty. to Handle (Base)";
CreateTempLine2(LocationCode,ItemNo,VariantCode,UnitofMeasureCode,FromBinCode,ToBinCode,
QtyPerUnitofMeasure,QtyToPick,TempWhseItemTrkgLine,QtyToPickBase);
RemQtyToPickBase -= TempWhseItemTrkgLine."Qty. to Handle (Base)" - QtyToPickBase;
// Delete the following line.
RemQtyToPick -= (TempWhseItemTrkgLine."Qty. to Handle" / QtyPerUnitofMeasure) - QtyToPick;
// End of the deleted line.
...
LOCAL PROCEDURE UpdateToQtyToPick@71(QtyAvailableBase@1008 : Decimal;ToQtyPerUOM@1004 : Decimal;VAR ToQtyToPick@1003 : Decimal;VAR ToQtyToPickBase@1002 : Decimal;TotalQtyToPick@1001 : Decimal;TotalQtyToPickBase@1000 : Decimal);
...
ToQtyToPick := ROUND(ToQtyToPickBase / ToQtyPerUOM,0.00001);
IF ToQtyToPick > TotalQtyToPick THEN
ToQtyToPick := TotalQtyToPick;
IF (ToQtyToPick <> TotalQtyToPick) AND (ToQtyToPickBase = TotalQtyToPickBase) THEN
// Delete the following line.
IF ToQtyToPickBase = ROUND(TotalQtyToPick * ToQtyPerUOM,0.00001) THEN
// End of the deleted line.
...
รหัสแทน
...
CODE
...
PROCEDURE CreateTempLine@29(LocationCode@1002 : Code[10];ItemNo@1003 : Code[20];VariantCode@1004 : Code[10];UnitofMeasureCode@1005 : Code[10];FromBinCode@1000 : Code[20];ToBinCode@1007 : Code[20];QtyPerUnitofMeasure@1010 : Decimal;VAR TotalQtytoPick@1001 : Decimal;VAR TotalQtytoPickBase@1000000000 : Decimal);
...
i@1012 : Integer;
RemQtyToPickBase@1000000002 : Decimal;
QtyToPickBase@1000000001 : Decimal;
QtyToTrackBase@1009 : Decimal;
QtyBaseMaxAvailToPick@1011 : Decimal;
// Add the following line.
NewQtyToHandle@1170000000 : Decimal;
// End of the added line.
...
TempWhseItemTrkgLine.RESET;
TempWhseItemTrkgLine.SETFILTER("Qty. to Handle",'<> 0');
IF TempWhseItemTrkgLine.FIND('-') THEN BEGIN
REPEAT
IF TempWhseItemTrkgLine."Qty. to Handle (Base)" <> 0 THEN BEGIN
// Add the following lines.
IF TempWhseItemTrkgLine."Qty. to Handle (Base)" > RemQtyToPickBase THEN BEGIN
TempWhseItemTrkgLine."Qty. to Handle (Base)" := RemQtyToPickBase;
// End of the added lines.
...
TempWhseItemTrkgLine.MODIFY;
END;
// Add the following lines.
NewQtyToHandle := ROUND(RemQtyToPick / RemQtyToPickBase * TempWhseItemTrkgLine."Qty. to Handle (Base)",0.00001);
IF TempWhseItemTrkgLine."Qty. to Handle" <> NewQtyToHandle THEN BEGIN
TempWhseItemTrkgLine."Qty. to Handle" := NewQtyToHandle;
// End of the added lines.
...
TempWhseItemTrkgLine.MODIFY;
END;
...
QtyToPick := TempWhseItemTrkgLine."Qty. to Handle";
QtyToPickBase := TempWhseItemTrkgLine."Qty. to Handle (Base)";
CreateTempLine2(LocationCode,ItemNo,VariantCode,UnitofMeasureCode,FromBinCode,ToBinCode,
QtyPerUnitofMeasure,QtyToPick,TempWhseItemTrkgLine,QtyToPickBase);
RemQtyToPickBase -= TempWhseItemTrkgLine."Qty. to Handle (Base)" - QtyToPickBase;
// Add the following line.
RemQtyToPick -= TempWhseItemTrkgLine."Qty. to Handle" - QtyToPick;
// End of the added line.
...
LOCAL PROCEDURE UpdateToQtyToPick@71(QtyAvailableBase@1008 : Decimal;ToQtyPerUOM@1004 : Decimal;VAR ToQtyToPick@1003 : Decimal;VAR ToQtyToPickBase@1002 : Decimal;TotalQtyToPick@1001 : Decimal;TotalQtyToPickBase@1000 : Decimal);
...
ToQtyToPick := ROUND(ToQtyToPickBase / ToQtyPerUOM,0.00001);
IF ToQtyToPick > TotalQtyToPick THEN
ToQtyToPick := TotalQtyToPick;
IF (ToQtyToPick <> TotalQtyToPick) AND (ToQtyToPickBase = TotalQtyToPickBase) THEN
// Add the following line.
IF (ABS(ToQtyToPick - TotalQtyToPick) = 0.00001) AND (ToQtyToPickBase = TotalQtyToPickBase) THEN
// End of the added line.
...
ข้อกำหนดเบื้องต้น
คุณต้องมีหนึ่งผลิตภัณฑ์ต่อไปนี้ติดตั้งอยู่เพื่อใช้โปรแกรมแก้ไขด่วนนี้:
-
Microsoft Dynamics NAV 2009 R2
-
Microsoft Dynamics NAV 2009 Service Pack ที่ 1
ข้อมูลการเอาออก
คุณไม่สามารถเอาโปรแกรมแก้ไขด่วนนี้
สถานะ
Microsoft ยืนยันว่านี่เป็นปัญหาในผลิตภัณฑ์ของ Microsoft ซึ่งแสดงไว้ในส่วน "นำไปใช้กับ"
หมายเหตุ นี่คือบทความ "เผยแพร่เร็ว" ที่สร้างขึ้นโดยตรงจากภายใน Microsoft สนับสนุนองค์กร ข้อมูลในที่นี้ให้ไว้ตามสภาพ เพื่อตอบสนองกับปัญหาที่เกิดขึ้นใหม่ เป็นผลมาจากความเร็วในการทำให้พร้อมใช้งาน วัสดุอาจรวมถึงข้อผิดพลาดการพิมพ์ผิด และอาจแก้ไขได้ตลอดเวลาโดยไม่ต้องแจ้งให้ทราบ ดูข้อตกลงการใช้สำหรับข้อควรพิจารณาอื่น ๆ