Įeinančios registracijos įrašai netikėtai spausdinami ataskaitoje "Tiekėjas - likutis iki datos" (321), net jei uždarote įeinančios registracijos įrašus ataskaitos filtravimo datoje švedų kalbos „Microsoft“ Dynamics NAV 2009 versijoje

Taikoma
Dynamics NAV 2009

Šis straipsnis taikomas "„Microsoft“ Dynamics NAV", skirtai švedų (SE) kalbos lokalei.

Požymiai

Apsvarstykite šį "„Microsoft“ Dynamics NAV 2009" švediškos versijos scenarijų:

  • Pritaikote karštųjų pataisų 2801885.
  • Registruojate tiekėjo pirkimo SF įeinančios registracijos įrašą.
  • Įvežamos registracijos įrašą uždarote registruodami pirkimo SF.
  • Tiekėjo ataskaitą "Tiekėjas - likutis iki datos" (321) vykdote filtruodami pagal datą, į kurią įtrauktos ir įvežamos registracijos įrašo, ir pirkimo SF registravimo datos.

Tokiu atveju įvykstančios registracijos įrašas netikėtai išspausdinamas. Ši problema kyla šiuose produktuose:

  • "„Microsoft“ Dynamics NAV 2009 R2" švediška versija
  • "„Microsoft“ Dynamics NAV 2009" 1 pakeitimų paketo švedų kalba

Jei norite gauti daugiau informacijos apie karštąsias pataisas 2801885, spustelėkite toliau nurodytą straipsnio numerį ir peržiūrėkite "Microsoft" žinių bazės straipsnį:

2801885 Įeinančios registracijos įrašai ataskaitoje "Tiekėjas - Likutis iki datos" nerodomi, jei įeinančios registracijos įrašus uždarėte datą, kuri yra po ataskaitos filtravimo datos švedų kalbos "„Microsoft“ Dynamics NAV 2009" versijoje

Sprendimas

Karštųjų pataisų informacija

Dabar palaikomas karštąsias pataisas galima gauti iš "„Microsoft“". Tačiau juo siekiama tik išspręsti šiame straipsnyje aprašytą problemą. Taikyti ją tik sistemoms, kuriose kilo ši konkreti problema. Ši karštoji pataisa gali būti papildomai patikrinta. Todėl, jei ši problema jūsų rimtai nepaveikė, rekomenduojame palaukti kito "„Microsoft“ Dynamics NAV 2009" pakeitimų paketo arba kitos "„Microsoft“ Dynamics NAV" versijos, kurioje yra ši karštoji pataisa.

Pastaba Ypatingais atvejais mokesčiai, kurie paprastai taikomi už palaikymo skambučius, gali būti atšaukti, jei "„Microsoft“ Dynamics" ir susijusių produktų techninio palaikymo specialistas nustato, kad konkretus naujinimas išspręs jūsų problemą. Įprastos palaikymo išlaidos bus taikomos papildomiems palaikymo klausimams ir problemoms, kurios neatitinka atitinkamo konkretaus naujinimo reikalavimų.

            
          

Diegimo informacija

"„Microsoft“" pateikia programavimo pavyzdžių tik iliustracijai, be išreikštų ar numanomų garantijų. Tai apima, bet neapsiriboja, numanomas tinkamumo parduoti arba tinkamumo konkrečiam tikslui garantijas. Straipsnyje laikomasi nuomonės, kad esate susipažinę su demonstruojama programavimo kalba ir įrankiais, naudojamais kuriant ir derinant procedūras. "„Microsoft“" palaikymo inžinieriai gali padėti paaiškinti konkrečios procedūros funkcionalumą, bet jie nemodifikuos šių pavyzdžių, kad suteiktų papildomų funkcinių galimybių, ir nesukurs procedūrų, atitinkančių jūsų konkrečius reikalavimus.

Pastaba Prieš diegdami šią karštąją pataisą patikrinkite, ar visi "„Microsoft“ Navision" kliento vartotojai yra atsijungę nuo sistemos. Tai apima "„Microsoft“ Navision" programų tarnybų (NAS) kliento vartotojus. Turite būti vienintelis kliento vartotojas, kuris yra prisijungęs, kai įdiegiate šią karštąją pataisą.

Norėdami įdiegti šią karštąją pataisą, privalote turėti kūrėjo licenciją.

Rekomenduojame vartotojo paskyrai "Windows" prisijungimų lange arba duomenų bazės prisijungimų lange priskirti "SUPER" vaidmens ID. Jei vartotojo paskyrai negalima priskirti "SUPER" vaidmens ID, turite patikrinti, ar vartotojo paskyra turi šias teises:

  • Objekto, kurį keisite, modifikavimo teisė.
  • Sistemos objekto ID 5210 ir sistemos objekto ID 9015 objekto vykdymo teisės.

                
Pastaba: neturite turėti teisių į duomenų saugyklas, nebent turite atlikti duomenų taisymą.

Kodo keitimai

Pastaba Visada išbandykite kodo pataisas kontroliuojamoje aplinkoje prieš taikydami jas gamybos kompiuteriuose.
Norėdami išspręsti šią problemą, atlikite šiuos veiksmus:

  1. Pakeiskite ataskaitos "Tiekėjas – likutis iki datos" (321) skyriaus 4 duomenų elemento numeris 4 kodą taip:
    Esamas kodas

    ...
    IF FINDSET THEN
    REPEAT
    IF Open THEN
    MARK(TRUE);
    
    // Delete the following lines.
    IF AppliedInwardRegEntry.GET("Applies-to Entry") THEN
    MARK(AppliedInwardRegEntry."Posting Date" <= MaxDate);
    // End of the lines.
    
    UNTIL NEXT = 0;
    SETCURRENTKEY("Entry No.");
    SETRANGE(Open);
    ...
    

    Pakeitimo kodas

    ...
    IF FINDSET THEN
    REPEAT
    IF Open THEN
    MARK(TRUE);
    
    // Add the following lines.
    IF AppliedInwardRegEntry.GET("Applies-to Entry") THEN
    MARK(AppliedInwardRegEntry."Posting Date" > MaxDate);
    // End of the lines.
    
    UNTIL NEXT = 0;
    SETCURRENTKEY("Entry No.");
    SETRANGE(Open);
    ...
    
  2. Pakeiskite kodą "Pirkimo-Post" kodo vieneto (90) skyriuje Ypatybės tokiu būdu:
    Esamas kodas

    ...
    PurchSetup.GET;
    InwRegHeader.SETRANGE("Document Type",PurchHeader."Document Type");
    InwRegHeader.SETRANGE("Document No.",PurchHeader."No.");
    InwRegHeader.SETRANGE(Status, InwRegHeader.Status::Posted);
    
    // Delete the following lines.
    IF InwRegHeader.FIND('-') THEN
    InwRegReverse.RUN(InwRegHeader);
    // End of the lines.
    
    PurchInvHeader.INIT;
    PurchInvHeader.TRANSFERFIELDS(PurchHeader);
    IF "Document Type" = "Document Type"::Order THEN BEGIN
    PurchInvHeader."Pre-Assigned No. Series" := '';
    ...
    

    Pakeitimo kodas

    ...
    PurchSetup.GET;
    InwRegHeader.SETRANGE("Document Type",PurchHeader."Document Type");
    InwRegHeader.SETRANGE("Document No.",PurchHeader."No.");
    InwRegHeader.SETRANGE(Status, InwRegHeader.Status::Posted);
    
    // Add the following lines.
    IF InwRegHeader.FINDFIRST THEN BEGIN
    InwRegReverse.SetPostingDate("Posting Date");
    InwRegReverse.RUN(InwRegHeader);
    END;
    // End of the lines.
    
    PurchInvHeader.INIT;
    PurchInvHeader.TRANSFERFIELDS(PurchHeader);
    IF "Document Type" = "Document Type"::Order THEN BEGIN
    PurchInvHeader."Pre-Assigned No. Series" := '';
    ...
    
  3. Pakeiskite kodą sekcijos Visuotiniai kintamieji kodo vienete "Vidinis reg.-reversas" (11203) taip:
    Esamas kodas

    ...
    PreviousDim1Code@1070021 : Code[20];
    PreviousDim2Code@1070022 : Code[20];
    DimensionsOnTotalTrans@1070023 : Boolean;
    GenJnlCheckLine@1070024 : Codeunit 11;
    Text005@1070025 : TextConst 'ENU=is not within your range of allowed posting dates;SVE=„r inte i ditt till†tna intervall f”r bokf”ringsdatum';
    PROCEDURE MakeInwRegEntriesReverse@1070000();
    BEGIN
    IF InwRegEntry.FIND('+') THEN
    ...
    

    Pakeitimo kodas

    ...
    PreviousDim1Code@1070021 : Code[20];
    PreviousDim2Code@1070022 : Code[20];
    DimensionsOnTotalTrans@1070023 : Boolean;
    GenJnlCheckLine@1070024 : Codeunit 11;
    Text005@1070025 : TextConst 'ENU=is not within your range of allowed posting dates;SVE=„r inte i ditt till†tna intervall f”r bokf”ringsdatum';
    
    // Add the following line.
    PostingDate@1070030 : Date;
    
    PROCEDURE MakeInwRegEntriesReverse@1070000();
    BEGIN
    IF InwRegEntry.FIND('+') THEN
    ...
    
  4. Pakeiskite funkcijos MakeInwRegEntryReverse kodą kodo vienete "Inward Reg.-Reverse" (11203) tokiu būdu:
    Esamas kodas

    ...
    InwRegEntry."Entry No." := NextEntryNo;
    InwRegEntry."Applies-to Entry" := "Entry No.";
    InwRegEntry.Open := FALSE;
    InwRegEntry."Source Type" := "Source Type";
    InwRegEntry."Source No." := "Source No.";
    
    // Delete the following line.
    InwRegEntry."Posting Date" := InwHeader."Posting Date";
    
    InwRegEntry."Vendor Posting Group" := "Vendor Posting Group";
    InwRegEntry."Gen. Bus. Posting Group" := "Gen. Bus. Posting Group";
    InwRegEntry."Vendor No." := "Vendor No.";
    InwRegEntry."Document No." := "Document No.";
    InwRegEntry."Line No." := "Line No.";
    ...
    

    Pakeitimo kodas

    ...
    InwRegEntry."Entry No." := NextEntryNo;
    InwRegEntry."Applies-to Entry" := "Entry No.";
    InwRegEntry.Open := FALSE;
    InwRegEntry."Source Type" := "Source Type";
    InwRegEntry."Source No." := "Source No.";
    
    // Add the following line.
    InwRegEntry."Posting Date" := PostingDate; 
    
    InwRegEntry."Vendor Posting Group" := "Vendor Posting Group";
    InwRegEntry."Gen. Bus. Posting Group" := "Gen. Bus. Posting Group";
    InwRegEntry."Vendor No." := "Vendor No.";
    InwRegEntry."Document No." := "Document No.";
    InwRegEntry."Line No." := "Line No.";
    ...
    

          

Būtinosios sąlygos

Norėdami taikyti šią karštąją pataisą, turite įdiegti vieną iš šių produktų:

  • "„Microsoft“ Dynamics NAV 2009 R2" švediška versija
  • "„Microsoft“ Dynamics NAV 2009" 1 pakeitimų paketo švedų kalba

Pašalinimo informacija

Šios karštosios pataisos pašalinti negalite.

Būsena

„„Microsoft““ patvirtino, kad tai yra „„Microsoft““ produktų, išvardytų dalyje „Taikoma“, problema.

Pastaba: tai "SPARČIOJO PUBLIKAVIMO" straipsnis, sukurtas tiesiogiai iš "„Microsoft“" palaikymo organizacijos. Čia pateikta informacija pateikiama tokia, kokia yra, reaguojant į kylančias problemas. Dėl greito jos pateikimo medžiagoje gali būti spausdinimo klaidų ir ji gali būti peržiūrėta bet kuriuo metu be išankstinio įspėjimo. Dėl kitų aplinkybių žr. Naudojimo sąlygas .