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
 
A004 CATASTROPHIC ERROR IN MODULE

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CA Products
View previous topic :: :: View next topic  
Author Message
bhuvanaa2005

New User


Joined: 19 Jan 2011
Posts: 2
Location: Coimbatore

PostPosted: Thu Jan 20, 2011 5:00 pm    Post subject: A004 CATASTROPHIC ERROR IN MODULE
Reply with quote

Hi,

I am facing A004 CATASTROPHIC ERROR IN MODULE error in my eazytrieve program. This program creates report on specific fields. For example If the field name is ID and It has only 3 possible values (0,2,3) then report will be generated like Number of '0' records, Number of '2' records & number of '3' records. Like below

Code:
     ID       Count
      0       5,678
      2       89,000
      3       4,000


My input file has around 32M records. so it throws an error message. I have referred earlier post regarding the same error, In that, it was mentioned that removed sort workspace & it worked fine. But we dont have any internal sorting or sorting process because the records are already in sorted order.

Please provide me any suggestions for correcting this error
Back to top
View user's profile Send private message

Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2504
Location: Atlanta, Georgia, USA

PostPosted: Thu Jan 20, 2011 5:16 pm    Post subject: Reply to: A004 CATASTROPHIC ERROR IN MODULE
Reply with quote

Step 01 -

Refer to the EZT documentation

Step 02 -

If the documentation doesn't solve the problem, then contact CA directly

Bill
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2442
Location: Netherlands, Amstelveen

PostPosted: Thu Jan 20, 2011 5:20 pm    Post subject:
Reply with quote

Are there Axxx errors preceding your A004 message?
Do you have a SEQUENCE statement in your report definition?


It would be nice if you show some coding.
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: Thu Jan 20, 2011 5:29 pm    Post subject:
Reply with quote

Peter, it's Thursday so it must be psychic day

I'll say line 8 of the code
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2442
Location: Netherlands, Amstelveen

PostPosted: Thu Jan 20, 2011 5:31 pm    Post subject:
Reply with quote

Expat,

that line would be the SEQUENCE statement.
Back to top
View user's profile Send private message
bhuvanaa2005

New User


Joined: 19 Jan 2011
Posts: 2
Location: Coimbatore

PostPosted: Thu Jan 20, 2011 5:54 pm    Post subject: Reply to: A004 CATASTROPHIC ERROR IN MODULE
Reply with quote

Here is the sample code:

Code:
IF  COPIER  =  '016', '017', '018', '019', '020', '021',   +
               '022', '023', '024', '025', '026', '027',   +
               '028', '029', '030', '031'                   
     MOVE  'CANON MICRO'  TO  WS-COPIER-NAME                 
     WS-COPIER-CTR = 1                                       
     PRINT  REPORT17                                         
END-IF       
                                               
IF  COPIER  =  '008', '009', '010', '011', '012', '013',   +   
               '014', '015', '024', '025', '026', '027',   +   
               '028', '029', '030', '031'                       
     MOVE  'CANON TYPEWRITER'  TO  WS-COPIER-NAME               
     WS-COPIER-CTR = 1                                         
     PRINT  REPORT17                                           
END-IF                                                         

REPORT REPORT17 SUMMARY PAGESIZE 60 LINESIZE 132 PRINTER PRINT17
SEQUENCE  WS-COPIER-NAME                                       
CONTROL   WS-COPIER-NAME                                       
  TITLE 1  REPORT-NAME                                         
  TITLE 2  'PROFILE REPORT BY COPIER CODE'                     
  HEADING  WS-COPIER-NAME ('COPIER' 'CATEGORY')                 
  HEADING  WS-COPIER-CTR ('COUNT')                             
  LINE 01  WS-COPIER-NAME WS-COPIER-CTR
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2442
Location: Netherlands, Amstelveen

PostPosted: Thu Jan 20, 2011 6:02 pm    Post subject:
Reply with quote

Because of your SEQUENCE statement you need some sort related
dd-statements.

Because of your PRINTER statement you need a PRINT17 dd-statement.
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: Thu Jan 20, 2011 8:50 pm    Post subject:
Reply with quote

Hello,

You need to look thru the output generated and look at ALL of the diagnostic info generated. There is more available than you have posted.

You should also become familiar/comfortable with the "Code" tag as this will preserve alignment and improve readability (your posts above have been "Code'd").
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


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

PostPosted: Thu Jan 20, 2011 9:00 pm    Post subject:
Reply with quote

Without even having Easytrieve installed, it only took a few minutes of Google to find this in the CA manual:
Quote:
A004 CATASTROPHIC ERROR IN MODULE - modname
If another Annn message preceded this error message, you should correct the problem that the preceding message describes and rerun your program. If the error persists, call Computer Associates Technical Support for assistance.

So you need to look for other error messages and resolve them before proceeding, or you need to do as Bill and Dick stated and contact CA support. Since this forum is not part of CA support, you should not be expecting an answer from us.
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 -> CA Products All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts FTP Skip or ignore error and process ... AJAYREDDY All Other Mainframe Topics 3 Wed Sep 27, 2017 8:12 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
No new posts FUSE - IBM MQ - CICS integration error Kevin Vaz CICS 1 Mon Sep 18, 2017 4:31 pm
No new posts Reply MQ open error Vignesh Sid COBOL Programming 6 Thu Sep 07, 2017 6:02 pm

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