IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Recovery of source component in Changeman


IBM Mainframe Forums -> All Other Mainframe Topics
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sanil m

New User


Joined: 24 Aug 2007
Posts: 38
Location: chennai

PostPosted: Wed Feb 25, 2009 1:36 pm
Reply with quote

Hi,

I deleted the source component of a particular program from changeman package. Is there any way by which i can recover the source component?

I need the same version which i had deleted.

Could any one please help?...
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Wed Feb 25, 2009 9:06 pm
Reply with quote

Hello,

Suggest you talk with the Changeman support people. There is possibly a backup that the deleted source could be recovered from.

If there is no backup, one needs to be set up and run regularly (daily?) and kept for some amount of time. . .
Back to top
View user's profile Send private message
Debabrata Pruseth

New User


Joined: 11 Dec 2008
Posts: 59
Location: Pune , India

PostPosted: Thu Feb 26, 2009 3:00 am
Reply with quote

Hi Sanil

DASD support backs up all ChangeMan volumes on a nightly basis. In addition, HSM will automatically perform incremental backups on the libraries that are accessed, even for READ.

In order to display and restore libraries that have been backed up by HSM, perform the following:

Type the following commands in ISPF commandline =6 option i.e. option
Code:
6 COMMAND    -TSO, CLIST, OR REXX


• List the generations of the libraries:

Code:
hlist dsn(‘staging library name’) bcds


eg. HLIST DSN ('PICM.CP000000.KARA.#003474K.HBC') bcds

For each day a backup was taken of this package it will display the date and generation

BDSN=DFHSM.BACK.X242619.PICM.CP000000.J9047 BACKVOL=JS6225 FRVOL=CMAN26
BACKDATE=09/02/16 BACKTIME=19:26:20 CAT=YES GEN=001 VER=001 UNS/RET= NO
RACF IND=NO BACK PROF=NO

Now choose the date for which you want to restore , pick the corrosponding generation number . With this generation number again type the following command.

• Recover the generation from the date you are looking for:

Code:
Hrecover ‘staging library name’ newname(‘restored name’) gen(xxx)


eg. hrecover 'PICM.CP000000.KARA.#003474K.HBC' newname('vnd6z5.cp000000.re2') gen(001)

The package will be restored from the backup into the new data set . It may take some time .
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Thu Feb 26, 2009 3:50 am
Reply with quote

Hello,

Do you and Sanil work in the same organization?

If not, their system may be supported differently. . .
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India

PostPosted: Thu Feb 26, 2009 5:28 pm
Reply with quote

Hi,

I agree with Dick - this doesn't happen at my shop; once the data is deleted it's gone unless you have a backup.
Back to top
View user's profile Send private message
pravin1124

New User


Joined: 08 Jun 2007
Posts: 1
Location: Chennai

PostPosted: Wed Nov 03, 2010 2:28 pm
Reply with quote

THanks a lot.. This works and truly saved our day.....!!! :)
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Nov 03, 2010 2:59 pm
Reply with quote

pravin1124. Are you the same user as sanil m
If so ............................ why
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Wed Nov 03, 2010 3:03 pm
Reply with quote

quite too often on these forums we see...

duplicated personalities ( nothing that a password recovery would not solve )
cooperative posting - somebody asks, somebody else from the same organization steps in
so we are not helping a single individual, we do free consulting for some <derogatory adjective> organization icon_biggrin.gif
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Wed Nov 03, 2010 3:10 pm
Reply with quote

<derogatory adjective> organization ?

For sure that could not be a Northern European organization. icon_eek.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> All Other Mainframe Topics

 


Similar Topics
Topic Forum Replies
No new posts Changeman - how can we know the curr... Compuware & Other Tools 2
No new posts Discrepancy between source code and o... COBOL Programming 7
No new posts Best way to Capture Auth ID of the so... COBOL Programming 1
No new posts Recovery Routine/Abend exit to releas... PL/I & Assembler 14
No new posts DFSMShsm Dataset Recovery with B and ... JCL & VSAM 2
Search our Forums:

Back to Top