如何在 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 或绝密）。与您商店的保安人员交谈。