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
 

 

Getting error - COBOL INLINE ERROR DISPLAY UTILITY

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
satish.sanagavarapu

New User


Joined: 19 Sep 2014
Posts: 3
Location: hyderabad

PostPosted: Tue Sep 23, 2014 7:36 pm    Post subject: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

Hi,

I have copied REXX code to SYSPROC and while I am running the macro,I am getting the following Error.Can some one help me on this..!!!

IKJ56532I STMT 204 - LABEL readSource SPECIFIED BUT COMMAND NOT FOUND

IKJ56532I STMT 752 - LABEL exitModule SPECIFIED BUT COMMAND NOT FOUND

Regards,
Satish.S
Back to top
View user's profile Send private message

Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1714
Location: UK

PostPosted: Tue Sep 23, 2014 8:38 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

Well, it is reasonably clear what it is saying - in your macro (you are certain that it is a macro and not a program?) there should be labels 'readsource' and 'exitmodule' but the interpreter is saying that they do not exist. Check the code. Run with a trace. Any problems post the code.

BTW 'exitModule' seems to indicate that this is not a macro but a program otherwise an intelligent programmer would have called it 'exitMacro'. Possibly!
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2019
Location: Silicon Valley

PostPosted: Tue Sep 23, 2014 9:16 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

You are missing /*rexx */ on the first line of your program. The default is to assume it is a clist program.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2019
Location: Silicon Valley

PostPosted: Tue Sep 23, 2014 9:17 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

And what the heck is this: "Getting error - COBOL INLINE ERROR DISPLAY UTILITY"
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Tue Sep 23, 2014 11:38 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

Quote:
COBOL INLINE ERROR DISPLAY UTILITY


probably is the name of the tool write/used by the TS
Back to top
View user's profile Send private message
satish.sanagavarapu

New User


Joined: 19 Sep 2014
Posts: 3
Location: hyderabad

PostPosted: Thu Sep 25, 2014 6:33 pm    Post subject: Re: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTI
Reply with quote

Hi,

Still its not working..Please find the attached code which I am trying to execute.Please some one refer and let me know whether any modifications required...!!

Thank you,

Regards,
Satish.S

751-line attachment deleted
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Thu Sep 25, 2014 6:55 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

It's from here, where the source is included.

There are 751 lines of source, including comments.

Have you followed all the instructions?

Have you tried to Trace?

Have you left a message for the developers? (No).
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Thu Sep 25, 2014 6:56 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

why
Code:
   ADDRESS ISPEXEC "ISREDIT (lend)   = LINENUM .ZLAST"
   ADDRESS ISPEXEC "ISREDIT (lstart) = LINENUM .ZFIRST"


and not a plain Address ISREDIT ?
Back to top
View user's profile Send private message
satish.sanagavarapu

New User


Joined: 19 Sep 2014
Posts: 3
Location: hyderabad

PostPosted: Thu Sep 25, 2014 7:55 pm    Post subject: Re: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTI
Reply with quote

What are the changes i need to make to the rexx code which is attached..?Can some one suggest..!!

Regards,
Satish.S
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Thu Sep 25, 2014 7:58 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

do You really expect that somebody will go over a 700 lines script to fix it for You ? icon_evil.gif

did You try to run it with TRACE A
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2019
Location: Silicon Valley

PostPosted: Thu Sep 25, 2014 10:02 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

repeating:
Quote:
You are missing /*rexx */ on the first line of your program. The default is to assume it is a clist program.


I am clairvoyant. Now that I looked at the source, I see that it is indeed missing.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Thu Sep 25, 2014 10:12 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

And with the courtesy to comment on the IBM site, Pedro.

For completeness, here is what TS/OP included as the first few lines of the deleted attachment:

Code:
/*REXX*/                           
   ADDRESS ISREDIT "MACRO (STRING)"
   ADDRESS ISREDIT "RESET"         
/*------------------------------------------------------------------------
      Syntax :
                Usage :  <cmd> <jobname> <jobid>
                OR
                Usage :  <cmd> <joblog dataset name>
                OR
                Usage :  <cmd> setup
  ----------------------------------------------------------------------
 */
   ADDRESS ISPEXEC "ISREDIT MACRO (STRING)"
   ADDRESS ISREDIT "RESET"
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Thu Sep 25, 2014 10:15 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

And with the courtesy to comment on the site, Pedro.

For completeness, here is what TS/OP included as the first few lines of the deleted attachment:

Code:
/*REXX*/                           
   ADDRESS ISREDIT "MACRO (STRING)"
   ADDRESS ISREDIT "RESET"         
/*------------------------------------------------------------------------
      Syntax :
                Usage :  <cmd> <jobname> <jobid>
                OR
                Usage :  <cmd> <joblog dataset name>
                OR
                Usage :  <cmd> setup
  ----------------------------------------------------------------------
 */
   ADDRESS ISPEXEC "ISREDIT MACRO (STRING)"
   ADDRESS ISREDIT "RESET"
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Thu Sep 25, 2014 10:42 pm    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

An internet search would have found a resolution from 2005 without all of this anyway :-)
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2019
Location: Silicon Valley

PostPosted: Fri Sep 26, 2014 12:56 am    Post subject: Reply to: Getting error - COBOL INLINE ERROR DISPLAY UTILITY
Reply with quote

FYI, this error message does not make sense for rexx, but does make sense for CLIST:
Code:
IKJ56532I STMT 204 - LABEL readSource SPECIFIED BUT COMMAND NOT FOUND


You can put either rexx or clist into SYSPROC, but a rexx program has to have /*rexx */ as a first line of the exec, otherwise it is invoked as a clist.
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts S922 Error yuvan ABENDS & Debugging 3 Fri Dec 02, 2016 6:58 pm
No new posts Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 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


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