Without the souce code I can't make any intelligent suggestions.
However, if you can find a copy of "The Elements of 
Programming Style" it will give several examples of "bad" vs "good" code
and how to get from here to there.

IIRC, at one time there were (at least) three versions. One each for
COBOL, FORTRAN, and ?????

HTH,

 
<snip>
> 
> Not unusual at all. Poorly written code in any language can do this. 
> E.G. In cobol terms, using display fields in computations instead of 
> the relevant decimal or binary items (PIC 99999  vs pic 99999 comp-3 
> vs pic 99999 comp).
> 

See, I am under the weather. I meant other than poor coding. Oh, and
perhaps I should add that we don't do anything particularly fancy. This
is basically VSAM I/O (no database) and processing records. And I have
seen many times where the programmer does exactly as you have said,
using a USAGE DISPLAY numeric as an array index value. I really wish
that the COBOL compiler would put out "idiot alert!" messages when this
happens. And then, as a non-overridable system option, refuse to compile
the program.
</snip>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to