메뉴 건너뛰기

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 부분이 어려운거같네요 초보라서 죄송합니다 ㅜㅜ


 


 



번호 제목 글쓴이 날짜 조회 수
6447 생산 오더(COOIS) 강제 완료 방법 문의 [2] 미자나즈 2023.05.24 787
6446 프로그램 코드 다운로드, 업로드 방법을 알고 싶습니다. [2] yoon123 2023.05.22 472
6445 No more storage space available for extending an internal table. [3] repairbalm 2023.05.16 436
6444 ALV 열 합치기 문의 [1] lalabula256 2023.04.29 565
6443 개발패키지 전체 CTS 옵션 문의 [3] file 백상아리 2023.04.28 626
6442 BDC 프로그램을 위해 레코등을 하는데요 [1] yoon123 2023.04.23 337
6441 sap gui에서는 보이는 아이콘이 fiori에서는 안보이는 문제 [4] file sapsap 2023.04.20 402
6440 ABAP 디버깅시 모드대화상자에서 call screen 허용되지 않습니다. [1] 슈퍼맨 2023.04.20 323
6439 초보질문이요. parameter field is unknown. error.. [4] rioss1004 2023.04.14 512
6438 CBO 테이블 컬럼 크기 질문 [2] bonggu 2023.04.06 731
6437 ABAP 테이블 데이터에 각각의 파일 업로드 하는 방법 [2] GPARK 2023.04.03 479
6436 a테이블과 b테이블 조인시 값제외....도와주세요 [7] 먹다망고야 2023.03.17 1709
6435 VL02 굿이슈 리스트 볼 수 있는법 [3] blouson1 2023.03.16 292
6434 PDA 세팅 [1] sapecc6 2023.03.16 205
6433 넘버 레인지 생성 시 도메인의 값테이블이 없다고 뜹니다. [2] 내추럴한산호가지 2023.03.16 389
6432 자재 출고 처리 시 표준원가 변경 관련 문의 건 산에서삽질 2023.03.11 255
6431 https 통신 실패 관련 문의 [1] ssaapp 2023.03.10 826
6430 SAP BSP 오류가 납니다. [2] yoon123 2023.03.06 417
6429 SAP 에러 "SAPMM07I 0731 화면에 대한 배치 입력 데이터가 없습?" [1] saq왕초보 2023.03.03 962
6428 LSMW with 펑션 [1] file 제니킴킴. 2023.02.23 309