Dynamischer Selection Screen

Code: Alles auswählen.

*&---------------------------------------------------------------------*
*&  Include           ZZBHW_K80_AW_SEL                                 *
*----------------------------------------------------------------------*
* PARAMETERS & SELECT-OPTIONS
*----------------------------------------------------------------------*

SELECTION-SCREEN BEGIN OF BLOCK z_status WITH FRAME.

PARAMETERS:

lp_bukrs LIKE vdarl-bukrs  DEFAULT 100 OBLIGATORY,
lp_stats LIKE vdarl-sstati OBLIGATORY.

SELECTION-SCREEN SKIP 1.

PARAMETERS:
lp_azvpf TYPE c AS CHECKBOX DEFAULT space.

SELECTION-SCREEN SKIP 1.

SELECT-OPTIONS: 
so_sttg  FOR wa_stichtag OBLIGATORY.

SELECTION-SCREEN END OF BLOCK z_status.

*---------------------------------------

Code: Alles auswählen.

AT SELECTION-SCREEN OUTPUT.

  LOOP AT SCREEN.
    IF screen-name = 'LP_AZVPF'.
      IF lp_stats NE 50.
        screen-invisible = 1.
        screen-input = 0.
      ELSE.
        screen-invisible = 0.
        screen-input = 1.
      ENDIF.
      MODIFY SCREEN.
    ENDIF.
  ENDLOOP.