Ovaj članak se odnosi na Microsoft Dynamics NAV za lokalni standard na grčkom jeziku (gr).
Simptomi
Ako potvrdite izbor u polju za potvrdu " Automatsko knjiženje troškova " i polje za potvrdu "Knjiženje očekivanih troškova " u grčkoj verziji programa Microsoft Dynamics NAV, neispravne stavke glavne knjige koje su kreirane prema iznosu očekivanog troška neće biti poništene. Prema tome, rezultat u izveštaju o probnom stanju (16702) razlikuje se od rezultata u izveštaju o kartici skladišta (16785).
Ovaj problem se javlja u sledećim proizvodima:
- Grčka verzija Microsoft Dynamics NAV 2009 servisni paket 1 (SP1)
- Grčka verzija usluge Microsoft Dynamics NAV 5.0 servisni paket 1 (SP1)
Uzrok
Do ovog problema dolazi zato što su troškovi stavke izračunati dva puta u stavkama glavne knjige. Cena se izračunava kao očekivani trošak jednom, a cena se izračunava kao stvarni trošak drugi put.
Rešenje
Informacije o hitnim ispravkama
Podržana hitna ispravka je sada dostupna od korporacije Microsoft. Međutim, namena je samo za rešavanje problema koji je opisan u ovom članku. Primenite je samo na sisteme koji imaju ovaj određeni problem. Ova hitna ispravka može proći dodatno testiranje. Stoga, ako ovaj problem ne utiče ozbiljno, preporučujemo da sačekate sledeći servisni paket za Microsoft Dynamics NAV 2009 ili sledeću verziju programa Microsoft Dynamics NAV koja sadrži ovu hitnu ispravku.
Napomena: U posebnim slučajevima, troškovi koji se obično nastaju za pozive podršci mogu biti otkazani ako stručnjak za tehničku podršku za Microsoft Dynamics i srodne proizvode utvrdi da će određena ispravka rešiti problem. Uobičajeni troškovi podrške primenjivaće se na dodatna pitanja podrške i probleme koji ne ispunjavaju uslove za određenu ispravku u pitanju.
Informacije o instalaciji
Microsoft pruža primere programiranja samo za ilustraciju, bez izričite ili podrazumevane garancije. Ovo uključuje, ali nije ograničeno na, podrazumevane garancije o podesnosti za prodaju ili o podesnosti za određenu namenu. U ovom članku se pretpostavlja da ste upoznati sa programskim jezikom koji se demonstrira i sa alatkama koje se koriste za kreiranje procedura i otklanjanje grešaka. Inženjeri Microsoft podrške mogu da vam objasne funkcionalnost određene procedure, ali neće izmeniti ove primere da bi obezbedili dodatnu funkcionalnost ili konstruisali procedure koje ispunjavaju vaše određene zahteve.
Napomena: Pre nego što instalirate ovu hitnu ispravku, proverite da li su svi korisnici Microsoft Navision klijenta odjavljeni iz sistema. To uključuje korisnike Microsoft Navision Application Services (NAS) klijenta. Vi bi trebalo da budete jedini korisnik klijenta koji je prijavljen kada primenjujete ovu hitnu ispravku.
Da biste primenili ovu hitnu ispravku, morate imati licencu za projektante.
Preporučujemo da se korisničkom nalogu u prozoru "Prijavljivanje u operativni sistem Windows" ili u prozoru "Prijavljivanje u bazu podataka" dodeli ID uloge "SUPER". Ako korisničkom nalogu nije moguće dodeliti ID uloge "SUPER", morate da proverite da li korisnički nalog ima sledeće dozvole:
- Dozvola "Izmeni" za objekat koji ćete menjati.
- Dozvola za izvršavanje za objekat sistema ID 5210 i za objekat sistema ID 9015.
Napomena: Ne morate da imate prava na skladišta podataka osim ako ne morate da izvršite popravku podataka.
Promene kodova
Napomena: Popravke kodova uvek testirajte u kontrolisanom okruženju pre nego što ih primenite na računare proizvodnje.
Pratite ove korake da biste rešili problem:
Promenite kôd u funkciji "BaferInvtObjavljivanje" u kodnoj jedinici "Knjiženje zaliha u KG" (5802) na sledeći način:
Postojeći kôd... // Dionisis Calculate Cost Differently for Manufacturing Entries. IF "Expected Cost" THEN BEGIN CalcCostToPost( ValueEntry,ExpCostToPost,CostExpected,"Expected Cost Posted to G/L",PostToGL,"Expected Cost",FALSE, "Posted Cost Component 1","Posted Cost Component 2","Posted Cost Component 3","Posted Cost Component 4", "Posted Cost Component 5"); CalcCostToPost( ValueEntry,ExpCostToPostACY,"Cost Amount (Expected) (ACY)","Exp. Cost Posted to G/L (ACY)",PostToGL,"Expected Cost",TRUE, PostedCost1ACY,PostedCost2ACY,PostedCost3ACY,PostedCost4ACY,PostedCost5ACY); END ELSE BEGIN CalcCostToPost( ValueEntry,CostToPost,CostActual,"Cost Posted to G/L",PostToGL,"Expected Cost",FALSE, "Posted Cost Component 1","Posted Cost Component 2","Posted Cost Component 3","Posted Cost Component 4", "Posted Cost Component 5"); CalcCostToPost( ValueEntry,CostToPostACY,"Cost Amount (Actual) (ACY)","Cost Posted to G/L (ACY)",PostToGL,"Expected Cost",TRUE, PostedCost1ACY,PostedCost2ACY,PostedCost3ACY,PostedCost4ACY,PostedCost5ACY); END; ...Kôd za zamenu
... // Dionisis Calculate Cost Differently for Manufacturing Entries. //Add the following lines. // IF "Expected Cost" THEN BEGIN IF "Expected Cost" OR InvtSetup."Expected Cost Posting to G/L" THEN BEGIN //End of the lines. CalcCostToPost( ValueEntry,ExpCostToPost,CostExpected,"Expected Cost Posted to G/L",PostToGL,"Expected Cost",FALSE, "Posted Cost Component 1","Posted Cost Component 2","Posted Cost Component 3","Posted Cost Component 4", "Posted Cost Component 5"); CalcCostToPost( ValueEntry,ExpCostToPostACY,"Cost Amount (Expected) (ACY)","Exp. Cost Posted to G/L (ACY)",PostToGL,"Expected Cost",TRUE, PostedCost1ACY,PostedCost2ACY,PostedCost3ACY,PostedCost4ACY,PostedCost5ACY); //Add the following lines. // END ELSE BEGIN END; IF NOT "Expected Cost" THEN BEGIN //End of the lines. CalcCostToPost( ValueEntry,CostToPost,CostActual,"Cost Posted to G/L",PostToGL,"Expected Cost",FALSE, "Posted Cost Component 1","Posted Cost Component 2","Posted Cost Component 3","Posted Cost Component 4", "Posted Cost Component 5"); CalcCostToPost( ValueEntry,CostToPostACY,"Cost Amount (Actual) (ACY)","Cost Posted to G/L (ACY)",PostToGL,"Expected Cost",TRUE, PostedCost1ACY,PostedCost2ACY,PostedCost3ACY,PostedCost4ACY,PostedCost5ACY); END; ...Promenite kôd u funkciji "BaferInvtObjavljivanje" u kodnoj jedinici "Knjiženje zaliha u KG" (5802) u sledeći:
… // Find Actual Cost // Dionisis changed with valuation cost // CASE "Item Ledger Entry Type" OF // "Item Ledger Entry Type"::Purchase: // // GR0010.begin // // CostActual := "Entry Valuation Cost"; // "Cost Amount (Actual)"; // GR004 // CostActual := "Cost Amount (Actual)"; // // GR0010.end // "Item Ledger Entry Type"::Sale, // "Item Ledger Entry Type"::"Positive Adjmt.", // "Item Ledger Entry Type"::"Negative Adjmt.", // "Item Ledger Entry Type"::Transfer, // "Item Ledger Entry Type"::Consumption, // "Item Ledger Entry Type"::Output: // // GR0010.begin // // CostActual := "Entry Valuation Cost"; // CostActual := "Cost Amount (Actual)"; // // GR0010.end // END; // Find Expected Cost // Dionisis changed with valuation cost // CASE "Item Ledger Entry Type" OF // "Item Ledger Entry Type"::Purchase: // // GR0010.begin // //CostExpected := "Valuation Expected Cost"; // "Cost Amount (Expected)"; // GR0004 // CostExpected := "Cost Amount (Expected)"; // // GR0010.end // "Item Ledger Entry Type"::Sale: // // GR0010.begin // // CostExpected := "Valuation Expected Cost"; // CostExpected := "Cost Amount (Expected)"; // // GR0010 end // "Item Ledger Entry Type"::"Positive Adjmt.", // "Item Ledger Entry Type"::"Negative Adjmt.", // "Item Ledger Entry Type"::Transfer, // "Item Ledger Entry Type"::Consumption, // "Item Ledger Entry Type"::Output: // // GR0010.begin // //CostExpected := "Entry Valuation Cost"; //CostExpected := "Invoiced Quantity" * "Valuation Cost Per Unit"; // CostExpected := "Cost Amount (Actual)"; // // GR0010.end // END; CostActual := "Cost Amount (Actual)"; CostExpected := "Cost Amount (Expected)"; …Promenite kôd u funkciji CalcExpCost u kodnoj jedinici "Knjiženje zaliha u KG" (5802) na sledeći način:
Postojeći kôd... QtyNotInv := Quantity - QtyNotInv; AdjdCost := ROUND(AdjdCost * QtyNotInv / Quantity,RoundPrecision); ...Kôd za zamenu
... QtyNotInv := Quantity - QtyNotInv; //Add the following line. IF QtyNotInv <> 0 THEN AdjdCost := ROUND(AdjdCost * QtyNotInv / Quantity,RoundPrecision); ...Promenite kôd u funkciji CalcPeriodAverageCost u kodnoj jedinici za upravljanje vrednošću (16783) na sledeći način:
Postojeći kôd... WITH Item DO BEGIN SETRANGE("Date Filter",InventoryPeriod."Starting Date",InventoryPeriod."Ending Date"); SETFILTER("Location Filter",LocationFilter); CALCFIELDS("Valuation Purchases Qty","Valuation Purchases (LCY)","Valuation Expd. Cost (Purch.)", "Valuation Output Cost","Output Qty","Assembled Qty","Valuation Assembly Cost", "Valuation Transfers Qty","Valuation Transfers (LCY)"); CurrPeriodCost := "Valuation Purchases (LCY)" + "Valuation Expd. Cost (Purch.)" + "Valuation Output Cost" + "Valuation Assembly Cost" + "Valuation Transfers (LCY)"; CurrPeriodQty := "Valuation Purchases Qty" + "Output Qty" + "Assembled Qty" + "Valuation Transfers Qty"; IF "Production Method" <> "Production Method"::" " THEN CalcCostPerCostComp; END; CalcValuationCostPerUnit; ...Kôd za zamenu
... WITH Item DO BEGIN SETRANGE("Date Filter",InventoryPeriod."Starting Date",InventoryPeriod."Ending Date"); SETFILTER("Location Filter",LocationFilter); //Add the following lines. //CALCFIELDS("Valuation Purchases Qty","Valuation Purchases (LCY)","Valuation Expd. Cost (Purch.)", // "Valuation Output Cost","Output Qty","Assembled Qty","Valuation Assembly Cost", // "Valuation Transfers Qty","Valuation Transfers (LCY)"); // CurrPeriodCost := "Valuation Purchases (LCY)" + "Valuation Expd. Cost (Purch.)" + "Valuation Output Cost" + // "Valuation Assembly Cost" + "Valuation Transfers (LCY)"; // CurrPeriodQty := "Valuation Purchases Qty" + "Output Qty" + "Assembled Qty" + "Valuation Transfers Qty"; CALCFIELDS("Valuation Purchases Qty","Valuation Purchases (LCY)","Valuation Expd. Cost (Purch.)", "Valuation Output Cost","Output Qty","Assembled Qty","Valuation Assembly Cost", "Inbound Transfer Qty","Inbound Transfers (LCY)"); IF IsAvgCostCalcTypeItem THEN BEGIN CurrPeriodCost := "Valuation Purchases (LCY)" + "Valuation Expd. Cost (Purch.)" + "Valuation Output Cost" + "Valuation Assembly Cost"; CurrPeriodQty := "Valuation Purchases Qty" + "Output Qty" + "Assembled Qty"; END ELSE BEGIN CurrPeriodCost := "Valuation Purchases (LCY)" + "Valuation Expd. Cost (Purch.)" + "Valuation Output Cost" + "Valuation Assembly Cost" + "Inbound Transfers (LCY)"; CurrPeriodQty := "Valuation Purchases Qty" + "Output Qty" + "Assembled Qty" + "Inbound Transfer Qty"; END; //End of the lines. IF "Production Method" <> "Production Method"::" " THEN CalcCostPerCostComp; END; CalcValuationCostPerUnit; ...
Preduslovi
Morate da imate instaliran jedan od sledećih proizvoda da biste primenili ovu hitnu ispravku:
- Grčka verzija Microsoft Dynamics NAV 2009 servisni paket 1 (SP1)
- Grčka verzija usluge Microsoft Dynamics NAV 5.0 servisni paket 1 (SP1)
Informacije o uklanjanju
Ne možete da uklonite ovu hitnu ispravku.
Status
Microsoft je potvrdio da je ovo problem u Microsoft proizvodima koji su navedeni u odeljku „Odnosi se na“.
Napomena: Ovo je članak "BRZO OBJAVLJIVANJE" koji je kreiran direktno u okviru organizacije Microsoft podrške. Informacije koje se nalaze ovde pružaju se kakve jesu kao odgovor na nove probleme. Kao rezultat brzine stavljanja na raspolaganje, materijali mogu sadržavati tipografske greške i mogu se revidirati u bilo kom trenutku bez prethodne najave. Pogledajte Uslove korišćenja za druga razmatranja.