메뉴 건너뛰기

SAP 한국 커뮤니티

[re] 똑같은 에러가 뜹니다. ^^ ..다시 한번 조언 부탁 드릴께요

이종현 2007.02.10 14:32 조회 수 : 2603 추천:117

답변 정말 감사 합니다.. 오타가 그렇게 있을줄이야..ㅜㅜ
그런데 선배님께서 주신 소스 코드로 다시 해보아도.. 똑 같은 에러 메시지가 뜨네요 ..
에러 메시지에 대해 조금이라도 지식이 있었으면 쉽게 해결 해 보았을 텐데..
아직 공부해나가야 할 길이 멀었네요 .. 앞으로 더욱 열심히 해겠습니다. ㅎㅎ
그리고 .. 오타 다시 수정해서 이렇게 올립니다.
FIND statement가 정의 되지 않았다고 계속 뜨는데 ..
FIND 구문 쪽을 살펴봐도.. 틀린 부분이 없는데도 계속 이렇게 되네요 ..
다시 한번 .. 조언 부탁 드립니다.



----- 수정한 소스 코드 -----------

TYPES:

   BEGIN OF st_flight_c,

        mandt(3)                      TYPE   c,
        carrid(3)                        TYPE   c,
        connid(3)                       TYPE   n,
        fldate(8)                          TYPE   n,
        price(20)                         TYPE   c,
        currency(5)                     TYPE   c,
        planetype(10)                  TYPE   c,
        seatsmax(10)                  type n,
        seatsocc(10)                    TYPE   n,
        paymentsum(22)              TYPE   c,
        seatsmax_b(10)               TYPE   n,
        seatsocc_b(10)                TYPE   n,
        seatsmax_f(10)                TYPE   n,
        seatsocc_f(10)                 TYPE   n,
    END OF st_flight_c,

BEGIN OF st_flight,
            carrid(3)              TYPE c,
            connid(4)          TYPE n,
            fldate                  TYPE d,
            price(9)              TYPE p DECIMALS 2,
            currency(5)        TYPE c,
            planetype(10)     TYPE c,
            seatsmax           TYPE i,
            seatsocc            TYPE i,
END OF st_flight.

DATA :      set_string  type string,
            datastring  TYPE string,
            wa_flight_c TYPE st_flight_c,
            wa_flight     TYPE st_flight.

START-OF-SELECTION.

  CALL FUNCTION 'BC401_GET_SEP_STRING'
*      EXPORTING
*         im_number ='1'
*         im_table_name = 'SFLGHT'
*         im_separator = '#'
*         im_unique = 'X'
       IMPORTING
            ex_string = datastring
       EXCEPTIONS
            no_data   = 1
            OTHERS    = 2.
  IF sy-subrc <> 0.
    MESSAGE a038(bc401).
  ENDIF.


  SHIFT datastring BY 2 PLACES.
  find '##' in datastring.
  IF sy-subrc <> 0.
    MESSAGE a702(bc401).
  ENDIF.

  SPLIT datastring AT '##' INTO set_string datastring.

  SPLIT set_string AT '#' INTO
          wa_flight_c-mandt
          wa_flight_c-carrid
          wa_flight_c-connid
          wa_flight_c-fldate
          wa_flight_c-price
          wa_flight_c-currency
          wa_flight_c-planetype
          wa_flight_c-seatsmax
          wa_flight_c-seatsocc
          wa_flight_c-paymentsum
          wa_flight_c-seatsmax_b
          wa_flight_c-seatsocc_b
          wa_flight_c-seatsmax_f
          wa_flight_c-seatsocc_f.

  MOVE-CORRESPONDING wa_flight_c TO wa_flight.

  WRITE: /
      wa_flight-carrid,
      wa_flight-connid,
      wa_flight-fldate DD/MM/YYYY,
      wa_flight-price CURRENCY wa_flight-currency,
      wa_flight-currency,
      wa_flight-planetype,
      wa_flight-seatsmax,
      wa_flight-seatsocc.


번호 제목 글쓴이 날짜 조회 수
6448 <img src=3.gif border=0>mes table 로 인서트 중 dump 가 발생했습니다 [4] 아밥어렵네요 2009.04.15 7698
6447 [요청]최대값 구하기 [10] 풍뎅이 2007.11.23 7613
6446 [요청]덤프에럽니다. 평소에 쓰는 alv 프로그램 똑같은 형식을 사용해서 alv프로그램을 만들어줬는데요. [2] 아밥걸 2008.07.09 7506
6445 <b>[완료]</b>Class ALV에서요....TOP-OF-PAGE할려면요?? [4] 복만돌이 2008.07.01 7253
6444 <img src=3.gif>CTS 릴리즈 취소하는 방법 좀 알려주세요. [3] 기쁨 2011.01.26 7166
6443 <img src=3.gif><img src=1.gif>SUBMIT 구문을 이용하지 않고 화면의 SPOOL 번호 구하는 방법은 없나요?? 튀밥 2010.04.28 7149
6442 [요청]왕기초질문 LEFT OUTER JOIN [4] 벤또 2007.12.10 7118
6441 <b>[완료]</b>LVC_FIELDCATALOG_MERGE 펑션에 대한 문의 [5] 박상우 2008.07.28 7091
6440 <img src=1.gif>SQL HINT절 (%_HINTS ORACLE'&max_in_blocking_factor 40&'.) 에 대해 질문드립니다. [5] 아밥 2010.03.16 7082
6439 ALV 마이너스 부호 앞으로 옮기기 [1] 모포 2019.07.04 7057
6438 <b>[완료]</b>select count(*) 구문이 어떤 구문인가요?? [6] bd 2008.05.15 7055
6437 <b>[완료]%_hints oracle 'ORDERED USE_NL (T_00 T_01) INDEX (T_00 "ZPP0010T~Z03")'. 어떻게해석하나요?</b> [7] file 하오 2009.02.20 7048
6436 reuse_alv_grid_display 에서 data_change 후에 alv에 refresh하여 뿌리는 방법 좀 부탁드립니다. 리코보코 2020.09.18 7036
6435 4. include structure~ [1] file sapjoy 2007.02.27 7031
6434 <img src=3.gif>소수점 이하 0 지우기 (소수점 값이 없는 부분만 ) [5] 짭군 2009.11.09 7007
6433 [질문]인터널테이블 복사하는 방법은? [4] 나도아밥퍼 2007.05.19 6907
6432 <b>[완료]</b>chain과 endchain의 쓰임새를 정확히 알고싶습니다. LOOP AT IT_ZCATPSTCD. [8] SD2 2008.04.14 6856
6431 [요청]number_get_next 함수 사용법이 궁금합니다. [4] copine 2009.03.24 6757
6430 <b>[완료]</b>CURRENCY 변환 FUNCTION 사용법에 대하여 질문있습니다. [4] with SAP 2007.12.28 6732
6429 [요청]CHECK NOT~ IS INITIAL에 대해 알고 싶습니다. [8] 앙리 2008.01.23 6681