Foxtable(狐表)用户栏目专家坐堂 → [求助]审核


  共有146人关注过本帖树形打印复制链接

主题:[求助]审核

帅哥哟,离线,有人找我吗?
苏州老街
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:706 积分:4507 威望:0 精华:0 注册:2016/10/19 16:45:00
[求助]审核  发帖心情 Post By:2024/12/11 21:11:00 [只看该作者]

老师,用颜色标出的代码在连续审核多行时“入库日期”,“经办人”,“入库_数量”列即使是空的也同样审核通过。

If Tables("入库.入库明细").Current.isnull("入库日期") OrElse Tables("入库.入库明细").Current.isnull("经办人")  OrElse Tables("入库.入库明细").Current.isnull("入库_数量")   ' OrElse ....
msgbox("有数据没有录入完成")
return

End If


If Tables("入库") .Rows.count = 0  OrElse  Tables("入库.入库明细") .Rows.count = 0 Then
    MessageBox.Show("没有可审核内容!")
    Return
End If

Dim dr As DataRow
dr = DataTables("授权表").Find("(',' + 姓名 + ',' like '%," & _UserName & ",%' or ',' + 用户分组 + ',' like '%," & _Usergroup & ",%') and 表名='入库.入库明细' and 角色='审核'")
If dr Is Nothing Then
    MessageBox.show("你无审核权限!")
else
    Tables("入库").Current("审核人") = User.Name
    Tables("入库").Current("审核日期") = Date.now
Tables("入库.入库明细"). Current.Save()
    Tables("入库").Current.Save()
End If
   msgbox("你有审核权限!")

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111334 积分:566722 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/12 8:42:00 [只看该作者]

【连续审核多行】是怎么操作的?Current指的是当前选中的1行

 回到顶部
帅哥哟,离线,有人找我吗?
苏州老街
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:706 积分:4507 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2024/12/12 11:52:00 [只看该作者]

老师,子表(入库明细)有多行审核第一行时会提示数据未填写完整。如果第一行填写完整下面几行填写不完整审核也同样通过。

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111334 积分:566722 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/12 12:04:00 [只看该作者]

请上传实例说明

 回到顶部
帅哥哟,离线,有人找我吗?
苏州老街
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:706 积分:4507 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2024/12/12 15:38:00 [只看该作者]

老师,子表(入库明细)有多行审核第一行时会提示数据未填写完整。如果第一行填写完整下面几行填写不完整审核也同样通过。打开入库表打开入库窗口审核入库.入库明细表
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:20241212-152452.rar


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:蓝峰管理.rar

[此贴子已经被作者于2024/12/12 15:39:28编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111334 积分:566722 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/12 16:00:00 [只看该作者]

入库表datacolchanged事件有对明细进行审核的用法,这里没有做判断和控制

 回到顶部
帅哥哟,离线,有人找我吗?
苏州老街
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:706 积分:4507 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2024/12/12 17:29:00 [只看该作者]

老师,怎样判断和控制,搞不好,谢谢老师。

 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111334 积分:566722 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/12/12 17:40:00 [只看该作者]

说明您对自己要做的东西都不熟悉呀,不知道自己要做什么。先理清自己的思路吧。

审核的目的是什么?主表和明细表需要分开审核?2个表的审核有什么不一样?审核前需要做什么判断?数据判断?权限判断?先审核主表还是先审核明细表?

 回到顶部