Microsoft Dynamics NAV, 2009 не використовує Бен з найбільший кошика, рейтинг, якщо деякі лотки приховання шаблон критерії

Відомості про виправлення

Корпорація Майкрософт випустила підтримуване виправлення доступна. Однак, застосовувати лише для вирішення проблеми, описаної в цій статті. Він придатний лише для систем, які зазнають цієї конкретної проблеми. Те, що це виправлення може потребувати додаткового тестування. Таким чином, якщо ви не завдає значної, рекомендовано почекати до виходу чергового пакета оновлень Microsoft Dynamics NAV, 2009 або наступної версії Microsoft Dynamics NAV, що містить це виправлення.

Примітка. В окремих випадках оплату звернення до служби підтримки може бути скасовано якщо технічної підтримки професійного для Microsoft Dynamics і пов'язані продукти визначає телефонів служби. Плата стягується на додаткові питання і проблеми, які не пов'язані з оновленням.

Зміни коду

Примітка. Завжди тест код вирішення в середовищі контрольовані перед інсталяцією розглянутого виправлення виробництва комп'ютерів.
Щоб вирішити цю проблему, виконайте такі дії.

1. Змінити код FindBin функції створення приховання-Codeunit (7313), у наступним чином:
   Наявний код

   ...SETRANGE("Cross-Dock Bin",FALSE);
             IF PutAwayTemplLine."Find Empty Bin" THEN
               SETRANGE(Empty,TRUE);
             IF FIND('+') THEN BEGIN
   
   // Delete the following lines.
              IF NOT PutAwayTemplLine."Find Empty Bin" THEN
                EXIT(TRUE);
              REPEAT
                WhseActivLine.SETCURRENTKEY("Bin Code","Location Code","Action Type");
                WhseActivLine.SETRANGE("Bin Code",Code);
                WhseActivLine.SETRANGE("Location Code",LocationCode);
                WhseActivLine.SETRANGE("Action Type",WhseActivLine."Action Type"::Place);
                IF NOT WhseActivLine.FIND('-') THEN
                  EXIT(TRUE);
   // End of the deleted lines.
   
               UNTIL NEXT(-1) = 0;
             END;
           END;
           EXIT(FALSE)
   ...
   

   Заміна код

   ...SETRANGE("Cross-Dock Bin",FALSE);
             IF PutAwayTemplLine."Find Empty Bin" THEN
               SETRANGE(Empty,TRUE);
             IF FIND('+') THEN BEGIN
   
   // Add the following lines.
              IF NOT (PutAwayTemplLine."Find Empty Bin" OR PutAwayTemplLine."Find Floating Bin") THEN
                EXIT(TRUE);
              REPEAT
                IF PutAwayTemplLine."Find Empty Bin" THEN BEGIN
                  WhseActivLine.SETCURRENTKEY("Bin Code","Location Code","Action Type");
                  WhseActivLine.SETRANGE("Bin Code",Code);
                  WhseActivLine.SETRANGE("Location Code",LocationCode);
                  WhseActivLine.SETRANGE("Action Type",WhseActivLine."Action Type"::Place);
                  IF WhseActivLine.ISEMPTY THEN
                    IF NOT PutAwayTemplLine."Find Floating Bin" OR IsFloatingBin THEN
                      EXIT(TRUE);
                END ELSE // Find Floating Bin
                  IF IsFloatingBin THEN
                    EXIT(TRUE);
   // End of the added lines.
   
               UNTIL NEXT(-1) = 0;
             END;
           END;
           EXIT(FALSE)
   ...
   

2. Змінити код SetCrossDockValues функції створення приховання-Codeunit (7313), у наступним чином:
   Наявний код

   ...BEGIN
           CrossDock := NewCrossDock;
         END;
   
         BEGIN
         END.
       }
     }
   ...
   

   Заміна код

   ...BEGIN
           CrossDock := NewCrossDock;
         END;
   
   // Add the following lines.
   
        LOCAL PROCEDURE IsFloatingBin@23() : Boolean;
        BEGIN
          WITH BinContent DO BEGIN
            RESET;
            SETRANGE("Location Code",Bin."Location Code");
            SETRANGE("Zone Code",Bin."Zone Code");
            SETRANGE("Bin Code",Bin.Code);
            IF FINDSET THEN
              REPEAT
                IF Fixed OR Default THEN
                  EXIT(FALSE);
              UNTIL NEXT = 0;
            EXIT(TRUE);
          END;
        END;
   // End of the added lines.
   
         BEGIN
         END.
       }
     }
   ...