免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
› 论坛 › 操作系统 › AS400 › 如何取系统即时日期?
最近访问板块 发新帖
查看: 2786 | 回复: 5
打印 上一主题 下一主题

如何取系统即时日期? [复制链接]

toeven

论坛徽章:
0
跳转到指定楼层
1楼 [收藏(0)] [报告]
发表于 2007-06-25 16:02 |只看该作者 |倒序浏览
会的大虾说一下,谢谢
wxn100

论坛徽章:
0
2楼 [报告]
发表于 2007-06-25 16:23 |只看该作者
C                     Z-ADD*DATE     PRDATE

RPDATE为字段名
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
hsiang_wang

论坛徽章:
0
3楼 [报告]
发表于 2007-06-25 17:04 |只看该作者
RPG用TIME
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
toeven

论坛徽章:
0
4楼 [报告]
发表于 2007-06-26 10:09 |只看该作者
Time取的是当前系统时间,不是日期吧
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
magic_007

论坛徽章:
1
操作系统版块每日发帖之星 日期:2016-06-20 06:20:00
5楼 [报告]
发表于 2007-06-26 10:14 |只看该作者
原帖由 toeven 于 2007-6-26 10:09 发表
Time取的是当前系统时间,不是日期吧

TIME                      W#TMDT   140   
MOVEL W#TMDT    W#TIME     60
MOVE   W#TMDT    W#DATE    80

前6位是时间
后8位是日期
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
sa_hata

论坛徽章:
0
6楼 [报告]
发表于 2007-06-27 19:25 |只看该作者
RPG 里面，上面的大侠都说了，
CL 里面取当前时间

RTVJOBA    JOB(&WSID) USER(&USER) DATE(&DATE) TYPE(&TYPE)
QSYS/RTVSYSVAL SYSVAL(QTIME) RTNVAR(&TIME)
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号：11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们：huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP