Foxtable(狐表)用户栏目专家坐堂 → 申请表和审核表的审核状态


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

主题:申请表和审核表的审核状态

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


加好友 发短信
等级:狐精 帖子:3223 积分:21413 威望:0 精华:0 注册:2016/3/28 16:57:00
申请表和审核表的审核状态  发帖心情 Post By:2017/8/17 13:44:00 [显示全部帖子]

老师,我弄了一个申请表,一个审核表,两个表都有审核状态,被自己搅晕了,不知道怎么弄了?

申请表保存当前行时,申请表的部分信息自动添加到审核表,包括审核状态,状态为:待审核,

审核表审核时,初审结束,审核表的审核状态为:已初审,复审结束,审核表的审核状态为:已复审。

现在需要把审核表的审核状态与申请表的审核状态同步。

两个表是通过fa piao号码关联的。

[此贴子已经被作者于2017/8/17 13:48:45编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
cd_tdh
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3223 积分:21413 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2017/8/17 15:12:00 [显示全部帖子]

老师,我这样写有没问题?

If e.DataCol.Name = "审核状态" AndAlso e.DataRow("审核状态") <>"已提交" AndAlso e.DataRow("审核状态") <>"待审核" Then
    Tables("进项piao审核.进项piao录入").current("审核状态")=Tables("进项piao审核").current("审核状态")
Else
End If


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


加好友 发短信
等级:狐精 帖子:3223 积分:21413 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2017/8/22 16:44:00 [显示全部帖子]

有点甜老师,我另外一个关联表,审核表同步更新到关联表的申请表的“实际支付金额”下面这样写,有什么问题呢?

If e.DataCol.name = "实际支付金额" Then
    Dim fdr As DataRow = DataTables("工程款申请").Find("_Identify = " & e.DataRow("临时列"))
    If fdr IsNot Nothing Then
        fdr("实际支付金额") = e.DataRow("实际支付金额")
    End If
End If


 回到顶部
帅哥哟,离线,有人找我吗?
cd_tdh
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3223 积分:21413 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2017/8/22 16:58:00 [显示全部帖子]

申请表里面的实际申请金额不更新。

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


加好友 发短信
等级:狐精 帖子:3223 积分:21413 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2017/8/22 22:44:00 [显示全部帖子]

值是一样的,我审核表的数据是通过跨表引用的申请表的数据,_Identify和临时列数据是对应的。

 回到顶部
帅哥哟,离线,有人找我吗?
cd_tdh
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3223 积分:21413 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2017/8/24 9:39:00 [显示全部帖子]

以下是引用有点蓝在2017/8/22 22:48:00的发言:
上实例测试

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

实例已上传,麻烦老师看一下呢。

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


加好友 发短信
等级:狐精 帖子:3223 积分:21413 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2017/8/24 10:18:00 [显示全部帖子]

明白怎么弄了

[此贴子已经被作者于2017/8/24 10:22:03编辑过]

 回到顶部