report zsalv_035 .
data gt_itab type table of sflight.
data gr_table type ref to cl_salv_table.
data gr_functions type ref to cl_salv_functions_list.
data gr_container type ref to cl_gui_custom_container.
data ok_code type syucomm.
select * from sflight into table gt_itab
up to 25 rows.
call screen 100.
*&---------------------------------------------------------------------*
*& Module 0100_PBO OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
module 0100_pbo output.
set pf-status '0100'.
if gr_container is not bound.
*1. 컨테이너 생성
create object gr_container
exporting
container_name = 'CONTAINER'.
*2. ALV 테이블 및 데이터 전달
cl_salv_table=>factory(
exporting
r_container = gr_container
container_name = 'CONTAINER'
importing
r_salv_table = gr_table
changing
t_table = gt_itab ).
*3. ALV 기본 기능 버튼 설정
gr_functions = gr_table->get_functions( ).
* gr_functions->set_default( ).
gr_functions->set_all( abap_true ).
include <icon>.
data : l_icon type string.
l_icon = icon_refresh.
gr_functions->add_function(
name = 'REFRESH'
icon = l_icon
text = 'REFRESH'
tooltip = 'REFRESH'
position = if_salv_c_function_position=>right_of_salv_functions
).
*4. ALV 호출
gr_table->display( ).
endif.
endmodule. " 0100_PBO OUTPUT
*&---------------------------------------------------------------------*
*& Module 0100_PAI INPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
module 0100_pai input.
case ok_code.
when 'BACK' or 'EXIT' or 'CANC'.
set screen 0.
leave screen.
endcase.
endmodule. " 0100_PAI INPUT
댓글 0
| 번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
|---|---|---|---|---|
| 510 | REPORT Z03_010 [2] | sapjoy | 2007.05.14 | 2655 |
| 509 | REPORT Z03_013 [4] | sapjoy | 2007.05.14 | 2388 |
| 508 | REPORT Z03_015 | sapjoy | 2007.05.14 | 2131 |
| 507 | REPORT Z03_016 [1] | sapjoy | 2007.05.14 | 2220 |
| 506 | TYPE-POOL ztgrp [1] | sapjoy | 2007.05.14 | 2699 |
| 505 | REPORT Z03_020 | sapjoy | 2007.05.15 | 2166 |
| 504 | REPORT Z03_021 [5] | sapjoy | 2007.05.15 | 2737 |
| 503 | REPORT z03_022 [2] | sapjoy | 2007.05.15 | 2111 |
| 502 | REPORT z03_026 | sapjoy | 2007.05.15 | 2313 |
| 501 | REPORT z03_029 [1] | sapjoy | 2007.05.15 | 2132 |
| 500 | REPORT Z03_028 | sapjoy | 2007.05.15 | 2102 |
| 499 | REPORT Z03_030 | sapjoy | 2007.05.15 | 2166 |
| 498 | REPORT Z04_001 | sapjoy | 2007.05.16 | 2375 |
| 497 | REPORT Z04_003 [9] | sapjoy | 2007.05.16 | 2561 |
| 496 | REPORT Z04_008 [1] | sapjoy | 2007.05.16 | 2150 |
| 495 | REPORT Z04_021 [4] | sapjoy | 2007.05.16 | 2206 |
| 494 | REPORT Z04_022 | sapjoy | 2007.05.16 | 2092 |
| 493 | REPORT Z04_012 [1] | sapjoy | 2007.05.16 | 2064 |
| 492 | REPORT Z04_011 [1] | sapjoy | 2007.05.16 | 2249 |
| 491 | REPORT Z04_015 | sapjoy | 2007.05.16 | 2111 |
