IBM extension (4) - program-name in a literal
AliceYing 27000649CQ Comment (1) Visits (2972)
Standard COBOL 85 requires that program-name be specified as a user-defined word. IBM COBOL compilers extends the standard rule and allow program-name to be a user-defined word or alphanumeric literal, but not a figurative constant, that identifies your program. It must follow the following rules of formation, depending on the setting of the PGMNAME compiler option:
For more rules of program-name, see Program-ID paragraph in the Language Reference.