เซิร์ฟเวอร์แอพลิเคชัน NAV ไม่มีเวลาเริ่มต้นสำหรับรายการคิวงานพิจารณาเมื่อเริ่มใน Microsoft Dynamics NAV 2009

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

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

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

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

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

1. เปลี่ยนรหัสในโค้ดยูนิต Dispacher คิวงาน (448) เป็นดังนี้:
   รหัสที่มีอยู่

   ...  }
   
    PROPERTIES
     {
   
       SingleInstance=Yes;
       OnRun=VAR
               JobQueueSetup@1000 : Record 470;
             BEGIN
               IF ISCLEAR(NavTimer) THEN
                 CREATE(NavTimer);
               NavTimer.Interval := 2000;
   
               NavTimer.Enabled := TRUE;
               InsertJobQueueSession;
               LastCleanupTime := CURRENTDATETIME;
             END;
   ...
   
   

   รหัสแทน

   ...  }
   
     PROPERTIES
     {
       SingleInstance=Yes;
       OnRun=VAR
               JobQueueSetup@1000 : Record 470;
             BEGIN
               IF ISCLEAR(NavTimer) THEN
                 CREATE(NavTimer);
               NavTimer.Interval := 2000;
   
               AdjustJobEntries;
   
               NavTimer.Enabled := TRUE;
               InsertJobQueueSession;
               LastCleanupTime := CURRENTDATETIME;
             END;
   ...
   
   

2. เพิ่มฟังก์ชันAdjustJobEntriesในโค้ดยูนิต Dispacher คิวงาน (448) เป็นดังนี้:

       LOCAL PROCEDURE AdjustJobEntries@14();    VAR
         JobQueueEntry@1000 : Record 472;
       BEGIN
         WITH JobQueueEntry DO BEGIN
           SETFILTER("Expiration Date/Time",'>%1|%2',CURRENTDATETIME,CREATEDATETIME(0D,0T));
           SETFILTER("Earliest Start Date/Time",'<=%1',CURRENTDATETIME);
           SETFILTER("Ending Time",'<%1',DT2TIME(CURRENTDATETIME));
           IF FINDSET(TRUE) THEN
             REPEAT
               IF "Recurring Job" THEN BEGIN
                 "Earliest Start Date/Time" := CalcNextRunTime(JobQueueEntry);
                 MODIFY;
               END;
             UNTIL NEXT = 0;
   
           COMMIT;
         END;
       END;