Applies ToDynamics NAV 2009

מאמר זה חל על Microsoft Dynamics NAV 2009 עבור כל המדינות והאזורים כל שפה.

מאפייני הבעיה

בהנחה שאתה מפעיל בגליון העבודה של תכנון תהפוך לזמינה את ההגדרה האוטומטית לבנות ערכת ה-BOM עבור פריט לערכה בעלת מניות די ב- Microsoft Dynamics NAV 2009 R2 ו- Microsoft Dynamics NAV 2009 Service Pack 1 (SP1). כאשר אתה מנסה לרשום את הזמנת המכירה עבור הפריט לערכה, מתקבלת הודעת השגיאה הבאה:

הערך שיריון אינו קיים. שדות זיהוי וערכים: הערך ' לא ' ='Entry_Number', חיובי = 'כן'

פתרון

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

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

מידע על ההתקנה

מיקרוסופט מציעה דוגמאות תכנות לצורך ההדגמה בלבד, ללא אחריות, בין מפורשת ובין משתמעת. זה כולל, אך אינו מוגבל ל, אחריות מכללא לגבי סחירות או התאמה למטרה מסוימת. מאמר זה מבוסס על ההנחה שאתה מכיר את שפת התכנות המודגמת ובקי בהפעלת הכלים המשמשים ליצירת פרוצדורות ולניפוי שגיאות. מהנדסי התמיכה של Microsoft יכולים לסייע בהסברת הפונקציונליות של פרוצדורה מסוימת, אך הם לא ישנו את הדוגמאות כדי לספק פונקציונליות נוספת או כדי לבנות פרוצדורות שיענו על צרכיך הספציפיים.הערה לפני התקנת תיקון חם זה, ודא כי כל המשתמשים לקוח Microsoft Navision אינם מחוברים למערכת. זה כולל משתמשים לקוח של שירותי היישום של Microsoft Navision (NAS). אתה אמור להיות לקוח בלבד המשתמש המחובר כאשר ליישם תיקון חם זה.כדי ליישם תיקון חם זה, דרוש לך רשיון מפתחים.אנו ממליצים חשבון המשתמש בחלון כניסות Windows או בחלון מסד הנתונים כניסות יוקצו את מזהה תפקיד "סופר". אם חשבון המשתמש אין אפשרות להקצות מזהה תפקיד של "עילי", עליך לוודא כי חשבון משתמש בעל ההרשאות הבאות:

  • שנה את ההרשאה עבור האובייקט שינוי.

  • הרשאת Execute עבור האובייקט 5210 מזהה אובייקט מערכת ועבור האובייקט 9015 מזהה האובייקט של המערכת .

הערה אין לך הרשאות למאגרי נתונים אלא אם כן יש לך לבצע תיקון נתונים.

שינויי קוד

הערה תמיד קוד מחשב פותר בסביבה מבוקרת לפני החלת התיקונים למחשבים הייצור שלך.כדי לפתור בעיה זו, שנה את הקוד בפונקציה DemandtoInvProfile ב codeUnit צדי פרופיל מלאי (99000854) באופן הבא:הערה: 26/10/11 היה שינוי KB זה כדי להפוך מוטבע קוד עם קוד שפורסם עבור ניווט 5.0SP1 קלה. הפונקציונליות לא השתנה. שורות מסוימות שהשתנה נמצאות במקטע "הוספה" של קוד החלפה;

קו: InventoryProfile. " מספר שורה": = LineNo; שנה: InventoryProfile. " מספר שורה": = NextLineNo;קו: LineNo: = LineNo +1; הוסר.

קוד קיים

...InventoryProfile.SETCURRENTKEY("Line No.");SalesLine.SETCURRENTKEY(Type,"No.","Variant Code","Drop Shipment","Location Code","Document Type","Shipment Date");SalesLine.SETFILTER("Document Type",'%1|%2',SalesLine."Document Type"::Order,SalesLine."Document Type"::"Return Order");SalesLine.SETRANGE(Type,SalesLine.Type::Item);SalesLine.SETRANGE("No.",Item."No.");Item.COPYFILTER("Location Filter",SalesLine."Location Code");Item.COPYFILTER("Variant Filter",SalesLine."Variant Code");SalesLine.SETFILTER("Outstanding Qty. (Base)",'<>0');SalesLine.SETFILTER("Shipment Date",'>%1&<=%2',0D,ToDate);IF SalesLine.FIND('-') THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile.TransferFromSalesLine(SalesLine,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    InventoryProfile.INSERT;  UNTIL SalesLine.NEXT = 0;ServiceLine.SETCURRENTKEY(Type,"No.","Variant Code","Location Code","Posting Date");ServiceLine.SETRANGE("Document Type",ServiceLine."Document Type"::Order);ServiceLine.SETRANGE(Type,ServiceLine.Type::Item);ServiceLine.SETRANGE("No.",Item."No.");Item.COPYFILTER("Location Filter",ServiceLine."Location Code");Item.COPYFILTER("Variant Filter",ServiceLine."Variant Code");ServiceLine.SETFILTER("Outstanding Qty. (Base)",'<>0');ServiceLine.SETFILTER("Posting Date",'>%1&<=%2',0D,ToDate);IF ServiceLine.FIND('-') THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile.TransferFromServiceInvLine(ServiceLine,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    InventoryProfile.INSERT;  UNTIL ServiceLine.NEXT = 0;ReqLine.SETCURRENTKEY("Ref. Order Type","Ref. Order Status","Ref. Order No.","Ref. Line No.");ReqLine.SETRANGE("Ref. Order Type",ReqLine."Ref. Order Type"::"Prod. Order");ProdOrderComp.SETCURRENTKEY("Item No.","Variant Code","Location Code",Status,"Due Date");ProdOrderComp.SETRANGE("Item No.",Item."No.");Item.COPYFILTER("Location Filter",ProdOrderComp."Location Code");Item.COPYFILTER("Variant Filter",ProdOrderComp."Variant Code");ProdOrderComp.SETRANGE(Status,ProdOrderComp.Status::Planned,ProdOrderComp.Status::Released);ProdOrderComp.SETFILTER("Due Date",'>%1&<=%2',0D,ToDate);IF ProdOrderComp.FIND('-') THEN  REPEAT    ReqLine.SETRANGE("Ref. Order Status",ProdOrderComp.Status);    ReqLine.SETRANGE("Ref. Order No.",ProdOrderComp."Prod. Order No.");    ReqLine.SETRANGE("Ref. Line No.",ProdOrderComp."Prod. Order Line No.");    ReqLine.SETRANGE("Operation No.",'');    IF NOT ReqLine.FIND('-') THEN BEGIN      InventoryProfile.INIT;      InventoryProfile."Line No." := NextLineNo;      InventoryProfile.TransferFromComponent(ProdOrderComp,TempItemTrkgEntry);      IF InventoryProfile.IsSupply THEN        InventoryProfile.ChangeSign;      InventoryProfile.INSERT;    END;  UNTIL ProdOrderComp.NEXT = 0;PlanningComponent.SETCURRENTKEY("Item No.","Variant Code","Location Code","Due Date");PlanningComponent.SETRANGE("Item No.",Item."No.");Item.COPYFILTER("Location Filter",PlanningComponent."Location Code");Item.COPYFILTER("Variant Filter",PlanningComponent."Variant Code");PlanningComponent.SETFILTER("Due Date",'>%1&<=%2',0D,ToDate);IF PlanningComponent.FIND('-') THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile."Item No." := Item."No.";    InventoryProfile.TransferFromPlanComponent(PlanningComponent,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    InventoryProfile.INSERT;  UNTIL PlanningComponent.NEXT = 0;TransferReqLine.SETCURRENTKEY(Type,"No.","Variant Code","Transfer-from Code","Transfer Shipment Date");TransferReqLine.SETRANGE("Replenishment System",TransferReqLine."Replenishment System"::Transfer);TransferReqLine.SETRANGE(Type,TransferReqLine.Type::Item);TransferReqLine.SETRANGE("No.",Item."No.");Item.COPYFILTER("Location Filter",TransferReqLine."Transfer-from Code");Item.COPYFILTER("Variant Filter",TransferReqLine."Variant Code");TransferReqLine.SETFILTER("Transfer Shipment Date",'>%1&<=%2',0D,ToDate);IF TransferReqLine.FIND('-') THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile."Item No." := Item."No.";    InventoryProfile.TransferFromOutboundTransfPlan(TransferReqLine,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    InventoryProfile.INSERT;  UNTIL TransferReqLine.NEXT = 0;TransLine.SETCURRENTKEY("Item No.");TransLine.SETRANGE("Item No.",Item."No.");Item.COPYFILTER("Variant Filter",TransLine."Variant Code");Item.COPYFILTER("Location Filter",TransLine."Transfer-from Code");TransLine.SETFILTER("Shipment Date",'>%1&<=%2',0D,ToDate);FilterIsSetOnLocation := Item.GETFILTER("Location Filter") <> '';IF TransLine.FIND('-') THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile."Item No." := Item."No.";    InventoryProfile.TransferFromOutboundTransfer(TransLine,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    IF FilterIsSetOnLocation THEN      InventoryProfile."Transfer Location Not Planned" := TransferLocationIsFilteredOut(Item,TransLine);    InventoryProfile.INSERT;  UNTIL TransLine.NEXT = 0;...

קוד החלפה

...InventoryProfile.SETCURRENTKEY("Line No.");SalesLine.SETCURRENTKEY(Type,"No.","Variant Code","Drop Shipment","Location Code","Document Type","Shipment Date");SalesLine.SETFILTER("Document Type",'%1|%2',SalesLine."Document Type"::Order,SalesLine."Document Type"::"Return Order");SalesLine.SETRANGE(Type,SalesLine.Type::Item);SalesLine.SETRANGE("No.",Item."No.");Item.COPYFILTER("Location Filter",SalesLine."Location Code");Item.COPYFILTER("Variant Filter",SalesLine."Variant Code");SalesLine.SETFILTER("Outstanding Qty. (Base)",'<>0');SalesLine.SETFILTER("Shipment Date",'>%1&<=%2',0D,ToDate);// Add the following line.SalesLine.SETRANGE("Build Kit",FALSE);// End of the line.IF SalesLine.FIND('-') THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile.TransferFromSalesLine(SalesLine,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    InventoryProfile.INSERT;  UNTIL SalesLine.NEXT = 0;// Add the following lines.KitSalesLine.SETCURRENTKEY("Document Type",Type,"No.","Variant Code","Location Code","Shipment Date");KitSalesLine.SETRANGE("Document Type",KitSalesLine."Document Type"::Order);KitSalesLine.SETRANGE(Type,KitSalesLine.Type::Item);KitSalesLine.SETRANGE("No.",Item."No.");Item.COPYFILTER("Location Filter",KitSalesLine."Location Code");Item.COPYFILTER("Variant Filter",KitSalesLine."Variant Code");KitSalesLine.SETFILTER("Outstanding Qty. (Base)",'<>0');KitSalesLine.SETFILTER("Shipment Date",'>%1&<=%2',0D,ToDate);IF KitSalesLine.FINDFIRST THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile.TransferFromKitSalesLine(KitSalesLine,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    InventoryProfile.INSERT;  UNTIL KitSalesLine.NEXT = 0;// End of the lines.ServiceLine.SETCURRENTKEY(Type,"No.","Variant Code","Location Code","Posting Date");ServiceLine.SETRANGE("Document Type",ServiceLine."Document Type"::Order);ServiceLine.SETRANGE(Type,ServiceLine.Type::Item);ServiceLine.SETRANGE("No.",Item."No.");Item.COPYFILTER("Location Filter",ServiceLine."Location Code");Item.COPYFILTER("Variant Filter",ServiceLine."Variant Code");ServiceLine.SETFILTER("Outstanding Qty. (Base)",'<>0');ServiceLine.SETFILTER("Posting Date",'>%1&<=%2',0D,ToDate);IF ServiceLine.FIND('-') THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile.TransferFromServiceInvLine(ServiceLine,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    InventoryProfile.INSERT;  UNTIL ServiceLine.NEXT = 0;ReqLine.SETCURRENTKEY("Ref. Order Type","Ref. Order Status","Ref. Order No.","Ref. Line No.");ReqLine.SETRANGE("Ref. Order Type",ReqLine."Ref. Order Type"::"Prod. Order");ProdOrderComp.SETCURRENTKEY("Item No.","Variant Code","Location Code",Status,"Due Date");ProdOrderComp.SETRANGE("Item No.",Item."No.");Item.COPYFILTER("Location Filter",ProdOrderComp."Location Code");Item.COPYFILTER("Variant Filter",ProdOrderComp."Variant Code");ProdOrderComp.SETRANGE(Status,ProdOrderComp.Status::Planned,ProdOrderComp.Status::Released);ProdOrderComp.SETFILTER("Due Date",'>%1&<=%2',0D,ToDate);IF ProdOrderComp.FIND('-') THEN  REPEAT    ReqLine.SETRANGE("Ref. Order Status",ProdOrderComp.Status);    ReqLine.SETRANGE("Ref. Order No.",ProdOrderComp."Prod. Order No.");    ReqLine.SETRANGE("Ref. Line No.",ProdOrderComp."Prod. Order Line No.");    ReqLine.SETRANGE("Operation No.",'');    IF NOT ReqLine.FIND('-') THEN BEGIN      InventoryProfile.INIT;      InventoryProfile."Line No." := NextLineNo;      InventoryProfile.TransferFromComponent(ProdOrderComp,TempItemTrkgEntry);      IF InventoryProfile.IsSupply THEN        InventoryProfile.ChangeSign;      InventoryProfile.INSERT;    END;  UNTIL ProdOrderComp.NEXT = 0;PlanningComponent.SETCURRENTKEY("Item No.","Variant Code","Location Code","Due Date");PlanningComponent.SETRANGE("Item No.",Item."No.");Item.COPYFILTER("Location Filter",PlanningComponent."Location Code");Item.COPYFILTER("Variant Filter",PlanningComponent."Variant Code");PlanningComponent.SETFILTER("Due Date",'>%1&<=%2',0D,ToDate);IF PlanningComponent.FIND('-') THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile."Item No." := Item."No.";    InventoryProfile.TransferFromPlanComponent(PlanningComponent,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    InventoryProfile.INSERT;  UNTIL PlanningComponent.NEXT = 0;TransferReqLine.SETCURRENTKEY(Type,"No.","Variant Code","Transfer-from Code","Transfer Shipment Date");TransferReqLine.SETRANGE("Replenishment System",TransferReqLine."Replenishment System"::Transfer);TransferReqLine.SETRANGE(Type,TransferReqLine.Type::Item);TransferReqLine.SETRANGE("No.",Item."No.");Item.COPYFILTER("Location Filter",TransferReqLine."Transfer-from Code");Item.COPYFILTER("Variant Filter",TransferReqLine."Variant Code");TransferReqLine.SETFILTER("Transfer Shipment Date",'>%1&<=%2',0D,ToDate);IF TransferReqLine.FIND('-') THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile."Item No." := Item."No.";    InventoryProfile.TransferFromOutboundTransfPlan(TransferReqLine,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    InventoryProfile.INSERT;  UNTIL TransferReqLine.NEXT = 0;TransLine.SETCURRENTKEY("Item No.");TransLine.SETRANGE("Item No.",Item."No.");Item.COPYFILTER("Variant Filter",TransLine."Variant Code");Item.COPYFILTER("Location Filter",TransLine."Transfer-from Code");TransLine.SETFILTER("Shipment Date",'>%1&<=%2',0D,ToDate);FilterIsSetOnLocation := Item.GETFILTER("Location Filter") <> '';IF TransLine.FIND('-') THEN  REPEAT    InventoryProfile.INIT;    InventoryProfile."Line No." := NextLineNo;    InventoryProfile."Item No." := Item."No.";    InventoryProfile.TransferFromOutboundTransfer(TransLine,TempItemTrkgEntry);    IF InventoryProfile.IsSupply THEN      InventoryProfile.ChangeSign;    IF FilterIsSetOnLocation THEN      InventoryProfile."Transfer Location Not Planned" := TransferLocationIsFilteredOut(Item,TransLine);    InventoryProfile.INSERT;  UNTIL TransLine.NEXT = 0;...

דרישות מוקדמות

עליך להגדיר אחד מהמוצרים הבאים מותקנים כדי להחיל תיקון חם זה:

  • Microsoft Dynamics R2 2009 סרגל ניווט

  • Microsoft Dynamics NAV 2009 ה-Service Pack 1

מידע בדבר הסרת ההתקנה

אין אפשרות להסיר את התיקון החם.

מצב

Microsoft אישרה כי מדובר בבעיה במוצרי Microsoft הרשומים במקטע 'חל על'.

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

זקוק לעזרה נוספת?

מעוניין באפשרויות נוספות?

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

קהילות עוזרות לך לשאול שאלות ולהשיב עליהן, לתת משוב ולשמוע ממומחים בעלי ידע עשיר.