503 페이지에 나오는 동적 필드 할당의 예제를 아래와 같이 작성해봤습니다.


FIELD-SYMBOLS <FS>.
DATAFNAME(10TYPE C.
DATASUM LIKE COSP-WTG001.
DATANIDX  TYPE VALUE LENGTH 2.

DO 12 TIMES.
CONCATENATE 'COSP-WGT' NIDX INTO FNAME.


  WRITE/  FNAME.
  ASSIGN (FNAMETO <FS>.
  SUM SUM + <FS>.
  CLEAR FNAME", <FS>.
  CLEAR<FS>.

  NIDX NIDX + 1.
ENDDO.


그런데 CLEAR: <FS>에서 DUMP ERROR가 발생합니다.

문제가 뭔지 알 수 있을까요?