메뉴 건너뛰기

SAP 한국 커뮤니티

조회조건 동적으로 보이기

신종철™ 2007.08.20 18:38 조회 수 : 4771 추천:13

도움이 되셨으면 좋겠습니다.


소스 그냥 통채로 올립니다.


 


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 >>

번호 제목 글쓴이 날짜 조회 수
387 미니 SAP 설치 메뉴얼 입니다. [5] 신종철™ 2007.09.17 4574
386 사용자별 Upload & Download 기본값 [1] 홍성현 2007.08.09 3661
385 Python과 SAP RFC 통신 [3] 홍성현 2007.08.09 5808
384 ABAP TIP [4] file 둘리67 2007.10.03 5952
383 4.6에서 ALV 필드 변경 안될때 버퍼 지우는 방법 신종철 2007.08.10 4780
382 ABAP에서 웹브라우져 호출 홍성현 2007.08.09 8321
381 간단팁2 : 특정 값으로 구분된 텍스트, 한방에 분리 및 각각의 변수에 저장 [2] 윤훈태 2007.10.15 4138
380 ICON ascii code [3] file sapjoy 2007.10.05 5004
» 조회조건 동적으로 보이기 [5] 신종철™ 2007.08.20 4771
378 트리 만들기 [6] 푸른밤 2007.07.31 5351
377 주민번호 체크 [3] 임선미 2007.10.23 4795
376 그룹을 이용하여 SAP PRD 시스템 접속하기 [2] file 이명환 2007.10.18 4531
375 스페이스를 2자리로 먹을때 1자리로 먹게 바꾸기 [1] 신종철™ 2007.08.20 3952
374 Internal table 사용시 속도개선을 위한 구문 [16] 노름마치 2007.11.14 10014
373 NATIVE SQL의 INSERT 문 [4] sapjoy 2007.11.13 6258
372 Tip : 전표 라인 아이템 Direct 조회 [5] 2007.10.23 10166
371 새로운 Print format 추가하기 [5] file 이명환 2007.10.18 3679
370 SAP 어플리케이션의 구성 [3] file 노름마치 2007.10.10 3897
369 widget을 이용한 Job monitor 데모 [1] 해처리 2007.10.24 3603
368 FIELD-SYMBOL설명 및 예제 프로그램 [17] Delight 2008.04.30 9449