REPORT z_password.
*---------------------------------------------------------------------*
* Author : Michel PIOUD                                               *
* Email :   HomePage : http://www.oocities.org/mpioud *
*---------------------------------------------------------------------*

PARAMETERS: p_pass TYPE xuncode.

*---------------------------------------------------------------------*
AT SELECTION-SCREEN OUTPUT.

  LOOP AT SCREEN.
    IF screen-name = 'P_PASS'.
      screen-invisible = '1'.
      MODIFY SCREEN.
    ENDIF.
  ENDLOOP.

*---------------------------------------------------------------------*
START-OF-SELECTION.

  WRITE: / p_pass.

********************* END OF PROGRAM Z_PASSWORD ***********************