按部门设置自动日记帐科目-项目案例

rowling.luo

某项目实现按部门设置自动日记帐科目,供大家参考:

科目设置原则：fficeffice" />

1）311部门包、直材进生产成本。

   311部门低、辅、维修进制造费用。

2）非311部门3开头部门，杂项领用均进制造费用（与物料类别无关）。

3）2开头的部门，杂项领用均进销售费用（与物料类别无关）。

4）1开头的部门，杂项领用均进管理费用（与物料类别无关）。

测试案例1：

测试目标：出库操作包装直材、低值维修、天然气物料出库，分部门记入不同科目。

物料出库（包装、直材），出库类型 MIS，对应自动日记帐STKZX

物料         产品分析元   出库数量     出库单价 出库部门

Z0006（STD）  907         1            60.68         311   410103

B0001          802        1            0.29         311   410105

Z0006（STD）  907         1            60.68         320   410524

B0001          802        1           0.29          320     410524

D0001（PMP）  DZ        1             5           301     410524

F0001（PMP）  DZ        1            68.38         101    550225

C10001（PMP） WX        1           1.32          200    550123

 

自动日记帐设置:

行4（复制第3行）： 311部门包、直材出库,记生产成本

[F:SMD]CCE2  = '311' and (left$([F:STJ]ITMREF,1)= 'B' or left$([F:STJ]ITMREF,1)= 'Z')

行5（复制第3行）： 311部门低、辅、维修进制造费用

[F:SMD]CCE2 ='311' and (left$([F:STJ]ITMREF,1)= 'F' or left$([F:STJ]ITMREF,1)= 'C'  or left$([F:STJ]ITMREF,1)= 'D'  )

行6（复制第3行）：非311部门3开头部门，杂项领用均进制造费用

left$([F:SMD]CCE2,1) ='3'  & [F:SMD]CCE2  <> '311'

行7（复制第3行）：2开头的部门，杂项领用均进销售费用。

left$([F:SMD]CCE2,1) ='2'

行8（复制第3行）：1开头的部门，杂项领用均进管理费用。

left$([F:SMD]CCE2,1) ='1'

 

注意检查修改公式中CCE1、CCE2、CCE3、CCE4为SMD表

 

运行结果:

410103 : 生产成本-直接材料   60.68     311

410105 : 生产成本-包装物       0.29    311

410524 : 制造费-物料消耗       0.29    320

                                                         5       301

                                                    60.68    320

550123 : 销售费-物料消耗     1.32      200

550225 : 管理费-物料消耗     68.38     101

121110 : 存货- 原材料直接材料 60.68   311

                                                           60.68   320

121111 : 存货- 包装物                     0.29    311

                                     0.29   320

121113存货- 原材料备品备件   1.32    200

121114存货- 原材料辅助材料  68.38    101

121112 : 存货- 低值易耗       5       301