View previous topic :: View next topic |
Author |
Message |
vkphani Intermediate

Joined: 05 Sep 2003 Posts: 483 Topics: 48
|
Posted: Sat Nov 22, 2003 1:24 am Post subject: Identifying a VSAM file in a COBOL pgm |
|
|
Hi,
Assume that a COBOL pgm is accessing a VSAM file.
By looking at that COBOL pgm, how can we know that it is accessing a VSAM file.
Paneendra. |
|
Back to top |
|
 |
kolusu Site Admin

Joined: 26 Nov 2002 Posts: 12378 Topics: 75 Location: San Jose
|
Posted: Sat Nov 22, 2003 7:32 am Post subject: |
|
|
Paneendra,
VSAM Cluster such as KSDS,RRDS can be easily found from the FD clause in the program.For a RRDS in the FD section you will find
Code: |
ORGANIZATION IS RELATIVE
ACCESS IS RANDOM/DYNAMIC
|
which will will identify the file as VSAM RRDS
Similarly for KSDS you will find
Code: |
ORGANIZATION IS INDEXED
ACCESS IS DYNAMIC/RANDOM
|
But you really cannot identify an ESDS file just by looking at the program. ESDS file has FD section similar to regular sequential file
Code: |
ORGANIZATION IS SEQUENTIAL
ACCESS IS SEQUENTIAL
|
If you have the JCL which is running the program , then look at the properties of the file assigned to the ddname(ASSIGN TO DDNAME) in the program in 3.4 listing.
Hope this helps...
cheers
kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
 |
RonB Beginner
Joined: 02 Dec 2002 Posts: 93 Topics: 0 Location: Orlando, FL
|
Posted: Sun Nov 23, 2003 3:34 pm Post subject: |
|
|
Actually, you can tell if an ESDS file is being used because the SELECT clause must specify ASSIGN TO AS-xxxx ( note the 'AS' prefix on the assign-name ).
Ron _________________ A computer once beat me at chess, but it was no match for me at kick boxing. |
|
Back to top |
|
 |
vkphani Intermediate

Joined: 05 Sep 2003 Posts: 483 Topics: 48
|
Posted: Sun Nov 23, 2003 10:41 pm Post subject: |
|
|
Kolusu,
For normal flat file also we can use ORGANIZATION as RELATIVE or SEQUENTIAL.
In that case how can we identify? |
|
Back to top |
|
 |
slade Intermediate
Joined: 07 Feb 2003 Posts: 266 Topics: 1 Location: Edison, NJ USA
|
Posted: Mon Nov 24, 2003 3:16 am Post subject: |
|
|
Hi Paneendra,
It |
|
Back to top |
|
 |
|
|