FM FI_AA_VALUES_CALCULATE

            SELECT SINGLE * FROM anlc WHERE bukrs EQ int_tab-bukrs AND
                                            anln1 EQ int_tab-anln1 AND
                                            anln2 EQ int_tab-anln2 AND
                                            gjahr EQ l_gjahr       AND
                                            afabe EQ '01'.
            IF sy-subrc EQ 0.
              CALL FUNCTION 'FI_AA_VALUES_CALCULATE'
                EXPORTING
                  i_anlc  = anlc
                IMPORTING
                  e_anlcv = l_anlcv.
            ENDIF.