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