Easytrieve: Intermittent A006 PROGRAM INTERRUPT - CODE 4 (PROTECTION EXCP)
search cancel

Easytrieve: Intermittent A006 PROGRAM INTERRUPT - CODE 4 (PROTECTION EXCP)

book

Article ID: 139131

calendar_today

Updated On:

Products

Easytrieve Report Generator

Issue/Introduction

What are some recommendations on how to resolve A006 abends with variable blocked file(s)?

Environment

Easytrieve Plus Report Generator, release 6.4

Resolution

Here are some coding suggestions:
1. output-file:RECORD-LENGTH = input-file:RECORD-LENGTH

2. OUTFILE:RECORD-LENGTH = ###
then your assignment statement on line 28

3. PUT output-file FROM input-file

4. Try adding WORKAREA to your file statements, this will force use into
move mode instead of locate.
[WORKAREA literal-14]
The WORKAREA option establishes the number of bytes to be allocated as a
work area for the file. WORKAREA cannot be coded if CARD, DLI, or IDMS
parameters are specified. Literal-14 specifies the number of bytes to be
allocated and must be large enough to contain the longest record processed.
This forces "move mode" instead of the default "locate mode."