Poročilo »Količina eksplozije BOM« prikaže nedokončane elemente, ko nastavite Ne. za proizvodni BOM z uporabo številke artikla v tabeli »Element« v servisnem paketu SP1 za Microsoft Dynamics NAV 2009 ali Microsoft Dynamics NAV 2009 R2

Velja za
Microsoft Dynamics NAV 2009 R2 Dynamics NAV 2009 Service Pack 1

Ta članek velja za Microsoft Dynamics NAV za vse jezikovne območne nastavitve.

Znaki

V aplikaciji Microsoft Dynamics NAV, ko nastavite Ne. za proizvodni BOM z uporabo številke artikla v tabeli »Artikl« in nato zaženite poročilo »Količinski eksplozija BOM« poročilo prikaže nedokončane postavke.
Ta težava se pojavi v teh izdelkih:

  • Servisni paket SP1 za Microsoft Dynamics NAV 2009
  • Microsoft Dynamics NAV 2009 R2

Rešitev

Informacije o sprotnem popravku

Podprt sprotni popravek je zdaj na voljo pri Microsoftu. Vendar pa je namenjen le odpravljanju težave, ki je opisana v tem članku. Uporabite ga samo za sisteme, ki imajo to težavo. Ta sprotni popravek bo morda dodatno preučen. Če vas ta težava ne prizadene, priporočamo, da počakate na naslednji servisni paket za Microsoft Dynamics NAV 2009 ali naslednjo različico storitve Microsoft Dynamics NAV, ki vsebuje ta sprotni popravek.

Opomba V posebnih primerih se lahko stroški, ki običajno nastanejo za klice podpore, prekličejo, če strokovnjak za tehnično podporo za Microsoft Dynamics in sorodne izdelke ugotovi, da bo določena posodobitev odpravila vašo težavo. Običajni stroški podpore bodo veljali za dodatna vprašanja o podpori in težave, ki ne izpolnjujejo pogojev za določeno zadevno posodobitev.

            
          

Informacije o namestitvi

Microsoft ponuja primere programiranja samo za ponazoritev, brez izrecnega ali implicitnega jamstva. To vključuje, vendar ni omejeno na, implicitna jamstva primernosti za prodajo ali primernost za določen namen. V tem članku je predvideno, da ste seznanjeni s programskim jezikom, ki je prikazan, in z orodji, ki se uporabljajo za ustvarjanje in odpravljanje napak v postopkih. Microsoftovi inženirji za podporo vam lahko pomagajo razložiti funkcionalnost določenega postopka, vendar teh primerov ne bodo spremenili, da bi zagotovili dodano funkcionalnost ali ustvarili postopke, ki ustrezajo vašim posebnim zahtevam.

Opomba Preden namestite ta sprotni popravek, preverite, ali so vsi uporabniki odjemalca Microsoft Navision odjavljeni iz sistema. To vključuje uporabnike odjemalcev Microsoft Navision Application Services (NAS). Pri uvedbi tega sprotnega popravka bi morali biti edini uporabnik odjemalca, ki je prijavljen.

Če želite izvesti ta sprotni popravek, morate imeti licenco za razvijalce.

Priporočamo, da se uporabniškemu računu v oknu »Prijave v sistem Windows« ali v oknu »Prijave v zbirko podatkov« dodeli ID vloge »SUPER«. Če uporabniškemu računu ni mogoče dodeliti ID-ja vloge »SUPER«, morate preveriti, ali ima uporabniški račun ta dovoljenja:

  • Dovoljenje »Spremeni« za predmet, ki ga boste spremenili.
  • Dovoljenje za izvajanje za predmet ID sistemskega objekta 5210 in za predmet ID sistemskega objekta 9015.

                
Opomba Ni vam treba imeti pravic do shramb podatkov, razen če morate opraviti popravilo podatkov.

Spremembe kode

Opomba Popravke kode vedno preskusite v nadzorovanem okolju, preden jih uporabite v proizvodnih računalnikih.
Če želite odpraviti to težavo, sledite tem korakom:

  1. Spremenite kodo v funkciji Podatkovna postavka številka 2 v poročilu Količina eksplozivnosti BOM (99000753) na naslednji način:
    Obstoječa koda 1

    ...
                               BomComponent[Level]."Production BOM No." := Item."Production BOM No.";
    
                              BomComponent[Level].SETRANGE("Production BOM No.",Item."Production BOM No.");
    
                              BomComponent[Level].SETRANGE("Version Code",VersionCode[Level]);
    
                              BomComponent[Level].SETFILTER("Starting Date",'%1|..%2',0D,CalculateDate);
    
                              BomComponent[Level].SETFILTER("Ending Date",'%1|%2..',0D,CalculateDate);
    
                              NoList[Level] := Item."No.";
    
                              Quantity[Level] :=
    
                                UOMMgt.GetQtyPerUnitOfMeasure(Item,Item."Base Unit of Measure") /
    
                                UOMMgt.GetQtyPerUnitOfMeasure(
    
                                  Item,
    ...
    

    Nadomestna koda 1

    ...
                             BomComponent[Level]."Production BOM No." := Item."Production BOM No.";
    
                              BomComponent[Level].SETRANGE("Production BOM No.",Item."Production BOM No.");
    
                              BomComponent[Level].SETRANGE("Version Code",VersionCode[Level]);
    
                              BomComponent[Level].SETFILTER("Starting Date",'%1|..%2',0D,CalculateDate);
    
                              BomComponent[Level].SETFILTER("Ending Date",'%1|%2..',0D,CalculateDate);
    
    // Add the following line.
                             NoListType[Level] := NoListType[Level]::Item;
    // End of the added line.
    
                              NoList[Level] := Item."No.";
    
                              Quantity[Level] :=
    
                                UOMMgt.GetQtyPerUnitOfMeasure(Item,Item."Base Unit of Measure") /
    
                                UOMMgt.GetQtyPerUnitOfMeasure(
    
                                  Item,
    ...
    

    Obstoječa koda 2

    ...
                             BEGIN
    
                                 WHILE BomComponent[Level].NEXT = 0 DO BEGIN
    
                                   Level := Level - 1;
    
                                   IF Level <1 THEN
    
                                     CurrReport.BREAK;
    
    // Delete the following line.
                                  IF NOT UpperLevelItem.GET(NoList[Level]) THEN
    // End of the deleted line.
    
                                     UpperLevelItem."Production BOM No." := NoList[Level];
    
                                   BomComponent[Level].SETRANGE("Production BOM No.",UpperLevelItem."Production BOM No.");
    
                                   BomComponent[Level].SETRANGE("Version Code",VersionCode[Level]);
    
                                 END; 
    ...
    

    Nadomestna koda 2

    ...
                              BEGIN
    
                                 WHILE BomComponent[Level].NEXT = 0 DO BEGIN
    
                                   Level := Level - 1;
    
                                   IF Level <1 THEN
    
                                     CurrReport.BREAK;
    
    // Add the following line.
                                  IF NoListType[NextLevel] = NoListType[NextLevel]::"Production BOM" THEN
    // End of the added line.
    
                                     UpperLevelItem."Production BOM No." := NoList[Level];
    
                                   BomComponent[Level].SETRANGE("Production BOM No.",UpperLevelItem."Production BOM No.");
    
                                   BomComponent[Level].SETRANGE("Version Code",VersionCode[Level]);
    
                                 END;
    ...
    

    Obstoječa koda 3

    ...
                                      BEGIN
    
                                       CompItem.GET(BomComponent[Level]."No.");
    
                                       IF CompItem."Production BOM No."<>'' THEN BEGIN
    
                                         NextLevel := Level + 1;
    
                                         CLEAR(BomComponent[NextLevel]);
    
                                         NoList[NextLevel] := CompItem."No.";
    
                                         VersionCode[NextLevel] :=
    
                                           VersionMgt.GetBOMVersion(CompItem."Production BOM No.",CalculateDate,FALSE);
    
                                         BomComponent[NextLevel].SETRANGE("Production BOM No.",CompItem."Production BOM No.");
    
                                         BomComponent[NextLevel].SETRANGE("Version Code",VersionCode[NextLevel]);
    ...
    

    Nadomestna koda 3

    ...
                                      BEGIN
    
                                       CompItem.GET(BomComponent[Level]."No.");
    
                                       IF CompItem."Production BOM No."<>'' THEN BEGIN
    
                                         NextLevel := Level + 1;
    
                                         CLEAR(BomComponent[NextLevel]);
    
    // Add the following line.
                                        NoListType[NextLevel] := NoListType[NextLevel]::Item;
    // End of the added line.
    
                                         NoList[NextLevel] := CompItem."No.";
    
                                         VersionCode[NextLevel] :=
    
                                           VersionMgt.GetBOMVersion(CompItem."Production BOM No.",CalculateDate,FALSE);
    
                                         BomComponent[NextLevel].SETRANGE("Production BOM No.",CompItem."Production BOM No.");
    
                                         BomComponent[NextLevel].SETRANGE("Version Code",VersionCode[NextLevel]);
    ...
    

    Obstoječa koda 4

    ...
                                            CompItem,
    
                                             VersionMgt.GetBOMUnitOfMeasure(
    
                                               CompItem."Production BOM No.",VersionCode[NextLevel]));
    
                                       END;
    
                                       IF Level > 1 THEN BEGIN
    
    // Delete the following lines.
                                        IF BomItem.GET(BomComponent[Level - 1]."No.") THEN BEGIN
    
                                          QtyPerUnitOfMeasure :=
    
                                            UOMMgt.GetQtyPerUnitOfMeasure(BomItem,BomComponent[Level - 1]."Unit of Measure Code") /
    
                                            UOMMgt.GetQtyPerUnitOfMeasure(
    
                                              BomItem,VersionMgt.GetBOMUnitOfMeasure(BomItem."Production BOM No.",VersionCode[Level]));
    // End of the deleted lines.
    
                                         END;
    
                                       END;
    
                                     END;
    
                                   BomComponent[Level].Type::"Production BOM":
    
                                     BEGIN
    ...
    

    Nadomestna koda 4

    ...
                                           CompItem,
    
                                             VersionMgt.GetBOMUnitOfMeasure(
    
                                               CompItem."Production BOM No.",VersionCode[NextLevel]));
    
                                       END;
    
                                       IF Level > 1 THEN BEGIN
    
    // Add the following lines.
                                        IF (BomComponent[Level - 1].Type = BomComponent[Level - 1].Type::Item) THEN BEGIN
    
                                          IF BomItem.GET(BomComponent[Level - 1]."No.") THEN BEGIN
    
                                            QtyPerUnitOfMeasure :=
    
                                              UOMMgt.GetQtyPerUnitOfMeasure(BomItem,BomComponent[Level - 1]."Unit of Measure Code") /
    
                                              UOMMgt.GetQtyPerUnitOfMeasure(
    
                                                BomItem,VersionMgt.GetBOMUnitOfMeasure(BomItem."Production BOM No.",VersionCode[Level]));
    
                                          END;
    // End of the added lines.
    
                                         END;
    
                                       END;
    
                                     END;
    
                                   BomComponent[Level].Type::"Production BOM":
    
                                     BEGIN
    ...
    

    Obstoječa koda 5

    ...
                                 BomComponent[Level].Type::"Production BOM":
    
                                     BEGIN
    
                                       ProdBOM.GET(BomComponent[Level]."No.");
    
                                       NextLevel := Level + 1;
    
                                       CLEAR(BomComponent[NextLevel]);
    
                                       NoList[NextLevel] := ProdBOM."No.";
    
                                       VersionCode[NextLevel] := VersionMgt.GetBOMVersion(ProdBOM."No.",CalculateDate,FALSE);
    
                                       BomComponent[NextLevel].SETRANGE("Production BOM No.",NoList[NextLevel]);
    
                                       BomComponent[NextLevel].SETRANGE("Version Code",VersionCode[NextLevel]);
    
                                       BomComponent[NextLevel].SETFILTER("Starting Date",'%1|..%2',0D,CalculateDate); 
    ...
    

    Nadomestna koda 5

    ...
                                BomComponent[Level].Type::"Production BOM":
    
                                     BEGIN
    
                                       ProdBOM.GET(BomComponent[Level]."No.");
    
                                       NextLevel := Level + 1;
    
                                       CLEAR(BomComponent[NextLevel]);
    
    // Add the following line.
                                      NoListType[NextLevel] := NoListType[NextLevel]::"Production BOM";
    // End of the added line.
    
                                       NoList[NextLevel] := ProdBOM."No.";
    
                                       VersionCode[NextLevel] := VersionMgt.GetBOMVersion(ProdBOM."No.",CalculateDate,FALSE);
    
                                       BomComponent[NextLevel].SETRANGE("Production BOM No.",NoList[NextLevel]);
    
                                       BomComponent[NextLevel].SETRANGE("Version Code",VersionCode[NextLevel]);
    
                                       BomComponent[NextLevel].SETFILTER("Starting Date",'%1|..%2',0D,CalculateDate);
    ...
    
  2. Spremenite kodo v poročilu Globalne spremenljivke v poročilu Količinska eksplozija kusovnika (99000753) na naslednji način:
    Obstoječa koda

    ...
          Quantity@1013 : ARRAY [99] OF Decimal;
    
            QtyPerUnitOfMeasure@1014 : Decimal;
    
            Level@1015 : Integer;
    
            NextLevel@1016 : Integer;
    
            BOMQty@1017 : Decimal;
    
    
    
          BEGIN
    
          END.
    
        }
    
        RDLDATA
    ...
    

    Nadomestna koda

    ...
           Quantity@1013 : ARRAY [99] OF Decimal;
    
            QtyPerUnitOfMeasure@1014 : Decimal;
    
            Level@1015 : Integer;
    
           NextLevel@1016 : Integer;
    
            BOMQty@1017 : Decimal;
    
    // Add the following line.
           NoListType@1018 : ARRAY [99] OF ' ,Item,Production BOM';
    // End of the added line.  
    
          BEGIN
    
          END.
    
        }
    
        RDLDATA
    ...
    

          

Pogoji

Če želite uporabiti ta sprotni popravek, morate imeti nameščenega enega od teh izdelkov:

  • Servisni paket SP1 za Microsoft Dynamics NAV 2009
  • Microsoft Dynamics NAV 2009 R2

                
              

Podatki o odstranitvi

Tega sprotnega popravka ne morete odstraniti.

Stanje

Microsoft je potrdil, da gre za težavo v Microsoftovih izdelkih, ki so navedeni v razdelku »Velja za«.

Sklici

VSTF DynamicsNAV SE: 251802

Opomba To je članek »FAST PUBLISH«, ustvarjen neposredno v Microsoftovi organizaciji za podporo. Informacije, ki jih vsebuje ta dokument, so na voljo kot odgovor na nastajajoča vprašanja. Zaradi hitrosti dajanja na voljo lahko gradivo vsebuje tipografske napake in jih je mogoče kadar koli brez predhodnega obvestila revidirati. Za druge pomisleke glejte Pogoje uporabe .