Foxtable(狐表)用户栏目专家坐堂 → 如何提取库存现金的对方科目


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

主题:如何提取库存现金的对方科目

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
如何提取库存现金的对方科目  发帖心情 Post By:2023/9/15 19:40:00 [只看该作者]

想从凭证明细表的总账科目中提取库存现金的对方科目到明细账的对方科目
窗口1中的填充按钮已经提取了总账科目中的库存现金,但与库存现金互为借贷关系的科目不知怎样提取到明细账中。
明细表中库存现金的对方科目我用手工填上了,如何自动填充?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb


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


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

还是使用Find根据关联的数据查询。填充后遍历明细账,逐行查询出关联的科目

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2023/9/16 21:07:00 [只看该作者]

对我来说有点难。
对方科目也在总账科目列,凭证号相同,借贷相反

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


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

他们根据什么关联起来?

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2023/9/17 21:03:00 [只看该作者]

比如我从凭证明细表中提取总账列的库存现金到明细账表,那么库存现金的对方科目我用手工填写在了明细账表中,比如银行存款等,它与库存现金的关系是,它们在凭证明细表中的凭证编号相同,借贷相反,都在总账科目列

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



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


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

那就根据凭证编号去查呀,借贷相反那就判断,如果当前行有借方金额,就去查有贷方金额的行,大概

dim r as row = tabels("明细账").current
if r.isnull("借方金额") then
dim dr as datarow = datatables("凭证明细").find("凭证编号='" & r("凭证编号") & "' and 借方金额 is not null")
if dr isnot nothing then
r("对方科目") = dr("总账科目")
end if
else
dim dr as datarow = datatables("凭证明细").find("凭证编号='" & r("凭证编号") & "' and 贷方金额 is not null")
if dr isnot nothing then
r("对方科目") = dr("总账科目")
end if
end if

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2023/9/18 10:27:00 [只看该作者]

是这样的,谢谢。

 回到顶部