常看到,卻老搞不清楚,這次很幸運,google到說明與live demo.
Cobol Picture Clause
9 數字
S9 有正負號的數字
V9 小數點
A 字母
X 字母數字都可以放
P 小數點0
9(2) 數字.長度2
S9(2) 有正負號的數字,長度2
V9(2) 小數點,小數點2位.
A(2) 字母.長度2
X(2) 字母數字都可以放.長度2
PP9 小數點0 e.g.0.123 前面2個,就會被取代0,變成0.003
可以試試看
https://www.tutorialspoint.com/compile_cobol_online.php
ref
https://www.tutorialspoint.com/cobol/cobol_data_types.htm
9 Numeric 數字
A Alphabetic 字母
X Alphanumeric 字母數字
V Implicit Decimal隱式十進制
S Sign
P Assumed Decimal 假定十進制