ZVM: Formation jour 2

permet d'attacher un disque dans l'environnement de l'ustilisateur connecté.

Exemple de procédure :

/* */
'CPREL A'
'CP LINK MAINT 2cc 2cc MW'
'ACC 2cc E'
'filel * * e'
'DET 2cc'
'CPACCESS maint cf1 a'

Note: Par défaut les utilitaires DISKMAP, DIRMAP et DIRECTXA sont situés sur le disque des utilitaires de validation croisée (PMAINT 551). Vous devez accéder à ce disque pour exécuter l'utilitaire DIRECTXA. Il faut disposer des privilèges CP des classes A, B ou C pour mettre à jour le répertoire des utilisateurs du système.

Récupérer USER DIRECT pour diskmap/dirmap)

faire un filelist * * a

MAINT    FILELIST A0  V 169  Trunc=169 Size=8 Line=1 Col=1 Alt=0
Cmd   Filename Filetype Fm Format Lrecl    Records     Blocks   Date     Time
      USER     DIRECT   A1 F         80       4204         83  3/30/18 14:21:16
      USER$1   DIRECT   A1 F         80       4183         82  3/30/18 14:01:28
      USER$    DIRECT   A1 F         80       4169         82  3/29/18 10:51:35
      USERBACK DIRECT   A1 F         80       4168         82  3/28/18 12:24:38
      ZVMFF    DIRECT   A1 F         80       4161         82  3/23/18 13:14:46
      IPWIZARD $FILE$   A1 V         80        133          2  3/19/18 13:40:50
      USER     DISKMAP  A1 F        100        235          6  3/19/18 11:19:12
      RPWLIST  DATA     A1 F         80         34          1 12/27/01 10:33:01

Faire un DISKMAP ou un DIRMAP sur la ligne USER DIRECT

Passer en xedit sur le fichier créé par la commande (MDISKMAP pour DIRMAP ou DISKMAP pour DISKMAP)

x     USER     MDISKMAP

00235                  NOUGAT    0191 MR        5260       5264        005
00236                                           5265      10016       4752     G

x     USER     DISKMAP

00213          NOUGAT      191     3390       05260       05264       00005

récuper sur c le fichier USER DIRECT

filel USER DIRECT *

recopier le fichier USER DIRECT vers A

copy / = = A   DIRECT   C1 F         80       4204         83  3/30/18 14:21:16

*     USER     DIRECT   A1 F         80       4219         83  3/26/19 12:01:58
      USER     DIRECT   C1 F         80       4204         83  3/30/18 14:21:16

Editer le fichier USER DIRECT A

• dupliquer le module USER
• modifier user mdp disk

04220 USER BEZIERS BEZIERS 128M    2G G
04221  ACCOUNT SYSTEMS


04222  MACH ESA
04223  IPL CMS
04224  CONSOLE 009 3215
04225  SPOOL 00C 2540 READER *
04226  SPOOL 00D 2540 PUNCH A
04227  SPOOL 00E 1403 A
04228  LINK MAINT 0190 0190 RR * CMS system disk
04229  LINK MAINT 019E 019E RR * Product code disk
04230  LINK RACMAINT 29E 29E RR
04231  LINK RACMAINT 305 505 RR
04232  LINK RACMAINT 192 192 RR
04233  LINK RACFVM 305 305 RR
04234  MDISK 191 3390 05265 001 VMCOM1 MR READ     WRITE    MULTIPLE

compiler

DIRECTXA USER DIRECT A1

Se reconnecter avec le nouvel user

q v da
DASD 0190 3390 M01RES R/O        214 CYL ON DASD  0010 SUBCHANNEL = 0004
DASD 0191 3390 VMCOM1 R/W          1 CYL ON DASD  0013 SUBCHANNEL = 000A
DASD 0192 3390 640RL1 R/O         25 CYL ON DASD  0014 SUBCHANNEL = 0008
DASD 019E 3390 M01RES R/O        500 CYL ON DASD  0010 SUBCHANNEL = 0005
DASD 029E 3390 640RL1 R/O         10 CYL ON DASD  0014 SUBCHANNEL = 0006
DASD 0305 3390 M01RES R/O        136 CYL ON DASD  0010 SUBCHANNEL = 0009
DASD 0505 3390 640RL1 R/O         41 CYL ON DASD  0014 SUBCHANNEL = 0007
Ready; T=0.01/0.01 12:55:33

formater le disque A

format 191 a
DMSFOR603R FORMAT will erase all files on disk A(191). Do you wish to continue?
Enter 1 (YES) or 0 (NO).