Rational Developer for System z
Enterprise COBOL for z/OS, Version 4.1, Compiler and Runtime Migration Guide


Lowercase alphabetic characters

"Lowercase" alphabetic characters, which were non-COBOL with CMPR2, are now in the set of legal COBOL characters with Enterprise COBOL. With CMPR2, COPY allowed replacement of lowercase characters:
COPY  A  REPLACING == abc ==  BY  == XYZ ==.
The previous example would locate all instances of "abc" and replace it with "XYZ". In contrast, Enterprise COBOL will treat lowercase and uppercase characters as equivalent in data-names and replace all instances of "abc" as well as "ABC" with "XYZ". If member A contains:
1  abc PIC X.
1  ABC PIC XX.
then the results are as follows:
   CMPR2                         NOCMPR2  

After COPYing & REPLACING     After COPYing & REPLACING
 1  XYZ PIC X.                   1  XYZ  PIC X.
 1  ABC PIC XX.                  1  XYZ  PIC XX.

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)