ADD a new USERID in mainframe system

9 篇文章 1 订阅
2 篇文章 0 订阅
//ADDUSER  JOB  (PLS,81038),CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),          00010000
//         NOTIFY=&SYSUID                                               00020000
//*****************************************************************     00030000
//*  JOB TO ADD USERS TO DDC SYSTEM                                     00040000
//*****************************************************************     00050000
//*****************************************************************     00060000
//*  DEFINE USER ALIAS TO MASTER CATALOG                                00070000
//*****************************************************************     00080000
//DEFALIAS EXEC PGM=IDCAMS                                              00090000
//SYSPRINT DD SYSOUT=*                                                  00100000
//SYSIN    DD *                                                         00110000
  DEFINE ALIAS(NAME(TSO02)                                            - 00120000
     RELATE(CATALOG.USERID.UCAT))                                     - 00130000
     CATALOG(CATALOG.MASTER.MCAT)                                       00140000
/*                                                                      00150000
//*****************************************************************     00160000
//*  DEFINE USER TO RACF                                                00170000
//*****************************************************************     00180000
//DEFRACF  EXEC PGM=IKJEFT01,DYNAMNBR=20                                00190000
//SYSLBC   DD DSN=SYS1.BRODCAST,DISP=SHR                                00200000
//SYSTSPRT DD SYSOUT=*                                                  00210000
//SYSPRINT DD SYSOUT=*                                                  00220000
//SYSOUT   DD SYSOUT=*                                                  00230000
//SYSIN    DD DUMMY                                                     00240000
//SYSTSIN  DD *                                                         00250000
 ADDUSER TSO02 NAME('TSO02')   UACC(READ)                               00260000
                                                                        00270000
 ALTUSER TSO02                                                        + 00280000
         TSO(                                                         + 00290000
            PROC(DBAUSER)                                             + 00300000
            ACCTNUM(12345678)                                         + 00310000
            SIZE(6000)                                                + 00320000
            MAXSIZE(0)                                                + 00330000
            UNIT(SYSDA)                                               + 00340000
            JOBCLASS(A)                                               + 00350000
     /*     DEST( )          */                                       + 00360000
     /*     MSGCLASS( )      */                                       + 00370000
     /*     HOLDCLASS( )     */                                       + 00380000
     /*     SYSOUTCLASS( )   */                                       + 00390000
            USERDATA(0000)                                            + 00400000
            )                                                         + 00410000
         OMVS(UID(120034) HOME('/u/TSO02') PROGRAM('/bin/sh'))          00420000
                                                                        00430000
 PERMIT  JCL     CLASS(TSOAUTH) ID(TSO02)                               00440000
 PERMIT  RECOVER CLASS(TSOAUTH) ID(TSO02)                               00450000
 PERMIT  SUBMIT  CLASS(TSOAUTH) ID(TSO02)                               00460000
 SETROPTS RACLIST(TSOAUTH) REFRESH                                      00470000
                                                                        00480000
 PERMIT  ISPUSER CLASS(TSOPROC) ID(TSO02)                               00490000
 PERMIT  TSOUSER CLASS(TSOPROC) ID(TSO02)                               00500000
 PERMIT  IKJASE  CLASS(TSOPROC) ID(TSO02)                               00510000
 SETROPTS RACLIST(TSOPROC) REFRESH                                      00520000
                                                                        00530000
 ALTUSER TSO02 PASSWORD(123) RESUME                                     00540000
/*                                                                      00550000

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值