Du kan opprette mer enn én lagerplukking for en salgsordre uventet hvis Leveringsråd-feltet i salgsordren er satt til Fullfør i Microsoft Dynamics NAV 2009 Service Pack 1

Gjelder for
Dynamics NAV 2009 Service Pack 1

Denne artikkelen gjelder for Microsoft Dynamics NAV for alle land og alle språkinnstillinger.

Symptomer

Du kan opprette mer enn én lagerplukking for en salgsordre uventet i Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) hvis verdien for Feltet Leveringsråd i salgsordren er Fullført. I denne situasjonen kan du ikke legge inn noen av lagerplukkingene som er opprettet.

Oppløsning

Hurtigreparasjonsinformasjon

En støttet hurtigreparasjon er nå tilgjengelig fra Microsoft. Det er imidlertid bare ment å rette opp problemet som er beskrevet i denne artikkelen. Bruk den bare på systemer som opplever dette spesifikke problemet. Denne hurtigreparasjonen kan få ytterligere testing. Hvis du ikke er alvorlig påvirket av dette problemet, anbefaler vi derfor at du venter på den neste Microsoft Dynamics NAV-oppdateringspakken eller den neste Microsoft Dynamics NAV-versjonen som inneholder denne hurtigreparasjonen.

Obs! I spesielle tilfeller kan kostnader som vanligvis påløper for støtteanrop, bli avbrutt hvis en technical support professional for Microsoft Dynamics og relaterte produkter bestemmer at en bestemt oppdatering vil løse problemet. De vanlige støttekostnadene gjelder for ytterligere støttespørsmål og problemer som ikke kvalifiserer for den aktuelle oppdateringen.

            
          

Installasjonsinformasjon

Microsoft tilbyr programmeringseksempler bare for illustrasjon, uten garanti enten uttrykt eller underforstått. Dette omfatter, men er ikke begrenset til, de underforståtte garantiene om salgbarhet eller egnethet for et bestemt formål. Denne artikkelen antar at du er kjent med programmeringsspråket som demonstreres, og med verktøyene som brukes til å opprette og feilsøke prosedyrer. Microsoft kundestøtteteknikere kan bidra til å forklare funksjonaliteten til en bestemt prosedyre, men de vil ikke endre disse eksemplene for å gi ekstra funksjonalitet eller konstruere prosedyrer for å oppfylle dine spesifikke krav.

Obs! Før du installerer denne hurtigreparasjonen, må du kontrollere at alle Microsoft Navision-klientbrukere er logget av systemet. Dette inkluderer microsoft Navision Application Services (NAS)-klientbrukere. Du bør være den eneste klientbrukeren som er logget på når du implementerer denne hurtigreparasjonen.

Hvis du vil implementere denne hurtigreparasjonen, må du ha en utviklerlisens.

Vi anbefaler at brukerkontoen i Windows-påloggingsvinduet eller i vinduet Pålogginger for database tilordnes rolle-ID-en SUPER. Hvis brukerkontoen ikke kan tilordnes rolle-IDen SUPER, må du kontrollere at brukerkontoen har følgende tillatelser:

  • Endre-tillatelsen for objektet du skal endre.
  • Execute-tillatelsen for Objektet System Object ID 5210 og systemobjekt-ID 9015-objektet.

                
Vær oppmerksom på at du ikke trenger å ha rettigheter til datalagrene med mindre du må utføre datareparasjon.

Kodeendringer

Obs! Test alltid kodeløsninger i et kontrollert miljø før du bruker løsningene på produksjonsdatamaskinene.
Følg disse trinnene for å løse dette problemet:

  1. Endre feltene i salgslinjetabellen (37) som følger:
    Eksisterende kode

    ...
    
    CALCFIELDS("Reserved Qty. (Base)");
    
    TESTFIELD("Reserved Qty. (Base)",0);
    
    IF Type = Type::Item THEN
    
        WhseValidateSourceLine.SalesLineVerifyChange(Rec,xRec);
    
    END;
    
    TESTFIELD("Qty. Shipped Not Invoiced",0);
    
    TESTFIELD("Quantity Shipped",0);
    
    TESTFIELD("Shipment No.",'');
    
    
    
    TESTFIELD("Prepmt. Amt. Inv.",0);
    ...
    

    Erstatningskode

    ...
    
    CALCFIELDS("Reserved Qty. (Base)");
    
    TESTFIELD("Reserved Qty. (Base)",0);
    
    IF Type = Type::Item THEN
    
        WhseValidateSourceLine.SalesLineVerifyChange(Rec,xRec);
    
    END;
    
    //Add the following lines.
    IF Type = Type::Item THEN
    
        CheckWhseActivityExists;
    //End of the lines.
    
    TESTFIELD("Qty. Shipped Not Invoiced",0);
    
    TESTFIELD("Quantity Shipped",0);
    
    TESTFIELD("Shipment No.",'');
    
    
    
    TESTFIELD("Prepmt. Amt. Inv.",0);
    ...
    
  2. Endre de globale variablene i salgslinjetabellen (37) som følger:
    Eksisterende kode

    ...
            Text046@1105 : TextConst 'ENU=You cannot return more than the %1 units that you have shipped for %2 %3.';
    
            Text047@1106 : TextConst 'ENU=must be positive when %1 is not 0.';
    
            TrackingBlocked@1107 : Boolean;
    
            Text048@1108 : TextConst 'ENU=You cannot use item tracking on a %1 created from a %2.';
    
            Text049@1139 : TextConst 'ENU=cannot be %1.';
    
    
          PROCEDURE InitOutstanding@16();
    
          BEGIN
    
            IF "Document Type" IN ["Document Type"::"Return Order","Document Type"::"Credit Memo"] THEN BEGIN
    
              "Outstanding Quantity" := Quantity - "Return Qty. Received";
    ...
    

    Erstatningskode

    ...
            Text046@1105 : TextConst 'ENU=You cannot return more than the %1 units that you have shipped for %2 %3.';
    
            Text047@1106 : TextConst 'ENU=must be positive when %1 is not 0.';
    
            TrackingBlocked@1107 : Boolean;
    
            Text048@1108 : TextConst 'ENU=You cannot use item tracking on a %1 created from a %2.';
    
            Text049@1139 : TextConst 'ENU=cannot be %1.';
    
            //Add the following line.
            Text052@1022 : TextConst 'ENU=Because the value of the %1 field is %2, and warehouse activities exist, you cannot add a new item to this order. You can either change the %3 field to Partial or delete the warehouse activities.';
    
    
          PROCEDURE InitOutstanding@16();
    
          BEGIN
    
            IF "Document Type" IN ["Document Type"::"Return Order","Document Type"::"Credit Memo"] THEN BEGIN
    
              "Outstanding Quantity" := Quantity - "Return Qty. Received";
    ...
    
  3. Endre koden i CheckWhseActivityExists-funksjonen i Salgslinje-tabellen (37) som følger:
    Eksisterende kode

    ...
              IF "Qty. to Invoice" = 0 THEN
    
                EXIT(TRUE);
    
            EXIT(FALSE);
    
          END;
    
    
    
          BEGIN
    
          END.
    
        }
    
      }
    ...
    

    Erstatningskode

    ...
              IF "Qty. to Invoice" = 0 THEN
    
                EXIT(TRUE);
    
            EXIT(FALSE);
    
          END;
    
    
          //Add the following lines.
          PROCEDURE CheckWhseActivityExists@1011();
    
          VAR
    
            WhseActivityLine@1019 : Record 5767;
    
          BEGIN
    
            IF SalesHeader."Shipping Advice" = SalesHeader."Shipping Advice"::Complete THEN BEGIN
    
              WhseActivityLine.RESET;
    
              WhseActivityLine.SETCURRENTKEY("Source Type","Source Subtype","Source No.","Source Line No.","Source Subline No.");
    
              WhseActivityLine.SETRANGE("Source Type",DATABASE::"Sales Line");
    
              WhseActivityLine.SETRANGE("Source Subtype","Document Type");
    
              WhseActivityLine.SETRANGE("Source No.","Document No.");
    
              IF "Document Type" = "Document Type"::Order THEN
    
                WhseActivityLine.SETRANGE("Source Document",WhseActivityLine."Source Document"::"Sales Order");
    
              IF "Document Type" = "Document Type"::"Return Order" THEN
    
                WhseActivityLine.SETRANGE("Source Document",WhseActivityLine."Source Document"::"Sales Return Order");
    
              IF NOT WhseActivityLine.ISEMPTY THEN
    
                ERROR(Text052,SalesHeader.FIELDCAPTION("Shipping Advice"),SalesHeader."Shipping Advice",SalesHeader.FIELDCAPTION("Shipping Advice"));
    
            END;
    
          END;
          //End of the lines.
    
    
          BEGIN
    
          END.
    
        }
    
      }
    ...
    

Forutsetninger

Du må ha Microsoft Dynamics NAV 2009 Service Pack 1 installert for å bruke denne hurtigreparasjonen.

Informasjon om fjerning

Du kan ikke fjerne denne hurtigreparasjonen.

Status

Microsoft har bekreftet at dette er et problem i Microsoft-produktene som er oppført i delen «Gjelder for».

Obs! Dette er en «FAST PUBLISH»-artikkel som er opprettet direkte fra Microsofts støtteorganisasjon. Informasjonen i dette er angitt som svar på nye problemer. Som et resultat av hastigheten på å gjøre det tilgjengelig, kan materialene inkludere typografiske feil og kan bli revidert når som helst uten varsel. Se vilkår for bruk for andre hensyn.