Dynamics 365 Finance and Operations SalesOrderLineEntity 验证扩展

Question

我对 x++ 开发还是很陌生。我正在尝试向 SalesOrderLineEntity 添加一些验证以阻止用户导入不能被多个数量整除的数量。

这就是我所达到的程度，我无法练习如何用 x++ 编写（如果订购的数量不能被多个数量整除（即不是整数））然后抛出错误。

[ExtensionOf(tableStr(SalesOrderLineEntity))]
final class SalesOrderLineEntity_Extension
{
boolean validateWrite()
{
InventItemSalesSetup inventItemSalesSetup;
SalesLine salesLine;

SalesTable salesTable = SalesTable::find(this.SalesOrderNumber);

select firstonly * from salesLine where salesLine.salesid == salesTable.SalesId
join inventItemSalesSetup where inventItemSalesSetup.ItemId == salesLine.ItemId;

if (this.RecId)
{
if (salesLine.QtyOrdered < inventItemSalesSetup.MultipleQty)
{
return checkFailed
("qty ordered less than multiple qty");
}
if (isInteger(salesLine.QtyOrdered / inventItemSalesSetup.MultipleQty))
{
return checkFailed
("qty ordered not divisible by multiple qty");
}
}

next validateWrite();

if (!salesTable.checkUpdate(true, true, true))
{
return false;
}

boolean ret;

//ret = super();

return ret;

}

}

Answer 1

如果您使用整数，则需要在 AX 中使用模运算 (mod)。确保检查你没有被零除（世界末日），你可能想检查是否实际输入了非零数量。

if(salesLine.QtyOrdered && inventItemSalesSetup.MultipleQty && (salesLine.QtyOrdered mod inventItemSalesSetup.MultipleQty != 0)
{
    return checkFailed("qty ordered not divisible by multiple qty");
}

如果您使用的是实数，那么您想进行一些基本的整数数学运算。

real            qtyOrdered;
real            multipleQty;
int             result;

qtyOrdered  = 321.0; // 321 / 10.7 = 30 exactly
multipleQty = 10.7;
result      = qtyOrdered / multipleQty; // This will store the integer and drop any decimals

// If the result multipled by the original multiple is equal to the original value, then you're good
if (result * multipleQty == qtyOrdered)
{
    info("All good!");
}
else
{
    info("Bad!");
}

可能是一个标准的 AX 函数，可以满足您的需求，但它太基础了，我只能自己算一下。

Answer 2

请查看完成的代码，我相信这就是我想要的。谢谢您的帮助。任何 suggestions/efficiencies/improvements 对此将不胜感激！

[ExtensionOf(dataentityviewstr(SalesOrderLineEntity))]
final class SalesOrderLineEntity_Extension
{
    boolean validateWrite()
    {
        InventItemSalesSetup    inventItemSalesSetup;
        SalesLine               salesLine;
    select firstonly * from salesLine where salesLine.Salesid == this.SalesOrderNumber
        && salesLine.ItemId == this.ItemNumber
        join inventItemSalesSetup where inventItemSalesSetup.ItemId == this.ItemNumber;

    boolean ret = next validateWrite();

    if (ret)
    {
        if (ret && this.OrderedSalesQuantity < inventItemSalesSetup.MultipleQty)
        {
            ret = checkFailed ("qty ordered less than multiple qty");
        }
        if (ret && this.OrderedSalesQuantity mod inventItemSalesSetup.MultipleQty != 0)
        {
            ret = checkFailed ("qty ordered not divisible by multiple qty");
        }
    }

    return ret;

}

}

Dynamics 365 Finance and Operations SalesOrderLineEntity 验证扩展

Dynamics 365 Finance and Operations SalesOrderLineEntity validation extension

axapta

x++

dynamics-365-operations