data: n_mnth11 type string,
n_year11 type d.
n_year11 = n_year.
n_date = itab-revise_date+6(2).
CONCATENATE itab-revise_date+4(2) n_mnth11 itab-revise_date+6(2)
into nextdate.
와 같이 주면
n_year = 0000
n_mnth11 = 12
itab-revise_date+6(2) = 00일때
concatenate를 하면 nextdate에
아래의내용처럼 찍힙니다.
000012 0
00001200으로 찍히는게 맞는것 같은데, 제가 잘못 처리한건가요
댓글 4
-
지의
2007.11.27 00:55
n_mnth11 가 length 가 2자리가 아닌가보죠. -
hongman
2007.11.27 01:37
실제로 itab-revise_date+6(2)의 값이 00으로 들어있다면 00001200 이와같이 찍히는게 맞습니다.
제가 볼때는 itab-revise_date+6(2) 이 값이 0으로 들어있다고 밖에....
한번 확인해 보시져?...
-
노름마치
2007.11.27 01:45
* 혹여 이 아래 펑션중에 사용가능한게 있지 않을까요,,,,
* NEXT DATE 를 구하려고 하시는 것 같아서요
DATA in_datum TYPE sy-datum.
DATA out_datum TYPE sy-datum.
in_datum = sy-datum.
*" 작업가능일(WORKING DAY 기준) 구하기
CALL FUNCTION 'BKK_ADD_WORKINGDAY'
EXPORTING
i_date = in_datum " 기준일자
i_days = '2' " Working day기준 + 2일 후
i_calendar1 = 'KR' " 작업달력
IMPORTING
e_date = out_datum. " Working day기준 + 2일
*=========================================================
*" Date +/- year/month/day
CALL FUNCTION 'J_1H_CAL_DATE_IN_INTERVAL'
EXPORTING
date = in_datum " 기준일자
days = '01' " +/- 일
months = '00' " +/- 월
signum = '-' " +/-
years = '00' " +/- 년
IMPORTING
calc_date = out_datum. " 기준일자 - 1
*=========================================================
*" 해당월의 시작일과 마지막일자
CONCATENATE sy-datum(6) '01' INTO in_datum.
CALL FUNCTION 'LAST_DAY_OF_MONTHS'
EXPORTING
day_in = in_datum " 시작일자
IMPORTING
last_day_of_month = out_datum " 마지막일자
EXCEPTIONS
day_in_no_date = 1
OTHERS = 2.
*=========================================================
*" 일자에 대해 숫자로 변환(월요일 = '1')
DATA l_chasu TYPE c.
CALL FUNCTION 'DATE_COMPUTE_DAY'
EXPORTING
date = in_datum
IMPORTING
day = l_chasu. -
풍뎅이
2007.11.27 03:10
itab-revise_date+6(2) 이 값은 00이 맞습니다.
많이 힘이 드네요..
