|
View previous topic :: View next topic
|
| Author |
Message |
boyti ko
New User
Joined: 03 Nov 2014
Posts: 78
Location: Malaysia
|
|
|
|
| I have a vsam dataset, but the definition of it is missing, is there a way to recreate the vsamcard using a sort for example? |
|
| Back to top |
|
 |
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
|
|
|
|
Just run a LISTCAT everything is there.
You could create a mew VSAM file using a MODEL, and then use that MODEL to re-create the original. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
see file 726 at Use [URL] BBCode for External Links
here is the README
| Code: |
//***FILE 726 is from Ted MacNeil, and contains a REXX exec to * FILE 726
//* generate DEFINE statements for VSAM files, directly * FILE 726
//* from the file itself. Details are explained below. * FILE 726
//* * FILE 726
//* This code either displays a VSAM entry or writes the * FILE 726
//* IDCAMS control statement needed to define a VSAM file. * FILE 726
//* (MUST run under ISPF.) * FILE 726
//* * FILE 726
//* From ISPF 3.4, type VC3 next to a VSAM data set * FILE 726
//* * FILE 726
//* Further modified by Philippe Simon. Please see members * FILE 726
//* VCP and VCP$$ for his version and explanation thereof. * FILE 726
//* * FILE 726
//* email for Philippe Simon: philippe_simon_55@yahoo.fr * FILE 726
//* * FILE 726
//* Originally Written by Jim Connelley. Jim's version is * FILE 726
//* included here as member VC. * FILE 726
//* * FILE 726
//* No copyright. * FILE 726
//* If you want to, send your enhancements to * FILE 726
//* * FILE 726
//* email: tedmacneil@bell.blackberry.net * FILE 726
//* * FILE 726
//* Reason for this REXX: * FILE 726
//* I needed a method to clean up our old * FILE 726
//* VSAM with the keywords: REPLICATE, IMBED * FILE 726
//* and KEYRANGE. This was the fastest way. * FILE 726
//* Those parameters are caught but not * FILE 726
//* written to control cards. * FILE 726
//* I also added a few lines to do a: * FILE 726
//* DELETE ------ PURGE at the front * FILE 726
//* (Optional) * FILE 726
//* * FILE 726
//* There are bugs, such as handling multi-volume files, but * FILE 726
//* that's where YOU come in. * FILE 726
//* (-- Ted MacNEIL -- I believe I fixed this bug, but I did * FILE 726
//* not have any multi-volumes to test * FILE 726
//* with.) * FILE 726
//* * FILE 726
//* (-- The dependency on STEMVIEW was removed to either write * FILE 726
//* -- out to a file or stay inside a loop) * FILE 726
//* * FILE 726
//* Syntax: * FILE 726
//* * FILE 726
//* %VC3 VSAMDSN pds member DELETE * FILE 726
//* * FILE 726
//* VSAMDSN -- the VSAM FILE you wish to CLONE * FILE 726
//* (if you specify quotes, they are removed) * FILE 726
//* * FILE 726
//* pds -- where to output the control cards (Optional) * FILE 726
//* - default: <userid>.VSAM.CONTROL.CARDS * FILE 726
//* * FILE 726
//* member -- the member name used to output the statements * FILE 726
//* (Optional) * FILE 726
//* * FILE 726
//* DELETE -- Insert DELETE <entry> PURGE * FILE 726
//* -- (Optional) * FILE 726
//* * FILE 726
//* NOTE: 1. if PDS does not exist, this outputs to the screen * FILE 726
//* * FILE 726
//* 2. The only entry types supported are: * FILE 726
//* ignored and only the DEFINE ALIAS ... RELATE * FILE 726
//* will be output. There is not enough information * FILE 726
//* in the LISTCAT output to rebuild the catalogue. * FILE 726
//* * FILE 726
|
|
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
I do have a REXX which will look at the VSAM cluster and build all of the control statements associated with the cluster, including AIX and PATH.
Unfortunately I don't have access to the MF at the moment.
There is a previous older less functional example of this forum, just search for CSIVSAM |
|
| Back to top |
|
|
boyti ko
New User
Joined: 03 Nov 2014
Posts: 78
Location: Malaysia
|
|
|
|
Thank you so much enrico,
all your description matches the thing i needed.
But am I correct downloading the file 726 and came up with FILE726.XMI? I search on how to use .XMI in mainframe but all I get is a bunch of site giving an XML extension.
Hi expat, I tried searching CSIVSAM but all I get is this post and another post which I think not related to what I'm looking, sorry it's just my first time using this, anyway thanks! |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
just upload the xmi file to a fb 80 mainframe PS dataset
after that issue the command RECEIVE INDATASET(the dat set just uploaded)
and You will obtain a PDS with the goodies |
|
| Back to top |
|
|
Pete Wilson
Active Member
Joined: 31 Dec 2009
Posts: 580
Location: London
|
|
|
|
If you have CA-FAVER software you can also use the GVEXPORT & GVRESTOR batch utilities to generate the DEFINE cards.
I've also used FDREPORT to punch out VSAM DEFINE cards from existing files. |
|
| Back to top |
|
|
jeevankanungo
New User
Joined: 19 Nov 2016
Posts: 1
Location: USA
|
|
|
|
Hi Enrico,
Could you please help me get the XMI file unto mainframes and start using it. |
|
| Back to top |
|
|
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010
Posts: 3051
Location: NYC,USA
|
|
|
|
| Please start a new topic with new requirements and refer this link over there in stead of short cuts. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
see my previous post ...
| Quote: |
just upload the xmi file to a fb 80 mainframe PS dataset
after that issue the command RECEIVE INDATASET(the dat set just uploaded)
and You will obtain a PDS with the goodies
|
make sure to upload in binary |
|
| Back to top |
|
|
|
|
