Проблема импорта журнала переноса через x ++ - PullRequest
Новая
       30

Проблема импорта журнала переноса через x ++

2 голосов
/ 16 апреля 2020

У меня следующая проблема: следующий код отлично работает: 

inventJournalTrans.clear();
inventJournalTrans.initFromInventJournalTable(inventJournalTable);
inventJournalTrans.ItemId = "100836M";

frominventDim.InventLocationId="SD";
frominventDim.wMSLocationId = '11_RECEPTION';
fromInventDim.InventSizeId = '1000';
fromInventDim.inventBatchId = 'ID057828-CN';

ToinventDim.InventLocationId = "SD";
ToInventDim.wMSLocationId = '11_A2';
ToInventDim.InventSizeId = '1000';
ToInventDim.inventBatchId = 'T20/0001/1';

ToinventDim = InventDim::findOrCreate(ToinventDim);
frominventDim = InventDim::findOrCreate(frominventDim);

inventJournalTrans.InventDimId = frominventDim.inventDimId;
inventJournalTrans.initFromInventTable(InventTable::find("100836M"));
inventJournalTrans.Qty = -0.5;
inventJournalTrans.ToInventDimId = ToinventDim.inventDimId;
inventJournalTrans.CostAmount = InventJournalTrans.calcCostAmount(-abs(any2real(strReplace('-0.5',',','.'))));
inventJournalTrans.TransDate = SystemDateget();
inventJournalTrans.insert();

inventJournalCheckPost = InventJournalCheckPost::newJournalCheckPost(JournalCheckpostType::Post,inventJournalTable);
inventJournalCheckPost.parmThrowCheckFailed(_throwserror);
inventJournalCheckPost.parmShowInfoResult(_showinforesult);
inventJournalCheckPost.run();

Он правильно создает строку журнала переноса и успешно публикует журнал переноса.

Мое требование - импортировать строки журнала из CSV-файла. Я написал следующий код: 

    inventJournalTrans.clear();
    inventJournalTrans.initFromInventJournalTable(inventJournalTable::find(_journalID));
    InventJournaltrans.ItemId             = conpeek(_filerecord,4);

    inventDim_From.InventLocationId       = 'SD';
    inventDim_From.wMSLocationId          = '11_RECEPTION';
    InventDim_from.InventSizeId           = conpeek(_fileRecord,11);
    InventDim_From.inventBatchId          = strfmt("%1",conpeek(_fileRecord,5));

    InventDim_To.InventLocationId         = 'SD';
    inventDim_To.wMSLocationId            = strfmt("%1",conpeek(_fileRecord,10));
    InventDim_To.InventSizeId             = conpeek(_fileRecord,11);
    InventDim_To.inventBatchId            = strfmt("%1",conpeek(_fileRecord,6));

    InventDim_From                        = InventDim::findOrCreate(inventDim_From);
    inventDim_To                          = InventDim::findOrCreate(inventDim_To);

    InventJournalTrans.InventDimId = inventDim_From.inventDimId;
    InventJournalTrans.initFromInventTable(InventTable::find(conpeek(_filerecord,4)));
    inventJournalTrans.Qty                = -abs(any2real(strReplace(conpeek(_fileRecord,8),',','.')));
    inventJournalTrans.ToInventDimId      = inventDim_To.inventDimId;
    InventJournalTrans.CostAmount         = InventJournalTrans.calcCostAmount(-abs(any2real(strReplace(conpeek(_fileRecord,8),',','.'))));
    inventJournalTrans.TransDate          = str2date(conpeek(filerecord,9),123);
    InventJournalTrans.insert();

У меня возникает следующая ошибка при использовании метода insert (): размер для itemId не существует. Когда я посмотрел в таблице InventSize для моего itemId, размер существует, я подумал, что это проблема InventDimId в PinterestJournalTrans, но они строго похожи на первый пример кода. Все мои данные такие же, как в первом примере, но они не жестко запрограммированы и получены при чтении моего CSV-файла.

Я трачу много времени на отладку и ничего не нашел, но сообщение об ошибке остается, я использую Dynamics AX V4 SP1. Большое спасибо за любую помощь.

1 Ответ

0 голосов
/ 17 апреля 2020

Когда вы читаете из файлов, всегда обрезайте конечные пробелы. Это можно сделать с помощью функции strRtrim .

Примерно так: 

InventDim_To.InventSizeId = strRtrim(conpeek(_fileRecord,11));
...