Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Cant we compile a COBOL program in PS ?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
dineshsjce
Currently Banned

New User


Joined: 16 Apr 2007
Posts: 41
Location: Bangalore

PostPosted: Fri Jul 06, 2007 3:21 pm    Post subject: Cant we compile a COBOL program in PS ?
Reply with quote

Hi ,
I wrote a COBOL program in a PS file and tried compiling it. I got the JCl errors. But the same COBOL program compiled in PDS member. What is the reason ?

Regards,
Dinesh
Back to top
View user's profile Send private message

a027412

New User


Joined: 05 Jul 2007
Posts: 40
Location: Minneapolis, MN

PostPosted: Fri Jul 06, 2007 3:22 pm    Post subject: You can
Reply with quote

Hey dineshsjce,

Please post the errors you got during compilation.
Back to top
View user's profile Send private message
dineshsjce
Currently Banned

New User


Joined: 16 Apr 2007
Posts: 41
Location: Bangalore

PostPosted: Fri Jul 06, 2007 3:27 pm    Post subject:
Reply with quote

8 IEF646I REQUIRED POSITIONAL PARAMETER MISSING IN THE DSNAME FIELD

30 IEF646I REQUIRED POSITIONAL PARAMETER MISSING IN THE DSNAME FIELD
Back to top
View user's profile Send private message
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Fri Jul 06, 2007 3:33 pm    Post subject:
Reply with quote

Dinesh,

Please post the JESJCL messages for the above lines (8 & 30).
Back to top
View user's profile Send private message
dineshsjce
Currently Banned

New User


Joined: 16 Apr 2007
Posts: 41
Location: Bangalore

PostPosted: Fri Jul 06, 2007 3:39 pm    Post subject: JESJCL message
Reply with quote

1 //G68448C JOB ,,NOTIFY=G68448,CLASS=B,MSGLEVEL=(1,1),MSGCLASS=X
2 //SET1 SET COPYLIB=OPERN.CICS3.COPYLIB
3 //SET2 SET LOAD=OPERN.CICS3.LOADLIB
4 //SET3 SET VSAMLIB=OPERN.CICS3.VSAMLIB
5 //SET4 SET WORK=UNIT=SYSDA,SPACE=(460,(350,100))
//*ET5 SET REG=®
//*ET6 SET DSP=&DSP
//*
//* 1. COMPILATION
//*
6 //COMPILE EXEC PGM=IGYCRCTL,REGION=4M,
// PARM='DYNAM,LIST,RENT,LIB,OBJECT,APOST,OPTIMIZE'
//* PARM='DYNAM,RENT,DUMP,LIB,OBJECT,APOST,OPTIMIZE,OFFSET'
7 //STEPLIB DD DSN=IGY.SIGYCOMP,DISP=SHR
8 //SYSIN DD DSN=G68448.PRACTICE.TEST1(),DISP=SHR
9 //SYSUT1 DD UNIT=SYSDA,SPACE=(460,(350,100))
10 //SYSLIB DD DSN=OPERN.CICS3.COPYLIB,DISP=SHR
11 // DD DSN=OPERN.CICS3.VSAMLIB,DISP=SHR
12 //SYSUT2 DD UNIT=SYSDA,SPACE=(460,(350,100))
13 //SYSUT3 DD UNIT=SYSDA,SPACE=(460,(350,100))
14 //SYSUT4 DD UNIT=SYSDA,SPACE=(460,(350,100))
15 //SYSUT5 DD UNIT=SYSDA,SPACE=(460,(350,100))
16 //SYSUT6 DD UNIT=SYSDA,SPACE=(460,(350,100))
17 //SYSUT7 DD UNIT=SYSDA,SPACE=(460,(350,100))
18 //SYSLIN DD DSN=&LOADSET,DISP=(MOD,PASS),UNIT=SYSDA,
// SPACE=(80,(300,100)),DCB=BLKSIZE=400
19 //SYSPRINT DD SYSOUT=*
20 //SYSUDUMP DD SYSOUT=*
21 //SYSABEND DD SYSOUT=*
//*
//* 2. LINKEDIT
//*
//* LINKEDIT EXEC PGM=IEWL,COND=(5,LT),REGION=4M
//* FOLLOWING EXEC PGM IS CHANGED TO HEWL
22 //LINKEDIT EXEC PGM=HEWL,COND=(5,LT),REGION=4M
//* PARM='XREF,RMODE=ANY,AMODE=31,TEST,AC=1'
23 //SYSLIB DD DSN=CEE.SCEELKED,DISP=SHR
24 //SYSPRINT DD SYSOUT=*
25 //SYSLIN DD DSN=&LOADSET,DISP=(OLD,DELETE)
26 // DD DDNAME=SYSIN
27 //SYSUT1 DD UNIT=SYSDA,SPACE=(460,(350,100))
28 //SYSUT2 DD UNIT=SYSDA,SPACE=(460,(350,100))
29 //SYSUT3 DD UNIT=SYSDA,SPACE=(460,(350,100))
30 //SYSLMOD DD DSN=OPERN.CICS3.LOADLIB(),DISP=SHR
//*
Back to top
View user's profile Send private message
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Fri Jul 06, 2007 4:14 pm    Post subject:
Reply with quote

Dinesh,

Why did you give blank parenthsis in the lines 8 & 30?
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1288
Location: Chennai, India

PostPosted: Fri Jul 06, 2007 6:09 pm    Post subject: Re: Cant we compile a COBOL program in PS ?
Reply with quote

u dont have to code parenthesis for PS ! just give the dataset name ! u cud have identified that from the displayed messages !


8 IEF646I REQUIRED POSITIONAL PARAMETER MISSING IN THE DSNAME FIELD

30 IEF646I REQUIRED POSITIONAL PARAMETER MISSING IN THE DSNAME FIELD
Back to top
View user's profile Send private message
dineshsjce
Currently Banned

New User


Joined: 16 Apr 2007
Posts: 41
Location: Bangalore

PostPosted: Fri Jul 06, 2007 6:15 pm    Post subject:
Reply with quote

Hi

Not like that. I didnt submit JCL. Try to understand my problem. See all I did was , I wrote a COBOL program in a Physical Sequential file and tried compiling the program . During that time I got this errors(It says JCL errors). I am still in compilation stage . I didnt go for running of the program.
Back to top
View user's profile Send private message
acevedo

Active User


Joined: 11 May 2005
Posts: 344
Location: Spain

PostPosted: Fri Jul 06, 2007 6:23 pm    Post subject:
Reply with quote

yes but what you call compilation stage is just another JCL... so the JCL erros.
Back to top
View user's profile Send private message
dineshsjce
Currently Banned

New User


Joined: 16 Apr 2007
Posts: 41
Location: Bangalore

PostPosted: Fri Jul 06, 2007 6:28 pm    Post subject:
Reply with quote

But as u said earlier , I didnt give any parathesis like that.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Jul 06, 2007 9:43 pm    Post subject:
Reply with quote

Hello,

Quote:
But as u said earlier , I didnt give any parathesis like that.

Something did. . .

Quote:
8 //SYSIN DD DSN=G68448.PRACTICE.TEST1(),DISP=SHR
30 //SYSLMOD DD DSN=OPERN.CICS3.LOADLIB(),DISP=SHR


On a PS dataset, there should be no () - that is invalid syntax. Also, a PS is usually allocated with disposition OLD rather than SHR.

Is there some reason you are not using the standard compile jcl for your system? I'd suggest you move your source into the appropriate library and use your standard compilaton jcl. . .
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Fri Jul 06, 2007 9:47 pm    Post subject:
Reply with quote

Quote:
30 //SYSLMOD DD DSN=OPERN.CICS3.LOADLIB(),DISP=SHR


The loadlib would have to be a PDS.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Sat Jul 07, 2007 11:27 am    Post subject:
Reply with quote

Would I be right in thinking that your compile run is submitted from a screen driven process.
Back to top
View user's profile Send private message
a027412

New User


Joined: 05 Jul 2007
Posts: 40
Location: Minneapolis, MN

PostPosted: Sat Jul 07, 2007 2:52 pm    Post subject:
Reply with quote

hey, please try this.
close the PS which contains the code and try compiling. icon_confused.gif
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Sat Jul 07, 2007 2:54 pm    Post subject:
Reply with quote

And a process that does not validate before submitting. . .
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Sat Jul 07, 2007 9:01 pm    Post subject:
Reply with quote

Quote:
hey, please try this.
close the PS which contains the code and try compiling.

Why, how will this make the PS a member of a PDS, which is the requirement of the JCL being submitted.

Good point Dick, a compiler submission routine without any validation.
Back to top
View user's profile Send private message
prasadvrk

Active User


Joined: 31 May 2006
Posts: 200
Location: Netherlands

PostPosted: Mon Jul 09, 2007 1:52 pm    Post subject:
Reply with quote

Hi Dinesh,

Pay attention to expat's comment. Are you submitting the JCL to compile on your own or using any tool or automated process to submit.

Quote:
Would I be right in thinking that your compile run is submitted from a screen driven process.


If you are submitting on your own then change the JCL to remove the parenthesis.

Even otherwise once the job fails, open the JCL in spool and change it to remove the parenthesis in line 8 and 30 and submit again.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Mon Jul 09, 2007 6:21 pm    Post subject:
Reply with quote

Hello,

Once again. . . . .

People should not create their own or "tweak" the standard compile process. This causes nightmares with some regularity.
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
This topic is locked: you cannot edit posts or make replies. RANDOM Function in COBOL swapnil781 COBOL Programming 2 Tue Nov 15, 2016 6:17 pm
No new posts Regarding COBOL Stored Procedure opti... selvamsrinivasan85 DB2 4 Fri Nov 04, 2016 8:57 pm
No new posts COBOL Version 6.1 Virendra Shambharkar COBOL Programming 5 Tue Nov 01, 2016 11:24 am
No new posts Cobol list of programs being called biswajit.dattagupta COBOL Programming 5 Tue Nov 01, 2016 2:10 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us