bug 5.0

Belias
Member Posts: 2,998
i found this in codeunit 12/UnapplyCustLedgEntry(GenJnlLine2,DtldCustLedgEntry)
function
the //////This one lines, are conflicting, as findset can't be used for descending orders. Currently i've not got a 5sp1 to view, does someone know if this thing solved in the service pack?
function
GenJnlLine.TRANSFERFIELDS(GenJnlLine2); IF GenJnlLine."Document Date" = 0D THEN GenJnlLine."Document Date" := GenJnlLine."Posting Date"; InitCodeUnit; IF Cust."No." <> DtldCustLedgEntry."Customer No." THEN Cust.GET(DtldCustLedgEntry."Customer No."); Cust.CheckBlockedCustOnJnls(Cust,0,TRUE); Cust.TESTFIELD("Customer Posting Group"); CustPostingGr.GET(Cust."Customer Posting Group"); CustPostingGr.TESTFIELD("Receivables Account"); VATEntry.LOCKTABLE; DtldCustLedgEntry.LOCKTABLE; CustLedgEntry.LOCKTABLE; DtldCustLedgEntry.TESTFIELD("Entry Type",DtldCustLedgEntry."Entry Type"::Application); DtldCustLedgEntry2.RESET; DtldCustLedgEntry2.FINDLAST; NextDtldLedgEntryEntryNo := DtldCustLedgEntry2."Entry No." + 1; DtldCustLedgEntry2.SETCURRENTKEY("Transaction No.","Customer No.","Entry Type"); //////This one DtldCustLedgEntry2.ASCENDING(FALSE); //////This one DtldCustLedgEntry2.SETRANGE("Transaction No.",DtldCustLedgEntry."Transaction No."); DtldCustLedgEntry2.SETRANGE("Customer No.",DtldCustLedgEntry."Customer No."); DtldCustLedgEntry2.SETFILTER("Entry Type",'>%1',DtldCustLedgEntry."Entry Type"::"Initial Entry"); //////This one DtldCustLedgEntry2.FINDSET;//////This one
the //////This one lines, are conflicting, as findset can't be used for descending orders. Currently i've not got a 5sp1 to view, does someone know if this thing solved in the service pack?
0
Answers
-
SP1 part of the same part:
GenJnlLine.TRANSFERFIELDS(GenJnlLine2); IF GenJnlLine."Document Date" = 0D THEN GenJnlLine."Document Date" := GenJnlLine."Posting Date"; InitCodeUnit; IF Cust."No." <> DtldCustLedgEntry."Customer No." THEN Cust.GET(DtldCustLedgEntry."Customer No."); Cust.CheckBlockedCustOnJnls(Cust,0,TRUE); CustPostingGr.GET(GenJnlLine."Posting Group"); CustPostingGr.TESTFIELD("Receivables Account"); VATEntry.LOCKTABLE; DtldCustLedgEntry.LOCKTABLE; CustLedgEntry.LOCKTABLE; DtldCustLedgEntry.TESTFIELD("Entry Type",DtldCustLedgEntry."Entry Type"::Application); DtldCustLedgEntry2.RESET; DtldCustLedgEntry2.FINDLAST; NextDtldLedgEntryEntryNo := DtldCustLedgEntry2."Entry No." + 1; DtldCustLedgEntry2.SETCURRENTKEY("Transaction No.","Customer No.","Entry Type"); DtldCustLedgEntry2.SETRANGE("Transaction No.",DtldCustLedgEntry."Transaction No."); DtldCustLedgEntry2.SETRANGE("Customer No.",DtldCustLedgEntry."Customer No."); DtldCustLedgEntry2.SETFILTER("Entry Type",'>%1',DtldCustLedgEntry."Entry Type"::"Initial Entry"); DtldCustLedgEntry2.FINDSET; REPEAT DtldCustLedgEntry2.TESTFIELD(Unapplied,FALSE);
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