axapta - 如何通过代码更改生产状态？(AX 2009)

Question

我必须通过代码更改生产状态，而不是通过 ProdTable 表单。我遇到的问题是，ProdMultiRelease 类期望从 ProdTable 表单运行。（第 10 行：RunBaseMultiParm::initFromForm(prodMultiRelease,args);）

更新： 这里有一些额外的信息。首先我尝试了这样的事情：

static void Job1(Args _args)
{
    Args args;
    ProdTable prodTable;
    ;
    prodTable = ProdTable::find( 'PRD_00005166', true);
    args = new Args();
    args.record( prodTable );
    new MenuFunction( menuitemactionstr( ProdRelease ), MenuItemType::Action ).run( args );
}

但它不起作用。

现在我有这样的事情：

static void startprod(Args _args)
{
    ProdTable           prodTable;
    ProdMultiStartUp    ProdMultiStartUp;
    ;
    prodTable.selectForUpdate(true);
    select prodTable where prodTable.ProdId =='0267_074';
    prodTable.ProdStatus = prodStatus::StartedUp;
    prodTable.update();
    info('done');
}

这工作正常，但我不知道简单地设置状态是否有问题。

Update2： 我想我会这样做：

prodTable.autoUpdate(prodStatus::Released);

Answer 1

我认为最好的方法是这样做：

prodTable.autoUpdate(prodStatus::Released);

Answer 2

执行此代码时遇到问题。以下代码对我有用：

static void setProdStatusStarted(Args _args)
{
    ProdUpdStartUp      prodUpdStartUp;
    ProdParmStartUp     prodParmStartUp;
    ProdParametersDim   prodParametersDim;
    ProdTable           prodTable;

    ProdId              prodId = "PROD-0001";

    prodTable = ProdTable::find(prodId);

    ttsBegin;
    prodParmStartUp.initValue();
    prodParmStartUp.initParmDefault();

    prodParametersDim = ProdParametersDim::find(prodTable.InventDimId);

    prodParmStartUp.initFromProdParametersDim(prodParametersDim);
    prodParmStartUp.ProdId = prodTable.ProdId;
    prodParmStartUp.PostNowBOM = NoYes::No;
    //CompletePickListJournal property allows it to create additional picking list journals which are missing for the BOM.
    prodParmStartUp.CompletePickListJournal = NoYes::Yes;

    prodParmStartUp.insert();
    ttsCommit;

    prodUpdStartUp = ProdUpdStartUp::construct();
    prodUpdStartUp.parmParmBuffer(prodParmStartUp);
    prodUpdStartUp.run();
}

检查这个博客