Monday, January 13, 2025

Import data through CSV in AX2012

static void ADUpdateInventTable(Args _args) { CommaTextIO csvFile; container readCon; Dialog dialog; DialogField dfFileName; FileName fileName; InventTable inventTable; ItemId itemId; //DirPartyContactInfoView contactView; #File dialog = new Dialog("Pick the file"); dfFileName = dialog.addField(extendedTypeStr("FilenameOpen")); dialog.filenameLookupFilter(['csv','*.csv']); if (dialog.run()) { csvFile = new CommaTextIo(dfFileName.value(), 'r'); csvFile.inFieldDelimiter(','); readCon = csvFile.read(); while(csvFile.status() == IO_Status::OK) { readCon = csvFile.read(); if(readCon) { itemId = conPeek(readCon,1); ttsBegin; select forUpdate inventTable where inventTable.ItemId == itemId; if(inventTable.Test == NoYes::Yes) { inventTable.Test = NoYes::No; inventTable.update(); } ttsCommit; info(itemId); } } } }

No comments:

Post a Comment