Page 1 of 1

Need a valid VSAM file sample

PostPosted: Tue Mar 12, 2013 7:55 pm
by ramikh86
Hello everybody,
we are working on a sanitization solution, a customer asked if we can process VSAM files. we use .Net for our solution and is supports VSAM processing but we need a VSAM file. Please if you can give me a VSAM file to test on it would very much appreciated.

Thanks

Re: Need a valid VSAM file sample

PostPosted: Tue Mar 12, 2013 8:03 pm
by steve-myers
I'm kind of confused. As I understand it, .net applications run in Windoze. How is a Windoze application going to process a VSAM data set on a mainframe???

Re: Need a valid VSAM file sample

PostPosted: Tue Mar 12, 2013 9:28 pm
by Robert Sample
You need to more clearly define what you want. If you need access just to VSAM data, you can get an unloaded (sequential) file of data. If you want access to an actual VSAM file, you need access to the particular mainframe where the VSAM file is located (and getting access to a mainframe can be a non-trivial process) before you can even talk about getting access to the VSAM file (which, again, may be a non-trivial process depending upon the security policies of the mainframe site).

Re: Need a valid VSAM file sample

PostPosted: Tue Mar 12, 2013 9:32 pm
by c62ap90
I assume you need a keyed VSAM file? Here is an example Delete-Define-Load of a VSAM file with a key of 9-characters and record-length of 80-characters. I'm just guessing what you need.
//XXXXXXXX JOB ...                                                 
//*-- STEPS:   STEP010 - DELETE AND DEFINE KSDS VSAM FILE         
//*--          STEP020 - LOAD              KSDS VSAM FILE         
//*-- NOTES:   - RECSZ IS FILE SIZE; EXAMPLE IS 80-CHARACTER FIXED
//*--          - KEYS  IS SSN BEGINNING IN COLUMN 1 (OFFSET ZERO) 
//*--          - ".CL" IS VSAM CLUSTER DATASET NAME               
//*----------------------------------------------------------------
//*                                                               
//STEP010  EXEC PGM=IDCAMS                                         
//SYSPRINT DD SYSOUT=*                                             
//SYSOUD   DD SYSOUT=*                                             
//SYSOUT   DD SYSOUT=*                                             
//SYSIN    DD *                                                   
   DELETE XXXXXXXX.XXXXXXXX.CL              -                     
       CLUSTER             -                                       
       PURGE                                                       
   DEFINE CLUSTER          -                                       
      (INDEXED             -                                       
       NAME (XXXXXXXX.XXXXXXXX.CL)          -                     
       OWNER (USER001)     -             
       UNIQUE              -             
      )                    -             
      DATA                 -             
      (NAME (XXXXXXXX.XXXXXXXX.DATA)   - 
       OWNER(USER001)      -             
       TRK(030,015)        -             
       RECSZ (80,80)       -             
       CISZ (4096)         -             
       KEYS (9 0)          -             
       SHR (2 3)           -             
      )                    -             
      INDEX                -             
      (NAME (XXXXXXXX.XXXXXXXX.INDEX)   -
       OWNER (USER001)     -             
       TRK(5,3)            -             
       CISZ (1024)         -             
       SHR (2 3)           -             
      )                                   
/*                                     
//*-----------------------             
//STEP020  EXEC PGM=IDCAMS             
//SYSPRINT DD SYSOUT=*                 
//SYSUDUMP DD SYSOUT=*                 
//SYSOUD   DD SYSOUT=*                 
//SYSOUT   DD SYSOUT=*                 
//FILEA    DD DSN=YOUR.FILE.HERE,       
//            DISP=SHR                 
//FILEB    DD DSN=XXXXXXXX.XXXXXXXX.CL,
//            DISP=OLD                 
//SYSIN    DD *                         
   REPRO                         -     
      INFILE(FILEA)              -     
      OUTFILE(FILEB)                   
//                                     

Re: Need a valid VSAM file sample

PostPosted: Tue Mar 12, 2013 10:06 pm
by BillyBoyo
If you have something which supports VSAM files, then you need to find out how to use define a file and put some data into it. No-one can "give" you a VSAM file which you'd expect to be able to just copy onto your non-mainframe system and it would work with what you have.

Re: Need a valid VSAM file sample

PostPosted: Wed Mar 13, 2013 2:54 am
by ramikh86
.Net in windows has an add-on to process VSAM files as they say in MSDN documentation.
as you say VSAVM files must be generated in an IBM enviroment, it cannot be transfered into windows platform as lets say oracle database files ?!
sorry for lake of experience in this topic.