도움이 되셨으면 좋겠습니다.
소스 그냥 통채로 올립니다.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 5(18) text-009.
PARAMETERS : p_rb1 RADIOBUTTON GROUP rbg USER-COMMAND ucom DEFAULT 'X'.
SELECTION-SCREEN COMMENT 30(24) text-010.
PARAMETERS : p_rb2 RADIOBUTTON GROUP rbg.
SELECTION-SCREEN END OF LINE.
AT SELECTION-SCREEN OUTPUT.
PERFORM field_hide_by_radiobutton.
*&---------------------------------------------------------------------*
*& Form field_hide_by_radiobutton
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM field_hide_by_radiobutton .
IF p_rb1 EQ 'X'.
LOOP AT SCREEN.
IF screen-name EQ '%C006012_1000' OR
screen-name EQ '%_S_VDATU_%_APP_%-OPTI_PUSH' OR
screen-name EQ 'S_VDATU-LOW' OR
screen-name EQ '%_S_VDATU_%_APP_%-TO_TEXT' OR
screen-name EQ 'S_VDATU-HIGH' OR
screen-name EQ '%C007016_1000' OR
screen-name EQ '%_S_GWLDT_%_APP_%-OPTI_PUSH' OR
screen-name EQ 'S_GWLDT-LOW' OR
screen-name EQ '%_S_GWLDT_%_APP_%-TO_TEXT' OR
screen-name EQ 'S_GWLDT-HIGH' OR
screen-name EQ '%C008020_1000' OR
screen-name EQ '%_S_AUDAT_%_APP_%-OPTI_PUSH' OR
screen-name EQ 'S_AUDAT-LOW' OR
screen-name EQ '%_S_AUDAT_%_APP_%-TO_TEXT' OR
screen-name EQ 'S_AUDAT-HIGH' OR
screen-name EQ '%B002024_BLOCK_1000' OR
screen-name EQ '%C003026_1000' OR
screen-name EQ '%_S_SPART_%_APP_%-OPTI_PUSH' OR
screen-name EQ 'S_SPART-LOW' OR
screen-name EQ '%_S_SPART_%_APP_%-VALU_PUSH' OR
screen-name EQ '%C004030_1000 ' OR
screen-name EQ '%_S_VKBUR_%_APP_%-OPTI_PUSH' OR
screen-name EQ 'S_VKBUR-LOW' OR
screen-name EQ '%_S_VKBUR_%_APP_%-VALU_PUSH' OR
screen-name EQ '%C005034_1000' OR
screen-name EQ '%_S_VKGRP_%_APP_%-OPTI_PUSH' OR
screen-name EQ 'S_VKGRP-LOW' OR
screen-name EQ '%_S_VKGRP_%_APP_%-VALU_PUSH' OR
screen-name EQ '%_17SNS0000652317_%_%_%_%_%_%_' OR
screen-name EQ 'SSCRFIELDS-UCOMM'.
screen-active = 0.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
ELSE.
LOOP AT SCREEN.
IF screen-name EQ '%_P_VBELN_%_APP_%-TEXT' OR
screen-name EQ 'P_VBELN'.
screen-active = 0.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
ENDIF.
ENDFORM. "" field_hide_by_radiobutton"
<< 발췌는 역시나 http://www.storyroom.net >>
댓글 5
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
407 | 팝업창이나 서브스크린 디버깅을 쉽게 할 수 있어요 [17] | 김창훈 | 2007.08.08 | 5072 |
406 | HELP를 WEB으로 접속하려면,,, 이렇게 하세요 [8] | 김창훈 | 2007.08.08 | 3847 |
405 | 간단한 ALV Report를 생성해주는 사이트 [2] | 홍성현 | 2007.08.09 | 4018 |
404 | SAP에서 바코드 인쇄하기 [1] | 홍성현 | 2007.08.09 | 5303 |
403 | Python과 SAP RFC 통신 [3] | 홍성현 | 2007.08.09 | 5808 |
402 | 사용자별 Upload & Download 기본값 [1] | 홍성현 | 2007.08.09 | 3661 |
401 | ABAP에서 웹브라우져 호출 | 홍성현 | 2007.08.09 | 8328 |
400 | SAP Icon 출력 [3] | 홍성현 | 2007.08.09 | 6538 |
399 | ABAP System Fields | 홍성현 | 2007.08.09 | 3931 |
398 | 4.6에서 ALV 필드 변경 안될때 버퍼 지우는 방법 | 신종철 | 2007.08.10 | 4781 |
397 | ALV 중간 집계 하기 [3] | 신종철 | 2007.08.10 | 4782 |
396 | 텍스트반영시(자재명,저장위치명 기타등등) 속도개선 방법 [6] | 김창훈 | 2007.08.14 | 5975 |
395 | 속도개선하기....INDEX를 이렇게도 쓰네용~~ [9] | 김창훈 | 2007.08.14 | 5376 |
394 | AT 구문에 대한 설명입니다. [6] | 김창훈 | 2007.08.16 | 5735 |
393 | 플랜트로 회사코드와 기준통화 찾기 [8] | 김창훈 | 2007.08.16 | 5599 |
392 | 엑셀 65000 라인초과시 사용 유틸 [5] | GG | 2007.08.19 | 5296 |
391 | ABAP 문법 1st [13] | 아일락 | 2007.08.20 | 4555 |
390 | ABAP 문법 2nd [8] | 아일락 | 2007.08.20 | 3914 |
» | 조회조건 동적으로 보이기 [5] | 신종철™ | 2007.08.20 | 4774 |
388 | 스페이스를 2자리로 먹을때 1자리로 먹게 바꾸기 [1] | 신종철™ | 2007.08.20 | 3952 |