RE: [COBOL400-L] Level Checks on files for cobol programs

["Douthat, Trent" <trent.douthat@xxxxxxx>]

Yes, a COBOL program will produce a level check message CPF4131 for
externally described files.

When you try to open a file whose attributes are different than they were
when you compiled the program, you will get a file status of '39' and a
message of CPF4131.

Each file has a file-level identifier that you can take a gander at by doing
a DSPFD. That file-level identifier has to match the one the program knows,
which you can see by doing a DSPPGMREF.


-----Original Message-----
From: rick.baird@xxxxxxxxxxxxxxx

Do COBOL programs produce level checks on changed files, the same as RPG
does?

we've got a mix of cobol-38, 400 and ILE programs.  some have program
defined files, some use /copy books, some use COPY DDS-ALL-FORMATS.  Some
have EXTERNALLY-DESCRIBED-KEY, some not.

obviously, the program defined files won't crap out, but what about the
ones that copy dds?

Thanks,

Rick