Ten artykuł dotyczy systemu Microsoft Dynamics NAV dla wszystkich krajów i ustawień regionalnych języka.
Objawy
Użytkownik może utworzyć wewnętrznego odłożenia magazynowego dla towaru przy użyciu nieprawidłowej ilości, która nie jest dostępna w systemie Microsoft Dynamics NAV. Ten problem występuje w następujących produktach:
-
Microsoft Dynamics NAV 2009 R2
-
Microsoft Dynamics NAV 2009 z dodatkiem Service Pack 1
Rozwiązanie
Informacje o poprawce
Obsługiwana poprawka jest obecnie udostępniana przez firmę Microsoft. Jednak to jest przeznaczona tylko do usunięcia problemu opisanego w tym artykule. Zastosuj ją tylko w systemach, w których występuje ten problem. Ta poprawka może być wciąż w fazie testowania. Jeśli dany system nie jest poważnie narażony na ten problem, firma Microsoft zaleca, aby poczekać na następny dodatek service pack dla systemu Microsoft Dynamics NAV 2009 lub następną wersję systemu Microsoft Dynamics NAV, zawierający tę poprawkę.
Uwaga W wyjątkowych przypadkach opłaty, telefonujący do pomocy technicznej mogą zostać anulowane, jeśli pomocy technicznej dla systemu Microsoft Dynamics i produktów powiązanych Określa, że określonej aktualizacji, można rozwiązać swój problem. Koszty obsługi zwykłych zastosuje się do dodatkowych pytań i problemów, których nie można rozwiązać przy użyciu określonej aktualizacji.
Informacje dotyczące instalacji
Firma Microsoft podaje przykłady programowania wyłącznie, bez jakichkolwiek gwarancji wyrażonych wprost lub domyślnie. To obejmuje, ale nie jest ograniczona, ustawowej rękojmi co do przydatności handlowej lub przydatności do określonego celu. W tym artykule założono, że użytkownik zna demonstrowany język programowania oraz narzędzia, które są używane do tworzenia i debugowania procedur. Wykwalifikowani pracownicy pomocy technicznej firmy Microsoft mogą pomóc w wyjaśnieniu, jak działa określona procedura, ale nie będą modyfikować tych przykładów ani dodawać funkcjonalności i konstruować procedur w celu zaspokojenia określonych potrzeb użytkownika.
Uwaga Przed zainstalowaniem tej poprawki należy zweryfikować, że wszyscy użytkownicy klienta Microsoft Navision są wylogowani systemu. Dotyczy to również użytkowników klienta Microsoft Navision Application Services (NAS). Powinny być użytkownika klienta, który jest zalogowany w momencie wdrożyć tę poprawkę.
Aby wdrożyć tę poprawkę, musi mieć licencję deweloperską.
Firma Microsoft zaleca, aby do konta użytkownika w oknie identyfikatorów logowania systemu Windows lub w oknie identyfikatorów logowania bazy danych być przypisany identyfikator roli "SUPER". Jeśli konto użytkownika nie można przypisać Identyfikatora roli "SUPER", należy sprawdzić, czy konto użytkownika ma następujące uprawnienia:
-
Uprawnienie Modyfikacja dla obiektu, który będzie zmieniany.
-
Uprawnienie Execute obiektu 5210 identyfikator obiektu systemu i dla obiektu 9015 identyfikator obiektu systemu .
Uwaga Nie trzeba mieć prawa do magazynów danych, chyba że konieczne jest przeprowadzenie naprawy danych.
Zmiany kodu
Uwaga Zawsze test poprawki kodu w kontrolowanym środowisku przed zastosowaniem poprawki na komputerach produkcyjnych.
Aby rozwiązać ten problem, wykonaj następujące kroki:
-
Zmień kod w sekcji pól "dok. Tabela wiersz odłożenia wewnętrznego"(7332) w następujący sposób:
Istniejący kod 1...CALCFIELDS("Put-away Qty.");
IF Quantity < "Qty. Put Away" + "Put-away Qty." THEN
FIELDERROR(Quantity,STRSUBSTNO(Text001,"Qty. Put Away" + "Put-away Qty."));
// Delete the following lines.
IF CurrFieldNo = FIELDNO(Quantity) THEN
CheckBinContentQty;
VALIDATE("Qty. Outstanding",(Quantity - "Qty. Put Away"));
"Qty. (Base)" := CalcBaseQty(Quantity);
Status := CalcStatusPutAwayLine;
// End of the lines.
IF Status <> xRec.Status THEN BEGIN
GetInternalPutAwayHeader("No.");
DocStatus := WhseInternalPutAwayHeader.GetDocumentStatus(0);
...Kod zastępczy 1
...CALCFIELDS("Put-away Qty.");
IF Quantity < "Qty. Put Away" + "Put-away Qty." THEN
FIELDERROR(Quantity,STRSUBSTNO(Text001,"Qty. Put Away" + "Put-away Qty."));
// Add the following lines.
"Qty. (Base)" := CalcBaseQty(Quantity);
IF CurrFieldNo = FIELDNO(Quantity) THEN
CheckBinContentQty;
VALIDATE("Qty. Outstanding",(Quantity - "Qty. Put Away"));
Status := CalcStatusPutAwayLine;
// End of the lines.
IF Status <> xRec.Status THEN BEGIN
GetInternalPutAwayHeader("No.");
DocStatus := WhseInternalPutAwayHeader.GetDocumentStatus(0);
...Istniejący kod 2
...OnLookup=BEGIN
SelectLookUp(FIELDNO("Unit of Measure Code"));
END;
// Delete the following line.
}
{ 30 ; ;Qty. per Unit of Measure;Decimal ;InitValue=1;
DecimalPlaces=0:5;
Editable=No }
{ 31 ; ;Variant Code ;Code10 ;TableRelation="Item Variant".Code WHERE (Item No.=FIELD(Item No.));
...Kod zastępczy 2
...OnLookup=BEGIN
SelectLookUp(FIELDNO("Unit of Measure Code"));
END;
// Add the following line.
Editable=No }
{ 30 ; ;Qty. per Unit of Measure;Decimal ;InitValue=1;
DecimalPlaces=0:5;
Editable=No }
{ 31 ; ;Variant Code ;Code10 ;TableRelation="Item Variant".Code WHERE (Item No.=FIELD(Item No.));
... -
Zmień kod w funkcji CheckCurrentLineQty w "dok. Tabela wiersz odłożenia wewnętrznego"(7332) w następujący sposób:
Istniejący kod...WhseItemTrackingForm.SetSource(TempWhseWorksheetLine,DATABASE::"Whse. Internal Put-away Line");
WhseItemTrackingForm.InsertItemTrackingLine(TempWhseWorksheetLine,SerialNo,LotNo,ExpirationDate,QtyToEmpty);
END;
BEGIN
END.
}
}
...Kod zastępczy
...WhseItemTrackingForm.SetSource(TempWhseWorksheetLine,DATABASE::"Whse. Internal Put-away Line");
WhseItemTrackingForm.InsertItemTrackingLine(TempWhseWorksheetLine,SerialNo,LotNo,ExpirationDate,QtyToEmpty);
END;
// Add the following lines.
PROCEDURE CheckCurrentLineQty@25();
VAR
BinContent@1000 : Record 7302;
AvailQtyBase@1001 : Decimal;
BEGIN
GetLocation("Location Code");
IF Location."Bin Mandatory" AND
("Location Code" <> '') AND ("From Bin Code" <> '') AND
("Item No." <> '') AND ("Unit of Measure Code" <> '')
THEN BEGIN
IF Location."Directed Put-away and Pick" THEN
CheckBlocking(BinContent);
AvailQtyBase := BinContent.CalcQtyAvailToPick(0);
IF AvailQtyBase < "Qty. (Base)" THEN
FIELDERROR(
"Qty. (Base)",
STRSUBSTNO(Text002,AvailQtyBase));
END;
END;
// End of the lines.
BEGIN
END.
}
}
... -
Zmień kod w 5 numer elementu danych w "mag.-źródła - Tworzenie dokumentu" raport (7305) w następujący sposób:
Istniejący kod...BinContent."Block Movement"::Outbound,BinContent."Block Movement"::All]
THEN
BinContent.FIELDERROR("Block Movement");
END;
WhseWkshLine.SETRANGE("Whse. Document Line No.","Line No.");
IF NOT WhseWkshLine.FIND('-') THEN BEGIN
TESTFIELD("Qty. per Unit of Measure");
...Kod zastępczy
...BinContent."Block Movement"::Outbound,BinContent."Block Movement"::All]
THEN
BinContent.FIELDERROR("Block Movement");
END;
// Add the following line.
CheckCurrentLineQty;
WhseWkshLine.SETRANGE("Whse. Document Line No.","Line No.");
IF NOT WhseWkshLine.FIND('-') THEN BEGIN
TESTFIELD("Qty. per Unit of Measure");
...
Wymagania wstępne
Musi mieć jedną z następujących produktów, w celu zastosowania tej poprawki:
-
Microsoft Dynamics NAV 2009 R2
-
Microsoft Dynamics NAV 2009 z dodatkiem Service Pack 1
Informacje dotyczące usuwania
Nie można usunąć tej poprawki.
Stan
Firma Microsoft potwierdziła, że jest to problem występujący w produktach firmy Microsoft wymienionych w sekcji „Dotyczy”.
Uwaga Jest to artykuł " szybkiej publikacji" tworzony bezpośrednio przez organizację pomocy technicznej firmy Microsoft. Informacje zawarte w niniejszym dokumencie są dostarczane jako odpowiedź na pojawiające się problemy. W wyniku przyspieszonego udostępnienia, materiały te mogą zawierać błędy typograficzne i mogą być zmieniane w dowolnym czasie bez uprzedzenia. Zobacz Warunki użytkowania w celu uzyskania innych informacji.