View previous topic :: View next topic
|
Author |
Message |
bpavan2k4
New User
Joined: 13 Jun 2007 Posts: 2 Location: Pune
|
|
|
|
Hi all,
There is an issue with a job. A temporary VSAM gets delete/defined in Step S03 followed by initialising by a program in Step S04. This program does a read/write/delete thus initialising the VSAM.
The next step S05 REPROs a sequential file of 13 million into this VSAM. This takes about 40+ minutes to run. BUFND, System buffers etc wouldnt change anything on the runtime. However if I do not run STep S04(Initialising) the Repro runs in 7-8 minutes.
My question is
1) Does the initialising of the VSAM changing any of its characteristics by which it is loads damn slow. ( I have compared the VSAM characteristics before and after init, nothing change at all)
2) Initialising a VSAM before a REPRO, is it 100% necessary? |
|
Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
100% unnecessary. What does the initialise do, exactly? What type of VSAM file is it? KSDS?
Why do you delete/define it?
Why REPRO? Have you tried SORT with OPTION COPY?
We're going to need to see a LISTCAT. In the Code tags, please. |
|
Back to top |
|
|
bpavan2k4
New User
Joined: 13 Jun 2007 Posts: 2 Location: Pune
|
|
|
|
Hi Bill,
The init does the following. (It's a KSDS)
OPEN
WRITE a dummy record
CLOSE
OPEN
READNX
ERASE
CLOSE
We delete/define the VSAM in every run as it should contain data from daily file and this data through VSAM is used in Focus programs to generate daily reports.
I have tried SORT/COPY and it runs almost the same time. The Repro in the last statement always has input data. We will never write an empty file into KSDS in Repro(last step)
My thinking is this should be enough. As we are always writing sequential data into KSDS in the last step, the INIT wouldn't be necessary. Correct me if I am wrong.
The VSAM defn is as below.
Code: |
DEFINE -
CLUSTER -
(NAME(SSUPP.PK.VSAM.SCHPF32.VSRCH) -
UNIQUE -
SHR(2 3) -
CYL(265 50) -
INDEXED -
IMBED -
CISZ(04096) -
FSPC(5 0) -
DATACLAS (COMPRESS) -
KEYS (086 0000) -
RECSZ(00182 000182)) -
DATA -
(NAME(SSUPP.PK.VSAM.SCHPF32.VSRCH.DATA)) -
INDEX -
(NAME(SSUPP.PK.VSAM.SCHPF32.VSRCH.INDEX)) |
The LISTC is
Code: |
IN-CAT --- ICFCTLG.APPSCA02
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2013.333
RELEASE----------------2 EXPIRATION------0000.000
SMSDATA
STORAGECLASS -------SMBA MANAGEMENTCLASS--PRIVATE
DATACLASS ------COMPRESS LBACKUP ---0000.000.0000
CA-RECLAIM---------(YES)
EATTR-------------(NULL)
BWO STATUS------00000000 BWO TIMESTAMP---00000 00:00:00.0
BWO---------------(NULL)
RLSDATA
LOG ----------------(NULL) RECOVERY REQUIRED --(NO) FRLOG ------------(NULL)
VSAM QUIESCED -------(NO) RLS IN USE ---------(NO) LOGREPLICATE-------------(NO)
0 LOGSTREAMID-----------------------------(NULL)
RECOVERY TIMESTAMP LOCAL-----X'0000000000000000'
RECOVERY TIMESTAMP GMT-------X'0000000000000000'
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
DATA-----XXX
INDEX----XXX
0 DATA ------- XXX
IN-CAT --- ICFCTLG.APPSCA02
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2013.333
RELEASE----------------2 EXPIRATION------0000.000
ACCOUNT-INFO-----------------------------------(NULL)
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
CLUSTER--XXX
ATTRIBUTES
KEYLEN----------------86 AVGLRECL-------------182 BUFSPACE-----------14336 CISIZE--------------4096
RKP--------------------0 MAXLRECL-------------182 EXCPEXIT----------(NULL) CI/CA----------------180
STRIPE-COUNT-----------1
ACT-DIC-TOKEN----X'4000000B0540070208010D0108FE0DFE05FE0EFE0AFE0000000000000000000000000000'
SHROPTNS(2,3) RECOVERY UNIQUE NOERASE INDEXED NOWRITECHK UNORDERED NOREUSE
NONSPANNED COMP-FORMT EXTENDED
STATISTICS
REC-TOTAL--------1336252 SPLITS-CI--------------0 EXCPS--------------87889
REC-DELETED------------1 SPLITS-CA--------------0 EXTENTS----------------1
REC-INSERTED-----------0 FREESPACE-%CI----------5 SYSTEM-TIMESTAMP:
REC-UPDATED------------0 FREESPACE-%CA----------0 X'CC55B9811CB780B6'
REC-RETRIEVED----------1 FREESPC---------14909440
USER-DATA-SIZE------------------------------243197864 COMP-USER-DATA-SIZE-------------------------163573371
ALLOCATION
1IDCAMS SYSTEM SERVICES TIME: 08:54:38 11/29/13 PAGE 2
0 SPACE-TYPE------CYLINDER HI-A-RBA-------193904640
SPACE-PRI------------263 HI-U-RBA-------179159040
SPACE-SEC-------------50
VOLUME
VOLSER------------DBV247 PHYREC-SIZE---------4096 HI-A-RBA-------193904640 EXTENT-NUMBER----------1
DEVTYPE------X'3010200F' PHYRECS/TRK-----------12 HI-U-RBA-------179159040 EXTENT-TYPE--------X'00'
VOLFLAG------------PRIME TRACKS/CA-------------15
EXTENTS:
LOW-CCHH-----X'0C2A0000' LOW-RBA----------------0 TRACKS--------------3945
HIGH-CCHH----X'0D30000E' HIGH-RBA-------193904639
VOLUME
VOLSER-----------------* PHYREC-SIZE------------0 HI-A-RBA---------------0 EXTENT-NUMBER----------0
DEVTYPE------X'3010200F' PHYRECS/TRK------------0 HI-U-RBA---------------0 EXTENT-TYPE--------X'FF'
VOLFLAG--------CANDIDATE TRACKS/CA--------------0
VOLUME
VOLSER-----------------* PHYREC-SIZE------------0 HI-A-RBA---------------0 EXTENT-NUMBER----------0
DEVTYPE------X'3010200F' PHYRECS/TRK------------0 HI-U-RBA---------------0 EXTENT-TYPE--------X'FF'
VOLFLAG--------CANDIDATE TRACKS/CA--------------0
0 INDEX ------ XXX
IN-CAT --- ICFCTLG.APPSCA02
HISTORY
DATASET-OWNER-----(NULL) CREATION--------2013.333
RELEASE----------------2 EXPIRATION------0000.000
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
CLUSTER--XXX
ATTRIBUTES
KEYLEN----------------86 AVGLRECL---------------0 BUFSPACE---------------0 CISIZE--------------6144
RKP--------------------0 MAXLRECL------------6137 EXCPEXIT----------(NULL) CI/CA------------------8
SHROPTNS(2,3) RECOVERY UNIQUE NOERASE NOWRITECHK UNORDERED NOREUSE EXTENDED
STATISTICS
REC-TOTAL------------244 SPLITS-CI--------------0 EXCPS--------------44944 INDEX:
REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS----------------1 LEVELS-----------------2
REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAMP: ENTRIES/SECT----------13
REC-UPDATED--------44183 FREESPACE-%CA----------0 X'CC55B9811CB780B6' SEQ-SET-RBA----------------0
REC-RETRIEVED----------0 FREESPC-----------172032 HI-LEVEL-RBA-----------12288
ALLOCATION
SPACE-TYPE---------TRACK HI-A-RBA---------1671168
SPACE-PRI-------------34 HI-U-RBA---------1499136
SPACE-SEC--------------7
VOLUME
VOLSER------------DBV247 PHYREC-SIZE---------6144 HI-A-RBA---------1671168 EXTENT-NUMBER----------1
DEVTYPE------X'3010200F' PHYRECS/TRK------------8 HI-U-RBA---------1499136 EXTENT-TYPE--------X'00'
VOLFLAG------------PRIME TRACKS/CA--------------1
EXTENTS:
LOW-CCHH-----X'00790000' LOW-RBA----------------0 TRACKS----------------34
HIGH-CCHH----X'007B0003' HIGH-RBA---------1671167
VOLUME
VOLSER-----------------* PHYREC-SIZE------------0 HI-A-RBA---------------0 EXTENT-NUMBER----------0
DEVTYPE------X'3010200F' PHYRECS/TRK------------0 HI-U-RBA---------------0 EXTENT-TYPE--------X'FF'
1IDCAMS SYSTEM SERVICES TIME: 08:54:38 11/29/13 PAGE 3
0 VOLFLAG--------CANDIDATE TRACKS/CA--------------0
VOLUME
VOLSER-----------------* PHYREC-SIZE------------0 HI-A-RBA---------------0 EXTENT-NUMBER----------0
DEVTYPE------X'3010200F' PHYRECS/TRK------------0 HI-U-RBA---------------0 EXTENT-TYPE--------X'FF'
VOLFLAG--------CANDIDATE TRACKS/CA--------------0 |
|
|
Back to top |
|
|
Bill O'Boyle
CICS Moderator
Joined: 14 Jan 2008 Posts: 2501 Location: Atlanta, Georgia, USA
|
|
|
|
Are you randomly populating this VSAM KSDS file with over 13 million records? I'm surprised it only takes 40 minutes. Bill has recommended SORT and I second this. |
|
Back to top |
|
|
Pete Wilson
Active Member
Joined: 31 Dec 2009 Posts: 582 Location: London
|
|
|
|
Suggest you change the Cluster to REUSE and the reload job will then simply overwrite the existing data. This also means the CI's don't have to be formatted as they're written to. |
|
Back to top |
|
|
|