Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

VSAM Initializing causing Repro to run long

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
bpavan2k4

New User


Joined: 13 Jun 2007
Posts: 2
Location: Pune

PostPosted: Fri Nov 29, 2013 6:27 pm    Post subject: VSAM Initializing causing Repro to run long
Reply with quote

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
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7307

PostPosted: Fri Nov 29, 2013 7:03 pm    Post subject: Reply to: VSAM Initializing causing Repro to run long
Reply with quote

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
View user's profile Send private message
bpavan2k4

New User


Joined: 13 Jun 2007
Posts: 2
Location: Pune

PostPosted: Fri Nov 29, 2013 7:49 pm    Post subject:
Reply with quote

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
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Fri Nov 29, 2013 8:25 pm    Post subject: Reply to: VSAM Initializing causing Repro to run long
Reply with quote

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
View user's profile Send private message
Pete Wilson

Active User


Joined: 31 Dec 2009
Posts: 440
Location: London

PostPosted: Tue Feb 18, 2014 9:28 pm    Post subject:
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Updating a VSAM file with DISP=OLD sheersh JCL & VSAM 8 Tue Mar 14, 2017 6:14 pm
No new posts SORT VSAM file with each field one by... maxsubrat DFSORT/ICETOOL 6 Tue Mar 14, 2017 1:07 pm
No new posts VSAM RLS=NRI while doing IDCAMS sheersh JCL & VSAM 1 Tue Mar 07, 2017 1:55 pm
No new posts Fail to change physical VSAM filename... jacobdng CICS 7 Fri Jan 20, 2017 12:36 pm
No new posts how to recover an uncataloged VSAM da... archanamuthukrishnan All Other Mainframe Topics 4 Wed Jan 11, 2017 6:18 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us