안녕하세요.
어제 오늘 서버가 죽어있다가 이제야 되는군요.
지금 날짜 관련된 것을 하고 있는데
제가 입력화면에 7월 5일부터 8월 20일 이렇게 입력했을 경우
7월 5일
7월 6일
7월 7일
7월 8일
...
8월 19일
8월 20일
이렇게 들어오게 하고 싶은데 마땅히 방법이 안 떠오르네요.
그냥 생각하기엔 쉬워보였는데
역시 초보라 어려운 것 같습니다.
방법좀 알려주세요.
댓글 4
-
SARA
2007.08.03 23:04
-
ccc
2007.08.03 23:11
답변 달아주셔서 감사합니다.
internal table에 값이 7월5일부터 8월 20일까지 쭉 들어오게 하고 싶은데.
위 소스만으론 어떻게 해야 할지 모르겠네요.;
-
도도마녀
2007.08.03 23:35
DATA : BEGIN OF it_date OCCURS 0,
zdate LIKE sy-datum,
END OF it_date.
DATA : z_begda LIKE sy-datum,
z_endda LIKE sy-datum,
z_cnt(2) type i.
z_begda = '20070705'.
z_endda = '20070820'.
z_cnt = z_endda - z_begda.
it_date-zdate = z_begda.
append it_date.
clear it_date.
DO z_cnt TIMES.
it_date-zdate = z_begda + sy-tabix.
append it_date.
clear it_date.
ENDDO. -
ccc
2007.08.03 23:50
이제 되는군요.
감사합니다. ^^
FORM date_conversion USING p_date
p_text.
DATA l_datfm TYPE usr01-datfm.
SELECT SINGLE datfm FROM usr01 INTO l_datfm
WHERE bname = sy-uname.
CASE l_datfm.
WHEN '1'.
CONCATENATE p_date+0(2) p_date+2(2) p_date+4(4)
INTO p_text SEPARATED BY '.'.
WHEN '2'.
CONCATENATE p_date+0(2) p_date+2(2) p_date+4(4)
INTO p_text SEPARATED BY '/'.
WHEN '3'.
CONCATENATE p_date+0(2) p_date+2(2) p_date+4(4)
INTO p_text SEPARATED BY '-'.
WHEN '4'.
CONCATENATE p_date+0(4) p_date+4(2) p_date+6(2)
INTO p_text SEPARATED BY '.'.
WHEN '5'.
CONCATENATE p_date+0(4) p_date+4(2) p_date+6(2)
INTO p_text SEPARATED BY '/'.
WHEN '6'.
CONCATENATE p_date+0(4) p_date+4(2) p_date+6(2)
INTO p_text SEPARATED BY '-'.
WHEN '7'.
CONCATENATE p_date+0(4) '월' p_date+4(2) '일' p_date+6(2) '시간'.
WHEN OTHERS.
ENDCASE.
ENDFORM. " date_conversion
이런식으로 하면 되지 않을까요?