資產原值取數 邏輯

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、資產以前年的原值

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