DDS TIMFMT。有可能得到......:mm?

时间:2015-06-03 07:57:04

标签: ibm-midrange

我在显示记录中有一个时间输入字段,我希望它的格式为hh:mm。可用格式有秒或AM / PM之后。以下是我想要做的,但由于格式不存在,它不起作用。

A            SRTTIME         T  B  5 43TIMSEP(':') TIMFMT(*HM)

有没有一种简单的方法可以实现我想要的而无需将字段更改为简单的字符字段?我正在运行v7.1。

1 个答案:

答案 0 :(得分:2)

我建议使用带有EDTWRD的4位数字字段。你也可以考虑EDTCDE(Y)DATSEP(':')。或者使用DSPEDTD或WRKEDTD命令查看系统上名为QEDIT5 - QEDIT9的“用户定义”编辑代码。或者考虑第31栏中的其他键盘移位代码。

....+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
     A        TM1            4S 0B      3  4EDTWRD('0 :  ')
     A                                      EDTMSK('  &  ')
     A        TM2            4S 0B      4  4EDTCDE(Y) 
     A                                      DATSEP(':') 
     A 

请参阅DDS Reference