语法:
WRITE 资料项 <显示格式参数>
显示格式参数:
LEFT-JUSTIFIED 资料靠左显示
CENTERED 资料靠中间显示
RIGHT-JUSTIFIED 资料靠右显示
UNDER <g> 在资料项<g>的X轴开始坐标显示
NO-GAP 紧接着显示, 不留空格
USING EDIT MASK <m> 使用内嵌字符显示, 如 11:20:30
USING NO EDIT MASK 不使用内嵌字符
NO-ZERO 数字前面0 的部分不显示
NO-SIGN 不显示正负号
DECIMALS <d> 显示 d 位小数字数
EXPONENT <e> F(浮点数) exponent 的值
ROUND <r> 四舍五入至小数字数下 r 位
CURRENCY <c> 币别显示
DD/MM/YY 日期显示格式
MM/DD/YY
DD/MM/YYYY
MM/DD/YYYY
DDMMYY
MMDDYY
YYMMDD
Example:
DATA: X TYPE I VALUE ‘112030’,
A(5) VALUE ’ABCDE’.
WRITE X USING EDIT MASK ‘__:__:__’.
输出结果为 11:20:30
WRITE X USING EDIT MASK ‘$___,___’
输出结果为 $112,030