Microsoft Dynamics NAV 2009 לא להשתמש בסל עם סל הגבוהה ביותר דירוג כאשר סלי מסוימים תואמים לקריטריונים תבנית put לא נמצא

מידע על תיקונים חמים

תיקון חם נתמך זמין כעת מ- Microsoft. עם זאת, הוא מיועד רק לתיקון הבעיה המתוארת במאמר זה. יש להחיל אותו רק במערכות שהתעוררה בהן בעיה ספציפית זו. תיקון חם זה עשוי לעבור בדיקות נוספות. לכן, אם המערכת שברשותך לא נפגעה באופן חמור מבעיה זו, מומלץ להמתין ל- Microsoft Dynamics NAV 2009 service pack הבאה או גירסת Microsoft Dynamics NAV הבא המכיל תיקון חם זה.

הערה במקרים מיוחדים, שהצגת עבור שיחות עשויים לבטל אם מומחה תמיכה טכנית עבור Microsoft Dynamics ומוצרים קשורים יקבע שעדכון ספציפי יפתור את הבעיה. דמי התמיכה המקובלים יחולו על נוספים שאלות וסוגיות תמיכה אשר אינן מצריכות העדכון הספציפי האמור.

שינויי קוד

הערה תמיד קוד מחשב פותר בסביבה מבוקרת לפני החלת התיקונים למחשבים הייצור שלך.
כדי לפתור בעיה זו, בצע את הפעולות הבאות:

1. שנה את הקוד בפונקציה FindBin ב Codeunit צור Put-לא נמצא (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 צור Put-לא נמצא (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.
       }
     }
   ...