메뉴 건너뛰기

SAP 한국 커뮤니티

<img src=2.gif>DEMO_DYNPRO_TABCONT_LOOP 예제소스 질문드립니다.

안녕아밥 2011.03.29 18:47 조회 수 : 2681

DEMO_DYNPRO_TABCONT_LOOP


 


REPORT demo_dynpro_tabcont_loop.


CONTROLS flights TYPE TABLEVIEW USING SCREEN 100.


DATA: ok_code TYPE sy-ucomm,
      save_ok TYPE sy-ucomm.


DATA: itab TYPE TABLE OF demo_conn,
      fill TYPE i.
TABLES demo_conn.


DATA: lines TYPE i,
      limit TYPE i.


SELECT * FROM spfli INTO CORRESPONDING FIELDS OF TABLE itab.


CALL SCREEN 100.


MODULE status_0100 OUTPUT.
  SET PF-STATUS 'SCREEN_100'.
  DESCRIBE TABLE itab LINES fill.
  flights-lines = fill.
ENDMODULE.


MODULE fill_table_control OUTPUT.
  READ TABLE itab INTO demo_conn INDEX flights-current_line.
ENDMODULE.


MODULE cancel INPUT.
  LEAVE PROGRAM.
ENDMODULE.


MODULE read_table_control INPUT.
  lines = sy-loopc.
  MODIFY itab FROM demo_conn INDEX flights-current_line.
ENDMODULE.


MODULE user_command_0100 INPUT.
  save_ok = ok_code.
  CLEAR ok_code.
  CASE save_ok.
    WHEN 'NEXT_LINE'.
      flights-top_line = flights-top_line + 1.
      limit = fill - lines + 1.
      IF flights-top_line > limit.
        flights-top_line = limit.
      ENDIF.
    WHEN 'PREV_LINE'.
      flights-top_line = flights-top_line - 1.
      IF flights-top_line < 0.
        flights-top_line = 0.
      ENDIF.
    WHEN 'NEXT_PAGE'.
      flights-top_line = flights-top_line + lines.
      limit = fill - lines + 1.
      IF flights-top_line > limit.
        flights-top_line = limit.
      ENDIF.
    WHEN 'PREV_PAGE'.
      flights-top_line = flights-top_line - lines.
      IF flights-top_line < 0.
        flights-top_line = 0.
      ENDIF.
    WHEN 'LAST_PAGE'.
      flights-top_line =  fill - lines + 1.
    WHEN 'FIRST_PAGE'.
      flights-top_line = 0.
  ENDCASE.
ENDMODULE.


 


 


 


MODULE fill_table_control OUTPUT.
READ TABLE itab INTO demo_conn INDEX flights-current_line.
ENDMODULE.


 


디버깅을 하다보면 itab 의 라인수는 19인데요 왜 인덱스가 10까지만 도는지 궁금합니다.


실행을 하면 10라인까지만 화면에 보여지기때문에 그런가여?


 


MODULE user_command_0100 INPUT. 이부분이 어려운거 같은데


그냥 암기하는게 나을까여?


TYPE-M 부분이 어려운거같네요 초보라서 죄송합니다 ㅜㅜ


 


 



번호 제목 글쓴이 날짜 조회 수
6367 [질문] 스텐다드 화면 별 기능 수정 방법 [3] hibernate 2022.06.24 745
6366 스탠다드와 CBO 테이블이 나뉘는 이유가 궁금합니다 [2] 아밥린이 2022.06.21 2710
6365 PERFORM 구문 자주 사용 여부 [4] dev 2022.06.14 515
6364 ABAP Trial 서버에서 SE16N 기능 여부 [2] dev 2022.06.13 506
6363 call browser [2] sapecc6 2022.06.11 777
6362 테이블 데이터 중 근사치 값 선택하기 [5] 시원한바람 2022.06.10 452
6361 SO_DOCUMENT_SEND_API1 메일 첨부파일 1개 이상 가능 여부 [3] file alarm 2022.06.09 978
6360 SO_DOCUMENT_SEND_API1 함수 사용하여 메일링 기능 사용 중 문의사항이에요! [3] file alarm 2022.06.09 588
6359 solix ITAB -> Xstring 변환중 렝스길이.. [4] 먹다망고야 2022.06.07 597
6358 달력에 공휴일 지정하려면 어떻게 해야하나요? [1] yoon123 2022.06.03 779
6357 SAPGUI 엔터 키 사용 문의 입니다. [4] 십년만에 2022.06.02 548
6356 se11의 Width of Output List 에 대해 [2] file amelia 2022.05.18 434
6355 데이터 추출 [3] 블랙 2022.04.27 646
6354 pdf file 업로드 및 출력 [2] sapecc6 2022.04.23 739
6353 Desktop Office Integration in the webgui 문의.. [2] file Zekokim 2022.04.20 646
6352 abap -> asws s3 접근 코딩... [1] sapecc6 2022.04.19 400
6351 디버깅 시 데이터 나오는데 실행시키면 안나오는 이유 [1] cpfl 2022.04.16 513
6350 ALV 변경된 LAYOUT에 저장되어 있는 필드 찾는법 [1] jini 2022.04.09 929
6349 ALV GRID 에서 값 수정 후 DUMP 에러로 GETWA_NOT_ASSIGNED 가 뜹니다. [1] file 메론쥬스 2022.04.08 885
6348 webgui에서 영역 메뉴 바로 호출하는 방법 Zekokim 2022.04.06 515