标题:再不改变字段类型的情况下,如何将数值变量替换到字符型字段内
只看楼主
lumen
Rank: 1
等 级:新手上路
帖 子:21
专家分:5
注 册:2018-9-16
结帖率:100%
已结贴  问题点数:20 回复次数:19 
再不改变字段类型的情况下,如何将数值变量替换到字符型字段内
USE rgf2
cnxh=""
select rgf2
SCAN
 IF ALLTRIM(序号)="小计"
  cnxh=1
 ELSE
   IF 工序名称="" OR ALLTRIM(工序名称)="劈抚" OR ALLTRIM(工序名称)="松土"
   cnxh= cnxh + 0.1
   replace 序号 WITH cnxh
   ELSE
   cnxh=cnxh+1
   replace 序号 WITH cnxh
   ENDIF
 ENDIF
ENDSCAN

搜索更多相关主题的帖子: 改变 字段 替换 序号 名称 
2018-09-17 21:12
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
用临时表处理,就可以改变字段的数据类型了。

坚守VFP最后的阵地
2018-09-17 21:20
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
IF 工序名称="" OR ALLTRIM(工序名称)="劈抚" OR ALLTRIM(工序名称)="松土"
红字处的代码可能有问题吧
是不是应该改为
ALLTRIM(工序名称)=""

整行代码改为
IF INLIST(ALLTRIM(工序名称),"","劈抚","松土")
是不是更合适

坚守VFP最后的阵地
2018-09-17 21:31
lumen
Rank: 1
等 级:新手上路
帖 子:21
专家分:5
注 册:2018-9-16
得分:0 
回复 3楼 sdta
我试试,萌新不太懂,添加小数位数为一的字段用什么命令啊,我只会加整数的
2018-09-17 21:37
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
aa n(5,2)

坚守VFP最后的阵地
2018-09-17 21:40
lumen
Rank: 1
等 级:新手上路
帖 子:21
专家分:5
注 册:2018-9-16
得分:0 
回复 5楼 sdta
2018-09-17 21:46
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
数值型变量转换为字符型变量
STR()
TRANSFORM()
要学会看帮助文件

坚守VFP最后的阵地
2018-09-17 21:47
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
select *,0.00 标记 from rgf2 into cursor test readwrite

坚守VFP最后的阵地
2018-09-17 21:56
lumen
Rank: 1
等 级:新手上路
帖 子:21
专家分:5
注 册:2018-9-16
得分:0 
回复 8楼 sdta
CLOSE DATABASES ALL
SET SAFETY OFF
SET DEFAULT TO F:\项目\新建文件夹
select *,0.0 标记 from rgf2 into cursor test readwrite
cnxh=""
SCAN
 IF ALLTRIM(序号)="小计"
  cnxh=0
  REPLACE 标记 with cnxh
 ELSE
  IF INLIST(ALLTRIM(工序名称),"","劈抚","松土")
   cnxh = cnxh + 0.1
   replace 标记 WITH cnxh
   ELSE
   cnxh = cnxh + 1
   replace 标记 WITH cnxh
   ENDIF
   endscan
 ENDIF
ENDSCAN
这样运行完怎么全是加0.1的,我是想让序号连续起来
rgf2.zip (158.09 KB)


[此贴子已经被作者于2018-9-17 22:31编辑过]

2018-09-17 22:30
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
序号连起来的条件是什么

坚守VFP最后的阵地
2018-09-17 22:46



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




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

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