View previous topic :: View next topic
|
Author |
Message |
bhuvanaa2005
New User
Joined: 19 Jan 2011 Posts: 2 Location: Coimbatore
|
|
|
|
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 |
|
|
Bill O'Boyle
CICS Moderator
Joined: 14 Jan 2008 Posts: 2501 Location: Atlanta, Georgia, USA
|
|
|
|
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 |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
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 |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Peter, it's Thursday so it must be psychic day
I'll say line 8 of the code |
|
Back to top |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
Expat,
that line would be the SEQUENCE statement. |
|
Back to top |
|
|
bhuvanaa2005
New User
Joined: 19 Jan 2011 Posts: 2 Location: Coimbatore
|
|
|
|
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 |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
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 |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
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 |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
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 |
|
|
|