작성일: 2024.09.19
도움말 테스트 연습
•
도움말 만들어보기
◦
ZSCARR
◦
ZSPFLI
•
도움말 만든 필드를 파라미터로 조회화면 만들어서 테스트해보기
◦
라디오버튼
◦
체크박스
실습
조회화면 - 라디오버튼
*&---------------------------------------------------------------------*
*& Report Z4WEEK_ASS00
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z4WEEK_ASS00.
* 텍스트 요소 정의
SELECTION-SCREEN BEGIN OF BLOCK part1 WITH FRAME TITLE text-001.
PARAMETERS field(10) TYPE c OBLIGATORY.
SELECTION-SCREEN END OF BLOCK part1.
* 첫 번째 선택 블록: 체크박스
SELECTION-SCREEN BEGIN OF BLOCK part2 WITH FRAME TITLE text-002.
PARAMETERS: chk1 AS CHECKBOX USER-COMMAND chkflag,
chk2 AS CHECKBOX DEFAULT 'X' USER-COMMAND chkflag.
SELECTION-SCREEN END OF BLOCK part2.
* 두 번째 선택 블록: 라디오 버튼
SELECTION-SCREEN BEGIN OF BLOCK part3 WITH FRAME TITLE text-003.
PARAMETERS: rad1 RADIOBUTTON GROUP grp1 USER-COMMAND radflag, " 첫 번째 라디오 버튼에만 USER-COMMAND 사용
rad2 RADIOBUTTON GROUP grp1 DEFAULT 'X', " 나머지 버튼에는 USER-COMMAND 사용하지 않음
rad3 RADIOBUTTON GROUP grp1.
SELECTION-SCREEN END OF BLOCK part3.
* 세 번째 선택 블록: 추가 체크박스 및 라디오 버튼
SELECTION-SCREEN BEGIN OF BLOCK part4 WITH FRAME TITLE text-004.
PARAMETERS: chk3 AS CHECKBOX USER-COMMAND chkflag2,
chk4 AS CHECKBOX DEFAULT 'X' USER-COMMAND chkflag2.
PARAMETERS: rad4 RADIOBUTTON GROUP grp2 USER-COMMAND radflag2, " 첫 번째 라디오 버튼에만 USER-COMMAND 사용
rad5 RADIOBUTTON GROUP grp2 DEFAULT 'X', " 나머지 버튼에는 USER-COMMAND 사용하지 않음
rad6 RADIOBUTTON GROUP grp2.
SELECTION-SCREEN END OF BLOCK part4.
* 네 번째 선택 블록: 항공사 관련 선택 박스
SELECTION-SCREEN BEGIN OF BLOCK part5 WITH FRAME TITLE text-005.
PARAMETERS: p_carrid TYPE spfli-carrid AS LISTBOX VISIBLE LENGTH 20 DEFAULT 'LH'.
SELECTION-SCREEN END OF BLOCK part5.
field = 10.
ABAP
복사