DATA: BEGIN OF series,
n1 TYPE i VALUE 10,
n2 TYPE i VALUE 20,
n3 TYPE i VALUE 30,
n4 TYPE i VALUE 40,
n5 TYPE i VALUE 50,
n6 TYPE i VALUE 60,
END OF series.
DATA sum TYPE i.
ADD series-n1 THEN series-n2 UNTIL series-n5 GIVING sum. ==>이부분 해석 부탁드립니다.
댓글 4
-
지의
2007.11.16 23:24
-
order001
2007.11.17 00:21
답변 감사드립니다.^^!
series-n1 필드에서 series-n2 필드로 합산 하기 위한 순번을 정한다는 것이 정확히 어떤의미인지 잘모르겠습니다.
그리고 죄송하지만 하나더 질문드릴께요..
add series-n2 then series-n3 until series-n6 to sum. 이라는 구문에서 to가 의미하는것이 무엇인가요?
-
지의
2007.11.17 00:24
아래 소스 테스트 해보세요.
DATA: BEGIN OF numbers,
one TYPE p LENGTH 8 DECIMALS 0 VALUE 10,
two TYPE p LENGTH 8 DECIMALS 0 VALUE 20,
three TYPE p LENGTH 8 DECIMALS 0 VALUE 30,
four TYPE p LENGTH 8 DECIMALS 0 VALUE 40,
five TYPE p LENGTH 8 DECIMALS 0 VALUE 50,
END OF numbers,
sum TYPE i.
sum = 100.
ADD numbers-one THEN numbers-two
UNTIL numbers-four
GIVING sum.
WRITE sum.
CLEAR sum.
sum = 100.
ADD numbers-one THEN numbers-two
UNTIL numbers-four
TO sum.
WRITE sum. -
order001
2007.11.17 01:01
네알겠습니다.^^
이거 답변 달고 보니 같은 말이네..
해석 해드리면
ADD series-n1 THEN series-n2 -> series-n1 필드에서 series-n2 필드로 합산 하기 위한 순번을 정하는데
UNTIL series-n5 -> series-n5 필드까지 계산식에 넣을 것이고
GIVING sum. -> 합산한 값을 sum 에 넣어주겠다는 말입니다.
ADD 문은 더하기 를 하는 명령어 입니다.
DATA: BEGIN OF series,
n1 TYPE i VALUE 10,
n2 TYPE i VALUE 20,
n3 TYPE i VALUE 30,
n4 TYPE i VALUE 40,
n5 TYPE i VALUE 50,
n6 TYPE i VALUE 60,
END OF series.
DATA sum TYPE i.
ADD series-n1 THEN series-n2 UNTIL series-n4 GIVING sum. "series-n5 GIVING sum.
뒤에 5를 4로 바꿧습니다. 테스트 해보시면 이해하기 더 좋을 겁니다.
수고하세요.