Question

我试图以6位数字格式从iSeries获取系统时间。时间将采用HHMMSS格式。

我尝试过使用：

CDBRVWTM = %Dec(%Time(): *ISO);

和

CDBRVWTM = %DEC(%CHAR(%TIME()):6:0);

字段CDBRVWTM是表格中的6位数字字段。

Answer 1

**free
ctl-opt main(mainline);


dcl-proc mainline;

   dcl-s CurTime packed(6:0);

   curTime = %dec(%time():*HMS);
   dsply %char(curTime);

   return;

end-proc;

Answer 2

马特，你对％Dec（％Time（）：* ISO）有什么问题？这应该工作正常。除了* USA之外的任何时间格式都应该有效。

Answer 3

dcl-s wtime分区（6）; wtime =％Dec（％Time（））：

如何在RPG-Free中获得6位数字时间？

3 个答案: