我需要拉一個密碼，用戶將鍵入的用戶打字輸入，但不希望字符顯示在屏幕上。你能幫我在REXX中做到這一點嗎？是否有可能隱藏REXX程序

2013-08-06 Karthick Kathiresan

哪裏是你的REXX代碼運行？ ISPF？視窗？ Linux呢？ OS/2？您正在使用哪種REXX方言？ OOREXX？里賈納？ – cschneid

它將在ISPF中運行，我沒有使用OOREXX或Regina。我在z/OS中運行這個。 –

由於要在運行ISPF，可以定義一個面板駐留在與作爲非顯示的密碼字段ISPPLIB級聯。

2013-08-06 22:21:51 cschneid

作爲@cshneid，使用ISPF面板（且將其放置在ISPPLIB）。這是一個包含密碼字段的示例面板（請參閱$屬性），取自。

)ATTR 
    * TYPE(TEXT) INTENS(HIGH) COLOR(WHITE) CAPS(OFF) 
    # TYPE(TEXT) INTENS(HIGH) COLOR(BLUE) CAPS(OFF) 
    @ TYPE(TEXT) INTENS(LOW) COLOR(BLUE) HILITE(REVERSE) 
    ? TYPE(TEXT) INTENS(LOW) COLOR(TURQ) CAPS(OFF) 
    _ TYPE(INPUT) INTENS(HIGH) COLOR(YELLOW) 
    $ TYPE(INPUT) INTENS(NON) 
    ø TYPE(OUTPUT) INTENS(LOW) COLOR(TURQ) CAPS(OFF) 
)BODY 
* [email protected] RECORD*-------------------------- 
# SERIAL NO.*===>_SERNUM +&rbl           % 
# 
# 
# NAME:?&LAST, &FIRST 
# 
# ADDRESS:øADDR1      + 
#   øADDR2      + 
#   øADDR3      + 
#   øADDR4      + 
# 
# POSITION:øPOSIT      + 
# 
# YEARS EXPERIENCE:øYRS+ 
# 
# SALARY:øSALARY +  # PASSWORD*===>$PSW + 
#        (Password is required for salary) 
# 
# 
* Enter#END*command to terminate application. 
# 
)PROC 
    VER(&SERNUM,NB,NUM) 
    .ATTR(.CURSOR) = 'COLOR(RED) HILITE(BLINK)' 
)END

請注意，我沒有可用於檢查所以下面因此可能會有一些語法錯誤大型機：

的Rexx命令用來顯示面板：

Address ispexec display panel(panelName)

如果您需要到DSN添加到ISPPLIB

"ispexec libdef ispplib dataset id(panel-dsn)"

背景資料

ISPF使用一系列文件（ispplib，ispmlib，isptlib等）來存儲它使用的細節。您可以添加（在臨時基礎上）的額外PDS使用LIBDEF功能在REXX/CLIST程序來ISPF。從歷史上看，這些PDS的RECFM = FB，LRECL爲80.這一點已經改變。您應該檢查現有ispplib PDS的屬性並使用相似的屬性。

要顯示面板它需要被存儲在ISPPLIB（或一個PDS分配給 ispplib使用LIBDEF）。

如果存儲在PDS my.panels（測試）的面板和分配my.panels到ISPPLIB，所述REXX是：

/* rexx */ 
    address ispexec 'display panel(test)' 
    say rc  /* show return code, will indicate possible errors */

如果使用LIBDEF則REXX是

/* rexx */ 

    address ispexec "libdef ispplib dataset id(panel-dsn)" 
    say rc 

    address ispexec 'display panel(test)' 
    say rc  /* show return code, will indicate possible errors */

的Edit Macro guide具有服務的列表（也有返回碼）

如果將面板分配給面板庫，也可以使用ispf測試模式（ispf 7.1？它已經有一段時間，因爲我用的主機）來測試它

來源

2013-08-07 00:58:11

謝謝布魯斯的幫助。 –

執行上述命令時，我無法看到面板。可以指導我如何查看面板 –

是否有任何消息???也顯示返回代碼並在ISPF手冊中查找它。最後，我在回答結尾處添加了一些額外的信息 –

是否有可能隱藏REXX程序

回答

背景資料

相關問題