Is it possible that the COBOL program is not closing the file and
therefore any additional extents are not reflected in the VTOC / Catalog
entry? 


George Shedlock Jr
AEGON Information Technology
AEGON USA
502-560-3541

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Van Dalsen, Herbie
Sent: Tuesday, January 22, 2008 5:59 AM
To: [email protected]
Subject: DFSORT anomaly?

Hi all,

WE are running z/OS 1.6 with no plans to upgrade because we aren't going
to fork out any more for Tivoli 8.3. We also have Enterprise COBOL.

This is the problem... 

The file was allocated Cyl,(15,5) and 160000 records written to it by
the COBOL program, it thus expanded to 3 volumes and lots of extents...
In the same job, this file was sorted, but only 45900 records were
sorted, into itself, and the rest of the records were lost.

We have tried to re-create the problem by creating the multivolume file
with IEBGENER... unsuccessfully...

My thinking is this, and I have not found a MVS APAR stating that this
might be the case, but here goes... Because of some problem / limitation
in the COBOL / MVS File close routines... All three extents of the file
are not known to DFSORT 3 steps lower and only at the actual end of the
job, but how do I prove this.

This occurred 3 times now, until we changed the allocation to
Cyl,(200,50) and end up with the file on 1 volume, problem sorted?

Any ideas, Any help would be greatly appreciated.

Regards

Herbie
Elavon Financial Services Limited
Registered in Ireland: Number 418442
Registered Office: Block E, 1st Floor, Cherrywood Business Park,
Loughlinstown, Co. Dublin, Ireland
Directors: Robert Abele (USA), John Collins,  Terrance Dolan (USA),
Pamela Joseph (USA), Declan Lynch, John McNally, Malcolm Towlson Elavon
Financial Services Limited, trading as Elavon, is regulated by the
Financial Regulator

----------------------------------------------------------------------
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

----------------------------------------------------------------------
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

Reply via email to