Pls ask your abaper to create a program for undermentioned correction instruction and then execute that program for affected assets.
To avoid the issue to arise in the future pls check note 1609794 and ensure all the necessary note are applied in your system as mentioned in the above note.
*&---------------------------------------------------------------------*
*& Report ZACORR_HAS_TDDP_DELETE
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT zacorr_has_tddp_delete.
DATA lt_anla TYPE TABLE OF anla.
DATA: ls_anla TYPE anla.
DATA: lt_anlbza TYPE TABLE OF anlbza.
PARAMETERS: p_bukrs TYPE anla-bukrs..
PARAMETERS: p_anln1 TYPE anla-anln1.
PARAMETERS: p_anln2 TYPE anla-anln2 DEFAULT '0000'.
DATA: ld_has_tddp TYPE anla-has_tddp.
ls_anla-bukrs = p_bukrs.
ls_anla-anln1 = p_anln1.
ls_anla-anln2 = p_anln2.
* Read Masterdata => Must exist!
CALL FUNCTION 'ANLA_READ_SINGLE'
EXPORTING
f_anla = ls_anla
IMPORTING
f_anla = ls_anla
EXCEPTIONS
not_found = 1
selbst_gesperrt = 2
OTHERS = 8.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE 'E' NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
CALL FUNCTION 'ANLBZA_READ_MULTIPLE_AFABE'
EXPORTING
i_anln1 = p_anln1
i_anln2 = p_anln2
i_bukrs = p_bukrs
i_lock = ' '
TABLES
t_anlbza = lt_anlbza[]
EXCEPTIONS
not_found = 1
OTHERS = 2.
IF NOT lt_anlbza[] IS INITIAL.
WRITE:/'Asset ',
p_bukrs,
p_anln1,
p_anln2,
' has ANLBZA (Time-Dependent Depreciation Terms)'.
ELSE.
IF ls_anla-has_tddp IS INITIAL.
WRITE:/'NO UPDATE - Asset ',
p_bukrs,
p_anln1,
p_anln2,
' is ok '.
ELSE.
update anla set has_tddp = ld_has_tddp where bukrs = p_bukrs
and anln1 = p_anln1
and anln2 = p_anln2.
COMMIT WORK.
WRITE:/'The following asset has been updated successfully:', p_bukrs,
p_anln1,
p_anln2.
ENDIF.
ENDIF.