메뉴 건너뛰기

SAP 한국 커뮤니티

인덱스인터널테이블만들기

천지개벽 2009.01.29 17:19 조회 수 : 5266

  DATA: l_from     LIKE  sy-tabix,
        l_to       LIKE  sy-tabix.
  DATA: BEGIN OF t0003_idx OCCURS 0,   "인덱스 관리
          setname  TYPE  setnamenew,
          from     LIKE  sy-tabix,
          to       LIKE  sy-tabix,
        END   OF t0003_idx.


 CLEAR : lv_index.
  SORT gt_t0003 BY setname act_gpcd.
  LOOP AT gt_t0003 INTO gs_t0003.
    lv_index = lv_index + 1.


    AT NEW setname.
      l_new = 'X'.
    ENDAT.
    IF l_new = 'X'.
      t0003_idx-setname  = gs_t0003-setname.
      t0003_idx-from     = lv_index.
      CLEAR : l_new.
    ENDIF.
    AT END OF setname.
      l_end = 'X'.
    ENDAT.
    IF l_end = 'X'.
      t0003_idx-to     = lv_index.
      APPEND t0003_idx.  CLEAR : t0003_idx.
      CLEAR : l_end.
    ENDIF.
    CLEAR : gs_t0003.
  ENDLOOP.


  SORT t0003_idx BY setname.
 LOOP AT gt_nodes.
*    l_to = l_to + gt_nodes-vcount.
    CLEAR: t0003_idx.
    READ  TABLE t0003_idx
               WITH KEY  setname = gt_nodes-shortname.


    IF sy-subrc <> 0.
      CLEAR: gt_nodes.
      CONTINUE.
    ENDIF.
    LOOP AT gt_t0003 INTO gs_t0003
         FROM t0003_idx-from  TO t0003_idx-to.



    ENDLOOP.
ENDLOOP.

번호 제목 글쓴이 날짜 조회 수
287 단축키입니다 [6] file 머리를쓰자 2014.12.22 5080
286 튜닝교육_실무 [6] file 가보자 2007.04.12 5091
285 Convert SAPScript or ABAP lists to PDF format [6] sapjoy 2007.01.30 5105
284 주민번호 체크로직 [14] 오향 2008.02.29 5105
283 New ABAP Debugger Demo Wise 멘토 2008.12.15 5108
282 요일 찾는 Function [3] Delight 2008.04.23 5112
281 바탕화면에 바로가기 생성하기 [1] 김윤승 2007.06.25 5153
280 화면에 드롭다운 리스트 박스 추가 하기. ABCD [8] 버즈즈 2008.01.04 5177
279 READ_TEXT 관련 [14] file 노름마치 2007.11.15 5180
278 Lock 걸렸을때 푸는 방법 공개합니다. [6] 양갱 2014.12.01 5189
277 엑셀로 데이터 내보내기 샘플 코드 [7] sapjoy 2007.01.26 5193
276 변수를 메모리로 올리는 세가지 방법 [5] sapjoy 2006.12.06 5214
275 일/주/월/분기/년..연산가능 펑션~ [7] 초짜 2007.07.31 5215
274 특수문자가 깨지는 문제-스마트폼 [2] sapjoy 2016.06.21 5245
273 <b>[완료]</b>netweaver 설치중 오류log 원인 아시는분 좀 알려주세요 [1] 카즈키 2008.07.19 5265
» 인덱스인터널테이블만들기 [2] 천지개벽 2009.01.29 5266
271 Report 프로그램 Application Toolbar 에 버튼추가 sapjoy 2006.12.28 5283
270 엑셀 65000 라인초과시 사용 유틸 [5] file GG 2007.08.19 5296
269 SAP에서 바코드 인쇄하기 [1] 홍성현 2007.08.09 5303
268 화면상에 입력된 parameter , selection-option 값 inter table로 담는 펑션 ㅋ [5] file bd 2008.03.25 5307