Axapta 正是我需要的。出于某种原因，我一直在想，那时候还需要翻译成字符串 SysDictEnum dictEnum = new SysDictEnum(enumNum(SDILF_ScrapReasons)); reason = dialog.a

正是我需要的。出于某种原因，我一直在想，那时候还需要翻译成字符串

    SysDictEnum dictEnum = new SysDictEnum(enumNum(SDILF_ScrapReasons));

    reason = dialog.addField(enumStr(SDILF_ScrapReasons),"Scrap Reason");
    dialog.run();
    if (!dialog.closedOk())
    {
        info(reason.value());
        return;
    }

    ttsBegin;
    // For now, this will strip off the order ID from the summary fields.
    // No longer removing the Order ID
    batchAttr = PdsBatchAttributes::find(itemId, invDim.inventBatchId, "OrderId");
    orders = SDILF_BreakdownOrders::find(batchAttr.PdsBatchAttribValue, true);
    if (orders)
    {
        orders.BoxProduced -= 1;
        orders.update();
    }
    // Adding a batch attribute that will include the reason for scrapping
    select forUpdate batchAttr;    
    batchAttr.PdsBatchAttribId = "ScrapReason";
    //batchAttr.PdsBatchAttribValue = any2str(dictEnum.index2Value(reason.value()));
    batchAttr.PdsBatchAttribValue = enum2str(reason.value());
    batchAttr.InventBatchId = invDim.inventBatchId;
    batchAttr.ItemId = itemId;
    batchAttr.insert();