Re: [COBOL400-L] 'with duplicates' clause.

[MichaelQuigley@xxxxxxxxxx]

   We've done a lot of similar work.  We've gone to using PROCESS *NOSTDERR
   which according to the manual, "indicates that the error handling method
   of Version 1, Releases 1 and 2, is used."  This seems to have worked well
   for us.
    

   Original message:
   ------------------------------
   date: Thu, 4 Mar 2004 11:18:28 -0500
   from: rick.baird@xxxxxxxxxxxxxxx
   subject: [COBOL400-L] RE: 'with duplicates' clause.

   Jon,

   Thanks, I think I'll just add the file status, ignore it and be done with
   it.  These programs have been working for years and years, so I don't feel
   the need to change them too much.

   I try to stay away from the COBOL stuff as much as possible, but sometimes
   I have to.

   But everytime I get into one, I try to:

   A) externalize the file descriptions with a copy dds,
   B) change assign statements from DISK-xxx to DATABASE-xxx
   C) change keys to EXTERNALLY-DESCRIBED-KEY.

   these changes at least make it easier to deal with the next time I get
   into
   them.

   Thanks for the help,

   Rick

   ---------original message------------
   Personally I'd try fix it ASAP.  To identify the files you could add the
   File Status and a check on open then log all files that caused a 95.
   If I recall correctly, using the file status and ignoring it, will
   probably
   produce the "safest" results.

   The reason it happens by the way is that ANSI rules were tightened between
   the dialects used for the 38 and 400 versions.  As a result an error
   status
   (95) had to be issued to ensure ANSI compliance.  I can't look it up, but
   this may be one of the "features" that can be disabled by a compile time
   option - have you checked?

   Jon Paris
   Partner400
   www.Partner400.com