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
 

 

IEW2008I 0F03 - Return Code 8.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
sureshmurali
Warnings : 1

New User


Joined: 25 Nov 2010
Posts: 70
Location: Sivakasi, India

PostPosted: Wed Feb 01, 2012 8:40 pm    Post subject: IEW2008I 0F03 - Return Code 8.
Reply with quote

Hi,

This is first COBOL program.

Code:
PROGRAM-ID. COBOL1.         
ENVIRONMENT DIVISION.       
DATA DIVISION.               
WORKING-STORAGE SECTION.     
77 A PIC 9(3).               
77 WS-SUB PIC X(1).         
LINKAGE SECTION.             
01 X PIC 9(3).               
PROCEDURE DIVISION USING X. 
   MOVE X TO A.             
   DISPLAY "COBOL 1 ---> " A.
   STOP RUN.                 


And second COBOL program -
Code:
PROGRAM-ID. COBOL2.                         
ENVIRONMENT DIVISION.                       
DATA DIVISION.                               
WORKING-STORAGE SECTION.                     
77 A PIC X(1) VALUE IS "9".                 
PROCEDURE DIVISION.                         
   CALL "PRGM2" USING A.                     
   DISPLAY "CALL WAS SUCCESS. IT IS COBOL 2".
   STOP RUN.                                 


I use the following compiler JCL to run the first cobol -

Code:
//STEP1 EXEC IGYWCL,                                         
// PARM.COBOL='LIB,APOST,XREF,MAP,OPT(FULL),OFFSET'           
//COBOL.SYSIN DD DISP=SHR,DSN=AA9331.KSUELIJ.TECH.PROG(COBOL1)
//COBOL.SYSLIB DD DISP=SHR,DSN=KSVELIJ.COBOL.PROGRAMS         
//LKED.SYSLMOD DD DISP=SHR,DSN=AA9331.K194689.PGMLIB(COBOL1) 
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*                                       


It ran fine and produced the LOAD. But i tried to run the second COBOL,
with the same JCL by changing the input like -

Code:
//STEP1 EXEC IGYWCL,                                         
// PARM.COBOL='LIB,APOST,XREF,MAP,OPT(FULL),OFFSET'           
//COBOL.SYSIN DD DISP=SHR,DSN=AA9331.TSUE5IJ.TECH.PROG(COBOL2)
//COBOL.SYSLIB DD DISP=SHR,DSN=KSVELIJ.COBOL.PROGRAMS         
//LKED.SYSLMOD DD DISP=SHR,DSN=AA9331.K194689.PGMLIB(COBOL2) 
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*                                         


It produced MAXCC - 8.

The error message -

Code:
BATCH EMULATOR  JOB(KSVELIJA) STEP(STEP1   ) PGM= HEWL      PROCEDURE(LKED    )
IEW2008I 0F03 PROCESSING COMPLETED.  RETURN CODE =  8.                         

----------------------                       
MESSAGE SUMMARY REPORT                       
----------------------                       
 TERMINAL MESSAGES      (SEVERITY = 16)     
 NONE                                       
                                             
 SEVERE MESSAGES        (SEVERITY = 12)     
 NONE                                       
                                             
 ERROR MESSAGES         (SEVERITY = 08)     
 2456                                       
                                             
 WARNING MESSAGES       (SEVERITY = 04)     
 NONE                                       
                                             
 INFORMATIONAL MESSAGES (SEVERITY = 00)     
 2008                                       
                                             


Do i need to add anything to the compiler ? Please advise...
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Wed Feb 01, 2012 8:53 pm    Post subject: Reply to: IEW2008I 0F03 - Return Code 8.
Reply with quote

IEWL is the linkeditor/binder. You have errors there. You haven't shown them to us. PF7 is a key which (usually) lets you go backwards on a listing. Press that a few times until you see something more or less obvious as an error.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Wed Feb 01, 2012 9:04 pm    Post subject:
Reply with quote

do not overlook the fact that pgm COBOL2 makes a static CALL to program PRGM2.

so insure that a linkedited PRGM2 exists prior to linkediting program COBOL2.
Back to top
View user's profile Send private message
sureshmurali
Warnings : 1

New User


Joined: 25 Nov 2010
Posts: 70
Location: Sivakasi, India

PostPosted: Wed Feb 01, 2012 9:19 pm    Post subject:
Reply with quote

I have now made a call to COBOL1 from COBOL2.

Code:
PROGRAM-ID. COBOL2.                         
ENVIRONMENT DIVISION.                       
DATA DIVISION.                               
WORKING-STORAGE SECTION.                     
77 A PIC X(1) VALUE IS "9".                 
PROCEDURE DIVISION.                         
   CALL "COBOL1" USING A.                     
   DISPLAY "CALL WAS SUCCESS. IT IS COBOL 2".
   STOP RUN.


Now it is showing the error message -

Code:
BATCH EMULATOR  JOB(KSVELIJA) STEP(STEP1   ) PGM= HEWL      PROCEDURE(LKED    )
IEW2456E 9207 SYMBOL COBOL1 UNRESOLVED.  MEMBER COULD NOT BE INCLUDED FROM THE  DESIGNATED CALL LIBRARY.


Thanks
Suresh K
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Wed Feb 01, 2012 9:37 pm    Post subject: Reply to: IEW2008I 0F03 - Return Code 8.
Reply with quote

Are you knowlingly doing a "static" CALL? If so, IEWL is going to need to know where the thing (COBOL1) is to be able to shove it into the loadmodule.

You have a "STOP RUN" in your called program. Is that intentional? You don't have an ID DIVISION. Is that intentional? You have a one-byte field in W-S which in the LINKAGE you are treating as three bytes, is that intentional?

There is a Beginner's Forum as a sister-site to this one. It is much easier to start there than to suffer the slings-and-arrows which may come your way here.
Back to top
View user's profile Send private message
sureshmurali
Warnings : 1

New User


Joined: 25 Nov 2010
Posts: 70
Location: Sivakasi, India

PostPosted: Wed Feb 01, 2012 9:55 pm    Post subject:
Reply with quote

Thank Bill. Answer to all your questions is Yes... All are intentional only except the STOP RUN which should be replaced by GOBACK and i did it.
Code:

//LKED.SYSLMOD DD DISP=SHR,DSN=SS9331.K194689.PGMLIB(COBOL2)


I need to know how can i let the compiler know about the loation of the load module COBOL1. Concatenation doesn't work with the above line of code. DO i need to use any SYSTEM dd name to with the second line of the following code ?

Code:

//LKED.SYSLMOD DD DISP=SHR,DSN=SS9331.K194689.PGMLIB(COBOL2)
//                       DD DISP=SHR,DSN=SS9331.K194689.PGMLIB(COBOL1)

Thanks in advance.
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1771
Location: Bloomington, IL

PostPosted: Wed Feb 01, 2012 10:02 pm    Post subject:
Reply with quote

sureshmurali wrote:
Thank Bill. Answer to all your questions is Yes... All are intentional only except the STOP RUN which should be replaced by GOBACK and i did it.
Code:

//LKED.SYSLMOD DD DISP=SHR,DSN=SS9331.K194689.PGMLIB(COBOL2)


I need to know how can i let the compiler know about the loation of the load module COBOL1. Concatenation doesn't work with the above line of code. DO i need to use any SYSTEM dd name to with the second line of the following code ?

Code:

//LKED.SYSLMOD DD DISP=SHR,DSN=SS9331.K194689.PGMLIB(COBOL2)
//                       DD DISP=SHR,DSN=SS9331.K194689.PGMLIB(COBOL1)

Thanks in advance.

SYSLMOD is only for your output...your Load MODule. Depending on how your link control cards are written, you'll also need to assign SS9331.K194689.PGMLIB to another DD, probably (but not certainly) to LKEDLIB.
Back to top
View user's profile Send private message
sureshmurali
Warnings : 1

New User


Joined: 25 Nov 2010
Posts: 70
Location: Sivakasi, India

PostPosted: Wed Feb 01, 2012 10:14 pm    Post subject:
Reply with quote

Finally this solved the issue.

Code:
//LKED.SYSLMOD DD DISP=SHR,DSN=SS9331.K194689.PGMLIB(COBOL2)
//LKED.SYSLIB DD DISP=SHR,DSN=SS9331.K194689.PGMLIB(COBOL1)


Thanks
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 EXIT or RETURN cvnlynn CLIST & REXX 16 Wed Jul 19, 2017 2:50 am
No new posts UNIT=AFF for Easytrieve code gandikk JCL & VSAM 7 Wed Jul 12, 2017 11:42 pm
No new posts DB2 Program abending without giving a... rahulgarg14 DB2 7 Mon May 29, 2017 8:10 pm
No new posts Job failing with USER = 4093 REASON C... Pradeepa S ABENDS & Debugging 1 Wed May 17, 2017 3:35 pm
No new posts COBOL Code Parsers and Lineage Establ... balimanja COBOL Programming 2 Tue May 02, 2017 3:30 am


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