IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

VSAM share mode


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
ashim prodhan

New User


Joined: 28 Apr 2013
Posts: 7
Location: india

PostPosted: Wed Jun 03, 2015 7:54 pm
Reply with quote

Hello,

Would like to know why the below things happeing -

We have a long running batch whcih uses a VSAM file in SHR mode and is opened as input mode. The same file is allocated in CICS region. But the online program fails while updating the file while the batch runs. The file has below properties in CICS -

Code:
Interval displayed  . . .    Last       +
Volume serial number  . :    PDX001   
Creation date . . . . . :    12/04/11
LSR pool act strings HWM:    7       
LSR pool strings   . .  :    30       
VSAM analysis interval  :    15 min   
Data extents/interval . :    0          
Data CA splits/interval :    0          
Data CI splits/interval :    1          
File organization  . . :    KSDS     
Share control  . . . . :    LSRPOOL2
Expiration date  . . . :    None     
LSR pool active strings:    0       
FCT file . . . . . . . :    Yes     
Time of last analysis  :    10:01:29
Index extents/interval :    0          
Index CA splits/intrvl :    0          
Index CI splits/intrvl :    0   




Code:
File ID  . . . . . . .    XXX
File status  . . . . : Ena Ope     
AFCTE address  . . . :    n/a         
File format  . . . . : KSDS        
Record format  . . . : VB          
Record length  . . . : n/a         
Block size . . . . . : n/a         
Key length . . . . . : 28          
Rel. key position  . : 30          
Time file opened . . : 4:26:35      

Since the batch job holds the file in SHR mode why the online can't update the file. Looking for an explanation as we have another application where the same thing happens but online can update the file without any error. Any inputs will be really helpful. Thank You!

Ashim

Code'd
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Wed Jun 03, 2015 8:40 pm
Reply with quote

You'll need to post a LISTCAT ALL.

DISP=SHR does not "hold" anything. SHAREOPTIONS defines how the dataset can be accessed by multiple jobs (including not, only for read and multiple updates).
Back to top
View user's profile Send private message
ashim prodhan

New User


Joined: 28 Apr 2013
Posts: 7
Location: india

PostPosted: Wed Jun 03, 2015 9:07 pm
Reply with quote

Hi Bill,

Below is the Listcat all entries.



Code:
1IDCAMS  SYSTEM SERVICES                                           TIME: 11:31:15        06/03/15     PAGE      1
0       
  LISTCAT ENTRIES('IAPTO.PROD.A02SR00') ALL
0CLUSTER ------- IAPTO.PROD.A02SR00
      IN-CAT --- CATALOG.ICFCATU.VIPAS07
      HISTORY
        DATASET-OWNER-----(NULL)     CREATION--------2009.199
        RELEASE----------------2     EXPIRATION------0000.000
      SMSDATA
        STORAGECLASS ---IPASPRDO     MANAGEMENTCLASS----NOBAK
        DATACLASS -------IPASONL     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-----IAPTO.PROD.A02SR00.DATA
        INDEX----IAPTO.PROD.A02SR00.INDEX
0   DATA ------- IAPTO.PROD.A02SR00.DATA
      IN-CAT --- CATALOG.ICFCATU.VIPAS07
      HISTORY
        DATASET-OWNER-----(NULL)     CREATION--------2009.199
        RELEASE----------------2     EXPIRATION------0000.000
        ACCOUNT-INFO-----------------------------------(NULL)
      PROTECTION-PSWD-----(NULL)     RACF----------------(NO)
      ASSOCIATIONS
        CLUSTER--IAPTO.PROD.A02SR00
      ATTRIBUTES
        KEYLEN----------------28     AVGLRECL-------------256     BUFSPACE-----------53248     CISIZE-------------10240
        RKP-------------------30     MAXLRECL-----------10000     EXCPEXIT----------(NULL)     CI/CA-----------------75
        SHROPTNS(2,3)      SPEED     UNIQUE           NOERASE     INDEXED       NOWRITECHK     UNORDERED        NOREUSE
        NONSPANNED
      STATISTICS  (* - VALUE MAY BE INCORRECT)
        REC-TOTAL-------10314673*    SPLITS-CI------------950*    EXCPS-------------405632*
        REC-DELETED---------1379*    SPLITS-CA------------115*    EXTENTS----------------1
        REC-INSERTED--------2133*    FREESPACE-%CI----------0     SYSTEM-TIMESTAMP:
        REC-UPDATED------------1*    FREESPACE-%CA----------3          X'CF0A52EFE853B081'
        REC-RETRIEVED---66387659*    FREESPC-------1544407040*
      ALLOCATION
        SPACE-TYPE------CYLINDER     HI-A-RBA------4262400000
        SPACE-PRI-----------5550     HI-U-RBA------2870784000
        SPACE-SEC-----------5000
1IDCAMS  SYSTEM SERVICES                                           TIME: 11:31:15        06/03/15     PAGE      2
0     VOLUME
        VOLSER------------PDX013     PHYREC-SIZE--------10240     HI-A-RBA------4262400000     EXTENT-NUMBER----------1
        DEVTYPE------X'3010200F'     PHYRECS/TRK------------5     HI-U-RBA------2870784000     EXTENT-TYPE--------X'40'
        VOLFLAG------------PRIME     TRACKS/CA-------------15
        EXTENTS:
        LOW-CCHH-----X'2A580000'     LOW-RBA----------------0     TRACKS-------------83250
        HIGH-CCHH----X'4005000E'     HIGH-RBA------4262399999
0   INDEX ------ IAPTO.PROD.A02SR00.INDEX
      IN-CAT --- CATALOG.ICFCATU.VIPAS07
      HISTORY
        DATASET-OWNER-----(NULL)     CREATION--------2009.199
        RELEASE----------------2     EXPIRATION------0000.000
      PROTECTION-PSWD-----(NULL)     RACF----------------(NO)
      ASSOCIATIONS
        CLUSTER--IAPTO.PROD.A02SR00
      ATTRIBUTES
        KEYLEN----------------28     AVGLRECL---------------0     BUFSPACE---------------0     CISIZE--------------1536
        RKP-------------------30     MAXLRECL------------1529     EXCPEXIT----------(NULL)     CI/CA-----------------26
        SHROPTNS(2,3)   RECOVERY     UNIQUE           NOERASE     NOWRITECHK     UNORDERED     NOREUSE
      STATISTICS  (* - VALUE MAY BE INCORRECT)
        REC-TOTAL-----------3781*    SPLITS-CI------------115*    EXCPS--------------89709*    INDEX:
        REC-DELETED------------0*    SPLITS-CA--------------9*    EXTENTS----------------1     LEVELS-----------------3
        REC-INSERTED-----------0*    FREESPACE-%CI----------0     SYSTEM-TIMESTAMP:            ENTRIES/SECT-----------8
        REC-UPDATED---------1217*    FREESPACE-%CA----------0          X'CF0A52EFE853B081' SEQ-SET-RBA----------------0
        REC-RETRIEVED----------0*    FREESPC--------114000384*                             HI-LEVEL-RBA----------161280
      ALLOCATION
        SPACE-TYPE---------TRACK     HI-A-RBA-------119808000
        SPACE-PRI-----------3000     HI-U-RBA---------5807616
        SPACE-SEC-----------3000
      VOLUME
        VOLSER------------PDX014     PHYREC-SIZE---------1536     HI-A-RBA-------119808000     EXTENT-NUMBER----------1
        DEVTYPE------X'3010200F'     PHYRECS/TRK-----------26     HI-U-RBA---------5807616     EXTENT-TYPE--------X'00'
        VOLFLAG------------PRIME     TRACKS/CA--------------1
        EXTENTS:
        LOW-CCHH-----X'14770000'     LOW-RBA----------------0     TRACKS--------------3000
        HIGH-CCHH----X'153E000E'     HIGH-RBA-------119807999
1IDCAMS  SYSTEM SERVICES                                           TIME: 11:31:15        06/03/15     PAGE      3
0         THE NUMBER OF ENTRIES PROCESSED WAS:
                    AIX -------------------0
                    ALIAS -----------------0
                    CLUSTER ---------------1
                    DATA ------------------1
                    GDG -------------------0
                    INDEX -----------------1
                    NONVSAM ---------------0
                    PAGESPACE -------------0
                    PATH ------------------0
                    SPACE -----------------0
                    USERCATALOG -----------0
                    TAPELIBRARY -----------0
                    TAPEVOLUME ------------0
                    TOTAL -----------------3
0         THE NUMBER OF PROTECTED ENTRIES SUPPRESSED WAS 0
0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
0       
0IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 0


Thanks for your help!

Regards,
Ashim

Code'd
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Wed Jun 03, 2015 9:22 pm
Reply with quote

when posting SYSOUTs and JCLs please use the code tags,

they preserve the spacing and the look,

making things easier for the people who spend their time helping


without

12345678901234567890
1234567890
12345678901234567890

with

Code:
12345678901234567890
          1234567890
12345678901234567890


and the spacing WAS There in the without lines
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


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

PostPosted: Wed Jun 03, 2015 11:01 pm
Reply with quote

CICS cannot update the file, while Batch is updating it simultaneously.

Please review and/or download the following PDF ===> "VSAM Demystified" -

www.redbooks.ibm.com/abstracts/sg246105.html?Open

HTH....
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Wed Jun 03, 2015 11:46 pm
Reply with quote

You have SHAREOPTIONS 2, which allows one update and many simultaneous reads. If the batch program is running... see what Mr Bill said.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8697
Location: Dubuque, Iowa, USA

PostPosted: Thu Jun 04, 2015 12:57 am
Reply with quote

Quote:
we have another application where the same thing happens but online can update the file without any error.
What are the SHAREOPTIONS for the other VSAM file?
Back to top
View user's profile Send private message
ashim prodhan

New User


Joined: 28 Apr 2013
Posts: 7
Location: india

PostPosted: Thu Jun 04, 2015 12:40 pm
Reply with quote

Hi,

The batch is not updating the file. It opens the file in I/P mode. So the online should update the file. One more info - while the batch is in execution..then online comes up....during the overlapping period only the online updates fail...

Also thank you Bill O'Boyle ! I have downloaded the book..lots of information...I did not know..going through books..thanks again!

Regards,
Ashim
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts HILITE on Browse mode? TSO/ISPF 2
No new posts Access to non cataloged VSAM file JCL & VSAM 18
No new posts Calling Java method from batch COBOL ... COBOL Programming 5
No new posts Merge two VSAM KSDS files into third ... JCL & VSAM 6
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
Search our Forums:

Back to Top