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
- 266 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
Remove a record based on a filter from a CSV file
mustafaAlsoufi
Member Posts: 60
How can I delete a record from a table based on the item No that exists in a CSV File?
I have 3090 Item Nos
For example, I would like to SetRange("Item No.", 'Item #1 from the excel sheet')
IF Findfirst() then
Delete();
and then SetRange("Item No.", 'Item #2 from the excel sheet') and so on
I have 3090 Item Nos
For example, I would like to SetRange("Item No.", 'Item #1 from the excel sheet')
IF Findfirst() then
Delete();
and then SetRange("Item No.", 'Item #2 from the excel sheet') and so on
0
Best Answer
-
Options
KTA8
Member Posts: 391
You could use excel buffer to read data and then process it.
Something like this
--
CLEAR(ExcelBuff);
ExcelBuff.DELETEALL();
FileName:=CommonDialogMgt.OpenFile(Text001,'',2,'',0);
ExcelBuff.LOCKTABLE();
SheetName:=ExcelBuff.SelectSheetsName(FileName);
ExcelBuff.OpenBook(FileName,SheetName);
ExcelBuff.ReadSheet();
ExcelBuff.FINDLAST();
LastRow:=ExcelBuff."Row No.";
column:=1;
ExcelBuff.FINDFIRST();
For row=2 to LastRow DO BEGIN
item:=ExcelBuff.GET(row,column);
your delete
END;1
Answers
Something like this
--
CLEAR(ExcelBuff);
ExcelBuff.DELETEALL();
FileName:=CommonDialogMgt.OpenFile(Text001,'',2,'',0);
ExcelBuff.LOCKTABLE();
SheetName:=ExcelBuff.SelectSheetsName(FileName);
ExcelBuff.OpenBook(FileName,SheetName);
ExcelBuff.ReadSheet();
ExcelBuff.FINDLAST();
LastRow:=ExcelBuff."Row No.";
column:=1;
ExcelBuff.FINDFIRST();
For row=2 to LastRow DO BEGIN
item:=ExcelBuff.GET(row,column);
your delete
END;