Mainframe Tape utilities

CONTENTS:

Bottom
Case 1. RMM operations

                Case 2.The problem:RMM – error rc=12

                                2.1.  DFSMSrmm FORCE Volume           – error rc=12

                                2.2. DFSMSrmm Change Volume Details

                                2.3. Delete tape from catalog

                Case 3. Scratch tape prepare

                                3.1. Delete the tape

                                3.2. Add scratch tape

                                3.3. Initialize the  scratch tape

                                3.4. Mass .  Initialize 5 scratch tapes  with batch job   RMMI3590

                Case4.  Ditto – tape functions

                                4.1.  Tape control functions

                                4.2. Tape functions

                Case 5. Find tape information

                Case 6. Adding new prefix for tapes  (HV*)

                                6.1. Display tape volume information

                                6.2.  Change member EDGRMM02 in sys1.parmlib

                                6.3.  Update information in   ACS Routines

                                6.4.  Add  new HV* tape volume  to verify HV* prefix

Six cases showing  how to solve tape problems using standard tape utilities under DFSMSrmm. What to do if it is not possible to release a tape  name and  to add the same  name with different parameters! How to add a scratch tape and how to initialize it to be usable in production time. If you have tapes with different VTOC volume name prefixes  not existing in the system  –  how to add them  in DFSMSrmm system . Using “ditto” functions  to see everything on tape volume.

          Case 1. RMM operations

IS – r

REMOVABLE MEDIA MANAGER (DFSMSrmm) – z/OS V1R4

0  OPTIONS       – Specify dialog options and defaults
1  USER          – General user facilities
2  LIBRARIAN     – Librarian functions
3  ADMINISTRATOR – Administrator functions
4  SUPPORT       – System support facilities
 5  COMMANDS      – Full DFSMSrmm structured dialog             
6  LOCAL         – Installation defined dialog
X  EXIT          – Exit DFSMSrmm Dialog

 IS-r-5                       DFSMSrmm Command Menu – z/OS V1R4 

0  OPTIONS   – Specify dialog options and defaults
1  VOLUME    – Volume commands                           
2  RACK      – Rack and bin commands
3  DATA SET  – Data set commands
4  OWNER     – Owner commands
5  PRODUCT   – Product commands
6  VRS       – Vital record specifications
7  CONTROL   – Display system control information
R  REPORT    – Report generator
IS-r-5-1                             DFSMSrmm Volume Menu        

0  OPTIONS   – Specify dialog options and defaults
1  DISPLAY   – Display volume information                
2  ADD       – Add a new volume                          
3  CHANGE    – Change volume information                 
4  RELEASE   – Delete or release a volume                
5  SEARCH    – Search for volumes
6  REQUEST   – Request a volume
7  ADDSCR    – Add one or more SCRATCH volumes
8  CONFIRM   – Confirm librarian or operator actions     
9  STACKED   – Add one or more stacked volumes

IS-r-5-1-1- 1                       DFSMSrmm Volume Details – CB1013                  

Volume . . . . . . : CB1013     VOL1 volser :         Rack number : CB101
Media name . . . . : 3590                             Status  . . : USER
More:
Volume type  . . . : PHYSICAL       Stacked count  . . . . . . : 0
Retention date . . :                Expiration date  . . . . . : 2010/062
Set retained . . . : NO             Original expiration date . :
Description  . . . :
Data set name  . . : ‘KCI01.DMNSNTAP.D290200′
Media type . . . . : EHPCT          Release actions:
Label  . . . . . . : SL               Return to SCRATCH pool . : YES
Current version  :                  Replace volume . . . . . : NO
Required version :                  Return to owner  . . . . : NO
Density  . . . . . : IDRC             Initialize volume  . . . : NO
Recording format . : 128TRACK         Erase volume . . . . . . : NO
Compaction . . . . : YES              Notify owner . . . . . . : NO

IS-r-5-1-4                           DFSMSrmm Release Volumes                          

Volume . . . . .           May be generic.  Leave blank for all volumes.

Enter optional parameters to qualify search (leave blank for specific volume):
Owner  . . . . .           Enter a specific user, default is your userid

Status . . . . .           SCRATCH, MASTER or USER.

Release type . .           RELEASE, REMOVE or FORCE.
Used only if 1 volume is listed

Limit  . . . . .           Limit search to first nnnn volumes

The following line commands will be available if a list is displayed:
F – Force volume                           E – Eject volume
O – Display owner information              L – List multi-volume chain
R – Release USER or MASTER volume or remove SCRATCH volume
V – Display volume information

IS-r-5-1-3             DFSMSrmm Change Volume Details – CB1013                      

More:
Volume . . . . . . : CB1013         Pool  . . . . . . .
VOL1 volser  . . .                 or
Media name . . . . : 3590           Rack  . . . . . . . CB1013
Storage group  . . .                Location name . . : SHELF
Move mode  . . . . . AUTO           Bin number  . . . :
Volume type  . . . . PHYSICAL       Destination . . . .
Retention period . .                Destination bin . .
Status . . . . . . . USER           In container  . . .
Expiration date . . 2010/062    YYYY/DD
Initialize  . . . . NO
Description  . . . .
Data set name  . . . ‘KCI01.DMNSNTAP.D290200′
Media type . . . . . EHPCT          Release actions:
Label  . . . . . . . SL               Return to SCRATCH pool . . YES
Current version                     Replace volume . . . . . . NO
Required version                    Return to owner  . . . . . NO

IS-r-5-1-8                         DFSMSrmm Volume Action Status      

The following line commands are valid: C, U and S
Dest-
S Action   Location ination  Move Type Status
– ——– ——– ——– ——— ———
ERASE                                                                UNKNOWN
INIT                                                                    PENDING
NOTIFY                                                             UNKNOWN
REPLACE                                                          PENDING
RETURN                                                            PENDING
SCRATCH                                                          PENDING
MOVE     LIB1         DISTANT  NOTRTS   PENDING
MOVE     LIB1         SHELF        NOTRTS   PENDING
MOVE     LIBVTS   DISTANT  NOTRTS   PENDING
MOVE     LIBVTS   DISTANT  RTS            PENDING
MOVE     LIBVTS   LOCAL       NOTRTS    PENDING
MOVE     LIBVTS   SHELF       NOTRTS    PENDING

          Case 2. The problem: RMM – error rc=12  when try to release, force any tape

                2.1.  DFSMSrmm FORCE Volume – error rc=12 

IS – r –   5 – 1  – 4

Volume . . . . . CB1013    May be generic.  Leave blank for all volumes.

Enter optional parameters to qualify search (leave blank for specific volume):

Owner  . . . . .           Enter a specific user, default is your userid

Status . . . . .           SCRATCH, MASTER or USER.

Release type . . FORCE     RELEASE, REMOVE or FORCE.

Used only if 1 volume is listed

Limit  . . . . .           Limit search to first nnnn volumes

The following line commands will be available if a list is displayed:

F – Force volume                           E – Eject volume

O – Display owner information              L – List multi-volume chain

DFSMSrmm Command Return Code 12. Unexpected reason code 202 for the RMM

subcommand: RMM DELETEVOLUME  ‘CB1013′  EJECT(CONVENIENCE) FORCE   

  
                2.2. DFSMSrmm Change Volume Details – if tape  CB0951  has the same error (rc=12)

Before First Action – enter IS-r-5-1-3 (change ) – to change tape Cb0951

Return to owner . . . . . YES

Erase volume . . . . . . : YES

First  action -  enter IS-r-5-1-4 (release) – to release tape Cb0951 – the result here will be ‘Volume released’  and   in IS-r-5-1-1- with availability ‘pending release’.

Second action  - enter  IS – r – 5 – 1 – 8 (confirm) –  to find  the tape CB0951 status and change it:

DFSMSrmm Volume Action Status    

The following line commands are valid: C, U and S

S Action   Location   Destination  Move Type Status

– ——– ——– ——– ——— ———

If the tape is pending in ERASE, go to steps 1, 2, 3 in sequence:

  ERASE                                                                              UNKNOWN

Volume Assigned Expiration Rack                                                  Dest- Tra-

S Serial Owner Date Date Location Number                      Action      ination nsit

   ce CB0951 IBMUSER 2013/039 2040/177 SHELF OE (changed to OI – step 1) N

s     INIT                                                                                  PENDING

   ci CB0951 IBMUSER 2013/039 2040/177 SHELF OI (changed to O – step 2) N

NOTIFY                                                                           UNKNOWN

REPLACE                                                                        PENDING

s   RETURN                                                                    PENDING            - the next menu show  Volume Action Summary List with possible actions

   co CB0951 IBMUSER 2013/039 2040/177 SHELF O (changed to blank – step 3) N

SCRATCH                                                                       PENDING

MOVE     LIB1     DISTANT  NOTRTS                    PENDING

If the tape is pending only in RETURN, the released  tape CB0951 will  appear    in the following Action  menu  after  marking   this  field /s   RETURN     PENDING /  and should  be processed with command  CO (Confirmed to return to its owner which is USER ) as follows:

DFSMSrmm Volume Action Summary List    Row 1 to 14 of 117

The following line commands are valid: C, CE, CI, CM, CN, CO, CR, E, L and V

Volume              Assigned        Expiration         Rack                               Dest-    Tra-

S  Serial     Owner    Date                      Date        Location Number  Action ination  nsit

— —— ——– ———- ———- ——– —— —— ——-  —-

CB0011 BCA1VTF  2010/007   2010/014         SHELF   CB0011 O  N

CB0117 BCA1VTF  2010/006   2010/013         SHELF   CB0117 O  N

CB0196 BCA1VTF  2010/006   2010/013         SHELF   CB0196 O  N

CB0357 BCA1VTF  2010/007   2010/014         SHELF  CB0357 O  N

CB0361 BCA1VTF  2010/006   2010/013         SHELF   CB0361 O  N

CB0423 BCA1VTF  2010/006   2010/013         SHELF   CB0423 O  N

CO   CB0951 BCA1MGP  2008/079   2010/054   LIB1     CB0951  O      -   Enter   Y   – O  disappear and CB0951 volume does not exists  any more when  Is – r – 5 – 1- 1  is entered.  Add the same tape with:  Is – r – 5 – 1- 2

CB0961 BCA1VTF  2010/013   2010/020   SHELF    CB0961 O               N

s SCRATCH – Try to find another tape CB0988  if   in scratch Action Summary List  is pending   after Released  – it will appear with action O.

CB0998 BCA1MGP  2008/053   2008/060   LIB1     CB0998 S      O      –  Enter      Y    – O disappear – the same actions as above – etc.

If the tape   is scratch – Enter IS-r-5-1-4 (remove) –      this is enough  to  REMOVE the     tape  from DFSMSrmm.

If the above actions are not successfull  do the following:

Go to steps 2.3.1 and 2.3.2 bellow (delete VCB0988 from catalog),  put in 3/change/ expiration date 2 days before, 4- release CB0988 again   and start jobs rmmvrs (in step 2.3.3 – verifation processing  for  all volumes)  + rmmexpire (in step 2.3.4 –  expiration processing for all volumes).

               2.3. Delete tape from catalog   

If no result (release pending and 8-confirm on RETURN – CO/confirm owner)  after change (expiration date 2 days before, USER, return to owner   and starting rmmvrs + rmmexpire), then delete tape from the catalog.

                               2.3.1.  Listcat of the tapes 

  //LISTCAT EXEC PGM=IDCAMS,REGION=1024K

//SYSPRINT DD  SYSOUT=X

//SYSIN    DD  *

LISTCAT  NAMES     –

CAT(SYS1.VOLCAT.VGENERAL)

Start listing of execution – enter F CB0988  to  find if a  record for that  tape volume name exists in catalog

VOLUME-ENTRY—-VCB0988 – yes, exists – then this record  in catalog should be deleted

                                2.3.2. Delete tape record  in catalog

//LISTCAT EXEC PGM=IDCAMS,REGION=1024K

//SYSPRINT DD  SYSOUT=X

//SYSIN    DD  *

DEL (VCB0988)                      –

VOLUMEENTRY –

PURGE

/*

                                2.3.3. Verifation processing  for  all volumes

//RMMVRS     JOB (9999),

//           CLASS=R,

//           REGION=8092K,

//           MSGCLASS=X,MSGLEVEL=(1,1)

//*

//* *****************************************************************

//*

//* LIB: CORNERST.ZOS140.OPER.LIB(RMMVERIF)

//* GDE: CORNERSTONE OPERATOR REFERENCE

//* DOC: THIS JOB PEFORMS VERIFATION PROCCESSING FOR ALL VOLUMES

//*

//* *****************************************************************

//HSKP     EXEC PGM=EDGHSKP,PARM=’VRSEL,VERIFY’

//MESSAGE  DD  DISP=SHR,DSN=RMM.MESSAGE.LOG

//REPORT   DD  DISP=SHR,DSN=RMM.VRS.FILE

//ACTIVITY DD  DISP=SHR,DSN=RMM.ACTIVITY.FILE

//SYSOUT   DD  *

//HSKP     EXEC PGM=EDGHSKP,PARM=’VRSEL,VERIFY’

//MESSAGE  DD  DISP=SHR,DSN=RMM.MESSAGE.LOG

//REPORT   DD  DISP=SHR,DSN=RMM.VRS.FILE

//ACTIVITY DD  DISP=SHR,DSN=RMM.ACTIVITY.FILE

//SYSOUT   DD  *

/*

//MESSAGE   EXEC PGM=IEBGENER

//SYSOUT    DD SYSOUT=*

//SYSPRINT  DD SYSOUT=*

//SYSUT1    DD DSN=RMM.MESSAGE.LOG,DISP=SHR

//SYSUT2    DD SYSOUT=*

//SYSIN     DD DUMMY

/*
                                2.3.4. Expiration processing for all volumes

//RMMEXPIR   JOB (9999),

//          ,

//           REGION=8092K,

//           MSGCLASS=X,MSGLEVEL=(1,1)

//*

//* ***************************************************************

//*

//* LIB: CORNERST.ZOS140.OPER.LIB(RMMEXPIR)

//* GDE: CORNERSTONE OPERATOR REFERENCE

//* DOC: THIS JOB PEFORMS EXPIRATION PROCCESSING FOR ALL VOLUMES

//*

//* ***************************************************************

//HSKP     EXEC PGM=EDGHSKP,PARM=’VRSEL,EXPROC’

//MESSAGE  DD  DISP=SHR,DSN=RMM.MESSAGE.LOG

//REPORT   DD  DISP=SHR,DSN=RMM.REPORT.FILE

//ACTIVITY DD  DISP=SHR,DSN=RMM.ACTIVITY.FILE

//SYSOUT   DD  *

===>                                                  Scroll ===>

/*

//MESSAGE   EXEC PGM=IEBGENER

//SYSOUT    DD SYSOUT=*

//SYSPRINT  DD SYSOUT=*

//SYSUT1    DD DSN=RMM.MESSAGE.LOG,DISP=SHR

//SYSUT2    DD SYSOUT=*

//SYSIN     DD DUMMY

/*

Case 3. Scratch tape prepare

                 3.1. Delete the tape

Verify the status of the tape using  – r-5-1-1  “Status  . . :   MASTER ” – this status can’t be change to Scratch  Status.

To delete the tape –  follow IS – r- 5 – 1 – 4   (Release type – FORCE. )

                  3.2. Add scratch tape

IS – r- 5 – 1 – 7  (ADDSCR – Volume S00675 – Media name – 3490 – Media type   HPCT – Label   SL and go in status status I(init).

                3.3. Initialize the  scratch tape

If an new added scratch tape is put  in MAGSTAR – it is automatically initiated and transformed from type=init  in type=scratch.

IS – r- 5 – 1 – 8 (CONFIRM)

The following line commands are valid: C, U and S

Dest-

S Action   Location ination  Move Type Status

ERASE                                UNKNOWN

c  INIT                                 CONFIRMED  (c – confirm)

NOTIFY                               UNKNOWN

REPLACE                              PENDING

RETURN                               PENDING

SCRATCH                              PENDING

MOVE     LIB1     DISTANT  NOTRTS    PENDING

MOVE     LIB1     SHELF    NOTRTS    PENDING

MOVE     LIBVTS   DISTANT  NOTRTS    PENDING

S  INIT – (select)

               3.4. Mass .  Initialize 5 scratch tapes  with batch job   RMMI3590

//RMMI3590   JOB (9999),

//         CLASS=W ,

//           REGION=8092K,

//           MSGCLASS=X,MSGLEVEL=(1,1)

//* *****************************************************************

//*

//* LIB: CORNERST.ZOS140.OPER.LIB(RMMI3590)

//* GDE: CORNERSTONE OPERATOR REFERENCE

//* DOC: THIS JOB INITIALIZES UP TO THE FIRST 5  3590 CARTRIGES

//*      THAT ARE IN STATUS INIT

//*

//* ***************************************************************** ‘

//SCRCHLST EXEC PGM=EDGINERS,

//        PARM=(‘INITIALIZE,ERASE,COUNT(5),NOVERIFY,MEDIANAME(3590)’,  X

//        ‘WRONGLABEL(PROMPT)’)

//SYSPRINT DD SYSOUT=A

//TAPE     DD UNIT=(3590,,DEFER)     or UNIT=(3490,,DEFER)

//

After the job ended – enter IS-r-5-1-8 - s INIT  PENDING –

enter CI to confirm Init status:

ci CB0968          2011/004              SHELF    CB0968      I               N

After CONFIRMED – ci   CB0968  /disappear   status I/

CB0968          2011/004              SHELF    CB0968                 N –  init OK

–Verify –  IS- r-5-1-1 – switch to  status –  SCRATCH – OK/)

Volume . . . . . . : CB0968     VOL1 volser :         Rack number : CB0968

Media name . . . . : 3590                             Status  . . : SCRATCH 

More:

If the scratch tape is required ( not defined enough tapes to write) a message appears

*IEC501A M 0300,PRIVAT,SL,COMP,BKPKCI08,BACKUP

Put the scratch tape CB0968 on dev 300

If the tape is is file-protected –  these messages appear:

*IEC510D F 0300,CB0968,BKPKCI08,BACKUP

*0021 IEC510D REPLY ‘U’-USE OR ‘F’-UNLOAD

F indicates that the tape volume indicated on the device is file-protected.

          Case4.  Ditto – tape functions

               4.1.    Tape control functions

DI – 2. Tape Control  – Tape control functions

DITTO/ESA for MVS           Tape Control Functions

Select the desired function or enter the function code directly.

1. BSF – Backward space file

2. FSF – Forward space file

3. BSR – Backward space record

4. FSR – Forward space record

5. REW – Tape rewind

6. RUN – Tape rewind-unload

7. WTM – Write tape mark

8. INT – Initialize tape

9. ERT – Erase tape (Data Security Erase)

               4.2. Tape functions  

DI -3. Tape          – Tape functions

DITTO/ESA for MVS               Tape Functions

Select the desired function or enter the function code directly.

1. TB  – Tape browse

2. TLB – Tape label display (when labels unknown)

3. TMP – Tape map (short list of a tape’s contents)

4. TP  – Tape print (in character or hexadecimal dump format)

5. TRS – Tape record scan

6. TTC – Tape to tape compare

7. TT  – Tape to tape (one or more files)

8. TTR – Tape to tape reblocked

9. TU  – Tape update

10. BT  – Create tape data

11. TLT – Tape to labeled tape

12. EVC – Exported Stacked Volume   copy logical volume

13. EVL – Exported Stacked Volume print table of contents

          Case 5. Find tape information

    -Start RMMDAILY

//RMMDAILY   JOB (9999),

//          ,

//           REGION=8M,

//           MSGCLASS=X,MSGLEVEL=(1,1)

//*

//SCRCHLST EXEC PGM=IKJEFT01

//SYSTSPRT DD SYSOUT=A

//SYSTSIN  DD *

RMM SEARCHDATASET DSNAME(*) SEQ(*) LIMIT(*) OWNER(*)   

/*

//HSKP1    EXEC PGM=EDGHSKP,

//*  PARM=’BACKUP(DSS),RPTEXT,DATEFORM(E)’

//   PARM=’VRSEL,VERIFY’

//MESSAGE  DD  DISP=SHR,DSN=RMM.MESSAGE.LOG

//REPORT   DD  DISP=SHR,DSN=RMM.REPORT.FILE

//ACTIVITY DD  DISP=SHR,DSN=RMM.ACTIVITY.FILE

//SYSPRINT DD  SYSOUT=*

//DSSOPT   DD  *

CONCURRENT  OPTIMIZE(4)  VALIDATE

/*

-JES  TSO/ISPF – sd.st -    ? RMMDAILY    – s  SYSTSPRT SCRCHLST – f   CB0035

Result:

KCI01.DMNSNTAP.SOVBDB.G0031V00               CB0035 BCA1MGP  01/16/2004  1

          Case 6.  Adding new prefix for tapes  (HV*) 

                6.1. Display tape volume information

    Use  TSO/ISPF:    Is – r – 5 – 7 (7  CONTROL   – Display system control information)

0  OPTIONS      – Specify dialog options and defaults

1  CONTROL      – Display cds control record details

2  SYSTEM       – Display system options and defaults

3  SECURITY     – Display security classification rules

4  VLPOOLS      – Display volume pool definitions     

5  MNTMSG       – Display mount message definitions

6  REJECT       – Display volumes to be rejected

7  ACTIONS      – Display volume moves and actions

8  LOCDEF       – Display location definitions

     4   VLPOOLS      – Display volume pool definitions

DFSMSrmm Volume Pool Definitions      Row 1 to 10 of 10

Pool   Media System   Pool          RA  Ty  Date       Description

Name                Name     CF   pe  Check

—— ——– ——– ——– — — —– ——————————-

CB*    3590                                         Y  S     NO  3590 CARTRIGES                  

D*        3490                                        Y  S     NO     3490 CARTRIGES

    HV*    3590                                        Y  S     NO  3590 CARTRIGES                  

LV*      3480                                        N  R     NO     PRODUCT TAPES

P*         3480                                        N  R     NO     PRODUCT TAPES

Q*        3590                                        Y  S     NO     3590 CARTRIGES

S*        3490                                         Y  S     NO     3490 CARTRIGES

1*       3480                                          Y  S     NO     3480 CARTRIGES

3*    TAPE               Y  S     NO      OPEN REEL TAPES

*  3480  N         S    OPER     DEFAULT VOLUME POOL

               6.2.  Change member EDGRMM02 in sys1.parmlib

In member EDGRMM02 of library Sys1.parmlib (EDGRMM02) do the following: -  F CB* – Copy/Paste  and change CB* to HV*

VLPOOL DESCRIPTION(‘3590 CARTRIGES’) EXPDTCHECK(N) MEDIANAME(3590) –

PREFIX(CB*) RACF(Y) TYPE(S)

VLPOOL DESCRIPTION(‘3590 CARTRIGES’) EXPDTCHECK(N) MEDIANAME(3590) –

PREFIX(HV*) RACF(Y) TYPE
(S)

               6.3.  Update information in   ACS Routines    

Enter IS – 6 (Storage group) –  enter  the actual CDS name to have the access to source of  CDS

Enter IS-7 (Automatic Class Selection)  and perform  the following activities:

2 – translate – Translate ACS Routines to ACS Object Form –  for all objects – confirm with  / – noprint

3- validate – Validate ACS Routines Against Storage Constructs – for all objects confirm with   / – noprint

Enter IS – 8 (Control Data Set) –  activate the source Control Data Set (CDS);

Enter IS – 6 (Storage group)  – change CDS Name   to ‘Active’

(CDS Name  . . . . . . .  replace for CDS  name ‘bc2a.zos140.dfsms.scds’ with ‘ACTIVE’)

               6.4.  Add  new HV* tape volume  to verify HV* prefix

Is – r – 5 – 1 – 2   ADD       – Add a new volume

DFSMSrmm Add Volume                  Volume added

More:     +

Volume . . . . . . . HV0180       Pool  . . . . . . .

Count  . . . . . . .               or

Media name . . . . . 3590         Rack  . . . . . . .

Storage group  . . .              Location name . . .

Retention period . .              Expiration date . .             YYYY/DDD

Status . . . . . . . USER         Initialize  . . . .

Description  . . . .

Data set name  . . .

Media type . . . . . EHPCT        Release actions

Label  . . . . . . . SL              Return to SCRATCH pool . . YES

Current version                    Replace volume . . . . . . NO

Command ===

    *** Stop/Start DFRMM for new   HV* suffix in EDGRMM02 (/p dfrmm, /s dfrmm)

 

Incoming search terms:

  • how to delete tape file in mainframe
  • mainframe tape commands
  • how to delete a tape file on the mainframe
  • acs routines mainframe
  • delete tape dataset mainframe
  • how to view tape files in mainframe
  • tape files in mainframe
  • how to delete a tape dataset in mainframe
  • how to create a tape file in mainframes
  • how to delete tape files in mainframe

Leave A Reply

Comments

No comments yet, be the first to add one!