Dit artikel is van toepassing op Microsoft Dynamics NAV voor alle landen en taalinstellingen.
Symptomen
U kunt onverwacht meer dan één voorraadkies maken voor een verkooporder in Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) als de waarde van het veld Verzendadvies in de verkooporder Voltooid is. In deze situatie kunt u geen van de inventariskiezers posten die worden gemaakt.
Oplossing
Hotfix-informatie
Er is nu een ondersteunde hotfix beschikbaar bij Microsoft. Het is echter alleen bedoeld om het probleem op te lossen dat in dit artikel wordt beschreven. Pas deze alleen toe op systemen die dit specifieke probleem ondervinden. Deze hotfix kan aanvullende tests ontvangen. Als u niet ernstig last hebt van dit probleem, raden we u daarom aan te wachten op het volgende Microsoft Dynamics NAV-servicepack of de volgende Microsoft Dynamics NAV-versie die deze hotfix bevat.
Opmerking In speciale gevallen kunnen kosten die gewoonlijk worden gemaakt voor ondersteuningsoproepen worden geannuleerd als een technische ondersteuningsmedewerker voor Microsoft Dynamics en gerelateerde producten vaststelt dat een specifieke update uw probleem oplost. De gebruikelijke ondersteuningskosten zijn van toepassing op aanvullende ondersteuningsvragen en problemen die niet in aanmerking komen voor de specifieke update in kwestie.
Installatie-informatie
Microsoft biedt programmeervoorbeelden uitsluitend ter illustratie, zonder uitdrukkelijke of impliciete garantie. Dit omvat, maar is niet beperkt tot, de impliciete garanties van verkoopbaarheid of geschiktheid voor een bepaald doel. In dit artikel wordt ervan uitgegaan dat u bekend bent met de programmeertaal die wordt gedemonstreerd en met de hulpprogramma's die worden gebruikt om procedures te maken en fouten op te sporen. Microsoft-ondersteuningstechnici kunnen helpen bij het uitleggen van de functionaliteit van een bepaalde procedure, maar ze zullen deze voorbeelden niet wijzigen om extra functionaliteit te bieden of procedures te maken die voldoen aan uw specifieke vereisten.
Opmerking Voordat u deze hotfix installeert, controleert u of alle Microsoft Navision-clientgebruikers zijn afgemeld bij het systeem. Dit geldt ook voor gebruikers van Microsoft Navision Application Services (NAS). U moet de enige clientgebruiker zijn die is aangemeld wanneer u deze hotfix implementeert.
Als u deze hotfix wilt implementeren, moet u een ontwikkelaarslicentie hebben.
We raden u aan om aan het gebruikersaccount in het venster Windows-aanmeldingen of in het venster Databaseaanmeldingen de rol-id 'SUPER' toe te wijzen. Als de rol-id 'SUPER' niet kan worden toegewezen aan het gebruikersaccount, moet u controleren of het gebruikersaccount de volgende machtigingen heeft:
- De machtiging Wijzigen voor het object dat u gaat wijzigen.
- De machtiging Uitvoeren voor het object Systeemobject-id 5210 en voor het object Systeemobject-id 9015.
Opmerking U hoeft geen rechten te hebben voor de gegevensarchieven, tenzij u gegevensherstel moet uitvoeren.
Codewijzigingen
Opmerking Test altijd codecorrecties in een beheerde omgeving voordat u de correcties toepast op uw productiecomputers.
Voer de volgende stappen uit om dit probleem op te lossen:
Wijzig de velden in de tabel Verkoopregel (37) als volgt:
Bestaande code... 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); ...Vervangende code
... 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); ...Wijzig de globale variabelen in de tabel Verkoopregel (37) als volgt:
Bestaande code... 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"; ...Vervangende code
... 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"; ...Wijzig de code in de functie CheckWhseActivityExists in de tabel Verkoopregel (37) als volgt:
Bestaande code... IF "Qty. to Invoice" = 0 THEN EXIT(TRUE); EXIT(FALSE); END; BEGIN END. } } ...Vervangende code
... 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. } } ...
Vereisten
U moet Microsoft Dynamics NAV 2009 Service Pack 1 hebben geïnstalleerd om deze hotfix toe te passen.
Verwijderingsgegevens
U kunt deze hotfix niet verwijderen.
Status
Microsoft heeft bevestigd dat dit een probleem is bij de Microsoft-producten die worden vermeld in het gedeelte 'Van toepassing op'.
Opmerking Dit is een artikel 'FAST PUBLISH' dat rechtstreeks vanuit de microsoft-ondersteuningsorganisatie is gemaakt. De hierin opgenomen informatie wordt als zodanig verstrekt als reactie op nieuwe problemen. Als gevolg van de snelheid waarmee het beschikbaar wordt gesteld, kunnen de materialen typografische fouten bevatten en te allen tijde zonder voorafgaande kennisgeving worden herzien. Zie Gebruiksvoorwaarden voor andere overwegingen.