Tento článok sa vzťahuje na službu Microsoft Dynamics NAV pre všetky krajiny a miestne nastavenia pre všetky jazyky.
Príznaky
Predpokladajme, že ste zapli sériové číslo. Konkrétne nastavenie sledovania pre položku v nákupnej objednávke alebo predajnej objednávke v systémoch Microsoft Dynamics NAV 2009 R2 a Microsoft Dynamics NAV 2009 Service Pack 1 (SP1). Keď zaúčtujete objednávku alebo predajnú objednávku, ktorá obsahuje čiastočné množstvo položky, systém umožní neočakávané zaúčtovanie objednávky. Systém by vám však mal umožniť uverejniť iba objednávku, ktorá obsahuje celé množstvo položky.
Riešenie
Informácie o rýchlych opravách
Spoločnosť Microsoft teraz poskytuje podporovanú rýchlu opravu. Jeho účelom je však len vyriešiť problém, ktorý je popísaný v tomto článku. Použite ju len v systémoch, v ktorých sa vyskytol tento konkrétny problém. Táto rýchla oprava môže byť ešte otestovaná. Ak teda nie ste týmto problémom vážne zasiahnutí, odporúčame počkať na ďalší balík Service Pack pre systém Microsoft Dynamics NAV 2009 alebo ďalšiu verziu systému Microsoft Dynamics NAV, ktorá obsahuje túto opravu hotfix.
Poznámka: V osobitných prípadoch môžu byť poplatky, ktoré sú zvyčajne účtované za hovory s oddelením technickej podpory, zrušené, ak pracovník technickej podpory pre systém Microsoft Dynamics a súvisiace produkty rozhodne, že konkrétna aktualizácia vyrieši váš problém. Zvyčajné náklady na podporu sa budú vzťahovať na ďalšie otázky a problémy podpory, na ktoré sa nevzťahuje konkrétna príslušná aktualizácia.
Informácie o inštalácii
Spoločnosť Microsoft poskytuje príklady programovania len pre ilustráciu bez výslovnej alebo implicitnej záruky. To sa týka (okrem iného) aj implicitných záruk obchodovateľnosti alebo vhodnosti na konkrétny účel. Článok predpokladá, že poznáte predvádzaný programovací jazyk a nástroje, ktoré sa používajú na vytváranie a ladenie procedúr. Pracovníci oddelenia podpory spoločnosti Microsoft vám môžu pomôcť vysvetliť funkčnosť konkrétneho postupu. Tieto príklady však nebudú upravovať, aby poskytovali pridané funkcie alebo vytvárať procedúry podľa vašich špecifických požiadaviek.
Poznámka Pred inštaláciou tejto rýchlej opravy overte, či sú všetci používatelia klienta Microsoft Navision odhlásení zo systému. Týka sa to používateľov klientských služieb Microsoft Navision Application Services (NAS). V čase implementácie tejto rýchlej opravy by ste mali byť jediným klientskym používateľom, ktorý je prihlásený.
Ak chcete implementovať túto rýchlu opravu, musíte mať vývojársku licenciu.
Odporúčame priradiť používateľskému kontu v okne Prihlásenie do Windowsu alebo v okne Prihlásenia do databázy ID roly SUPER. Ak používateľskému kontu nie je možné priradiť ID roly SUPER, musíte overiť, či má používateľské konto nasledujúce povolenia:
- Povolenie Upraviť pre objekt, ktorý budete meniť.
- Povolenie na spustenie pre objekt systémového objektu ID 5210 a pre objekt systémového objektu ID 9015.
Poznámka: Ak nepotrebujete vykonať opravu údajov, nemusíte mať práva na ukladacie priestory údajov.
Zmeny kódu
Poznámka: Opravy kódu pred použitím opráv v produkčných počítačoch vždy testujte v kontrolovanom prostredí.
Pri odstraňovaní tohto problému postupujte nasledovne:
Zmeňte kód v tabuľke Riadok predaja (37). Postupujte takto:
Pridajte globálnu textovú konštantu a potom zadajte textovú konštantu takto:
- Názov: Text055
- ConstValue: ENU=Množstvo musí byť celé číslo, pretože položka %1 je nastavená na sledovanie špecifické pre SN.
Zmeňte kód v spúšťači Qty. to Invoice - OnValidatetrigger takto:
Existujúci kód... "VAT Difference" := 0; CalcInvDiscToInvoice; CalcPrepaymentToDeduct; ...Náhradný kód
... VAT Difference" := 0; CalcInvDiscToInvoice; CalcPrepaymentToDeduct; // Add the following line. CheckPartialOnSNTracking(xRec."Qty. to Invoice","Qty. to Invoice"); ...Zmeňte kód v spúšťači Množstvo na odoslanie – PriOverení nasledovne:
Existujúci kód... IF (CurrFieldNo <> 0) AND (Type = Type::Item) AND ("Qty. to Ship" < 0) THEN CheckApplFromItemLedgEntry(ItemLedgEntry); ...Náhradný kód
... IF (CurrFieldNo <> 0) AND (Type = Type::Item) AND ("Qty. to Ship" < 0) THEN CheckApplFromItemLedgEntry(ItemLedgEntry); // Add the following line. CheckPartialOnSNTracking(xRec."Qty. to Ship","Qty. to Ship"); ...Zmeňte kód v spúšťači Return Qty. to Receive – OnValidate nasledovne:
Existujúci kód... IF (CurrFieldNo <> 0) AND (Type = Type::Item) AND ("Return Qty. to Receive" > 0) THEN CheckApplFromItemLedgEntry(ItemLedgEntry); ...Náhradný kód
... IF (CurrFieldNo <> 0) AND (Type = Type::Item) AND ("Return Qty. to Receive" > 0) THEN CheckApplFromItemLedgEntry(ItemLedgEntry); // Add the following line. CheckPartialOnSNTracking(xRec."Return Qty. to Receive","Return Qty. to Receive"); ...Vytvorte novú funkciu takto:
LOCAL PROCEDURE CheckPartialOnSNTracking@1109(PrevQty@1000 : Decimal;NewQty@1001 : Decimal); VAR Item@1003 : Record 27; ItemTracking@1004 : Record 6502; //Code.Add.begin IF (PrevQty <> NewQty) AND (Type = Type::Item) THEN BEGIN IF Item.GET("No.") THEN IF ItemTracking.GET(Item."Item Tracking Code") THEN IF ItemTracking."SN Specific Tracking" THEN IF ROUND(NewQty,1) <> NewQty THEN ERROR(Text055,Item."No."); END;
Zmeňte kód v tabuľke Riadok nákupu (39). Postupujte takto:
Pridajte globálnu textovú konštantu a potom zadajte textovú konštantu takto:
- Názov: Text055
- ConstValue: ENU=Množstvo musí byť celé číslo, pretože položka %1 je nastavená na sledovanie špecifické pre SN.
Zmeňte kód v spúšťači Qty. na Invoice – OnValidatetrigger takto:
Existujúci kód... VAT Difference" := 0; CalcInvDiscToInvoice; CalcPrepaymentToDeduct; ...Náhradný kód
... "VAT Difference" := 0; CalcInvDiscToInvoice; CalcPrepaymentToDeduct; // Add the following line. CheckPartialOnSNTracking(xRec."Qty. to Invoice (Base)","Qty. to Invoice (Base)"); ...Zmeňte kód v spúšťači Množstvo, ktoré chcete prijať – PriOverení nasledovne:
Existujúci kód... IF (CurrFieldNo <> 0) AND (Type = Type::Item) AND ("Qty. to Receive" < 0) THEN CheckApplToItemLedgEntry; ...Náhradný kód
... IF (CurrFieldNo <> 0) AND (Type = Type::Item) AND ("Qty. to Receive" < 0) THEN CheckApplToItemLedgEntry; // Add the following line. CheckPartialOnSNTracking(xRec."Qty. to Receive (Base)","Qty. to Receive (Base)"); ...Zmeňte kód v spúšťači Return Qty. to Receive – OnValidate nasledovne:
Existujúci kód...IF (CurrFieldNo <> 0) AND (Type = Type::Item) AND ("Qty. to Receive" < 0) THEN CheckApplToItemLedgEntry; ...Náhradný kód
...IF (CurrFieldNo <> 0) AND (Type = Type::Item) AND ("Qty. to Receive" < 0) THEN CheckApplToItemLedgEntry; // Add the following line. CheckPartialOnSNTracking(xRec."Qty. to Receive (Base)","Qty. to Receive (Base)"); ...Zmeňte kód v spúšťači Return Qty. to Ship – OnValidate nasledovne
Existujúci kód... IF (CurrFieldNo <> 0) AND (Type = Type::Item) AND ("Return Qty. to Ship" > 0) THEN CheckApplToItemLedgEntry; ...Náhradný kód
... IF (CurrFieldNo <> 0) AND (Type = Type::Item) AND ("Return Qty. to Ship" > 0) THEN CheckApplToItemLedgEntry; // Add the following line. CheckPartialOnSNTracking(xRec."Return Qty. to Ship","Return Qty. to Ship"); ...Vytvorte novú funkciu takto:
LOCAL PROCEDURE CheckPartialOnSNTracking@1109(PrevQty@1000 : Decimal;NewQty@1001 : Decimal); VAR Item@1003 : Record 27; ItemTracking@1004 : Record 6502; //Code.Add.begin IF (PrevQty <> NewQty) AND (Type = Type::Item) THEN BEGIN IF Item.GET("No.") THEN IF ItemTracking.GET(Item."Item Tracking Code") THEN IF ItemTracking."SN Specific Tracking" THEN IF ROUND(NewQty,1) <> NewQty THEN ERROR(Text055,Item."No."); END;
Predpoklady
Ak chcete použiť túto rýchlu opravu, musíte mať nainštalovaný niektorý z nasledujúcich produktov:
- Microsoft Dynamics NAV 2009 R2
- Microsoft Dynamics NAV 2009 Service Pack 1
Informácie o odstránení
Túto rýchlu opravu nemožno odstrániť.
Stav
Spoločnosť Microsoft potvrdila, že ide o problém v produktoch spoločnosti Microsoft, ktoré sú uvedené v časti Vzťahuje sa na.
Poznámka: Toto je článok typu FAST PUBLISH, ktorý bol vytvorený priamo v rámci organizácie podpory spoločnosti Microsoft. Informácie obsiahnuté v tomto dokumente sa poskytujú tak, ako sú, ako odpoveď na vzniknuté problémy. V dôsledku rýchlosti ich sprístupnenia môžu materiály obsahovať typografické chyby a môžu byť kedykoľvek revidované bez predchádzajúceho upozornenia. Ďalšie dôležité informácie nájdete v Podmienkach používania .