如何生成分录？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何生成分录？

共有5740人关注过本帖树形打印复制链接主题：如何生成分录？

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：113540 积分：578201 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/4/29 8:38:00 [显示全部帖子]

dim r as row = tables("表A").current

dim d1 as date = r("开始日期")

dim d2 as date = r("结束日期")

dim 数量 as double = r("数量") / r("天数")

dim nr as row

do while d1<=d2

nr = tables("表B").addnew

nr("产品") = r("产品")

nr("加工") = d1

nr("数量") = 数量

d1 = d1.adddays(1)

loop

[此贴子已经被作者于2022/4/29 8:38:57编辑过]

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：113540 积分：578201 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/4/29 13:41:00 [显示全部帖子]

drs变量是一个空的集合，什么都没有

有点蓝

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：113540 积分：578201 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/4/29 15:33:00 [显示全部帖子]

for each r as row in Tables("表E").rows

dim d1 as date = r("开始日期")

dim d2 as date = r("结束日期")

dim 数量 as double = r("数量") / r("天数")

dim nr as row

do while d1<=d2

nr = tables("表B").addnew

nr("产品") = r("产品")

nr("加工") = d1

nr("数量") = 数量

d1 = d1.adddays(1)

loop

主题：如何生成分录？