资产原值取数 逻辑

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 anbtr
        FROM anep AS a INNER JOIN t093c AS b
          ON a~gjahr = b~lgjahr   " 资产公司的最新过账年度
         AND a~bukrs = b~bukrs
          WHERE a~bukrs EQ @ls_0009-bukrs
            AND a~anln1 EQ @ls_0009-anln1
            AND a~bwasl IN (
                SELECT bwasl
                  FROM tabw
                    WHERE bwagrp IN ('10','11','14','33','25','32') " 本年类型购置增加
                  )

        GROUP BY a~bukrs, a~anln1, a~anln2, a~afabe
        INTO CORRESPONDING FIELDS OF TABLE @lt_anep
        .

3、资产以前年的原值

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