get different dimension value

catiamatos1991
Member Posts: 158
Hi everyone, I'm trying to set a dimension value for each two records but i'm only assigning the last value for all and I can't figure why.

In dimension value table I want the "VEND" for Dimension Code and use that records in my "Dimension code" of the first image.
So for now I have the dimension code RG, but my idea was to use the "Next(-1)" to get the previous of the last record..
REPEAT
defaultAmt := GLEntryTotal.Amount;
countedAmt := 0;
CASE GLEntryTotal."New G/L Account No." OF
'1':
countedAmt := ReqFilter.Decimal_1;
'2':
countedAmt := ReqFilter.Decimal_2;
'3':
countedAmt := ReqFilter.Decimal_3;
'DMB': BEGIN
countedAmt := -ReqFilter.Decimal_4;
defaultAmt := -ReqFilter.Decimal_4;
END;
END;
DimensionValue.FINDLAST();
userCode:=DimensionValue.Code;
// GLEntry
CopyEntryToJournal(Rec, lastLineNo+1, docNo, GLEntryTotal."G/L Account No.", GLEntryTotal."G/L Account Name", Rec."Account Type"::"G/L Account", -1*defaultAmt, -1*countedAmt, userCode);
// Balanced
CopyEntryToJournal(Rec, lastLineNo+2, docNo, GLEntryTotal."Bal. Account No.", GLEntryTotal."G/L Account Name", Rec."Account Type"::"Bank Account", defaultAmt, countedAmt, userCode);
// next
lastLineNo := lastLineNo + 2;
DimensionValue.NEXT(-1);

In dimension value table I want the "VEND" for Dimension Code and use that records in my "Dimension code" of the first image.
So for now I have the dimension code RG, but my idea was to use the "Next(-1)" to get the previous of the last record..
REPEAT
defaultAmt := GLEntryTotal.Amount;
countedAmt := 0;
CASE GLEntryTotal."New G/L Account No." OF
'1':
countedAmt := ReqFilter.Decimal_1;
'2':
countedAmt := ReqFilter.Decimal_2;
'3':
countedAmt := ReqFilter.Decimal_3;
'DMB': BEGIN
countedAmt := -ReqFilter.Decimal_4;
defaultAmt := -ReqFilter.Decimal_4;
END;
END;
DimensionValue.FINDLAST();
userCode:=DimensionValue.Code;
// GLEntry
CopyEntryToJournal(Rec, lastLineNo+1, docNo, GLEntryTotal."G/L Account No.", GLEntryTotal."G/L Account Name", Rec."Account Type"::"G/L Account", -1*defaultAmt, -1*countedAmt, userCode);
// Balanced
CopyEntryToJournal(Rec, lastLineNo+2, docNo, GLEntryTotal."Bal. Account No.", GLEntryTotal."G/L Account Name", Rec."Account Type"::"Bank Account", defaultAmt, countedAmt, userCode);
// next
lastLineNo := lastLineNo + 2;
DimensionValue.NEXT(-1);
0
Categories
- All Categories
- 73 General
- 73 Announcements
- 66.6K Microsoft Dynamics NAV
- 18.7K NAV Three Tier
- 38.4K NAV/Navision Classic Client
- 3.6K Navision Attain
- 2.4K Navision Financials
- 116 Navision DOS
- 851 Navision e-Commerce
- 1K NAV Tips & Tricks
- 772 NAV Dutch speaking only
- 617 NAV Courses, Exams & Certification
- 2K Microsoft Dynamics-Other
- 1.5K Dynamics AX
- 320 Dynamics CRM
- 111 Dynamics GP
- 10 Dynamics SL
- 1.5K Other
- 990 SQL General
- 383 SQL Performance
- 34 SQL Tips & Tricks
- 35 Design Patterns (General & Best Practices)
- 1 Architectural Patterns
- 10 Design Patterns
- 5 Implementation Patterns
- 53 3rd Party Products, Services & Events
- 1.6K General
- 1.1K General Chat
- 1.6K Website
- 83 Testing
- 1.2K Download section
- 23 How Tos section
- 252 Feedback
- 12 NAV TechDays 2013 Sessions
- 13 NAV TechDays 2012 Sessions