If a series of paragraphs is to be executed, it is rare that they would ever be executed separately. So, use a SECTION header before each group of paragraphs, the PERFORM the SECTION instead of the paragraphs.

A SECTION header will cause all of the paragraphs within that section to be recognized as a related group. If there is ever a need to execute the paragraphs individually or to execute a subset of the section, you can still name the paragraphs in the PERFORM statement or specify the beginning and end with THRU.

You can use section or paragraph names with THRU if you wish. When you specify a section name, the entire SECTION is executed.

The PROGRAM ID is a COBOL standard. In the AS/400 line (and probably with many other COBOL compilers), you are allowed to override the PROGRAM ID name at compile-time. Some compilers might not implement the same standard.

Tom