Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
JCL to extract IMS Segments (all)/ one by one

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
Author Message
kris_madras
Warnings : 1

New User


Joined: 04 Jul 2005
Posts: 45

PostPosted: Mon Aug 14, 2006 11:58 am    Post subject: JCL to extract IMS Segments (all)/ one by one
Reply with quote

Hi,
Could anybody post JCL (probably File-Aid) generated JCL to extract all segments of IMS database to a PS file(s)?

Our requirement is to extract all IMS Database segments/ Segment wise data to a PS file(s).

Our next step is to Trigger these JCLs using CA7 schedulers...
Back to top
View user's profile Send private message
References
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1025
Location: Bangalore,India

PostPosted: Mon Aug 14, 2006 12:31 pm    Post subject:
Reply with quote

Hi.

Here is the JCl
//ULP011 EXEC PGM=DFSRRC00,PARM='DLI,XES,PS6P011G'
//STEPLIB DD DSN=IMS6.RESLIB,DISP=SHR
// DD DSN=WORKLIB,DISP=SHR
//IMS DD DSN=IMS6.PSBLIB,DISP=SHR
// DD DSN=IMS6.DBDLIB,DISP=SHR
//DFSRESLB DD DSN=IMS6.RESLIB,DISP=SHR
//DFSVSAMP DD DSN=MSD.CARDLIB(DFSVSM10),DISP=SHR
//SYSOUT DD SYSOUT=*
//REPORT DD SYSOUT=*
//XCEFILE DD DUMMY
//SORTFILE DD DUMMY
//SYSUDUMP DD SYSOUT=*
//PRNTOUT DD SYSOUT=*
//SYSIN DD DSN=RD04.XES.CBLTDLI.DATA,DISP=SHR
//OUTFILE DD DSN=TBH2.XES6P011.DATA,
// DISP=(,CATLG),UNIT=DISK,SPACE=(CYL,(1,3),RLSE),
// DCB=(BLKSIZE=19000,LRECL=4624,RECFM=VB)
//**


RD04.XES.CBLTDLI.DATA its contain
-CBLTDLI

it may be helpful

Cheers
Ekta
Back to top
View user's profile Send private message
kris_madras
Warnings : 1

New User


Joined: 04 Jul 2005
Posts: 45

PostPosted: Mon Aug 14, 2006 4:32 pm    Post subject: Re: JCL to extract IMS Segments (all)/ one by one
Reply with quote

Thanks for your reply...
I don't know this is a generic tool used across all Mainframe systems
Could you explain all the steps? We can change the JCL accordingly...


Thanks,
Sai Krishna
Back to top
View user's profile Send private message
satishstar
Currently Banned

New User


Joined: 14 Mar 2005
Posts: 16

PostPosted: Sun Sep 24, 2006 10:43 pm    Post subject:
Reply with quote

DFSRRC00 - Its the IMS utility which executes IMS programs similar to DSNUTLIB in db2.
PARM='DLI,XES,PS6P011G' - In this we pass the type whether its a DLI or BMP where DLI means Data Language 1 and BMP means Batch mode processing.

DLI does only browse.
BMP does edits in IMS database.

//STEPLIB DD DSN=IMS6.RESLIB - contains the utility(DFSRRC00) which executes the IMS programs.

//IMS DD DSN=IMS6.PSBLIB,DISP=SHR - Conatins the PSB libraries i.e.,
program specification libraries.
PSB specifies the type of mode of the program (GOTP - for browse , GOD - delete etc..,) and what all IMS databases are being accessed by the program i.e., PSB maps all the IMS databases which are being accessed by the program and in what mode.


// DD DSN=IMS6.DBDLIB,DISP=SHR - contains the DBD libraries. i.e., data base descriptors. They contain the data of the IMS database. Usually they are being stored in VSAM files.
Back to top
View user's profile Send private message
Shirazpasha

New User


Joined: 24 Nov 2006
Posts: 17
Location: India

PostPosted: Wed May 02, 2007 6:00 pm    Post subject:
Reply with quote

Hi Guptae,
What will be the content of MSD.CARDLIB(DFSVSM10) and RD04.XES.CBLTDLI.DATA?

Is RD04.XES.CBLTDLI.DATA is the pds which contains the CBLTDLI load??
Back to top
View user's profile Send private message
Shirazpasha

New User


Joined: 24 Nov 2006
Posts: 17
Location: India

PostPosted: Wed May 02, 2007 7:05 pm    Post subject:
Reply with quote

Also what is XES in
Quote:

PARM='DLI,XES,PS6P011G'


Regards,
Back to top
View user's profile Send private message
rameshfoa

New User


Joined: 05 Apr 2007
Posts: 28
Location: chennai

PostPosted: Thu May 10, 2007 4:10 pm    Post subject:
Reply with quote

XES is program name and next PSB name
Back to top
View user's profile Send private message
ahr

New User


Joined: 24 Apr 2007
Posts: 15
Location: India

PostPosted: Fri May 11, 2007 12:27 pm    Post subject:
Reply with quote

DLI - means pure Batch, the IMS needs the exclusive control over the database, It won't allow sharing of databases with on-lines or with any other Tasks/JOBs.

BMP - Batch message processing, The IMS can share the databases with On-lines and as well as do it's processing.

While unloading data from IMS database to flat files do we need a program name and PSB name ?
Back to top
View user's profile Send private message
rahulkolhe2003

New User


Joined: 06 Mar 2007
Posts: 21
Location: columbus

PostPosted: Sat May 12, 2007 12:04 am    Post subject: Re: JCL to extract IMS Segments (all)/ one by one
Reply with quote

If XES is program coded in cobol or any other lang then it does not answer the question posted.

Hi guptae, Please throw light on your jcl.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 3074
Location: italy

PostPosted: Sat May 12, 2007 3:33 am    Post subject: Re: JCL to extract IMS Segments (all)/ one by one
Reply with quote

Hi!

if You have the IMS tools with the HSSR ( high speed sequential retrieval) component,
then You have what You need, the "FABHFSU" utility will unload in different formats at a very high speed, ( very high is an understatement ) the content of any IMS Database

here is the url with the docs
[url]
http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=/com.ibm.imstools.hpu.doc.ug/hpuhome.htm
[/url]

regards

e.s
Back to top
View user's profile Send private message
Shirazpasha

New User


Joined: 24 Nov 2006
Posts: 17
Location: India

PostPosted: Wed May 23, 2007 2:28 pm    Post subject: Re: JCL to extract IMS Segments (all)/ one by one
Reply with quote

Hi,
What will be the content of RD04.XES.CBLTDLI.DATA?

enrico-sorichetti,
Is there a way to findout if the HSSR ( high speed sequential retrieval) component is installed or not in my mainframes?

Thanks,
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 3074
Location: italy

PostPosted: Wed May 23, 2007 4:53 pm    Post subject: Re: JCL to extract IMS Segments (all)/ one by one
Reply with quote

Quote:
Is there a way to findout if the HSSR ( high speed sequential retrieval) component is installed or not in my mainframes?


Formal way...
Ask Your system support people

Quick and dirty...
run One of the sample jobs from the manual

regards
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1