资产原值取数 逻辑

逻辑"/>

资产原值取数 逻辑

1、资产总的原值

PS:ANLC中的以前年和本年并非是资产过账类型的以前年和本年，而是当前行ANLC-GJAHR年 年结时以前年的累计，和年结后本年的过账（与资产过账类型的以前年和本年无关）

ANLC-KANSW（以前年） + ANLC-ANSWL(本年)

2、本年原值的取数逻辑

 DATA:BEGIN OF ls_anep,  " 资产本年原值bukrs TYPE anep-bukrs,anln1 TYPE anep-anln1,anln2 TYPE anep-anln2,afabe TYPE anep-afabe,anbtr TYPE anep-anbtr,END OF ls_anep,lt_anep LIKE TABLE OF ls_anep.* 取本年的原值SELECT a~bukrs,a~anln1,a~anln2,a~afabe,SUM( a~anbtr ) AS anbtrFROM anep AS a INNER JOIN t093c AS bON a~gjahr = b~lgjahr   " 资产公司的最新过账年度AND a~bukrs = b~bukrsWHERE a~bukrs EQ @ls_0009-bukrsAND a~anln1 EQ @ls_0009-anln1AND a~bwasl IN (SELECT bwaslFROM tabwWHERE bwagrp IN ('10','11','14','33','25','32') " 本年类型购置增加)GROUP BY a~bukrs, a~anln1, a~anln2, a~afabeINTO CORRESPONDING FIELDS OF TABLE @lt_anep.

3、资产以前年的原值

以前年原值 = 总原值 - 本年原值