O Hercules z/OS vem com alguns usuários pre-definidos para poder acessar o z/OS, se você quiser criar um usuário personalizado seu é só seguir este tutorial que você vai conseguir criar um usuário com as mesmas permissões do IBMUSER, neste exemplo vou criar um usuário chamado MASTER;
JCL para criar um novo usuário;
Job rodou ok;
A senha que foi criada para o meu usuário foi INITPW
Consegui acessar;
Como consegui acessar vou fazer um teste - digito M enter
Opção 5 (enter)
Vamos ver os jobs, digite ST (enter)
Feito, consegui acessar - Agora é só brincar com este novo usuário;
JCL para criar um novo usuário;
Menu Utilities Compilers Help
BROWSE ADCD.LIB.JCL(ADDUSER) - 01.03 Line 00000000 Col 001 080
Command ===> Scroll ===> PAGE
********************************* Top of Data **********************************
//ADDIDS JOB (),
// CLASS=A,
// MSGCLASS=D,
// MSGLEVEL=(1,1),
// NOTIFY=&SYSUID,
// TIME=1440
//* --------------------------------------------------------------
//* CRIANDO UM USUARIO NO RACF
//* --------------------------------------------------------------
//S0 EXEC PGM=IKJEFT01,DYNAMNBR=75,TIME=100,REGION=6M
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSUADS DD DSN=SYS1.UADS,DISP=SHR
//SYSLBC DD DSN=SYS1.BRODCAST,DISP=SHR
//SYSTSIN DD *
DELUSER MASTER
ADDUSER MASTER +
NAME('CLAUDEMAR') +
OWNER(IBMUSER) +
PASSWORD(INITPW) +
TSO( +
ACCTNUM(ACCT#) +
PROC(ISPFPROC) +
COMMAND(ISPF) +
JOBCLASS(A) +
MSGCLASS(X) +
HOLDCLASS(X) +
SYSOUTCLASS(X) +
SIZE(40000) +
MAXSIZE(0) ) +
OMVS(HOME('/HOME/MASTER ') +
PROGRAM('/BIN/SH') +
UID(512) )
PERMIT JCL CLASS(TSOAUTH) ID(MASTER ) ACCESS(READ)
PERMIT OPER CLASS(TSOAUTH) ID(MASTER ) ACCESS(READ)
PERMIT ACCT# CLASS(ACCTNUM) ID(MASTER ) ACCESS(READ)
PERMIT ISPFPROC CLASS(TSOPROC) ID(MASTER ) ACCESS(READ)
SETROPTS REFRESH RACLIST(TSOPROC)
SETROPTS REFRESH RACLIST(TSOAUTH)
SETROPTS REFRESH RACLIST(ACCTNUM)
Job rodou ok;
Display Filter View Print Options Help
-------------------------------------------------------------------------------
SDSF OUTPUT DISPLAY ADDIDS JOB00762 DSID 2 LINE 0 COLUMNS 02- 81
COMMAND INPUT ===> SCROLL ===> PAGE
********************************* TOP OF DATA **********************************
J E S 2 J O B L O G -- S Y S T E M S Y S 1 -- N
02.52.05 JOB00762 ---- TUESDAY, 10 NOV 2015 ----
02.52.05 JOB00762 IRR010I USERID IBMUSER IS ASSIGNED TO THIS JOB.
02.52.05 JOB00762 ICH70001I IBMUSER LAST ACCESS AT 02:10:35 ON TUESDAY, NOVEMB
02.52.05 JOB00762 $HASP373 ADDIDS STARTED - INIT 1 - CLASS A - SYS SYS1
02.52.05 JOB00762 IEF403I ADDIDS - STARTED - TIME=02.52.05
02.52.06 JOB00762 IEF404I ADDIDS - ENDED - TIME=02.52.06
02.52.06 JOB00762 $HASP395 ADDIDS ENDED
------ JES2 JOB STATISTICS ------
10 NOV 2015 JOB EXECUTION DATE
40 CARDS READ
75 SYSOUT PRINT RECORDS
0 SYSOUT PUNCH RECORDS
3 SYSOUT SPOOL KBYTES
0.01 MINUTES EXECUTION TIME
1 //ADDIDS JOB (),
// CLASS=A,
// MSGCLASS=D,
// MSGLEVEL=(1,1),
// NOTIFY=&SYSUID,
// TIME=1440
//*
IEFC653I SUBSTITUTION JCL - (),CLASS=A,MSGCLASS=D,MSGLEVEL=(1,1),NOTIF
2 //S0 EXEC PGM=IKJEFT01,DYNAMNBR=75,TIME=100,REGION=6M
3 //SYSPRINT DD SYSOUT=*
4 //SYSTSPRT DD SYSOUT=*
5 //SYSTERM DD DUMMY
6 //SYSUADS DD DSN=SYS1.UADS,DISP=SHR
7 //SYSLBC DD DSN=SYS1.BRODCAST,DISP=SHR
8 //SYSTSIN DD *
ICH70001I IBMUSER LAST ACCESS AT 02:10:35 ON TUESDAY, NOVEMBER 10, 2015
IEF236I ALLOC. FOR ADDIDS S0
IEF237I JES2 ALLOCATED TO SYSPRINT
IEF237I JES2 ALLOCATED TO SYSTSPRT
IEF237I DMY ALLOCATED TO SYSTERM
IEF237I 0A81 ALLOCATED TO SYSUADS
IEF237I 0A95 ALLOCATED TO SYSLBC
IEF237I JES2 ALLOCATED TO SYSTSIN
IEF142I ADDIDS S0 - STEP WAS EXECUTED - COND CODE 0000
IEF285I IBMUSER.ADDIDS.JOB00762.D0000102.? SYSOUT
IEF285I IBMUSER.ADDIDS.JOB00762.D0000103.? SYSOUT
IEF285I SYS1.UADS KEPT
IEF285I VOL SER NOS= ZARES1.
IEF285I SYS1.BRODCAST KEPT
IEF285I VOL SER NOS= ZASYS1.
IEF285I IBMUSER.ADDIDS.JOB00762.D0000101.? SYSIN
IEF373I STEP/S0 /START 2015314.0252
IEF374I STEP/S0 /STOP 2015314.0252 CPU 0MIN 00.70SEC SRB 0MIN 00.05S
IEF375I JOB/ADDIDS /START 2015314.0252
IEF376I JOB/ADDIDS /STOP 2015314.0252 CPU 0MIN 00.70SEC SRB 0MIN 00.05S
******************************** BOTTOM OF DATA ********************************
F1=HELP F2=SPLIT F3=END F4=RETURN F5=IFIND F6=BOOK
F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE
A senha que foi criada para o meu usuário foi INITPW
------------------------------- TSO/E LOGON -----------------------------------
Enter LOGON parameters below: RACF LOGON parameters:
Userid ===> MASTER
Password ===> New Password ===>
Procedure ===> ISPFPROC Group Ident ===>
Acct Nmbr ===> ACCT#
Size ===> 40000
Perform ===>
Command ===> ISPF
Enter an 'S' before each option desired below:
-Nomail -Nonotice -Reconnect -OIDcard
PF1/PF13 ==> Help PF3/PF15 ==> Logoff PA1 ==> Attention PA2 ==> Reshow
You may request specific help information by entering a '?' in any entry field
Consegui acessar;
ICH70001I MASTER LAST ACCESS AT 02:53:29 ON TUESDAY, NOVEMBER 10, 2015
IKJ56455I MASTER LOGON IN PROGRESS AT 02:56:35 ON NOVEMBER 10, 2015
IKJ56951I NO BROADCAST MESSAGES
******************************************************************
* TABELA DE USUARIOS PRE DEFINIDOS *
* *
* +------------------+--------------+---------------------------+*
* | USUARIO | SENHA | COMENTARIO |*
* +------------------+--------------+---------------------------+*
* | IBMUSER | SYS1/IBMUSER | FULL AUTHORITY |*
* | ADCDMST | ADCDMST | FULL AUTHORITY |*
* | SYSADM | SYS1/SYSADM | DB2 AND RACF SPECIAL AUTH.|*
* | SYSOPR | SYS1/SYSOPR | DB2 AND RACF SPECIAL AUTH.|*
* | ADCDA THRU ADCDZ | TEST | LIMITED AUTHOR.(NO OMVS) |*
* | OPEN1 THRU OPEN3 | SYS1 | UID(0) (NO TSO) |*
* +------------------+--------------+---------------------------+*
* *
******************************************************************
ISPF
***
Como consegui acessar vou fazer um teste - digito M enter
Menu Utilities Compilers Options Status Help
ISPF Primary Option Menu
0 Settings Terminal and user parameters User ID . : MASTER
1 View Display source data or listings Time. . . : 02:56
2 Edit Create or change source data Terminal. : 3278
3 Utilities Perform utility functions Screen. . : 1
4 Foreground Interactive language processing Language. : ENGLISH
5 Batch Submit job for language processing Appl ID . : ISR
6 Command Enter TSO or Workstation commands TSO logon : ISPFPROC
7 Dialog Test Perform dialog testing TSO prefix: MASTER
9 IBM Products IBM program development products System ID : ADCD
10 SCLM SW Configuration Library Manager MVS acct. : ACCT#
11 Workplace ISPF Object/Action Workplace Release . : ISPF 6.0
M More Additional IBM Products
Enter X to Terminate using log/list defaults
Option ===> M
F1=Help F2=Split F3=Exit F7=Backward F8=Forward F9=Swap
F10=Actions F12=Cancel
Opção 5 (enter)
Menu Help
------------------------------------------------------------------------------
IBM Products Panel
1 SMP/E System Modification Program/Extended
2 ISMF Integrated Storage Management Facility
3 RACF Resource Access Control Facility
4 HCD Hardware Configuration Dialogs
5 SDSF Spool Search and Display Facility
6 IPCS Interactive Problem Control System
7 DITTO DITTO/ESA for MVS Version 1
8 RMF Resource Measurement Facility
10 OMVS MVS OpenEdition
11 RRS Resource Recovery Services
12 MQ WMQ Series Operations and Control
13 FMN File Manager 3.1.0perations and Control
14 WLM Workload Manager
Option ===> 5
F1=Help F2=Split F3=Exit F7=Backward F8=Forward F9=Swap
F10=Actions F12=Cancel
Vamos ver os jobs, digite ST (enter)
Display Filter View Print Options Help
-------------------------------------------------------------------------------
HQX7750 ----------------- SDSF PRIMARY OPTION MENU --------------------------
DA Active users INIT Initiators
I Input queue PR Printers
O Output queue PUN Punches
H Held output queue RDR Readers
ST Status of jobs LINE Lines
NODE Nodes
LOG System log SO Spool offload
MAS Members in the MAS
JC Job classes ULOG User session log
SE Scheduling environments
RES WLM resources
Licensed Materials - Property of IBM
5694-A01 Copyright IBM Corp. 1981, 2008. All rights reserved.
US Government Users Restricted Rights - Use, duplication or
disclosure restricted by GSA ADP Schedule Contract with IBM Corp.
COMMAND INPUT ===> ST SCROLL ===> PAGE
F1=HELP F2=SPLIT F3=END F4=RETURN F5=IFIND F6=BOOK
F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE
Feito, consegui acessar - Agora é só brincar com este novo usuário;
Display Filter View Print Options Help
-------------------------------------------------------------------------------
SDSF STATUS DISPLAY ALL CLASSES LINE 1-17 (77)
NP JOBNAME JobID Owner Prty Queue C Pos SAff ASys Status
IBMUSER TSU00761 IBMUSER 15 EXECUTION SYS1 SYS1
MASTER TSU00765 MASTER 15 EXECUTION SYS1 SYS1
SYSLOG STC00710 +MASTER+ 15 EXECUTION SYS1 SYS1
VTAM STC00712 START1 15 EXECUTION SYS1 SYS1
ZFS STC00713 ++++++++ 15 EXECUTION SYS1 SYS1
INIT STC00714 START2 15 EXECUTION SYS1 SYS1
INIT STC00715 START2 15 EXECUTION SYS1 SYS1
INIT STC00716 START2 15 EXECUTION SYS1 SYS1
INIT STC00717 START2 15 EXECUTION SYS1 SYS1
INIT STC00718 START2 15 EXECUTION SYS1 SYS1
INIT STC00719 START2 15 EXECUTION SYS1 SYS1
INIT STC00720 START2 15 EXECUTION SYS1 SYS1
INIT STC00721 START2 15 EXECUTION SYS1 SYS1
INIT STC00722 START2 15 EXECUTION SYS1 SYS1
INIT STC00723 START2 15 EXECUTION SYS1 SYS1
TSO STC00724 START1 15 EXECUTION SYS1 SYS1
SDSF STC00726 START2 15 EXECUTION SYS1 SYS1
COMMAND INPUT ===> SCROLL ===> PAGE
F1=HELP F2=SPLIT F3=END F4=RETURN F5=IFIND F6=BOOK
F7=UP F8=DOWN F9=SWAP F10=LEFT F11=RIGHT F12=RETRIEVE
0 comentários:
Enviar um comentário