Chinaunix

标题: Select current time ...想返回毫秒??? [打印本页]

作者: leojing    时间: 2004-12-17 16:27
标题: Select current time ...想返回毫秒???
环境odbc+db2(AS/400)
高手们????Select current time ...或其它方法想要毫秒,有没有那位大侠有办法!!!
作者: leojing    时间: 2004-12-17 17:21
标题: Select current time ...想返回毫秒???
在client access中用select current timestamp from ...能返回毫秒,应该是ODBC的问题,不知各位有没有用过?
作者: qingzhou    时间: 2004-12-21 10:43
标题: Select current time ...想返回毫秒???
可以通过RPGIV程序来获取,在RPGIV是有个TimeStamp这个时间函数来处理“毫秒”。

例如:以下是取当前的毫秒时间的简单的RPGIV例子。


  1. D  LoanDate           S                     D        DatFmt(*ISO)
  2. D  TimeStamp         S                     Z      
  3. D  MSecond            S                    6    0

  4. /FREE

  5.    MSecond = %SubDt(TimeStamp : *MS);
  6.   
  7.    *inLR = *ON ;

  8. /END-FREE

  9. //  %SubDt是系统BIF,其功能类似于“取子串”。                    //
  10. //  在Date and Time Durations中,*YEARS → *Y ...*SECONDS →  //  
  11. //  *S , *MSECONDS → *MS                                                         //

复制代码

作者: qingzhou    时间: 2004-12-21 11:03
标题: Select current time ...想返回毫秒???
既然已经涉及到TimeStamp这个时间函数,我想顺带补充加深说明如下:

我们在日常处理PF中的记录时,有时需要准确判断当前记录是否已经被Update过?系统应用有时很需要的是判断当前的记录状态,这点在银行部门特别明显,据说以前招行的老版本程序中曾经有采用过TimeStamp来处理这个问题,现在流行的是采用触发器事务处理机制。

其实施思路大体如下:

1。先利用TimeStamp来取当前记录的时间值作为变量TMP1;

2。修改该条记录;

3。在Update之前重读该记录,并取时间值TMP2;

4。判断TMP1 ?= TMP2 ;

5。决定是否进行Update处理?




欢迎光临 Chinaunix (http://bbs.chinaunix.net/) Powered by Discuz! X3.2