Is everything being done from the same address space?
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of
John Bachiochi
Sent: Thursday, April 08, 2010 3:19 PM
To: [email protected]
Subject: VSAM File Updating Issues
I am having some odd issues with updating a VSAM file with an Assembler
application. The cluster definition is as follows:
DEFINE CLUSTER ( NAME(CICS.JHB2.V604.CONFIG) -
VOLUMES(VOL004) -
INDEXED SHR(3 3) TRACKS (5 1) ) -
DATA ( NAME(CICS.JHB2.V604.CONFIG.DATA) -
RECORDSIZE(2040 2040) KEYS(254 0) ) -
INDEX ( NAME(CICS.JHB2.V604.CONFIG.INDEX) )
The file is then seeded with 5 records, one of which contains a key of binary
zeroes, and the other 4 records containing a key that starts with lower
case 'h'.
When I try to add records to the file with my application, I can add them to
my heart's content if the key value starts with something higher than 'h'.
However, when I try to add a record with a key value lower than 'h', the add
performs successfully, but then I cannot do a STARTBR/READNEXT on the file
that goes past the newly added record (the CICS API returns an ENDFILE
condition) even though I can read the record directly. Moreover, attempts to
read the file sequentially with a tool such as FileManager, Ditto, or even
IDCAMS returns a 'record out of sequence' error (RC=8, error feedback of 12).
I noted that the generated CISZ for the index component was 512, and the
data component generated a CISZ of around 18300 bytes. I decided as a
test to force a CISZ of 4096 for the index component (and 32700 for the data
component, which was modified by VSAM at define time). When I did, all of
the updating of the file by the application worked correctly!
Has anyone had any experiences like this? Is there something about using a
very long key (it is only 1 byte below the maximum) that I need to be aware
of?
Thanks in advance - John Bachiochi
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
NOTICE: This electronic mail message and any files transmitted with it are
intended
exclusively for the individual or entity to which it is addressed. The message,
together with any attachment, may contain confidential and/or privileged
information.
Any unauthorized review, use, printing, saving, copying, disclosure or
distribution
is strictly prohibited. If you have received this message in error, please
immediately advise the sender by reply email and delete all copies.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
