มีคำนวณฟิลด์วันจัดส่งไม่ถูกต้องหลังจากที่คุณได้ตั้งค่าฟิลด์วันจัดส่งที่ร้องขอในใบสั่งขายใน Microsoft Dynamics NAV

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

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

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

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

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

1. เพิ่มตัวแปรส่วนกลางในตารางบรรทัดการขาย (37), และระบุตัวแปรดังนี้:

   • ชื่อ: RequestedPromisedDateCalulated

   • ชนิดข้อมูล:บูลีน

2. เปลี่ยนแปลงรหัสนี้ในวันจัดส่งที่ร้องขอ - การ OnValidateทริกเกอร์ในตารางบรรทัดการขาย (37) เป็นดังนี้:
   รหัสที่มีอยู่

   ...
   IF ("Requested Delivery Date" <> xRec."Requested Delivery Date") AND
   ("Promised Delivery Date" <> 0D)
   THEN
   ERROR(
   Text028, 
   FIELDCAPTION("Requested Delivery Date"),
   FIELDCAPTION("Promised Delivery Date"));
   IF "Requested Delivery Date" <> 0D THEN
   VALIDATE("Planned Delivery Date","Requested Delivery Date")
   ELSE BEGIN
   GetSalesHeader;
   VALIDATE("Shipment Date",SalesHeader."Shipment Date");
   END;
   END;
   }
   { 5791;   ;Promised Delivery Date;Date        ;OnValidate=BEGIN
   TestStatusOpen;
   IF "Promised Delivery Date" <> 0D THEN
   VALIDATE("Planned Delivery Date","Promised Delivery Date")
   ELSE
   ...

   รหัสแทน

   ...
   IF ("Requested Delivery Date" <> xRec."Requested Delivery Date") AND
   ("Promised Delivery Date" <> 0D)
   THEN
   ERROR(
   Text028,
   FIELDCAPTION("Requested Delivery Date"),
   FIELDCAPTION("Promised Delivery Date"));
   
   RequestedPromisedDateCalulated := "Requested Delivery Date" <> 0D;
   IF "Requested Delivery Date" <> 0D THEN
   VALIDATE("Planned Delivery Date","Requested Delivery Date")
   ELSE BEGIN
   GetSalesHeader;
   VALIDATE("Shipment Date",SalesHeader."Shipment Date");
   END;
   END;
   }
   { 5791; ;Promised Delivery Date;Date ;OnValidate=BEGIN
   TestStatusOpen;
   RequestedPromisedDateCalulated := "Promised Delivery Date" <> 0D;
   IF "Promised Delivery Date" <> 0D THEN
   VALIDATE("Planned Delivery Date","Promised Delivery Date")
   ELSE
   ...

3. เปลี่ยนแปลงรหัสนี้ในวันจัดส่งที่วางแผนไว้ - การ OnValidateทริกเกอร์ในตารางบรรทัดการขาย (37) เป็นดังนี้:
   รหัสที่มีอยู่

   ...
   IF FORMAT("Shipping Time") <> '' THEN
   VALIDATE(
   "Planned Shipment Date",
   CalendarMgmt.CalcDateBOC2(
   FORMAT("Shipping Time"),
   "Planned Delivery Date",
   CalChange."Source Type"::"Shipping Agent",
   "Shipping Agent Code",
   "Shipping Agent Service Code",
   CalChange."Source Type"::Customer,
   "Sell-to Customer No.",
   '',
   TRUE))
   ELSE
   VALIDATE(
   "Planned Shipment Date",
   CalendarMgmt.CalcDateBOC(
   FORMAT(''),
   "Planned Delivery Date",
   CalChange."Source Type"::"Shipping Agent",
   "Shipping Agent Code",
   "Shipping Agent Service Code",
   CalChange."Source Type"::Customer,
   "Sell-to Customer No.",
   '',
   TRUE));
   
   IF "Planned Shipment Date" > "Planned Delivery Date" THEN
   ...

   รหัสแทน

   ...
   IF FORMAT("Shipping Time") <> '' THEN
   VALIDATE(
   "Planned Shipment Date",
   CalendarMgmt.CalcDateBOC2(
   FORMAT("Shipping Time"),
   "Planned Delivery Date",
   CalChange."Source Type"::"Shipping Agent",
   "Shipping Agent Code",
   "Shipping Agent Service Code",
   CalChange."Source Type"::Customer,
   "Sell-to Customer No.",
   '',
   NOT RequestedPromisedDateCalulated))
   ELSE
   VALIDATE(
   "Planned Shipment Date",
   CalendarMgmt.CalcDateBOC(
   FORMAT(''),
   "Planned Delivery Date",
   CalChange."Source Type"::"Shipping Agent",
   "Shipping Agent Code",
   "Shipping Agent Service Code",
   CalChange."Source Type"::Customer,
   "Sell-to Customer No.",
   '',
   NOT RequestedPromisedDateCalulated));
   
   IF "Planned Shipment Date" > "Planned Delivery Date" THEN
   ...