Můžete neočekávaně vytvořit více než jedno vyskladnění zásob pro prodejní objednávku, pokud je pole Avízo expedice v prodejní objednávce nastaveno na Dokončeno v aplikaci Microsoft Dynamics NAV 2009 Service Pack 1

Platí pro
Dynamics NAV 2009 Service Pack 1

Tento článek platí pro Microsoft Dynamics NAV pro všechny země a všechna jazyková národní prostředí.

Příznaky

V aplikaci Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) můžete neočekávaně vytvořit více než jeden skladový výdej pro prodejní objednávku, pokud je hodnota pole Avízo expedice v prodejní objednávce Dokončena. V této situaci nemůžete zaúčtovat žádné z vytvořených skladových skladů.

Řešení

Informace o opravě hotfix

Od Microsoftu je teď k dispozici podporovaná oprava hotfix. Účelem je však pouze vyřešení problému, který je popsán v tomto článku. Aplikujte ho jenom na systémy, ve kterých dochází k tomuto konkrétnímu problému. Tato oprava hotfix může projít dalším testováním. Pokud se vás tedy tento problém vážně netýká, doporučujeme počkat na další aktualizaci Service Pack pro Microsoft Dynamics NAV nebo další verzi Microsoft Dynamics NAV, která tuto opravu hotfix obsahuje.

Poznámka: Ve zvláštních případech mohou být poplatky, které jsou obvykle účtovány za telefonická hovory podpory, zrušeny, pokud pracovník technické podpory pro řešení Microsoft Dynamics a související produkty zjistí, že konkrétní aktualizace vyřeší váš problém. Další dotazy a problémy týkající se podpory, které se netýkají této konkrétní opravy, podléhají běžným sazbám za podporu.

            
          

Informace o instalaci

Společnost Microsoft poskytuje příklady programování pouze pro ilustraci, bez záruky, ať už vyjádřené nebo předpokládané. To zahrnuje, ale není omezeno na, předpokládané záruky prodejnosti nebo vhodnosti pro konkrétní účel. Tento článek předpokládá, že jste obeznámeni s programovacím jazykem, který je předváděn, a s nástroji, které se používají k vytváření a ladění procedur. Pracovníci technické podpory Microsoftu vám můžou pomoct vysvětlit funkčnost určitého postupu, ale nebudou tyto příklady upravovat za účelem poskytování dalších funkcí nebo konstrukce procedur, které by splňovaly vaše konkrétní požadavky.

Poznámka: Před instalací této opravy hotfix ověřte, zda jsou všichni uživatelé klienta Microsoft Navision odhlášeni ze systému. To zahrnuje i uživatele klienta Microsoft Navision Application Services (NAS). Měli byste být jediným klientským uživatelem, který je přihlášen při implementaci této opravy hotfix.

K implementaci této opravy hotfix musíte mít vývojářskou licenci.

Doporučujeme, aby uživatelské účtu v okně Windows Přihlášení nebo v okně Přihlášení k databázi bylo přiřazeno ID role "SUPER". Pokud nelze uživatelskému účtu přiřadit ID role "SUPER", je nutné ověřit, zda má uživatelský účet následující oprávnění:

  • Oprávnění k úpravám objektu, který budete měnit.
  • Oprávnění ke spuštění pro objekt s ID systémového objektu 5210 a pro objekt s ID systémového objektu 9015.

                
Poznámka: K úložištím dat nemusíte mít práva, ledaže byste museli provádět opravu dat.

Změny kódu

Poznámka: Před použitím oprav v produkčních počítačích vždy otestujte opravy kódu v kontrolovaném prostředí.
Chcete-li tento problém vyřešit, postupujte takto:

  1. Změňte pole v tabulce Řádek prodeje (37) takto:
    Existující kód

    ...
    
    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);
    ...
    

    Náhradní kód

    ...
    
    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. Změňte globální proměnné v tabulce Řádek prodeje (37) následujícím způsobem:
    Existující kód

    ...
            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";
    ...
    

    Náhradní kód

    ...
            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. Změňte kód funkce CheckWhseActivityExists v tabulce Sales Line (37) takto:
    Existující kód

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

    Náhradní kód

    ...
              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.
    
        }
    
      }
    ...
    

Požadavky

Abyste mohli tuto opravu hotfix použít, musíte mít nainstalovanou aplikaci Microsoft Dynamics NAV 2009 Service Pack 1.

Informace o odebrání

Tuto opravu hotfix nelze odebrat.

Stav

Společnost Microsoft potvrdila, že se jedná o problém produktů Microsoft, které jsou uvedeny v sekci Platí pro.

Poznámka: Toto je článek určený k rychlému zveřejnění, který byl vytvořen přímo v rámci organizace podpory společnosti Microsoft. Zde uvedené informace jsou poskytovány tak, jak jsou, jako reakce na nově vznikající potíže. Vzhledem k rychlosti, s jakou byl článek zpřístupněn, mohou příslušné materiály obsahovat typografické chyby a mohou být kdykoli bez předchozího upozornění revidovány. Další okolnosti viz Podmínky použití .