REPORT Z15_033.
DATA : box(1) TYPE c, lines TYPE i,
num(1) TYPE c.
SET PF-STATUS 'CHECK'.
DO 5 TIMES.
num = sy-index.
WRITE: / box AS CHECKBOX, '라인 번호: ', num.
HIDE: box, num.
ENDDO.
lines = sy-linno.
TOP-OF-PAGE.
WRITE 'Select some checkboxes'.
ULINE.
AT USER-COMMAND.
CASE sy-ucomm.
WHEN 'READ'.
SET PF-STATUS 'CHECK' EXCLUDING 'READ'.
box = space.
DO lines TIMES.
READ LINE sy-index FIELD VALUE box. "현재라인 READ
IF box = 'X'.
WRITE: / '라인번호', num, '이 선택되었습니다'.
box = space.
MODIFY LINE sy-index
FIELD VALUE box
FIELD FORMAT box INPUT OFF "입력방지
num COLOR 6 INVERSE ON. "색상과 반전
ENDIF.
ENDDO.
ENDCASE.
DATA : box(1) TYPE c, lines TYPE i,
num(1) TYPE c.
SET PF-STATUS 'CHECK'.
DO 5 TIMES.
num = sy-index.
WRITE: / box AS CHECKBOX, '라인 번호: ', num.
HIDE: box, num.
ENDDO.
lines = sy-linno.
TOP-OF-PAGE.
WRITE 'Select some checkboxes'.
ULINE.
AT USER-COMMAND.
CASE sy-ucomm.
WHEN 'READ'.
SET PF-STATUS 'CHECK' EXCLUDING 'READ'.
box = space.
DO lines TIMES.
READ LINE sy-index FIELD VALUE box. "현재라인 READ
IF box = 'X'.
WRITE: / '라인번호', num, '이 선택되었습니다'.
box = space.
MODIFY LINE sy-index
FIELD VALUE box
FIELD FORMAT box INPUT OFF "입력방지
num COLOR 6 INVERSE ON. "색상과 반전
ENDIF.
ENDDO.
ENDCASE.
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
630 | REPORT Z09_005 | sapjoy | 2006.12.18 | 2514 |
629 | REPORT Z09_006 [1] | sapjoy | 2006.12.18 | 2839 |
628 | DBZF1SSEL | sapjoy | 2006.12.19 | 2842 |
627 | REPORT Z09_010 | sapjoy | 2006.12.19 | 2523 |
626 | PUT_SPFLI PUT_SFLIGHT PUT_SBOOK | sapjoy | 2006.12.19 | 2614 |
625 | REPORT Z11_001 | sapjoy | 2006.12.20 | 2976 |
624 | REPORT z11_004 . | sapjoy | 2006.12.22 | 2465 |
623 | REPORT Z11_005 | sapjoy | 2006.12.22 | 2273 |
622 | REPORT Z11_008 | sapjoy | 2006.12.22 | 2496 |
621 | REPORT Z11_010 | sapjoy | 2006.12.22 | 2358 |
620 | module f4_drum_S101 input. | sapjoy | 2006.12.26 | 2541 |
619 | MODULE f4_drum_s101 INPUT. 2 | sapjoy | 2006.12.26 | 2375 |
618 | REPORT z12_002 | sapjoy | 2006.12.28 | 2629 |
617 | REPORT Z13_002 | sapjoy | 2007.01.03 | 2309 |
616 | REPORT Z12_004 | sapjoy | 2007.01.03 | 2256 |
615 | FORM set_field_catalogs_grid USING lt_fieldcat TYPE lvc_t_fcat. | sapjoy | 2007.01.03 | 2875 |
614 | REPORT Z13_003 | sapjoy | 2007.01.05 | 2437 |
613 | REPORT Z13_001 | sapjoy | 2007.01.08 | 2362 |
612 | REPORT Z13_012 | sapjoy | 2007.01.08 | 2282 |
611 | REPORT Z13_013 | sapjoy | 2007.01.08 | 2634 |