web
You’re offline. This is a read only version of the page.
close
Skip to main content

Notifications

Announcements

No record found.

News and Announcements icon
Community site session details

Community site session details

Session Id :
Dynamics 365 Community / Forums / Microsoft Dynamics AX (Archived) / How to update InventSe...
Microsoft Dynamics AX (Archived)

How to update InventSerial Table using X++ code

(0) ShareShare
ReportReport
Posted on by Siddhant Singh 518

Hello everyone,

The below code inserts the data from excel to InventSerial table but i want to update InventSerial table if any difference is there between the InventSerial table and excel data.

Thank You

public void importExcel(Args _args)
{
SysExcelApplication application;
SysExcelWorkbooks workbooks;
SysExcelWorkbook workbook;
SysExcelWorksheets worksheets;
SysExcelWorksheet worksheet;
SysExcelCells cells;
COMVariantType type;
int row = 1;

InventSerial inventSerial;
;

application = SysExcelApplication::construct();
workbooks = application.workbooks();

try
{
workbooks.open(fileNameOpen);
}
catch (Exception::Error)
{
throw error("File cannot be opened.");
}

workbook = workbooks.item(1);
worksheets = workbook.worksheets();
worksheet = worksheets.itemFromNum(1);
cells = worksheet.cells();

do
{
row++;
inventSerial.InventSerialId = cells.item(row, 1).value().bStr();
inventSerial.ItemId = cells.item(row, 2).value().bStr();
inventSerial.ProdDate = cells.item(row, 3).value().date();
inventSerial.RFIDTagStatus();
//info(strfmt('%1 - %2', itemId, name));
type = cells.item(row+1, 1).value().variantType();
inventSerial.insert();
}

while (type != COMVariantType::VT_EMPTY);
application.quit();

}

*This post is locked for comments

I have the same question (0)
  • Verified answer
    Rustem Galiamov Profile Picture
    Rustem Galiamov 8,072 on at

    Hi Siddhant Singh!

    You should use ttsbegin, ttscommit and select forupdate statement to retrieve data from InventSerial table and then compare that data with excel data and then do update or insert.

  • Rustem Galiamov Profile Picture
    Rustem Galiamov 8,072 on at

    Did you solve the issue?

  • Siddhant Singh Profile Picture
    Siddhant Singh 518 on at

    Hello Rustem;

    Thanks for your reply. I am getting an error . ==> Method 'value' in COM object of class 'Range' returned error code 0x800A01A8 (<unknown>) which means: <unknown>. Is i written the code correctly.

    Thank You,

    Siddhant Singh

    public void importExcel(Args _args)
    {
    SysExcelApplication application;
    SysExcelWorkbooks workbooks;
    SysExcelWorkbook workbook;
    SysExcelWorksheets worksheets;
    SysExcelWorksheet worksheet;
    SysExcelCells cells;
    COMVariantType type;
    int row = 1;

    ;

    application = SysExcelApplication::construct();
    workbooks = application.workbooks();

    try
    {
    workbooks.open(fileNameOpen);
    }
    catch (Exception::Error)
    {
    throw error("File cannot be opened.");
    }

    workbook = workbooks.item(1);
    worksheets = workbook.worksheets();
    worksheet = worksheets.itemFromNum(1);
    cells = worksheet.cells();

    inventSerial.clear();
    while select forupdate inventSerial where inventSerial.InventSerialId != cells.item(row, 1).value().bStr() ||
    inventSerial.ItemId != cells.item(row, 2).value().bStr()
    {
    if(inventSerial)
    {

    do
    {
    ttsBegin;
    row++;
    inventSerial.InventSerialId = cells.item(row, 1).value().bStr();
    inventSerial.ItemId = cells.item(row, 2).value().bStr();
    inventSerial.ProdDate = cells.item(row, 3).value().date();
    inventSerial.RFIDTagStatus();
    type = cells.item(row+1, 1).value().variantType();
    inventSerial.insert();
    InventSerial.update();
    ttsCommit;
    }

    while (type != COMVariantType::VT_EMPTY);
    }
    application.quit();
    }
    }

  • Verified answer
    Rustem Galiamov Profile Picture
    Rustem Galiamov 8,072 on at

    No, your code is wrong.

    It's should looks like this:

        SysExcelApplication application;
    SysExcelWorkbooks   workbooks;
    SysExcelWorkbook    workbook;
    SysExcelWorksheets  worksheets;
    SysExcelWorksheet   worksheet;
    SysExcelCells       cells;
    COMVariantType      type;
    int                 row = 1;
    int                 rows;
    
    application = SysExcelApplication::construct();
    workbooks   = application.workbooks();

    try
    {
        workbooks.open(fileNameOpen);
    }
    catch (Exception::Error)
    {
        throw error("File cannot be opened.");
    }

    workbook   = workbooks.item(1);
    worksheets = workbook.worksheets();
    worksheet  = worksheets.itemFromNum(1);
    cells      = worksheet.cells();

    do
    { 
        ttsBegin;
        
        select forupdate inventSerial 
            where inventSerial.InventSerialId != cells.item(row, 1).value().bStr() 
               || inventSerial.ItemId         != cells.item(row, 2).value().bStr();
    
        if(inventSerial)
        {
            inventSerial.InventSerialId = cells.item(row, 1).value().bStr();
            inventSerial.ItemId         = cells.item(row, 2).value().bStr();
            inventSerial.ProdDate       = cells.item(row, 3).value().date();
            inventSerial.RFIDTagStatus();
            InventSerial.update();
        }
        else
        {
            inventSerial.clear();
            inventSerial.InventSerialId = cells.item(row, 1).value().bStr();
            inventSerial.ItemId         = cells.item(row, 2).value().bStr();
            inventSerial.ProdDate       = cells.item(row, 3).value().date();
            inventSerial.RFIDTagStatus();
            inventSerial.insert();
        }
        ttsCommit;
        
        type = cells.item(row + 1, 1).value().variantType();
        row++;
    }
    while (type != COMVariantType::VT_EMPTY);
    
    application.quit();


Under review

Thank you for your reply! To ensure a great experience for everyone, your content is awaiting approval by our Community Managers. Please check back later.

Helpful resources

Quick Links

Responsible AI policies

As AI tools become more common, we’re introducing a Responsible AI Use…

Neeraj Kumar – Community Spotlight

We are honored to recognize Neeraj Kumar as our Community Spotlight honoree for…

Congratulations to the November Top 10 Community Leaders!

These are the community rock stars!

Leaderboard > 🔒一 Microsoft Dynamics AX (Archived)

#1
Priya_K Profile Picture

Priya_K 4

#1
Martin Dráb Profile Picture

Martin Dráb 4 Most Valuable Professional

#3
MyDynamicsNAV Profile Picture

MyDynamicsNAV 2

Last 30 days Overall leaderboard

Featured topics

Product updates

Dynamics 365 release plans