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

Is there need of DDIO file in CICS region for XPED?


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
ravidhiman

New User


Joined: 09 Oct 2006
Posts: 23
Location: London, UK

PostPosted: Fri Apr 17, 2009 3:26 am
Reply with quote

I am using Changeman for compiling the program. TO xped the batch cobol program, In changeman we need to put yes in DDIO option and DDIO file name while compiling the cobol program. Then we need to use that DDIO file and load module library in xped to debug the cobol programs.

Whereas we are not giving any DDIO file name anywhere while debugging Cobol cics program in online xped.

Could any body answer how the online xped is showing the source listing while debugging, as we are not giving DDIO file anywhere in CICS region?

Do we need DDIO file in CICS region?

Thanks in advance
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Fri Apr 17, 2009 3:56 am
Reply with quote

Yes, the DDIO file in a CICS region is assigned to file names SLSFxxx where xxx can be 001 through 008.
Back to top
View user's profile Send private message
ravidhiman

New User


Joined: 09 Oct 2006
Posts: 23
Location: London, UK

PostPosted: Fri Apr 17, 2009 4:12 am
Reply with quote

Robert Sample wrote:
Yes, the DDIO file in a CICS region is assigned to file names SLSFxxx where xxx can be 001 through 008.


thanks for the reply robert.

If DDIO file is available in CICS region, then how the CICS region make entry of the cobol program in that DDIO file name ?

In batch region, we are giving the DDIO file name in changeman while compiling because of this the source listing get registered in DDIO for that cobol program.

But in CICS I am not sure how the source listing get registered in DDIO files.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Fri Apr 17, 2009 4:39 am
Reply with quote

if it is automatically there, it is because the compile/bind process for CICS already has the necessary DDIO entries.(JCL generated by changeman)..probably because it is just easier to automatically have it put there instead of having to train everybody on how to get it into cics. a little more control is exercised by your systems people due to the environment - cics.

batch, another situation. batch compile activity is probably greater than the CICS activity (by developers) and it is less resource intensive to require the developers to demand ddio file generation.

changeman, not being as sophisticated as endevor requires a few more manual steps.

size of your machine, available hardware, etc... has a lot to do with it.

in addition, most batch developers only go to xpeditor if they have a problem in testing.

would talk to your support people, possibly read some of the documentation at your site that the support people publish.
Back to top
View user's profile Send private message
ravidhiman

New User


Joined: 09 Oct 2006
Posts: 23
Location: London, UK

PostPosted: Fri Apr 17, 2009 1:13 pm
Reply with quote

Thanks Brenholtz,

I got your point. I will check how this process works automatically in changeman and would let you know.
Back to top
View user's profile Send private message
ravidhiman

New User


Joined: 09 Oct 2006
Posts: 23
Location: London, UK

PostPosted: Fri Apr 17, 2009 9:01 pm
Reply with quote

Yes Brenholtz, you are right.

I complied the CICS program in changeman with DDIO option and I saw the DDIO file name in the changman compile JCL.

It is making entry in that DDIO file while compiling the program. That DDIO file is being used in our SYSTEM'S CICS region for online xped.
Following is the piece of code from compile jcl (generated by changman)

***)IM SBC$$DDI DDIO REPOSITORY PROCESSOR
//DDIOPOST EXEC PGM=CWPCDRVR,
// COND=(4,LT)
***
//STEPLIB DD DISP=SHR,DSN=SUPT.SHARSERV.PROD.LOAD
***
//CWPLOAD DD DISP=(SHR,PASS),DSN=&&OBJECT(PEHIPRO)
//CWPDECK DD DUMMY
***CWPERRM DD SYSOUT=*
//CWPERRM DD DISP=(,PASS),DSN=&&LISTCWER,
// UNIT=SYSDA,SPACE=(CYL,(1,2),RLSE)
***SYSPRINT DD SYSOUT=*
//SYSPRINT DD DISP=(,PASS),DSN=&&LISTCWPT,
// UNIT=SYSDA,SPACE=(CYL,(1,2),RLSE)
***SYSOUT DD SYSOUT=*
//SYSOUT DD DISP=(,PASS),DSN=&&LISTCWOT,
// UNIT=SYSDA,SPACE=(CYL,(1,2),RLSE)
//CWPPRTO DD DISP=(,PASS),DSN=&&LISTDDI,
// UNIT=SYSDA,SPACE=(CYL,(3,1),RLSE)
***
//CWPWRK0 DD SPACE=(TRK,(60,30)),UNIT=SYSDA
//CWPWRK1 DD SPACE=(TRK,(60,30)),UNIT=SYSDA
//CWPWRK2 DD SPACE=(TRK,(60,30)),UNIT=SYSDA
//CWPWRK3 DD SPACE=(TRK,(60,30)),UNIT=SYSDA
//CWPWRK4 DD SPACE=(TRK,(60,30)),UNIT=SYSDA
//CWPWRK5 DD SPACE=(TRK,(60,30)),UNIT=SYSDA
***
//CWPPRTI DD DISP=(SHR,PASS),DSN=&&LIST30
//CWPDDIO DD DISP=SHR,DSN=RAMS.DBASE.SYST.XXXXX.
//XOPTIONS DD DSN=SUPT.XPEDITER.PROD.XOPTIONS,DISP=SHR
//CWPPRMO DD *
***)IM SBC$$DDI END
***)IM CMN$$SSI



Thanks a lot for the help icon_smile.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 -> CICS

 


Similar Topics
Topic Forum Replies
No new posts Compare 2 files and retrive records f... DFSORT/ICETOOL 2
No new posts FTP VB File from Mainframe retaining ... JCL & VSAM 8
No new posts Extract the file name from another fi... DFSORT/ICETOOL 6
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Using API Gateway from CICS program CICS 0
Search our Forums:

Back to Top