예제에서

DATA : progname(8)  TYPE c  VALUE 'CHOI42',  subrname(8)  TYPE c.


subrname  =  'concate'.


TRANSLATE  subrname  TO LOWER CASE.


PERFORM (subrname) in program (progname) if found.

파란색 부분을 임의적으로 바꿨는데 이게 문제가 된거 같지는 않은데

결과가 안뜨네요..^^;;

hong gildong으로 나올줄 알았는데....

이유가 멀까요???

참고로

REPORT  ZCHOI42.

DATA : fname(10) TYPE c,

           lname(10) TYPE c,


           fullname(20) TYPE c.



fname = 'Hong'.

lname = 'GinlDong'.

perform  concate.

form  concate.


  CONCATENATE   fname  lname  INTO fullname SEPARATED BY   space.

  PERFORM out.

  ENDFORM.

  form out.

    WRITE : / fullname.

    ENDFORM.

이게 ZCHOI42 입니다