如何将符号分隔尾随移动到 COBOL 中的普通十进制字段
How to move sign separate trailing to normal decimal field in COBOL
我有一个像这样的字段
03 ws-var1 Pic s9(11)v9(2) 符号尾随分开。
在 op 文件中,值显示为 00000002999200+
但我希望它显示为 29992.00。必须在 COBOL 中做出什么定义才能得到我想要的结果。
PICTURE
Result
Length
Notes
+9(11).9(2)
+00000029992.00
15
The sign +
or -
will be shown
-9(11).9(2)
00000029992.00
15
The -
will show only if the value is negative
+(11)9.9(2)
+29992.00
15
The sign +
or -
will be shown
-(11)9.9(2)
29992.00
15
The -
will show only if the value is negative
Z(10)9.9(2)
29992.00
14
The sign is removed.
在每种情况下,如果显示的字符数少于字段长度,则每个结果前都会出现空格。
我有一个像这样的字段 03 ws-var1 Pic s9(11)v9(2) 符号尾随分开。
在 op 文件中,值显示为 00000002999200+
但我希望它显示为 29992.00。必须在 COBOL 中做出什么定义才能得到我想要的结果。
PICTURE | Result | Length | Notes |
---|---|---|---|
+9(11).9(2) | +00000029992.00 | 15 | The sign + or - will be shown |
-9(11).9(2) | 00000029992.00 | 15 | The - will show only if the value is negative |
+(11)9.9(2) | +29992.00 | 15 | The sign + or - will be shown |
-(11)9.9(2) | 29992.00 | 15 | The - will show only if the value is negative |
Z(10)9.9(2) | 29992.00 | 14 | The sign is removed. |
在每种情况下,如果显示的字符数少于字段长度,则每个结果前都会出现空格。