REPORT ztabstrip_week1.
DATA: wa_spfli TYPE spfli.
DATA: it_spfli LIKE TABLE OF wa_spfli.
SELECTION-SCREEN BEGIN OF SCREEN 101 AS SUBSCREEN.
PARAMETERS: pa_car TYPE scarr-carrid.
SELECTION-SCREEN END OF SCREEN 101.
SELECTION-SCREEN BEGIN OF SCREEN 102 AS SUBSCREEN.
SELECT-OPTIONS so_con FOR wa_spfli-connid.
SELECTION-SCREEN END OF SCREEN 102.
SELECTION-SCREEN BEGIN OF TABBED BLOCK tab_block FOR 3 LINES.
SELECTION-SCREEN TAB (10) tab1 USER-COMMAND comm1 DEFAULT SCREEN 101.
SELECTION-SCREEN TAB (10) tab2 USER-COMMAND comm2 DEFAULT SCREEN 102.
SELECTION-SCREEN END OF BLOCK tab_block.
INITIALIZATION.
so_con-sign = 'I'.
so_con-option = 'BT'.
so_con-low = '0001'.
so_con-high = '0017'.
APPEND so_con.
*tab1 = 'Airline'.
*tab2 = 'Connection'.
tab1 = text-001.
tab2 = text-002.
tab_block-activetab = 'COMM1'.
tab_block-dynnr = '101'.
AT SELECTION-SCREEN ON pa_car.
IF pa_car = 'UA'.
MESSAGE 'UA is not allowed!' TYPE 'E'.
ENDIF.
START-OF-SELECTION.
SELECT * INTO CORRESPONDING FIELDS OF TABLE it_spfli
FROM spfli
WHERE carrid = pa_car
AND connid IN so_con.
LOOP AT it_spfli INTO wa_spfli.
write:/ sy-tabix, wa_spfli-carrid, wa_spfli-connid.
ENDLOOP.
댓글 5
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
104 | report painter 설명 자료 [20] | 조재경 | 2012.06.09 | 15556 |
103 | CO CCA Process Overview 자료 입니다. [20] | yaho | 2012.06.28 | 6676 |
102 | abap 교재 요약 워드 파일입니다... [45] | 준맘 | 2012.08.07 | 17213 |
101 | class-based exceptions 예제. | 철죽1 | 2012.09.02 | 12268 |
100 | shared objects 예제 | 철죽1 | 2012.09.02 | 5424 |
99 | create object 예. [1] | 철죽1 | 2012.09.02 | 12934 |
98 | casting 예 [1] | 철죽1 | 2012.09.02 | 11479 |
97 | constructor multiple instantiation 예 | 철죽1 | 2012.09.02 | 11692 |
96 | instance vs static 예 [1] | 철죽1 | 2012.09.02 | 12620 |
95 | method create 예 | 철죽1 | 2012.09.02 | 11647 |
94 | selection screen program [1] | 철죽1 | 2012.09.02 | 5576 |
» | tabstrip [5] | 철죽1 | 2012.09.02 | 12153 |
92 | lock 예 [5] | 철죽1 | 2012.09.02 | 13223 |
91 | POC 예 [9] | 철죽1 | 2012.09.02 | 11113 |
90 | sap 튜닝 자료입니다. [44] | iop890mm | 2012.10.09 | 12688 |
89 | gdb형식의 abap 강좌입니다. [6] | tobypapa | 2012.10.19 | 10986 |
88 | 파일 첨부 - 한개씩 말고 다중으로 가능? [1] | 연오랑 | 2012.10.23 | 12760 |
87 | ABAP Troubleshooting [4] | paran | 2012.11.13 | 14600 |
86 | ABAP Tunning Guide [2] | 민상애비 | 2012.11.14 | 15689 |
85 | Technical Guide-ABAP Tuning 기초 [5] | 민상애비 | 2012.11.14 | 13083 |