Ten artykuł dotyczy funkcji Microsoft Dynamics NAV dla wszystkich krajów i wszystkich ustawień regionalnych języków.
Objawy
W programie Microsoft Dynamics NAV 2009 z dodatkiem Service Pack 1 (SP1) można nieoczekiwanie utworzyć więcej niż jeden wybór zapasów dla zamówienia sprzedaży, jeśli wartość pola Porada dotycząca wysyłki w zamówieniu sprzedaży jest ukończona. W takiej sytuacji nie można opublikować żadnych utworzonych zapasów.
Rozwiązanie
Informacje dotyczące poprawek
Obsługiwana poprawka jest teraz dostępna od firmy Microsoft. Jednak jego celem jest tylko naprawienie problemu opisanego w tym artykule. Zastosuj ją tylko do systemów, w których występuje ten konkretny problem. Ta poprawka może wymagać dodatkowych testów. W związku z tym, jeśli ten problem cię nie dotyczy poważnie, zalecamy poczekanie na następny dodatek Service Pack dla oprogramowania Microsoft Dynamics NAV lub następną wersję microsoft dynamics NAV zawierającą tę poprawkę.
Uwaga W specjalnych przypadkach opłaty, które zwykle naliczane są w związku z połączeniami pomocy technicznej, mogą zostać anulowane, jeśli specjalista pomocy technicznej w zakresie oprogramowania Microsoft Dynamics i produktów pokrewnych ustali, że określona aktualizacja rozwiąże problem. Typowe koszty pomocy technicznej będą miały zastosowanie do dodatkowych pytań dotyczących pomocy technicznej i problemów, które nie kwalifikują się do określonej aktualizacji.
Informacje o instalacji
Firma Microsoft udostępnia przykłady programowania wyłącznie w celach ilustracyjnych, bez gwarancji wyrażonej lub dorozumianej. To obejmuje między innymi dorozumiane gwarancje przydatności handlowej lub przydatności do określonego celu. W tym artykule założono, że znasz język programowania, który jest demonstrowany, oraz narzędzia, które są używane do tworzenia i debugowania procedur. Inżynierowie pomocy technicznej firmy Microsoft mogą pomóc w objaśnieniu funkcjonalności określonej procedury, ale nie zmodyfikują tych przykładów w celu zapewnienia dodatkowych funkcji ani skonstruowania procedur spełniających określone wymagania.
Uwaga Przed zainstalowaniem tej poprawki sprawdź, czy wszyscy użytkownicy klienckich usługi Microsoft Navision wylogowali się z systemu. Dotyczy to również użytkowników klienckich usług Microsoft Navision Application Services (NAS). Należy być jedynym użytkownikiem klienckim, który jest zalogowany podczas implementowania tej poprawki.
Aby zaimplementować tę poprawkę, musisz mieć licencję dewelopera.
Zalecamy przypisanie do konta użytkownika w oknie Logowania systemu Windows lub w oknie Logowania bazy danych identyfikator roli "SUPER". Jeśli do konta użytkownika nie można przypisać identyfikatora roli "SUPER", należy sprawdzić, czy konto użytkownika ma następujące uprawnienia:
- Uprawnienie Modyfikuj dla obiektu, który ma zostać zmieniony.
- Uprawnienie Execute dla obiektu System Object ID 5210 i obiektu System Object ID 9015.
Uwaga Nie musisz mieć praw do magazynów danych, chyba że musisz wykonać naprawę danych.
Zmiany kodu
Uwaga Przed zastosowaniem poprawek do komputerów produkcyjnych należy zawsze testować poprawki kodu w środowisku kontrolowanym.
Aby rozwiązać ten problem, wykonaj następujące czynności:
Zmień pola w tabeli Wiersz sprzedaży (37) w następujących postaciach:
Istniejący kod... 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); ...Kod zastępczy
... 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); ...Zmień zmienne globalne w tabeli Wiersz sprzedaży (37) w następujących postaciach:
Istniejący kod... 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"; ...Kod zastępczy
... 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"; ...Zmień kod w funkcji CheckWhseActivityExists w tabeli Wiersz sprzedaży (37), następująco:
Istniejący kod... IF "Qty. to Invoice" = 0 THEN EXIT(TRUE); EXIT(FALSE); END; BEGIN END. } } ...Kod zastępczy
... 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. } } ...
Wymagania wstępne
Aby zastosować tę poprawkę, musisz mieć zainstalowany dodatek Service Pack 1 dla oprogramowania Microsoft Dynamics NAV 2009.
Informacje o usunięciu
Nie można usunąć tej poprawki.
Stan
Firma Microsoft potwierdziła, że jest to problem dotyczący produktów firmy Microsoft wymienionych w sekcji „Dotyczy”.
Uwaga Jest to artykuł "SZYBKIE PUBLIKOWANIE" utworzony bezpośrednio z poziomu organizacji pomocy technicznej firmy Microsoft. Informacje zawarte w niniejszym artykule są dostarczane w stanie odpowiadającym na pojawiające się problemy. Ze względu na szybkość jego udostępnienia materiały mogą zawierać błędy typograficzne i mogą zostać poprawione w dowolnym momencie bez powiadomienia. Zobacz Warunki użytkowania , aby zapoznać się z innymi zagadnieniami.