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
 

 

AMODE=24 while the run-time library installed above the Line

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

New User


Joined: 05 Sep 2008
Posts: 37
Location: Chennai

PostPosted: Wed Nov 19, 2008 9:40 pm    Post subject: AMODE=24 while the run-time library installed above the Line
Reply with quote

Hi,

My cobol program is calling 2 cobol and 3 assembler program as a sub program. The Cob to cob call is dynamic and cob to asm call is Static. while running the cobol program I am getting below error. can anyone please let me know why?

EDC5052S The application is running with AMODE=24 while the run-time library was installed above the line. The traceback information could not be determined.
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8086
Location: East Dubuque, Illinois, USA

PostPosted: Wed Nov 19, 2008 10:00 pm    Post subject:
Reply with quote

A Google search of EDC5052S finds:
Quote:

EDC5052S when dynamically invoking COBOL program in 24 bit mode.
Technote (troubleshooting)

Problem(Abstract)
User received error message EDC5052S when calling a COBOL program in 24 bit mode.

Resolving the problem
A program written in C was accidentally brought into the application during the bind step. C does not support running AMODE 24 applications and issues this message when C is called for initialization.

Although this problem occurred when C was unintentionally linked into the application there are other instances when C will be called for initialization in a pure COBOL application.
For example, COBOL requires the C/C++ runtime in the following cases:

* COBOL program contains an XML PARSE or an XML GENERATE statement.
* COBOL program is compiled with one of the compiler options: DLL, PGMNAME(LONGUPPER), PGMNAME(LONGMIXED).
* The program contains Object Oriented COBOL syntax.


See APAR PK24280 for future updates to documentation. Note PK19616 documents and instance where EDC5052S is issued in error.
Check your compile options -- it sounds like they may be causing your problem. If not, you may need to open an issue with IBM.
Back to top
View user's profile Send private message
jeyaseelan347
Warnings : 1

New User


Joined: 05 Sep 2008
Posts: 37
Location: Chennai

PostPosted: Wed Nov 19, 2008 10:24 pm    Post subject:
Reply with quote

HI Robert,

I have fix that issue. Now I am facing the SOC4 issue. The getting the below info in my IDIREPRT.

Event Fail Module Program EP
# Type Point Name Name Name Event Location (*)
-- ------------ ----- -------- -------- -------- ----------------------
1 Call aaaaaa aaaaaa aaaaaa P+5008 E+5008
2 Call aaaaaa bbbbbb n/a P+126
3 Abend S0C4 ***** aaaaaa bbbbbb n/a P+44

I am getting SOC4 in the CALL to subprogram 'bbbbbb'. Can you please help me?
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 SCLM -- not installed -- panel ISRNOSLM dmitchell1105 IBM Tools 3 Fri Jun 09, 2017 10:41 pm
No new posts DSNACCOX (can it be run on 1 db/ts, t... SRICOBSAS DB2 5 Sat May 06, 2017 12:59 am
No new posts LISTIDR compiled date/time jerryte IBM Tools 3 Thu Apr 20, 2017 7:37 pm
No new posts Application not run by time HH:MM tri... jzhardy IBM Tools 1 Sun Apr 09, 2017 3:22 pm
No new posts Count the length of the record & ... sreekusr DFSORT/ICETOOL 4 Thu Mar 23, 2017 7:52 pm


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