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
 
Getting max cc=16 while running the pli program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
laxmi16

New User


Joined: 02 Jul 2012
Posts: 3
Location: india

PostPosted: Tue Jul 03, 2012 11:39 am    Post subject: Getting max cc=16 while running the pli program
Reply with quote

I am getting started with PLI. Tell the steps involved in running the sub programs. Getting maxcc=16 while running the jcl;
Having the both the main and sub programs in one PDS and Doing the compilation and link separately.
I am compiling the sub program first. The below one created the member CORRECTLY.

Code:
//COMPILE   EXEC  PROC=IEL1C                         
//PLI.SYSIN DD  *                                     
   SUBADD1: PROCEDURE (A,B,C);                         
      DCL (A,B) FIXED DECIMAL(7,2);                   
      DCL C FIXED DECIMAL(7,2);                       
     C=A1+A2;                                         
   END SUBADD1;                                       
/*                                                     
//PLI.SYSLIN DD DSN=USER.PLI.OBJ(SUBCOM),DISP=SHR   
//*

Then tried to link the sub program but getting maxcc=16. jcl is below given .The error is

Code:
5688-235 IBM PL/I for MVS & VM          Ver 1 Rel 1 Mod 1 with MLE             
OPTIONS SPECIFIED                                                               
,;                                                                             
IEL0002I  U       END-OF-FILE ENCOUNTERED ON INPUT FILE DURING COMPILER INITIALIZATIO
N

link Jcl:
Code:
//LINK      EXEC  PROC=IEL1CL                         
 //LKED.SYSLIN DD DSN=USER.PLI.OBJ(SUBCOM),DISP=SHR 
 //LKED.SYSLIB DD DUMMY                               
 //LKED.SYSLMOD DD DSN=USER.PLI.LOADLIB(SUBCOM),     
 //            DISP=SHR                               
 //SYSUDUMP DD DUMMY                                   
 //SYSPRINT DD SYSOUT=*                               
 //SYSUT1   DD DSN=&&SYSUT1,DCB=BUFNO=1,UNIT=DISK,     
 //            SPACE=(1024,(120,120),,,ROUND)                                                             


Run jcl:
Code:
//MYSTEP    EXEC  PROC=IEL1CLG                             
//PLI.SYSIN  DD  DSN=NM026T.PLI.SOURCE(MAINADD),DISP=SHR   
//LKED.SYSLIB   DD   DSN=NM026T.PLI.LOADLIB(SUBCOM),DISP=SHR   
//GO.SYSIN  DD  *                                           
  A2=1.23,A1=3.45;                                         
/*
Back to top
View user's profile Send private message

Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1925
Location: UK

PostPosted: Tue Jul 03, 2012 11:49 am    Post subject:
Reply with quote

You have various problems here:
1) you should post code and data using the code tags to preserve alignment
2) your program code cannot start in CC1 unless you override the margins (but this may be due to point 1)
3) you say that both modules are in a PDS but the called module you show is in-stream and not in a PDS
4) Why declare C separately from A and B?
5) You declare A and B but you try and add A1 and A2
6) You say that SUBADD1 compiles ok but the link fails. I'd be surprised if the link step attempts to run at all as the compile step has issued an unrecoverable error message.
7) You gave a title that infers the program is running when, in actual fact, you have not even got it to compile
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: Tue Jul 03, 2012 6:52 pm    Post subject:
Reply with quote

Hello and welcome to the forum,

One of the most important considerations using the forum is to use the proper terminology and to be clear.

Someone has kindly "Code'd" your original post. You need to do this with future posts as it preserves alignment and improves readability. We have a Preview function so you can see your post as it will appear to the forum. Once you have the post looking the way you want, Submit.

Suggest you look for another program/sub-program that are working on your system and see what is different between your compile/link and one that works.
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 -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Calling IKJEFT01 program from Rexx upendrasri CLIST & REXX 4 Wed Nov 15, 2017 4:27 pm
No new posts Job is running with no response!!! Vignesh Sid DB2 3 Fri Oct 27, 2017 6:28 pm
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am
No new posts Accessing CICS tran with map from JCL... navdeepaggarwal CICS 5 Tue Oct 03, 2017 6:15 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm

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