General Discussion

A COBOL program that accepts input from a DB2 database called "Name" and another called "Address". "Name" is the parent table and has columns of "Person Number", "First Name", "Last Name", and "Title". "Address" is a child table with columns called "Person Number", "Street Address", "City", "State", "ZIP".

It produced a reasonably decent program and very good SQL. But here's an issue (or maybe it isn't anymore, I haven't actively written COBOL in about 20 years, but I have a feeling it would still be):

01 WS-RECORD-COUNT PIC 9(5) COMP-3 VALUE ZERO.
01 WS-PAGE-COUNT PIC 9(4) COMP-3 VALUE ZERO.
01 WS-LINE-COUNT PIC 9(3) COMP-3 VALUE ZERO.

A good, experienced COBOL programmer will recognize (what at least used to be) the two major issues with this code.