如何在COBOL中存储VSAM密码文件的凭据？

Question

这是IBM official page建议用来处理VSAM密码保护文件的代码：

INPUT-OUTPUT SECTION.
FILE-CONTROL.
    SELECT LIBFILE
      ASSIGN TO PAYMAST
      ORGANIZATION IS INDEXED
      RECORD KEY IS EMPL-NUM
         PASSWORD IS BASE-PASS
      ALTERNATE RECORD KEY IS EMPL-PHONE
         PASSWORD IS PATH1-PASS
. . .
WORKING-STORAGE SECTION.
01  BASE-PASS          PIC X(8) VALUE "25BSREAD".
01  PATH1-PASS         PIC X(8) VALUE "25ATREAD".

但是如您所见，密码为纯文本。在zOS中存储这种凭证以使我可以从COBOL程序访问的最优雅的方法是什么？

Answer 1

不要这样做。请改用您的外部安全管理器（可能是ACF2，RACF或Top Secret）。与您商店的安全人员交谈。