求助： 彷徨中

freeenter

现有一程式设计，在库要求默认先进先出，还可以选择特定入库批次。
全部有200多个品名，每次入库若干商品，指定入库单号（发票号），商品买卖单价决定。
例：   入库单号    商品名     数量      买价     卖价
           001          轴承       500       200      300
           001          螺栓       700          1          2
           002          轴承       100       220      310
           002          螺栓       100          2          4
出库时分各发票中分别削减，不是再库余额数的削减。再根据入库单价发行销售清单，计算出成本，并列出清单。
根据上例：
          1。销售清单
              销售发票号    商品名     数量           卖单价
                 AAA          轴承       550              300.91=（500*300+50*310）/550
                 BBB           螺栓       200                 2

          2. 计算出成本
入库单号    商品名     数量      买价     卖价
           001          轴承       500       200      300
           001          螺栓       700          1          2
           002          轴承       100       220      310
           002          螺栓       100          2          4