Rational Developer for System z
COBOL for Windows, Version 7.5, Language Reference


Fixed insertion editing

This type of editing is valid only for numeric-edited items. The following insertion symbols are used:

In fixed insertion editing, only one currency symbol and one editing-sign control symbol can be specified in a PICTURE character-string.

Unless it is preceded by a + or - symbol, the currency symbol must be the first character in the character-string.

When either + or - is used as a symbol, it must be the first or last character in the character-string.

When CR or DB is used as a symbol, it must occupy the rightmost two character positions in the character-string. If these two character positions contain the symbols CR or DB, the uppercase letters are the insertion characters.

Editing sign control symbols produce results that depend on the value of the data item, as shown below:

Editing symbol in PICTURE character-string Result: data item positive or zero Result: data item negative
+ + -
- space -
CR 2 spaces CR
DB 2 spaces DB

For example:

PICTURE Value of data Edited result

        999.99+      

      +6555.556      

        555.55+      

      +9999.99       

      -6555.555      

      -6555.55       

       9999.99       

      +1234.56       

       1234.56       

       $999.99       

       -123.45       

       $123.45       

      -$999.99       

       -123.456      

      -$123.45       

      -$999.99       

       +123.456      

       $123.45       

      $9999.99CR     

       +123.45       

      $0123.45       

      $9999.99CR     

       -123.45       

      $0123.45DB     

Terms of use | Feedback

Copyright IBM Corporation 1996, 2008.
This information center is powered by Eclipse technology. (http://www.eclipse.org)