标题:请教,如何在日期时间格式里补零
取消只看楼主
imfirst
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2009-5-25
结帖率:0
已结贴  问题点数:20 回复次数:2 
请教,如何在日期时间格式里补零
如下面代码
*——使用当前日期生成进货编号前6位
LeftNo=SUBSTR(ALLTRIM(STR(YEAR(date()))),3);
        +ALLTRIM(STR(MONTH(date())));
        +ALLTRIM(STR(DAY(date())))
*——从“进货信息”中生成进货编号后4位
SELECT 进货信息
SET ORDER TO 进货编号
SET FILTER TO
SET FILTER TO TTOD(进货信息.进货时间)=DATE()
GO BOTTOM
IF 进货信息.进货编号==""
    RightNo="0000"
ELSE
    RightNo=Substr(进货信息.进货编号,7)

ENDIF
*——对后4位增1
RightNo=AutoAdd(RightNo)
*——完整编号
FullNo=LeftNo+RightNo

例如今天是6月1号,那leftNo会显示1061,如果我要是显示100601改怎么修改??
还有蓝色加粗的那句什么意思啊?
搜索更多相关主题的帖子: 时间 格式 
2010-06-01 09:32
imfirst
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2009-5-25
得分:0 
如果  RightNo=Substr(进货信息.进货编号,7),就会显示106101
如果  RightNo=Substr(进货信息.进货编号,6),就会显示1061001
如果  RightNo=Substr(进货信息.进货编号,5),就会显示10610001

不解??

还有如何修改leftno str函数中显示字符的长度 ?

2010-06-01 10:16
imfirst
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2009-5-25
得分:0 
感谢楼上的答疑!!!
2010-06-01 10:34



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-308885-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.020790 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved