主题：BOM需求核算

根据生产计划生成的物料需求BOM，可以按照计划单号生成折叠吗？
此主题相关图片如下：qq截图20230105163951.png

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:bom成本.foxdb

想根据生产批号、母件编码和子件编码生成折叠BOM，想这样查看每个产品的成本情况

但是搞来搞去都是乱的

生产批号与母件编码是使用普通型，

但是母件编码与子件编码应该是使用内联型吧

甘样折叠出来的并不是完整的产品BOM

倒把产品BOM折分成好几个层级了

现在想要的是：按订单生成产品BOM，订单号在BOM表的列是相同的，而母件编码与子件编码是BOM

现在就是假如有多个订单，现在按订单产品生成了BOM，想按订单的产品的BOM生成折叠

如果使用代码组合成一列，生成："订单号.母件编码.子件编码",再使用层级型生成折叠

增加个表达式也是不行，增加的表达式：："订单号.母件编码.子件编码",层级也是做不了

中间的层级表达式增加不了

有点蓝老师，怎样用递归的方法把订单号   母件编码   子件编码，组合成一个完整的层级编码

现在的问题是在生产批号，母件编码  子件编码列不变的情况，怎样去改，改到符合要求

增加后，编码还是要处理下才行，可能要使用到递归的原理进行处理

此主题相关图片如下：qq截图20230106113210.png

这个使用内联折叠，折叠后的层级都乱了的，这个是什么原因

本来是第三层的，跑到第二层去了，都不是一层层排下去的

Dim st As New InlineTreeSetting
st.ParentCol = "母件编码"''''字符型，指定父列名称
st.ChildCol = "子件编码"'''''''字符型，指定子列名称
'st.SortCol = "子件名称"'''''字符型，指定排序列，参考：指定排序列  保存行顺序
st.ExpandTo = -1 '''整数型，指定折叠树默认展开级别，默认为0,也就是都不展开，如果设置为-1，则全部展开
st.AggregateCols = {"用量", "数量", "金额"}''''''字符数组，指定要汇总的列，参考：汇总数据  汇总值和原始值
st.UseStyle = True''''' 逻辑型，是否使用样式区分分组行，参考：使用样式区分行
'st.SortDesc = True''''逻辑型，是否降序排序
st.TreeCol = "母件编码"''''''字符型，指定折叠树显示列名称，如果不设置，默认显示在子列
Tables("订单BOM.订单BOM明细").ShowGridTree(st)