Howdy, Stranger!
Categories
- All Categories
- 73 General
- 73 Announcements
- 66.5K Microsoft Dynamics NAV
- 18.5K NAV Three Tier
- 38.4K NAV/Navision Classic Client
- 3.6K Navision Attain
- 2.4K Navision Financials
- 115 Navision DOS
- 854 Navision e-Commerce
- 1K NAV Tips & Tricks
- 772 NAV Dutch speaking only
- 615 NAV Courses, Exams & Certification
- 2K Microsoft Dynamics-Other
- 1.5K Dynamics AX
- 267 Dynamics CRM
- 109 Dynamics GP
- 10 Dynamics SL
- 1.5K Other
- 992 SQL General
- 384 SQL Performance
- 33 SQL Tips & Tricks
- 34 Design Patterns (General & Best Practices)
- Architectural Patterns
- 10 Design Patterns
- 5 Implementation Patterns
- 53 3rd Party Products, Services & Events
- 1.7K General
- 1.1K General Chat
- 1.6K Website
- 79 Testing
- 1.2K Download section
- 23 How Tos section
- 259 Feedback
- 12 NAV TechDays 2013 Sessions
- 13 NAV TechDays 2012 Sessions
Options
Inventory Valuation Report Remaining Qty problem
csimoneaux
Member Posts: 168
My client is running in version 3.7 and the remaining quantity on the Inventory Valuation report does not agree to Quantity on hand. I thought, at first that this was a date issue, but it is not. I ran report for 12/31/9999 and the problem still exists. I have narrowed down that the problem started 9/23/99. But I can not figure out how to correct this.
I know the total of the Item application entries = to Total Quantities & Remaining Qty in Item Ledger Entry table.
What am I missing? Ideas please....Yes they did reciently convert from version 2.0 to 3.7.
](*,)
Help
I know the total of the Item application entries = to Total Quantities & Remaining Qty in Item Ledger Entry table.
What am I missing? Ideas please....Yes they did reciently convert from version 2.0 to 3.7.
](*,)
Help
0
Comments
Value entries did not correspond with Item ledger entries. Created Report 80140 (dup of 10139 v3.70B) under sections - Iten Ledger Entry, Footer 6...added code to trigger (Iten Ledger Entry, Footer 6 OnPreSection)...
//cs
IF RemainingQty > 0 THEN
IF InventoryValue < 0 THEN BEGIN
ItemJournal."Journal Template Name" := 'ITEM1';
ItemJournal."Journal Batch Name" := 'TOLDCOST';
IF ItemJournal."Line No." =0 THEN
ItemJournal."Line No." := 10000
ELSE
ItemJournal."Line No." := ItemJournal."Line No." + 10000;
ItemJournal."Item No." := "Item No.";
ItemJournal."Posting Date":= 073105D;
ItemJournal."Document No." := 'CSCrctInvV';
ItemJournal.Description := Item.Description;
ItemJournal."Location Code" := 'LAF';
ItemJournal.Quantity := RemainingQty;
ItemJournal."Invoiced Quantity" := RemainingQty;
ItemJournal."Quantity (Base)" := RemainingQty;
ItemJournal."Invoiced Qty. (Base)" := RemainingQty;
ItemJournal."Unit Amount" := 0;
ItemJournal.Amount := 0;
ItemJournal."Source Code" := 'ITEMJNL';
ItemJournal."Gen. Prod. Posting Group" := Item."Gen. Prod. Posting Group";
ItemJournal."Document Date" := 073105D;
ItemJournal."Qty. per Unit of Measure" := 1;
ItemJournal."Unit of Measure Code" := Item."Base Unit of Measure";
ItemJournal."Value Entry Type" := ItemJournal."Value Entry Type"::"Direct Cost";
ItemJournal."Entry Type" := ItemJournal."Entry Type"::"Negative Adjmt.";
ItemJournal."Unit Cost" := UnitCost;
ItemJournal.INSERT;
ItemJnlReversal.COPY(ItemJournal);
ItemJnlReversal."Journal Template Name" := 'ITEM2';
ItemJnlReversal."Journal Batch Name" := 'TNEWCOST';
ItemJnlReversal."Entry Type" := ItemJnlReversal."Entry Type"::"Positive Adjmt.";
ItemJnlReversal."Unit Cost" := ItemUnitCost;
ItemJnlReversal.INSERT;
END;
I posted Journal entry Toldcost & Tnewcost. This corrected Negative unit costs.
NEXT
Modified same report in same section with Code...
//cs
IF RemainingQty = 0 THEN
IF InventoryValue <> 0 THEN BEGIN
ItemJournal."Journal Template Name" := 'ITEM1';
ItemJournal."Journal Batch Name" := 'TOLDCOST';
IF ItemJournal."Line No." =0 THEN
ItemJournal."Line No." := 10000
ELSE
ItemJournal."Line No." := ItemJournal."Line No." + 10000;
ItemJournal."Item No." := "Item No.";
ItemJournal."Posting Date":= 073105D;
ItemJournal."Document No." := 'CrctInvV';
ItemJournal.Description := Item.Description;
ItemJournal."Location Code" := 'LAF';
ItemJournal.Quantity := 1;
ItemJournal."Invoiced Quantity" := 1;
ItemJournal."Quantity (Base)" := 1;
ItemJournal."Invoiced Qty. (Base)" := 1;
ItemJournal."Unit Amount" := 0;
ItemJournal.Amount := 0;
ItemJournal."Source Code" := 'ITEMJNL';
ItemJournal."Gen. Prod. Posting Group" := Item."Gen. Prod. Posting Group";
ItemJournal."Document Date" := 063005D;
ItemJournal."Qty. per Unit of Measure" := 1;
ItemJournal."Unit of Measure Code" := Item."Base Unit of Measure";
ItemJournal."Value Entry Type" := ItemJournal."Value Entry Type"::"Direct Cost";
ItemJournal."Entry Type" := ItemJournal."Entry Type"::"Positive Adjmt.";
ItemJournal."Unit Cost" := 0;
ItemJournal."Unit Amount" := 0;
ItemJournal.INSERT;
ItemJnlReversal.COPY(ItemJournal);
ItemJnlReversal."Journal Template Name" := 'ITEM2';
ItemJnlReversal."Journal Batch Name" := 'TNEWCOST';
ItemJnlReversal."Entry Type" := ItemJnlReversal."Entry Type"::"Negative Adjmt.";
IF InventoryValue >0 THEN BEGIN
ItemJnlReversal."Unit Cost" := InventoryValue;
ItemJnlReversal.INSERT;
END;
IF InventoryValue <0 THEN BEGIN
ItemJnlReversal."Entry Type" := ItemJnlReversal."Entry Type"::"Negative Adjmt.";
ItemJnlReversal."Unit Cost" := InventoryValue;
ItemJnlReversal.INSERT;
END;
END;
I posted Journal entry Toldcost & Tnewcost.
This cleared all remqining QTY =0 and remaining Inventory Value. I ned ran Adjust cost & Post to G\L and everything was back to normal with correct cost brought forward to G\L.