免费注册	查看新帖 \|


平台论坛博客文库

› 论坛 › 操作系统 › AS400 › 在CL中如何得到当前的年月

最近访问板块

发新帖

查看: 2823 | 回复: 4

上一主题

下一主题

在CL中如何得到当前的年月 [复制链接]

论坛徽章:: 0

电梯直达

跳转到指定楼层

1楼 [收藏(0)] [报告]

发表于 2011-02-18 12:19 |只看该作者 |倒序浏览

如题，在CL中如何得到当前的年月以及上个月份

文库|博客

论坛徽章:: 1

天蝎座
日期:2014-09-28 20:42:30

2楼 [报告]

发表于 2011-02-18 12:57 |只看该作者

DCL       VAR(&QDATETIME) TYPE(*CHAR) LEN(20)
         DCL       VAR(&SYDT    ) TYPE(*DEC ) LEN(08 0)
         DCL       VAR(&SYTM    ) TYPE(*DEC ) LEN(06 0)
/* システム日付・時刻　取得
      RTVSYSVAL  SYSVAL(QDATETIME) RTNVAR(&QDATETIME)
         CHGVAR    VAR(&SYDT) VALUE(%SST(&QDATETIME 1

)
CHGVAR VAR(&SYTM) VALUE(%SST(&QDATETIME 9 6))

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

论坛徽章:: 0

3楼 [报告]

发表于 2011-02-18 13:45 |只看该作者

上月要判断下。。。

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

论坛徽章:: 0

4楼 [报告]

发表于 2011-02-18 16:46 |只看该作者

谢谢各位

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

论坛徽章:: 0

5楼 [报告]

发表于 2011-02-18 16:50 |只看该作者

楼上说的非常的有道理啊

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

发新帖

Chinaunix › 论坛 › 操作系统 › AS400 › 在CL中如何得到当前的年月

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP