VALUE(E_RLTGR_SHORT) LIKE DD04T-SCRTEXT_S
VALUE(E_RLTYP_SHORT) LIKE DD04T-SCRTEXT_S
VALUE(E_SCRTEXT_S) LIKE DD04T-SCRTEXT_S
VALUE(TEXT_SHORT) LIKE DD04T-SCRTEXT_S
REFERENCE(E_SCRTEXT_S) TYPE DD04T-SCRTEXT_S
VALUE(SI) LIKE DD04T-SCRTEXT_S
VALUE(RE) LIKE DD04T-SCRTEXT_S
VALUE(IN) LIKE DD04T-SCRTEXT_S
VALUE(INF) LIKE DD04T-SCRTEXT_S
VALUE(ATN) LIKE DD04T-SCRTEXT_S
VALUE(BTN) LIKE DD04T-SCRTEXT_S
VALUE(ETN) LIKE DD04T-SCRTEXT_S
VALUE(RTN) LIKE DD04T-SCRTEXT_S
VALUE(AD) LIKE DD04T-SCRTEXT_S
VALUE(NR0) LIKE DD04T-SCRTEXT_S