AX: grid中添加checkbox, edit 方法

最新推荐文章于 2022-09-20 19:30:34 发布

weixin_30618985

最新推荐文章于 2022-09-20 19:30:34 发布

阅读量145

点赞数

原文链接：http://www.cnblogs.com/aot/archive/2010/11/27/1889635.html

版权

主要借用临时表 TmpFrmVirtual

public class FormRun extends ObjectRun
{
    TmpFrmVirtual         tmpFrmVirtual;   
}

// grid 上添加一个checkbox 控件，DataMethod设为IsSelected方法
edit NoYes IsSelected(boolean set, ABCPickListBatch _pickTable, NoYes value)
{
    NoYes ret;
    ;

    select tmpFrmVirtual
        where tmpFrmVirtual.TableNum == _pickTable.TableId &&
              tmpFrmVirtual.RecordNo == _pickTable.RecId;

if (tmpFrmVirtual.RecId)
        ret = NoYes::Yes;
if (set)
    {
if (value)
        {
            tmpFrmVirtual.TableNum = _pickTable.TableId;
            tmpFrmVirtual.RecordNo = _pickTable.RecId;

            tmpFrmVirtual.write();

            ret = NoYes::Yes;
        }
else
        {
            tmpFrmVirtual.delete();
            ret = NoYes::No;
        }
    }

return ret;
}

// 获取是否选择一条或多条记录

boolean IsBatchSelected()
{
    ;

    select firstonly tmpFrmVirtual;
if (!tmpFrmVirtual.RecId)
    {
    info("@ABC2012");
return false;
    }
return true;
}

//-----------------------------------------------------------

// 更新选择行
void UpdateSelectedRecord()
{
ABCPickListBatch pickList;
;

super();

if(!element.IsBatchSelected())
return;

ttsbegin;
while select tmpFrmVirtual
{

select forupdate pickList
where tmpFrmVirtual.RecordNo == pickList.RecId &&
tmpFrmVirtual.TableNum == pickList.TableId;
pickList.UserId = formRun.curEmplId();
pickList.update();

}

ttscommit;
ABCPickListBatch_ds.executeQuery();
delete_from tmpFrmVirtual; // 删除临时表记录，表示deselected
}

// 单击按钮，弹出Form选择EmployeeId, 将所选择行的UserId 更新为所选择的EmployeeId
void clicked()
{
Args args;
Object formRun;
ABCPickListBatch pickList;
;

super();

if(!element.IsBatchSelected())
return;

args = new Args();
args.name(formstr(ABCEmpSelect));

formRun = classfactory.formRunClass(args);
formRun.init();
formRun.run();
formRun.wait();

if (formRun.closedOK())
{
ttsbegin;
while select tmpFrmVirtual
{

select forupdate pickList
where tmpFrmVirtual.RecordNo == pickList.RecId &&
tmpFrmVirtual.TableNum == pickList.TableId;
pickList.UserId = formRun.curEmplId();
pickList.update();

}

ttscommit;
ABCPickListBatch_ds.executeQuery();
delete_from tmpFrmVirtual;
}
}