Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Need to write jcl for the cobol program.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
bhim_sb
Warnings : 1

New User


Joined: 31 Mar 2005
Posts: 24

PostPosted: Wed Jun 15, 2005 5:46 pm    Post subject: Need to write jcl for the cobol program.
Reply with quote

I have written a Cobol program CPROG1 and compiled successfully.

And also written a input file for named ICPROG1 for this program.

Now I want to write JCL for it.

Can any body help me to solve it out.
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Wed Jun 15, 2005 5:49 pm    Post subject: Re: Need to write jcl for the cobol program.
Reply with quote

Where are you stuck? Why don't you post the JCL code you have so far?
Back to top
View user's profile Send private message
bhim_sb
Warnings : 1

New User


Joined: 31 Mar 2005
Posts: 24

PostPosted: Thu Jun 16, 2005 4:01 pm    Post subject: Re: Need to write jcl for the cobol program.
Reply with quote

superk wrote:
Where are you stuck? Why don't you post the JCL code you have so far?


Code:

//CPROG1  JOB (@),'TEST',CLASS=A,                     
//             MSGCLASS=A,NOTIFY=DBSING               
//STEP1   EXEC  PGM=CPROG1                             
//STEPLIB DD   DSN=WXX322.DBSING.WALK,DISP=(SHR,KEEP) 
//INFILE  DD   DSN=DBSING.ICPROG1,DISP=SHR             
//OUTIFLE DD   DSN=DBSING.OUTCPROG1,                   
//             DISP=(NEW,CATLG,DELETE),               
//             UNIT=&DUNIT,                           
//             LRECL=133,                             
//             BLKSIZE=0,                             
//             RECFM=FBA,                             
//             DATACLAS=STANDARD
Back to top
View user's profile Send private message
priyesh.agrawal

Senior Member


Joined: 28 Mar 2005
Posts: 1452
Location: Chicago, IL

PostPosted: Thu Jun 16, 2005 4:11 pm    Post subject: Re: Need to write jcl for the cobol program.
Reply with quote

Hi bhim_sb,

What prob u are facing...Is ur JCL not working.....If yes, whats the error....

I m not considering syntax errors here......

Regards,

Priyesh.
Back to top
View user's profile Send private message
bhim_sb
Warnings : 1

New User


Joined: 31 Mar 2005
Posts: 24

PostPosted: Thu Jun 16, 2005 5:09 pm    Post subject: Re: Need to write jcl for the cobol program.
Reply with quote

priyesh.agrawal wrote:
Hi bhim_sb,

What prob u are facing...Is ur JCL not working.....If yes, whats the error....

I m not considering syntax errors here......

Regards,

Priyesh.


I am facing the follwing errors:
6 8 DSS5210E - IMPROPER ATTRIBUTES FOR A JOBLIB/STEPLIB
7 0 DSS2052A - LIBRARY NOT SEARCHED FOR PROGRAMNAME
16 8 DSS2170E - SYMBOLIC "DUNIT " NOT RESOLVED
17 8 DSS4500E - INVALID DATA SET NAME FORMAT IN DSN=OPERAND
18 8 DSS4940E - UNABLE TO IDENTIFY UNIT NAME "&DUNIT "
19 4 DSS2050W - PROGRAM "CPROG1 " NOT FOUND
Back to top
View user's profile Send private message
MGIndaco

Active User


Joined: 10 Mar 2005
Posts: 432
Location: Milan, Italy

PostPosted: Thu Jun 16, 2005 5:33 pm    Post subject:
Reply with quote

I think that you need to read the first post of this forum but in each case
you jcl must be:
Code:
//CPROG1  JOB (@),'TEST',CLASS=A,                     
//             MSGCLASS=A,NOTIFY=DBSING               
//STEP1   EXEC  PGM=CPROG1                             
//STEPLIB  DD DISP=SHR,DSN=library of load modules
//INFILE  DD   DISP=SHR,DSN=input file specified in FD
//OUTIFLE DD   DSN=output file specified in FD,                   
//             DISP=(NEW,CATLG,DELETE),               
//             UNIT=SYSDA,  <-If you use a variable you must override it!
//             LRECL=133,                             
//             BLKSIZE=0,                             
//             RECFM=FBA,                             
//*             DATACLAS=STANDARD <-Is not necessary
//             SPACE=(CYL,(1,1),RLSE) <- this is useful but change the quantity as you want


In your dataset you must use qualifiers in correct form.
Any segment of qualifier cannot be greater than 8 CHAR.
You cannot exceed 44 CHAR of dataset length and in this you
cannot have more than 8 point!

To retrieve the library where your load is stored search in
sysout of compiler and search the SYSIN of program PGM=IGYCRCTL.
Back to top
View user's profile Send private message
priyesh.agrawal

Senior Member


Joined: 28 Mar 2005
Posts: 1452
Location: Chicago, IL

PostPosted: Thu Jun 16, 2005 5:43 pm    Post subject: Re: Need to write jcl for the cobol program.
Reply with quote

Quote:
6 8 DSS5210E - IMPROPER ATTRIBUTES FOR A JOBLIB/STEPLIB


//STEPLIB DD DISP=SHR, DSN=WXX322.DBSING.WALK

verify again ur LIB name.

Quote:
16 8 DSS2170E - SYMBOLIC "DUNIT " NOT RESOLVED


Give UNIT=SYSDA or UNIT=TAPE

Quote:
17 8 DSS4500E - INVALID DATA SET NAME FORMAT IN DSN=OPERAND


//OUTIFLE DD DSN=DBSING.OUTCPROG1,

make this string within 8 char.

Quote:
18 8 DSS4940E - UNABLE TO IDENTIFY UNIT NAME "&DUNIT "


As written above Give UNIT=SYSDA or UNIT=TAPE


Regards,

Priyesh.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Thu Jun 16, 2005 5:45 pm    Post subject: Re: Need to write jcl for the cobol program.
Reply with quote

See this document on dataset names:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2D430/1.1.9?DT=20040624112123
Back to top
View user's profile Send private message
bhim_sb
Warnings : 1

New User


Joined: 31 Mar 2005
Posts: 24

PostPosted: Fri Jun 24, 2005 2:50 pm    Post subject: Thanks
Reply with quote

Thanks to all i solved the problem.

My program is now activated and running succefully
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am
No new posts Match two files using multiple keys a... santoshks1987 SYNCSORT 11 Fri Aug 18, 2017 10:50 am
No new posts ALPHABETIC check in COBOL vidyaa COBOL Programming 8 Thu Aug 17, 2017 7:13 pm
No new posts Read two inputs and write into output... murali.andaluri DFSORT/ICETOOL 6 Wed Jul 26, 2017 7:35 pm
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us