|
View previous topic :: View next topic
|
| Author |
Message |
stonegirl
New User
Joined: 23 Feb 2007
Posts: 5
Location: indian
|
|
|
|
Hi all,
Can anybody tell me how to edit the JCL for the IMS DC COBOL program.
I got this abend when i tried to submit the JCL.
09.46.54 JOB03637 $HASP165 G400048J ENDED AT ZOSYSTEM - ABENDED S0C4 U0000 CN(INTERNAL)
The JCL I used is given below:
| Code: |
//STEP1 EXEC PGM=READIMS1
//STEPLIB DD DSN=OPERN.CICS3.LOADLIB,DISP=SHR
// DD DSN=IMS810.PGMLIB,DISP=SHR
// DD DSN=IMS810.SDFSRESL,DISP=SHR
//MSGFIL DD DSN=G400048.QD.MSGFILE,DISP=SHR
//SYSOUT DD SYSOUT=*
//SYSIN DD *
/*
|
Shi Lei. |
|
| Back to top |
|
 |
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hi Shi Lei,
Your posted jcl invokes "your" program.
I believe you will need something like this:
| Code: |
//STEP01 EXEC PGM=DFSRRC00,REGION=0M,
// PARM='DLI,DSNMTV01,program,40,00' |
The following info is in a previous thread in the IMS forum:
| Quote: |
DFSRRC00 is the utility to run a COBOL-IMS pgm or COBOL-IMS-DB2 pgm. it is only the utility DFSRRC00 that we invoke and we pass the information of the pgm to be run, PSB to be used and mode of execution of the pgm we want to run. so it is this utility which is running our pgm and our pgm is not run directly.
|
As for specific parameter values for your job, please look in the IMS manual available via this site. You might also look in the IMS forum and see if something that will help is there. |
|
| Back to top |
|
|
stonegirl
New User
Joined: 23 Feb 2007
Posts: 5
Location: indian
|
|
|
|
Hi d.sch,
Thank u for yr help. Have a nice day.
Thanks and regards,
Shi Lei. |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
You're welcome  |
|
| Back to top |
|
|
stonegirl
New User
Joined: 23 Feb 2007
Posts: 5
Location: indian
|
|
|
|
Hi all,
I still have no idea how to edit the JCL for the IMS/DC program. And I am so confused about the parameter for the DFSRRC00.
My cobol program name is READIMSQ. And the IMS PSB and DBD are IMS810.PGMLIB,IMS810.SDFSRESL. Is it enough for the JCL? What is the format for the JCL?
Is there any help for this?
Thanks and regards,
Shi Lei. |
|
| Back to top |
|
|
Devzee
Active Member
Joined: 20 Jan 2007
Posts: 684
Location: Hollywood
|
|
|
|
IMS DC - This is an online interactive environment and you dont need batch jobs to execute online programs.
First could you tell what category is your IMS program?
DLI or BMP or MPP
You need JCL for DLI or BMP programs.
IMS Batch - DLI or BMP
IMS DC - BMP or MPP |
|
| Back to top |
|
|
stonegirl
New User
Joined: 23 Feb 2007
Posts: 5
Location: indian
|
|
|
|
Hi,
Thank you for yr reply.
And my program is IMS/DC BMP.
Thanks and regards,
Shi Lei. |
|
| Back to top |
|
|
Devzee
Active Member
Joined: 20 Jan 2007
Posts: 684
Location: Hollywood
|
|
|
|
Here is a sample BMP jcl.
| Code: |
//STEP0010 EXEC PGM=DFSRRC00,
// PARM='BMP,PROGNAME,PSBNAME'
//*
//DFSRESLB DD DISP=SHR,DSN=IMS.RESLIB
//*
//IMS DD DISP=SHR,DSN=IMS.DBDLIB
// DD DISP=SHR,DSN=IMS.PSBLIB
//*
//IEFRDER DD DUMMY
//*
//DFSVSAMP DD DISP=SHR,DSN=IMS.PROCLIB(DFSVSAMP)
|
Please change it accordingly for your program name, psb name and also give correct PSB lib, DBD lib etc.
Since it's BMP program you may have to code all your DBD DD names, GSAM files if any. |
|
| Back to top |
|
|
stonegirl
New User
Joined: 23 Feb 2007
Posts: 5
Location: indian
|
|
|
|
Hi,
another doubts.
//DFSVSAMP DD DISP=SHR,DSN=IMS.PROCLIB(DFSVSAMP)
What is it for?
And if the program is DL/I, just change it to PARM='DL/I,PROGNAME,PSBNAME' . is it right?
Thanks and regards,
Shi Lei. |
|
| Back to top |
|
|
Devzee
Active Member
Joined: 20 Jan 2007
Posts: 684
Location: Hollywood
|
|
|
|
//DFSVSAMP DD DISP=SHR,DSN=IMS.PROCLIB(DFSVSAMP)
We use this in our site, and it has the environment settings for IMS like buffer size etc. This really depends at your work site.
To answer your 2nd questions,
yes if you want to use DLI change BMP to DLI in the parm. |
|
| Back to top |
|
|
|
|
