Solved!
Go to SolutionFind 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.
pablosanzoni_bn
22 Posts
1233
1
Posted 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
PedalHarder
4 Apprentice
•
465 Posts
1233
0
Posted 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.
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
PedalHarder
4 Apprentice
•
465 Posts
1233
0
Posted 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"