NAV Application Server non accetta ora di inizio per un movimento coda processi in considerazione al riavvio in Microsoft Dynamics NAV 2009

Informazioni sull'hotfix

Un hotfix supportato è ora disponibile da Microsoft. Tuttavia, è destinato esclusivamente alla risoluzione del problema descritto in questo articolo. Applicarlo solo ai sistemi in cui si verificano questo problema specifico. Questo hotfix potrebbe essere sottoposto ad ulteriori test. Pertanto, se il problema non causa gravi difficoltà, consiglia di attendere il prossimo service pack di Microsoft Dynamics NAV 2009 o versione successiva di Microsoft Dynamics NAV contenente tale hotfix.

Nota: In casi particolari, le spese normalmente addebitate per le chiamate potrebbero essere annullate qualora un aggiornamento del supporto tecnico di Microsoft Dynamics e prodotti correlati di supporto determina che uno specifico aggiornamento risolverà il problema. I costi di supporto normale verranno applicati per eventuali ulteriori domande e problemi che non dovessero rientrare nello specifico aggiornamento in questione.

Modifiche al codice

Nota: Sempre il codice di test consente di correggere in un ambiente controllato prima di applicare le correzioni per i computer di produzione.
Per risolvere questo problema, attenersi alla seguente procedura:

1. Modificare il codice nella codeunit Dispacher coda commesse (448) come segue:
   Codice esistente

   ...  }
   
    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;
   ...
   
   

   Codice di sostituzione

   ...  }
   
     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. Aggiungere la funzione AdjustJobEntries della codeunit Dispacher coda commesse (448) come segue:

       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;