<ABAP> Data Type을 가져오는 Class (read Data Type, Read type)

이거 그대로 한번 돌려보시길..^^  그런데 더 간단한 소스는 Describe 임...

 

아래 둘다 코딩해 놨으니 비교해보길 바람..

 

참고로 Describe 는 F1 핼프로 해서 찾아보면.. 아래 클래스와 똑같이 전부다 가져오 수 있음..

 

  TYPES:
  my_type TYPE rbetr.

DATA:
  my_data   TYPE my_type,
  descr_ref TYPE ref to cl_abap_typedescr,
  typ(1) type c.


START-OF-SELECTION.
  describe field my_data type typ.

  descr_ref = cl_abap_typedescr=>describe_by_data( my_data ).

  WRITE: / 'Typename:', descr_ref->absolute_name.
  WRITE: / 'Kind    :', descr_ref->type_kind.
  WRITE: / 'Length  :', descr_ref->length.
  WRITE: / 'Decimals:', descr_ref->decimals.
  WRITE: / 'kind:', descr_ref->KIND.
  write: / 'Describe : ', typ.