IBM MAINFRAME HELP & SUPPORT FORUMS
Technical Forums for IBM Mainframe Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7&11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
 

How to Invoke IDCAMS in a COBOL program

THIS IS AN ARCHIVE FORUM: CLICK HERE TO GO TO THE ORIGINAL TOPIC

 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> Mainframe COBOL
View previous topic :: View next topic  
Author Message
ARJUN



Joined: 16 Nov 2004
Posts: 18
Location: Chennai

Posted: Thu Nov 18, 2004 10:31 am    Post subject: How to Invoke IDCAMS in a COBOL program  

hi doods,


I would like to know how to invoke IDCAMS in a COBOL program and using this how to create a cluster from a COBOL program itself.

could any body help in this regard please.

Thanks in advance,
Back to top  
superk



Joined: 26 Apr 2004
Posts: 3314
Location: Charlotte,NC USA

Posted: Thu Nov 18, 2004 9:53 pm    Post subject:  

I found this article via a Google search:

http://www.naspa.com/PDF/2000/0100%20TS%20PDFs/T0001006.pdf
Back to top  
superk



Joined: 26 Apr 2004
Posts: 3314
Location: Charlotte,NC USA

Posted: Thu Nov 18, 2004 9:53 pm    Post subject:  

I found this article via a Google search:

http://www.naspa.com/PDF/2000/0100%20TS%20PDFs/T0001006.pdf
Back to top  
ARJUN



Joined: 16 Nov 2004
Posts: 18
Location: Chennai

Posted: Fri Nov 19, 2004 8:43 am    Post subject:  

thank you superk,


ok fine, I need to create a cluster using IDCAMS in COBOL program itself.

CALL "IDCAMS" USING parm-options,ddnames-options.

using this I can pass the control info of cluster using parm-options and alternate ddnames(which you can use in your run JCL) can pass thru ddnames-options.

Here is it invokes IDCAMS define or else and how.

if anybody can explain this that could be great.
Back to top  
ARJUN



Joined: 16 Nov 2004
Posts: 18
Location: Chennai

Posted: Fri Nov 19, 2004 10:04 am    Post subject: HOW TO CREATE A CLUSTER USING IDCAMS IN A COBOL PROGRAM  

ARJUN wrote: thank you superk,


ok fine, I need to create a cluster using IDCAMS in COBOL program itself.

CALL "IDCAMS" USING parm-options,ddnames-options.

using this I can pass the control info of cluster using parm-options and alternate ddnames(which you can use in your run JCL) can pass thru ddnames-options.

Here is it invokes IDCAMS define or else and how.

if anybody can explain this that could be great.
Back to top  
mmwife



Joined: 30 May 2003
Posts: 1508

Posted: Sun Nov 21, 2004 12:27 am    Post subject:  

Hi ARJUN,

Quote: Here is it invokes IDCAMS define or else and how.

You may want to work on the translation of this thought. It doesn't read well in English.
Back to top  
diet_coke



Joined: 19 Nov 2004
Posts: 1

Posted: Mon Nov 22, 2004 10:35 am    Post subject:  

Arjun,

I think 2 min search in google would have given following link.
check out the 2nd URL...i hope this is what your looking for...

http://www.google.com/search?hl=en&q=idcams+through+cobol

DC
Back to top  
ARJUN



Joined: 16 Nov 2004
Posts: 18
Location: Chennai

Posted: Tue Nov 23, 2004 9:35 am    Post subject:  

Hi mmwife,

Here my point is IDCAMS is having lot of utilities like IEBGCOPY,IEBGENER,REPRO,EXPORT,IMPORT, DEFINE cluster etc..

using the following how it is called exactly IDCAMS DEFINE CLUSTER. here I am passing parm-options,ddnames-options

CALL "IDCAMS" USING Parm-options,ddnames-options.

Through parm-options I am passing all the cluster info like cluster name,catalog name,volume serial number, data field name, index field name etc. and thru ddnames I am passing alternate ddnames which I am using in my run JCL.


Now the above call invokes IDCAMS DEFINE or not, if it is how?
if you can explain this that could be great.
Back to top  
lramani



Joined: 03 Nov 2004
Posts: 21
Location: NOIDA, India

Posted: Tue Nov 23, 2004 11:54 am    Post subject:  

Hi Arjun,
Was going thru the pdf that was sent by mmwife.
What iam not able to follow is where are u stuck up!!!

Do u want to know how the program recognizes its DEFINE cluster and not something else??

If so...then code moves " DELETE " to IDCAMS-BUFFER. (in the PDF)
In your case it might be DEFINE.

CALL IDCAMS using parm-option and DDNAME-OPTIONS solves things.

DDNAME-OPTIONS has the file name CAMSPARM, which has the IDCAMS-BUFFER.

I have not tried out this code but wud do when i get time.
I hope I am addressing to the problem that u have....else let me know what actually is the problem.

My special thanks to mmwife for sending this URL.
Back to top  
 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> Mainframe COBOL
Page 1 of 1
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM