MAINAxcp500成本计算逻辑流程图Madebyliudong2012/05/30ForTOPGP5.25.05V1.0P500()成本计算主函数P500_get_date()取得当期起止日和上一期年/期P500_last0()取期初开帐/上月期末结存到本月期初P500_tlfcost_upd()更新tlfcost的值P500_ccc_0()将当前料的ccc_file清0先计算一般工单的在制P500_ccc_0()将当前料的ccc_file清0P500_last()按料件取期初开帐/上月期末到本月是否99阶否P500_wip()计算后&是P500_wip()计算料件的工单-取工单循环处理Wip_del()删cch/ccg/cceWip_1()计算主件部分Wip_2()计算元件投入Wip_3()计算元件转出Wip_4()计算主件SUMP500_mccg_0()ccg归0Wip_ccg20()统计工时Wip_ccg31()主件转出Wip_2_1()元件期初Wip_2_21()元件投入Wip_ccg21()依元件计算主件实际投入Wip_2_22()计算DL+OH+SUBWip_2_23()计算ADJUSTWip_32()实际成本转出P500_sub()计算取替代元件转出依参数计算人工制费转出判断成本阶变化P500_rework()计算上阶返工工单判断该成本阶是否可返工否P500_rework1()计算在制与转出-取料件循环处理是P500_wip_rework()计算返工工单-取工单循环处理P500_rework2()计算出库成本及结存-取料件循环处理P500_ccg2_cost()计算在制品返工入库P500_ccc_tot('2')计算所有出库成本及结存P500_ccc_upd()更新cccP500_tlf()由tlf_file计算料件的出入库数量和金额P500_ccb_cost()计算入库调整部分是否99阶P500_ccg_cost()计算在制品入库是P500_ccc_tot('1')计算所有出库成本及结存P500_ccc_ins()记录ccc资料否P500_can_upd()计算销货收入调整P500_reshare()上阶联产品计算发生变化时举例：2à1P500_rework()处理最高阶的返工P500_reshare()处理最高阶的联产品P500_wipx0()记录拆件工单在制成本-取料件循环处理P500_wipx()记录拆件投入与转出-取工单循环处理Wipx_del()cct/ccu清0Wipx_1()拆件主件投入-统计工时&插入cctWipx_2()计算拆件工单元件投入Wipx_2_1()拆件元件期初Wipx_2_21()拆件本期投入Wipx_2_21()本期投入人工制费Wipx_2_23()本期调整成本Wipx_3()计算拆件工单的转出Wipx_2_24()整理转出后期末或差异金额Wipx_4()计算拆件工单主件SUM(ccu)P500_ccc_tot('2')计算所有出库成本及结存P500_ccc_upd()更新cccP500_reshare2()拆件入库分摊-取ccu料件循环P500_cct2ccg()将cct写入ccg&ccu写入cchP500_ccg5_cost()拆件式入库计算-写入ccc31/ccc32P500_ccc_tot('4')计算所有出库成本及结存P500_ccc_upd()更新ccc判断tlf异动单别否程序逻辑结束开始循环依成本阶排序汇整要计算的料件顺序为：99à0至此一个循环结束跳至开始循环处进行下一个料件的计算开始循环按料件+日期区间抓取tlf_file异动销货/销退计算ccc61/ccc81/ccc63/ccc64/ccc65杂项领用/报废/营运中心间调拨出写入ccc41P500_ccc63_cost(u_sign,l_tlf66)工单发料/重工领出分别写入ccc31/ccc25工单入库/重工入库分别写入ccc21/ccc27/ccc22P500_ccc22_cost()计算本月入库杂项入库/同业借料/还料/营运中心间调拨入/直接调拨ccc21/ccc43/ccc22组合单入库/拆解单领用ccc21/ccc43/ccc22组合单领用/拆解单入库ccc41其他入库项计算ccc21/ccc22调整/盘差计算ccc51/ccc71计算入库数量明细杂项入/营运中心调拨入/直接调拨入p500_ccc44_cost()组合/拆解p500_get_atmt26(l_tlf907)一般采购入库抓取立账金额写入ccc22P500_ccc_tot(p_sw)计算所有出库成本及结存判断p_sw本月重工领出p500_ccc_ccc26()2成本单价计算p500_ccc_ccc23()重统计出入库成本p500_tlf21_upd()1,3,4杂发/报废依参数取当月成本或杂项认定成本写入ccc42至此一个循环结束查找该料的下一个tlf异动资料当站下线取下线时记录的金额作为工单领用的负项写入ccc32两阶段调拨出取当月成本单价写入ccc42此子流程结束一般工单领用取当月成本单价写入ccc32销售成本取当月成本单价写入ccc66调整/盘点成本取当月成本单价分别写入ccc52/ccc72Function-aFunction-bFunction-A调用顺序执行Howtoread?P500_chk()检查是否抛转凭证P500_del()删除旧的统计档
