立即注册 登录
度量快速开发平台-专业、快速的软件定制快开平台 返回首页

王爱东的个人空间 http://plat.delit.cn/?3 [收藏] [复制] [RSS]

日志

[网格部件]中利用DataTable的Select判断数据重复性。

已有 1069 次阅读2018-6-13 10:27 |个人分类:部件使用|系统分类:部件使用

业务描述:
   职工年休假计划申报,每个部门默认出自己部门的人,如果有借调轮转的人在本部门,需要把这些人加入到休假计划申报中,在加人的时候,就需要判断网格中是否已经有该人员,有,就不添加。
  类似业务场景很多。

实现效果:

'打开智能窗体,窗体位置: 项目窗体\XX医院\医院人力资源\*新增职工信息*
dim form1 = 创建窗体("faaccf32-bc3c-4811-8e84-1d7a0cd5c812")
form1.ShowDialog()
'form.Input2是人员的编码。
if isnull(form1.Input1) = false then
    dim dt = 职工年休假计划.DataTable
    '判断选择的人员是否在网格中
    dim drx = dt.Select("人员编码='"+form1.Input2+" ' ")
        '不在网格中。drx.Length>0表示存在
    if drx.Length < 1 then
         dim dr
        dr=dt.NewRow()
        dr["ID"]=Guid()
        dr["科室"]=form1.Input1
        dr["人员编码"]=form1.Input2
        dr["姓名"]=form1.Input3
        dr["性别"]=form1.Input4
        dr["参加工作时间"]=form1.Input5
        dt.Rows.Add(dr)
     end if
end if


路过

鸡蛋

鲜花

握手

雷人

评论 (0 个评论)

facelist

您需要登录后才可以评论 登录 | 立即注册

手机版|小黑屋|重庆度量科技  本站关键词:快速开发平台

GMT+8, 2018-9-25 20:41 , Processed in 0.154842 second(s), 21 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

返回顶部