密码框

来源：互联网发布：三星note3网络不稳定编辑：程序博客网时间：2024/05/01 00:57

sap abap中实现密码输入框代码

2008年09月08日星期一 09:36

REPORT   Z_WBH_2.
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.

或者下面程序：

REPORT z_barry_test_screen_loop .

PARAMETERS: p_str0(10) type c ,
p_str1(10) TYPE c ,
p_str2(10) TYPE c .

AT SELECTION-SCREEN OUTPUT.
PERFORM setscreen .
*---------------------------------------------------------------------*
*       FORM setscreen                                                *
*---------------------------------------------------------------------*
FORM setscreen .
LOOP AT SCREEN.
    IF screen-name = 'P_STR0' .
      screen-input = '0'.     "灰掉，只输出
    ENDIF.
    IF screen-name = 'P_STR1'.
      screen-invisible = '1'. "*做掩码，适合输入密码
    ENDIF.
    IF screen-name = 'P_STR2'.
      screen-active = '0'.    "不显示
    ENDIF.
    MODIFY SCREEN.
ENDLOOP.
ENDFORM .