Friday, March 16, 2012

AT SELECTION-SCREEN OUTPUT hide fields

LOOP AT SCREEN.
IF p_static = 'X'.
IF screen-name = 'S_PRODID-LOW' OR
screen-name = 'S_PRODID-HIGH' OR
screen-name = '%_S_PRODID_%_APP_%-TEXT' OR
screen-name = '%_S_PRODID_%_APP_%-OPTI_PUSH' OR
screen-name = '%_S_PRODID_%_APP_%-TO_TEXT' OR
screen-name = '%_S_PRODID_%_APP_%-VALU_PUSH' .
screen-active = 1.
screen-invisible = 0.
screen-input = 1.
screen-output = 1.
MODIFY SCREEN.
ENDIF.
else.
IF screen-name = 'S_PRODID-LOW' OR
screen-name = 'S_PRODID-HIGH' OR
screen-name = '%_S_PRODID_%_APP_%-TEXT' OR
screen-name = '%_S_PRODID_%_APP_%-OPTI_PUSH' OR
screen-name = '%_S_PRODID_%_APP_%-TO_TEXT' OR
screen-name = '%_S_PRODID_%_APP_%-VALU_PUSH' .
screen-invisible = 1.
screen-input = 0.
screen-output = 0.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDIF.
ENDLOOP.

1 comment:

  1. Instead of checking for name variations, use:
    SELECT-OPTIONS ... FOR ... MODIF ID gr1.
    ...
    IF screen-group1 = 'GR1'.
    ...

    ReplyDelete