• 博客园logo
  • 会员
  • 众包
  • 新闻
  • 博问
  • 闪存
  • 赞助商
  • HarmonyOS
  • Chat2DB
    • 搜索
      所有博客
    • 搜索
      当前博客
  • 写随笔 我的博客 短消息 简洁模式
    用户头像
    我的博客 我的园子 账号设置 会员中心 简洁模式 ... 退出登录
    注册 登录
拿一份干净工资,过一个简单生活
c#——最优雅的语言
博客园    首页    新随笔    联系   管理    订阅  订阅
ERP产品价格成本计算的几个方法

一般财务计算产品价格又很多方法,我这里做了几个供参考,实体属性主要是编号、数量、价格等,这里就不列出了。

       /// <summary>
        /// 先进先出算法
        /// </summary>
        /// <param name="inRecord">入库记录(一个周期内)</param>
        /// <param name="outRecord">出库记录(一个周期内)</param>
        /// <returns>InventoryPrice为结果价格</returns>
        public List<BaseStock> ComputerPriceFIFO
            (List<BaseStock> inRecord, List<BaseStock> outRecord)
        {
            //排序
            var inList = (from o in inRecord
                          orderby o.CDate
                          select o).ToList();

            var outList = (from o in outRecord
                           orderby o.CDate
                           select o).ToList();

            foreach (var outItem in outList)
            {
                //当前条已出部分金额
                decimal money = 0;
                //当前还需出的数量
                decimal qty = outItem.Qty;
                foreach (var inItem in inList)
                {
                    //如果当前这一条够出库,那么结束去计算价格
                    if (inItem.Qty > qty)
                    {
                        money = money + inItem.Price * qty;
                        //更新入库表  
                        inItem.Qty = inItem.Qty - qty;
                        break;
                    }
                    else
                    {
                        qty = qty - inItem.Qty;
                        money = money + (inItem.Price * inItem.Qty);
                        //更新入库表  
                        inItem.Qty = 0;
                    }
                }
                //计算出货价格
                outItem.Price = money / outItem.Qty;
            }

            return outList;
        }

        /// <summary>
        /// 后进先出算法
        /// </summary>
        /// <param name="inRecord">入库记录(一个周期内)</param>
        /// <param name="outRecord">出库记录(一个周期内)</param>
        /// <returns>InventoryPrice为结果价格</returns>
        public List<BaseStock> ComputerPriceFOFI
            (List<BaseStock> inRecord, List<BaseStock> outRecord)
        {
            //排序
            var inList = (from o in inRecord
                          orderby o.CDate descending
                          select o).ToList();

            var outList = (from o in outRecord
                           orderby o.CDate
                           select o).ToList();

            foreach (var outItem in outList)
            {
                //当前条已出部分金额
                decimal money = 0;
                //当前还需出的数量
                decimal qty = outItem.Qty;
                foreach (var inItem in inList)
                {
                    //如果当前这一条够出库,那么结束去计算价格
                    if (inItem.Qty > qty)
                    {
                        money = money + inItem.Price * qty;
                        //更新入库表  
                        inItem.Qty = inItem.Qty - qty;
                        break;
                    }
                    else
                    {
                        qty = qty - inItem.Qty;
                        money = money + (inItem.Price * inItem.Qty);
                        //更新入库表  
                        inItem.Qty = 0;
                    }
                }
                //计算出货价格
                outItem.Price = money / outItem.Qty;
            }

            return outList;
        }

        /// <summary>
        /// 加权平均算法
        /// </summary>
        /// <param name="inRecord">入库记录(一个周期内)</param>
        /// <param name="outRecord">出库记录(一个周期内)</param>
        /// <param name="prePrice">上期价格</param>
        /// <param name="preQty">上期数量</param>
        /// <returns></returns>
        public List<BaseStock> ComputerPriceBalance
            (List<BaseStock> inRecord, List<BaseStock> outRecord,
            decimal prePrice, decimal preQty)
        {
            decimal money = 0;
            decimal qty = 0;
            foreach (var inItem in inRecord)
            {
                money = money + inItem.Price * inItem.Qty;
                qty = qty + inItem.Qty;
            }

            decimal price = (money + prePrice * preQty) / (qty + preQty);

            foreach (var outItem in outRecord)
            {
                outItem.Price = price;
            }

            return outRecord;
        }

        /// <summary>
        /// 移动加权平均算法
        /// </summary>
        /// <param name="inRecord">入库记录(一个周期内)</param>
        /// <param name="outRecord">出库记录(一个周期内)</param>
        /// <param name="prePrice">上期价格</param>
        /// <param name="preQty">上期数量</param>
        /// <returns></returns>
        public List<BaseStock> ComputerPriceTrack
            (List<BaseStock> inRecord, List<BaseStock> outRecord,
            decimal prePrice, decimal preQty, DateTime preDate)
        {
            //排序
            var outList = (from o in outRecord
                           orderby o.CDate
                           select o).ToList();


            List<Guid> preDetail_IDs = new List<Guid>();
            foreach (var outItem in outList)
            {
                //取出比当前出库记录要早的入库记录,并且排除已经结算的记录
                var inList = (from o in inRecord
                              where o.CDate <= outItem.CDate
                              && !preDetail_IDs.Contains(o.Detail_ID)
                              orderby o.CDate
                              select o).ToList();

                decimal money = 0;
                decimal qty = 0;
                foreach (var inItem in inList)
                {
                    money = money + inItem.Price * inItem.Qty;
                    qty = qty + inItem.Qty;
                    preDetail_IDs.Add(inItem.Detail_ID);
                }

                outItem.Price = (money + prePrice * preQty) / (qty + preQty);

                //修改上期价格和数量
                prePrice = outItem.Price;
                preQty = qty - outItem.Qty;

            }

            return outList;
        }

 

 

posted on 2013-01-25 14:22  老头  阅读(1010)  评论(0)    收藏  举报
刷新页面返回顶部
博客园  ©  2004-2025
浙公网安备 33010602011771号 浙ICP备2021040463号-3