Start a Conversation

This post is more than 5 years old

Solved!

Go to Solution

1671

February 19th, 2014 19:00

Find the total amount of data replicated?

Hello,

We have a IBM mainframe with emc vmax as backend. We have srdf setup from one site to other site for all the z/vm devices. I am trying to find out the total amount of data that is been replicated to secondary site.

Can I know how to find it out?

DO we have to run any job or is there any srdf utility in mainframe ?

please do let me know.

465 Posts

February 23rd, 2014 14:00

How was SRDF set up in the first place? And how do you manage SRDF ongoing? Whatever tool you use, can also be used to report what you want.

In Z/os if you have Mainframe Enablers installed you can run SRDF queries.

e.g. SQ VOL,4000,ALL

Where 4000 is the CUU of the VMAX you want to report against. This reports all devices so the output would need to be parsed for the devices you want. Additional parameters can be added to the command to filter (e.g. RDF group, R1 only, R2 only)

Note that There is an SRDF INIT parm "MAX_QUERY" that documents the maximum number of devices to report. You may need to adjust this value to get all your devices in a single command output.

If you have solutions enabler installed in an open systems host connected to the array, you can run "SYMRDF -sid xx LIST" or "SYDEV -sid xx LIST -R2"

February 25th, 2014 11:00

Besides Solutions Enabler, you probably have Mainframe Enabler too. In that case you may go thru EMCRDF /ÑSQ vol,xxxx,all for local host attached to array or /ÑSQ VOL,rmt(XXXX),all for remote box

Regards

13 Posts

March 5th, 2014 08:00

Hi I have one more thing,

We run backup job every sunday. And this time some volumes dint get offline, when running the job whack caused the job to abend with s806 error. DO you guys know what might be the reason.

465 Posts

March 5th, 2014 13:00

S806 is module not found. So either something is missing in your link list or your job is missing a steplib statement or the steplib does not contain the required datset needed that contains the module described in the s806 error.

You need to identify which module the s806 is talking about, then take one of the actions above to rectify it.

13 Posts

March 13th, 2014 08:00

We run the same job every week and this time it gives an error..


FILE>    STGUSER.P1ODMP10.JOB23404.D0000003.JESJCL,2014.061,05:00:13:49   

        1 //P1ODMP10 JOB 9B95593,'EMC R1/R2 FRONT END',CLASS=S,MSGCLASS=3,     

          // MSGLEVEL=(1,1),USER=STGUSER                                       

          //* CA-7 JOB#=8267 DUE OUT 14.061/08.40 JCLID=000 SCHID=150 ENTRY=SSCN

          //*                                                                  

          /*ROUTE XEQ Z78JES2                                                  

          //*                                                                  

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

          //*                                                                  

         //* THIS JOB SPLITS BCV VOLUMES SO THAT THEY CAN BE BACKED UP TO TAPE.

         //* THE TWO BCV SPLIT STEPS ARE JS0020 AND JS0705.  JS0020 SPLITS THE

         //* BCV VOLUMES LOCATED AT THE REMOTE DATA CENTER, AND JS0705 SPLITS 

         //* THE BCV VOLUMES LOCATED AT THE LOCAL DATA CENTER.                

         //*                                                                  

         //* IT MUST BE RUN ON SYSZ ... HENCE THE ROUTE CARD                  

         //*                                                                  

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

         //* 2011/02/02 BDP REWORK FOR BCV BACKUP "WAN BACKUP" IMPLEMENTATION 

         //* 2008/12/02 BDP CHANGE WAIT TIMES FOR JS0200, JS0300, JS0400, JS050

         //* 2008/10/24 BDP ADD JS0705-6 TO SPLIT REMOTE Q VM VOLUMES         

         //* 2006/06/12 DWH ADD JS006-9 TO CHECK FOR 32 ONLINE PACKS AT START 

         //* 2006/05/01 DWH CHANGE STEPLIB TO SYS2.EMC.R000.SRDF.LINKLIB      

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

         //*                                                                  

         //*JCLLIB=P1ON.PS.JCLLIB                                             

         //*+ISYS=SYSB                                                        

         IEFC025I INSTALLATION MODIFIED JCL - //P1ODMP10 JOB 9B95593,'EMC R1/R2

         JOB23404                                                             

       2 //JS0005   EXEC PGM=IDCAMS                                           

         //*                                                                  

         //*  DELETE ALL OF PRIOR DAYS FILES                                  

         //*                                                                  

       3 //SYSPRINT  DD SYSOUT=*                                              

       4 //SYSIN     DD DSN=SYS9.PARMLIB(DELA0005),DISP=SHR                   

         //*                                                                  

         //*                                                                  

         //*                                                                  

       5 //JS0006   EXEC PGM=IDCAMS                                           

         //*                                                                  

         //*  DELETE PRIOR DAYS FILE                                          

         //*                                                                  

       6 //SYSPRINT  DD SYSOUT=*                                              

       7 //SYSIN     DD DSN=SYS9.PARMLIB(DELA0006),DISP=SHR                   

         //*                                                                  

         //*                                                                  

         //*                                                                  

       8 //JS0007   EXEC PGM=IDCAMS                                           

        //*                                                                  

        //*  DCOLLECT VOLUME DATA                                            

        //*                                                                  

      9 //SYSPRINT  DD SYSOUT=*                                              

     10 //DCOUT     DD DSN=SYS9.EMC.V00.DCOLLECT.VOL0032,                    

        //             DISP=(,CATLG,DELETE),                                 

        //             UNIT=3390,SPACE=(TRK,(20,5),RLSE),                    

        //             DSORG=PS,RECFM=VB,LRECL=1024,BUFNO=30                 

     11 //SYSIN     DD DSN=SYS9.PARMLIB(DCOLVOL),DISP=SHR                    

        //*                                                                  

        //*                                                                  

        //*                                                                  

     12 //JS0008   EXEC PGM=IKJEFT01,DYNAMNBR=50,PARM='VOL0032'              

        //*                                                                  

        //*  BACKGROUND TSO RUNNING REXX TO CHECK ONLINE VOLUME COUNTS       

        //*                                                                  

     13 //SYSEXEC   DD DSN=SYS9.DASD.R000.ISPCLIB,DISP=SHR                   

     14 //SYSTSPRT  DD SYSOUT=*                                              

     15 //DCOLLI    DD DSN=SYS9.EMC.V00.DCOLLECT.VOL0032,DISP=SHR            

     16 //REPTO     DD SYSOUT=*                                              

     17 //SYSTSIN   DD DUMMY                                                 

        //*                                                                  

        //*                                                                  

        //*                                                                  

     18 //JS0009   EXEC PGM=BKDARYL,COND=(4,GE,JS0008)                       

        //*                                                                  

        //*  THIS STEP ABENDS (PGM NOT FOUND) IF JS0008 HAS NON-ZERO RC      

        //*                                                                  

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

        //*                                                                  

     19 //JS0010    EXEC PGM=EMCTF,PARM='MAXREQ=65536',REGION=0M             

        //*                                                                  

        //*  THIS STEP PERFORMS A TIMEFINDER QUERY FOR THE VOLUMES WE        

        //*  ARE ABOUT TO SPLIT IN THE NEXT STEP JS0020.                     

        //*                                                                  

     20 //STEPLIB   DD DISP=SHR,DSN=SYS2.EMC.R000.SRDF.LINKLIB               

     21 //          DD DISP=SHR,DSN=SYS2.EMC.R000.SSCF.LINKLIB               

     22 //          DD DISP=SHR,DSN=SYS2.EMC.R000.SSNP.LINKLIB               

     23 //          DD DISP=SHR,DSN=SYS2.EMC.R000.STFX.LINKLIB               

     24 //SYSPRINT  DD SYSOUT=*                                              

     25 //SYSOUT    DD SYSOUT=*                                              

     26 //SYSIN     DD DISP=SHR,DSN=SYS9.PARMLIB(BCVQUERY)                   

        //*                                                                  

     27 //JS0015   EXEC PGM=BKDARYL,COND=(0,EQ,JS0010)                       

        //*                                                                  

        //*  THIS STEP ABENDS (PGM NOT FOUND) IF JS0010 HAS NON-ZERO RC      

        //*                                                                  

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

        //*                                                                  

     28 //JS0020    EXEC PGM=EMCTF,PARM='MAXREQ=65536',REGION=0M             

        //*                                                                  

        //*  THIS STEP PERFORMS A TIMEFINDER CONSISTENT SPLIT OF THE         

        //*  BCV VOLUMES IN THE REMOTE BOX                                   

        //*                                                                  

     29 //STEPLIB   DD DISP=SHR,DSN=SYS2.EMC.R000.SRDF.LINKLIB               

     30 //          DD DISP=SHR,DSN=SYS2.EMC.R000.SSCF.LINKLIB               

     31 //          DD DISP=SHR,DSN=SYS2.EMC.R000.SSNP.LINKLIB               

     32 //          DD DISP=SHR,DSN=SYS2.EMC.R000.STFX.LINKLIB               

     33 //SYSPRINT  DD SYSOUT=*                                              

     34 //SYSOUT    DD SYSOUT=*                                              

     35 //SYSIN     DD DISP=SHR,DSN=SYS9.PARMLIB(BCVSPLIT)                   

        //*                                                                  

     36 //JS0025   EXEC PGM=BKDARYL,COND=(0,EQ,JS0020)                       

        //*                                                                  

        //*  THIS STEP ABENDS (PGM NOT FOUND) IF JS0020 HAS NON-ZERO RC      

        //*                                                                  

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

        //*                                                                  

     37 //JS0705    EXEC PGM=EMCTF,PARM='MAXREQ=65536',REGION=0M             

        //*                                                                  

        //*  SPLIT OF LINUX BCV ON EAGAN BOX                                 

        //*                                                                  

     38 //STEPLIB   DD DISP=SHR,DSN=SYS2.EMC.R000.SRDF.LINKLIB               

     39 //          DD DISP=SHR,DSN=SYS2.EMC.R000.SSCF.LINKLIB               

     40 //          DD DISP=SHR,DSN=SYS2.EMC.R000.SSNP.LINKLIB               

     41 //          DD DISP=SHR,DSN=SYS2.EMC.R000.STFX.LINKLIB               

     42 //SYSPRINT  DD SYSOUT=*                                              

     43 //SYSOUT    DD SYSOUT=*                                              

     44 //SYSIN     DD DSN=SYS9.PARMLIB(SPLIT),DISP=SHR                      

        //*                                                                  

     45 //JS0706   EXEC PGM=BKDARYL,COND=(0,EQ,JS0705)                       

        //*                                                                  

        //*  THIS STEP ABENDS (PGM NOT FOUND) IF JS0705 HAS NON-ZERO RC      

        //*                                                                  

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

  

job output:

05.00.02 JOB23404  -P1ODMP10 JS0008            IKJEFT01    16     63       00.02

05.00.02 JOB23404  CSV003I REQUESTED MODULE BKDARYL  NOT FOUND                 

05.00.02 JOB23404  CSV028I ABEND806-04  JOBNAME=P1ODMP10  STEPNAME=JS0009      

05.00.02 JOB23404  IEA995I SYMPTOM DUMP OUTPUT  162                            

   162             SYSTEM COMPLETION CODE=806  REASON CODE=00000004            

   162              TIME=05.00.02  SEQ=00554  CPU=0000  ASID=0050              

   162              PSW AT TIME OF ERROR  070C1000   814EACF8  ILC 2  INTC 0D  

   162                NO ACTIVE MODULE FOUND                                   

   162                NAME=UNKNOWN                                             

   162                DATA AT PSW  014EACF2 - 8400181E  0A0D18FB  180C181D     

   162                GR 0: 00001F00   1: 84806000                             

   162                   2: 00000000   3: 00000000                             

   162                   4: 00000000   5: 009FF540                             

   162                   6: 000000FF   7: 00000000                             

   162                   8: 7F588150   9: 014EB220                             

   162                   A: 00000000   B: 00000000                             

   162                   C: 00000000   D: 7F588150                             

   162                   E: 84806000   F: 00000004                             

   162              END OF SYMPTOM DUMP                                        

05.00.02 JOB23404  IEF450I P1ODMP10 JS0009 - ABEND=S806 U0000 REASON=00000004  

05.00.02 JOB23404  -P1ODMP10 JS0009            BKDARYL   S806      1       00.01

FILE>      STGUSER.P1ODMP10.JOB23404.D0000105.?,2014.061,05:00:13:49      

1  ONLINE VOLUME COUNT REPORT       RUN DATE: 2 MAR 2014    05:00:02           

                                                                               

EXPECTED VALUES:                                                              

   CCUU1=   32   CCUU2=    0   CCUU3=    0                                     

   CCUU4=    0   CCUU5=    0   CCUU6=    0                TOTAL=   32          

   CCUU7=    0   CCUU8=    0   CCUU9=    0                                     

   CCUUA=    0   CCUUB=    0   CCUUC=    0   SYSZ=    0   TOTAL=    0          

                                                                               

ACTUAL VALUES:                                                                

   CCUU1=   33   CCUU2=    0   CCUU3=    6                                     

   CCUU4=    0   CCUU5=    7   CCUU6=    0                TOTAL=   46          

   CCUU7=    0   CCUU8=    0   CCUU9=    0                                     

   CCUUA=    0   CCUUB=    0   CCUUC=    0   SYSZ=    0   TOTAL=    0          

                                                                               

VOLUME TOTALS ARE NOT CORRECT                                                 

                                                                               

PROGRAM TERMINATING WITH RC: 16                       

No Events found!

Top