控制报表输出格式

这几天在打印报表,发现个问题.定义成9(*)的变量，打印出来前面都n个0，很不好看。然后就想怎么能给弄掉。搜啊搜，发现了编辑型数据项这个好东西，试用了一下，果然很不错，完全是为打印报表设计的。事实上依稀记得当初师姐讲过，可是当时没有练，全部忘记了~~~所以这里就总结了一下所有的编辑型描述符吧，以备查阅。

编辑型描述符：编辑型数据项只是作为输出数据时增加或改变某些所需的符号，起编辑作用，它不是作计算用的。

（1）。插入小数点‘。’，用‘。’描述符。如：
               77         T        PIC   99.99。
   (2）。插入逗号‘，’作分位号，用‘，’描述符。如：
               02         A        PIC  999，999。99。 （或PIC  9（3），9（3）。9（2））
（3）。插入空格，用‘B’描述符。如：
               02         A        PIC   B9（3）B。
（4）。插入正负号，用‘+’或‘-’描述符。如：
               02         A1      PIC   +9（3）.(或 PIC   9（3）+）
               02         A2      PIC   -9（3）.（或PIC  9（3）-）
               注意：描述符‘+’，一侓加符号。描述符‘-’只对负值加负号。
（5）。插入‘$’ 。如：
               02         A1       PIC   $999.99.
               02         A2       PIC  +$99999.
               02         A3       PIC  -$999。9.
（6）。浮动插入正负号和‘$’
               02         A1       PIC  $$$99.99.
               02         A2       PIC  $$$$$.$$.  
               02         A3       PIC  ++9.99.
（7）。取消高位零，用‘Z’和‘*’描述符。在高位零的位置上代以空格或‘*’。如：
               02         A1       PIC  Z（5）.99.
               02         A2       PIC  *（5）.*（2）.  
               02         A3       PIC  +ZZZ，ZZZ，ZZ.ZZ.
               02         A4       PIC  -*，***，***.99。.
（8）。插入‘DB’和‘CR’字符。DB和CR只能用作固定插入，当数值为负时，在编辑型数               据项中最后两个字节中置DB或CR，数值为正时，此两字节留空格。如：
               02         A1       PIC  $9（3）.99DB.   
               02         A2       PIC  $9（3）.99CR.