金蝶云星空拆分录二次开发


有客户需求按照一定的规则将一条分录拆成多条分录,比如物料的数量是1400,那么按照数量500的标准来拆分录,那么需要将原来的分录拆成500,500,400这三条分录,之前使用的方法是用this.View.Model.CreateNewEntryRow("FT_BD_CUSTLOCATION")和this.View.Model.SetValue()来完成拆分录,这样需要添加的字段较多,但是依然能达到效果。问题是这样拆分录之后,单据的关联关系被破坏了,上查和下查都查不到关联的单据了,所以需要使用clone()的方法来完成拆分录,示例代码如下:

DynamicObject obj = this.View.Model.DataObject as DynamicObject;//构建整个单据的数据包
Entity entity = this.View.BusinessInfo.GetEntity("FTreeEntity");//构建单据体数据包
DynamicObjectCollection entityrows = entity.DynamicProperty.GetValue(obj) as DynamicObjectCollection;//构建单据行数据包

DynamicObject EntryRow = entityrows[i].Clone() as DynamicObject;//克隆单据体的第i行

EntryRow["Seq"] = Seq;//给单据行的具体字段进行赋值
EntryRow["RowId"] = System.Guid.NewGuid().ToString();
entityrows.Add(EntryRow);//将克隆出来的新行添加到单据体数据包中

 

用这种方式做的拆单功能不会破坏单据的转换关系,上查下查都没有问题!


免责声明!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。



 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM