Foxtable(狐表)用户栏目专家坐堂 → [求助]同步指定关联行审批


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

主题:[求助]同步指定关联行审批

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


加好友 发短信
等级:童狐 帖子:266 积分:2150 威望:0 精华:0 注册:2012/3/28 16:49:00
[求助]同步指定关联行审批  发帖心情 Post By:2017/12/12 14:36:00 [只看该作者]

老师你好!我在窗口内设一个关联表,可以增加数据,只能保存全表。但在审批按钮审批时,不会指定窗口表中的选定行审批。请老师指教!谢谢!

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20171212141803.png
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20171212142550.png
图片点击可在新窗口打开查看
窗口表中我选了第一行或第二行进行“审批”,它实际审批的还是第三行。谢谢老师!


“新增”按钮代码:
Tables("工程技术参数").AddNew()
Tables("工程技术参数").Current("合同编号") = Tables("工程合同基础数据").Current("合同编号")

“审批”按钮代码:
If User.IsRole("审批")
    If Tables("工程技术参数").Current("审批") = False
        Tables("工程技术参数").Current("审批人") = User.Name
        Tables("工程技术参数").Current("审批日期") = Date.Today()
        Tables("工程技术参数").Current("审批") = True
        Tables("工程技术参数").Current.Locked = True
        Tables("工程技术参数").Current.Save()
    Else
        MessageBox.show("该记录已审批!")
    End If
End If

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


加好友 发短信
等级:童狐 帖子:266 积分:2150 威望:0 精华:0 注册:2012/3/28 16:49:00
  发帖心情 Post By:2017/12/12 14:38:00 [只看该作者]

老师是不是我在窗口表中选定了的行,但在表内实际没有选定对应的记录,请问代码怎么处理?

是不是也可以在窗口中审批窗口表中对应的多条记录?这样最好!
[此贴子已经被作者于2017/12/12 14:41:19编辑过]

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


加好友 发短信
等级:童狐 帖子:266 积分:2150 威望:0 精华:0 注册:2012/3/28 16:49:00
  发帖心情 Post By:2017/12/12 14:43:00 [只看该作者]

窗口表不是副表

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/12 15:13:00 [只看该作者]

表名改成关联表,如

 

Tables("工程技术参数")

 

改成

 

Tables("工程合同基础数据.工程技术参数")


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


加好友 发短信
等级:童狐 帖子:266 积分:2150 威望:0 精华:0 注册:2012/3/28 16:49:00
  发帖心情 Post By:2017/12/12 16:44:00 [只看该作者]

谢谢老师!解决了

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


加好友 发短信
等级:童狐 帖子:266 积分:2150 威望:0 精华:0 注册:2012/3/28 16:49:00
  发帖心情 Post By:2017/12/13 10:22:00 [只看该作者]

老师还是这个表,谢谢您昨天帮助我解决了审批,但现在又有问题了,窗口表是“工程合同基础数据”父表的关联子表,这个表是不能设为副表的。在新增时没有问题,如果我要选择已经做好的记录,选定时能不能在主表也选定相应的记录,可以同步修改。谢谢!


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/13 10:49:00 [只看该作者]

你选择的是哪个表的内容?根据什么修改主表的内容?

 

做个具体的实例发上来说明。


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


加好友 发短信
等级:童狐 帖子:266 积分:2150 威望:0 精华:0 注册:2012/3/28 16:49:00
  发帖心情 Post By:2017/12/13 11:12:00 [只看该作者]

我先截个图吧

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20171213110846.png
图片点击可在新窗口打开查看

然后出现

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20171213110625.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/13 11:15:00 [只看该作者]

是不是又是你的表名写错了?你要写成关联表的表名。

 

或者贴出你提示的判断代码。


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


加好友 发短信
等级:童狐 帖子:266 积分:2150 威望:0 精华:0 注册:2012/3/28 16:49:00
  发帖心情 Post By:2017/12/13 11:20:00 [只看该作者]

我在主表的ValidateEdit中代码如下:
If e.Col.Name = "成本计划_充盈系数" Then
    If Tables("成本计划表").Current("采购名称") <> "商品混凝土" And Tables("成本计划表").Current("成本计划_充盈系数") IsNot Nothing Then '判断是否不符合验证要求
        MessageBox.Show("只有商品混凝土才能录入充盈系数.请核实数据!","提示",MessageBoxButtons.OK,MessageBoxIcon.Exclamation) '提示用户
        e.Cancel = True '则禁止退出编辑模式
    End If
End If

 回到顶部
总数 18 1 2 下一页