|
From: Jim M. <ro...@vi...> - 2005-08-11 07:20:43
|
A Copybook by the name of "RGHELP-IO-WS" has caused the compiler to
crash with the usual "Segmentation Error". However, where the other
problems disappeared when I changed the names of the copybooks, this one
did not. No matter what name I give the copybook, the compiler still
crashes.
However, if I edit the copybook and comment out a line at random, the
compiler works.
In the code below, I have commented out the definition for the variable
"QGH-SUB-SCREEN-NO" in order to get the program to compile. However, if
I comment out the definition for "QGH-SCREEN-NO" or
"MAX-SCREEN-CONTENTS" then the program will also compile.
Note that none of these three variables are actually used in the
program. These are redundant lines of code and need not be there.
*---------------------------------------------------------*
* RGHELP-IO-WS.
*---------------------------------------------------------*
* RGHELP only has a single Index:
* Primary Key: RG-HELP-KEY
*---------------------------------------------------------*
01 RGHELP-KEY-TO-USE PIC X(30) VALUE SPACES.
*---------------------------------------------------------*
* Defining the Intermediate Variables used in
* reading RG-HELP table.
*---------------------------------------------------------*
01 MAX-SCREEN-CONTENTS PIC 9(5) VALUE 20.
01 QGH-SCREEN-NO PIC Z9 VALUE ZERO.
*01 QGH-SUB-SCREEN-NO PIC Z9 VALUE ZERO.
*--------------------------------------------------------
~
|