| View previous topic :: View next topic |
| Author |
Message |
satish_pv74
Beginner
Joined: 21 Nov 2003
Posts: 3
Topics: 1
|
 Posted: Fri Nov 21, 2003 5:25 am Post subject: PL-I & IMS Program |
 |
|
I have to write a new PL/I Ims program till date i never done that i know a little bit of PL/I and Ims.
please help me out in writing PL/I IMS Program.
if possible send sample programs and JCl how we execute .
Thanks in advance |
|
| Back to top |
|
 |
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
|
| Back to top |
|
|
satish_pv74
Beginner
Joined: 21 Nov 2003
Posts: 3
Topics: 1
|
| Posted: Mon Nov 24, 2003 4:04 am Post subject: |
|
|
Thanks a lot
I need one more help. I have written a program in PL-I IMS I want to know how to execute this pgm in JCl .
please some one help me out.
Regards
Satish |
|
| Back to top |
|
|
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
| Posted: Mon Nov 24, 2003 6:54 am Post subject: |
|
|
satish_pv74,
Every Shop has its own standards for running IMS programs. so ask around your co-workers if they have any sample JCL's. Below is a sample JCl which I use.
| Code: |
//STEP0100 EXEC PGM=DFSRRC00,
// PARM=(BMP,pgmname,psbname,,,,,,)
//*
//STEPLIB DD DSN=YOUR PGM LOADLIB,
// DISP=SHR
//IMS DD DSN=YOUR IMS PSBLIB,
// DISP=SHR
// DD DSN=YOUR.DBDLIB,
// DISP=SHR
//IMSLOGR DD DSN=NULLFILE,
// DISP=OLD,
// UNIT=TAPE,
// VOL=SER=XXXXXX
//DFSESL DD DSN=YOUR DB2 LOADLIB,
// DISP=SHR
//IMSERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//GSAMFILE DD DSN=YOUR INPUT GSAM FILE,
// DISP=SHR
//GSAMOUT DD DSN=YOUR OUTPUT FILES,
// DISP=OLD
....
//*
|
Hope this helps...
cheers
kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
satish_pv74
Beginner
Joined: 21 Nov 2003
Posts: 3
Topics: 1
|
| Posted: Tue Nov 25, 2003 4:40 am Post subject: |
|
|
thanks a lot...for your help..
regards
Satish |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
