Untitled

mail@pastecode.io avatar
unknown
plain_text
2 months ago
1.3 kB
0
Indexable
Never
*&---------------------------------------------------------------------*
*& Report ZIIS_DENEME2
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ziis_deneme2.

PARAMETERS: pa_st1 RADIOBUTTON GROUP rbg1 DEFAULT 'X',
            pa_st2 RADIOBUTTON GROUP rbg1,
            pa_st3 RADIOBUTTON GROUP rbg1.

PARAMETERS: pa_i TYPE i MODIF ID gr1.

INITIALIZATION.

AT SELECTION-SCREEN.

AT SELECTION-SCREEN OUTPUT.
  LOOP AT SCREEN.
    IF pa_st1 EQ abap_true.
      IF screen-group1 EQ 'GR1'.
        screen-active = 1.
      ENDIF.
    ENDIF.
    IF pa_st2 EQ abap_true.
      IF screen-group1 EQ 'GR1'.
        screen-active = 0.
      ENDIF.
    ENDIF.
    MODIFY SCREEN.
  ENDLOOP.

START-OF-SELECTION.




*SELECTION-SCREEN BEGIN OF BLOCK blk1 WITH FRAME TITLE text-h01.
*PARAMETERS: pa_test TYPE i LENGTH 11 OBLIGATORY,
*            pa_datum like sy-datum DEFAULT sy-datum,
*            pa_chk1 as CHECKBOX,
*            pa_chk2 as CHECKBOX,
*            pa_rb1 RADIOBUTTON GROUP rbg1 DEFAULT 'X',
*            pa_rb2 RADIOBUTTON GROUP rbg1,
*            pa_rb3 RADIOBUTTON GROUP rbg1.
*SELECTION-SCREEN end OF BLOCK blk1.
*
*write: pa_datum.
Leave a Comment