标题:想做一个SPT属性设置的通用程序,请教怎么做?
取消只看楼主
fanjinyu9108
Rank: 2
等 级:论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
结帖率:88.5%
已结贴  问题点数:20 回复次数:7 
想做一个SPT属性设置的通用程序,请教怎么做?
如题,想做一个SPT属性设置的通用程序,比如先输入如下代码:
bd_t='c_t' &&本地表
yc_t='fy'  &&远程表
zd='id,area,hw,pz,qm,zm,kp_l,kp_kg,zz_l,cy1' &&本地表的字段内容,并且与远程表的字段名完全一致
然后执行一个通用程序,执行后,得到下面的结果:
SELECT c_t
CURSORSETPROP("tables","fy","c_t")
CURSORSETPROP("keyfieldlist","id","c_t")
CURSORSETPROP("updatablefieldlist","id,area,hw,pz,qm,zm,kp_l,kp_kg,zz_l,cy1","c_t")
yy='id fy.id,area fy.area,hw fy.hw,pz fy.pz,qm fy.qm,zm fy.zm,kp_l fy.kp_l,kp_kg fy.kp_kg,zz_l fy.zz_l,cy1 fy.cy1'
CURSORSETPROP("updatenamelist",yy,"c_t")
CURSORSETPROP("sendupdate",.t.,"c_t")
CURSORSETPROP("wheretype",2)
cursorsetprop("buffering",5)  &&设置表缓冲
其中bd_t,yc_t,zd相当于三个变量,通过执行程序,得到下面的结果,请教如何实现?

搜索更多相关主题的帖子: 通用 执行 结果 字段 属性 
2022-01-06 08:00
fanjinyu9108
Rank: 2
等 级:论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
得分:0 
非常感谢厨师王德榜的解答,但是不管是用类,还是用程序,都要处理以下问题,比如:
bd_t='c_t' &&本地表
yc_t='fy'  &&远程表
zd='id,area,hw,pz,qm,zm,kp_l,kp_kg,zz_l,cy1'

变成如下:
'id fy.id,area fy.area,hw fy.hw,pz fy.pz,qm fy.qm,zm fy.zm,kp_l fy.kp_l,kp_kg fy.kp_kg,zz_l fy.zz_l,cy1 fy.cy1'
请问这个怎么弄

   
2022-01-08 11:00
fanjinyu9108
Rank: 2
等 级:论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
得分:0 
谁能通过小程序帮我解决3楼的问题,我的思路是先要把ZD这个变量的内容一个一个抽取出来,但是怎么抽取我还不会
2022-01-08 20:47
fanjinyu9108
Rank: 2
等 级:论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
得分:0 
变量 zd='id,area,hw,pz',如何通过转换,变成临时表的四条记录?记录内容分别是。第一条记录:id   第二条记录:area 第三条记录:hw 第四条记录:pz。变量zd的内容可能多,也可能少
2022-01-08 20:59
fanjinyu9108
Rank: 2
等 级:论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
得分:0 
非常感谢laowan001师傅的解答,这个正是我想要的,问题还没有完全解决,遇到不会的,还会继续提问,再次感谢
2022-01-09 07:36
fanjinyu9108
Rank: 2
等 级:论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
得分:0 
再次感谢2位版主的解答,厨师王德榜师傅的解答有些高级,我还要慢慢揣摩,laowan001师傅的解答可以解决目前的问题,经过测试,完全通过。
2022-01-10 09:10
fanjinyu9108
Rank: 2
等 级:论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
得分:0 
对了,忘了请教厨师王德榜师傅,如果做成类的话,用什么类型的类?
2022-01-10 09:16
fanjinyu9108
Rank: 2
等 级:论坛游民
帖 子:644
专家分:20
注 册:2014-1-16
得分:0 
请教下面的语句有问题吗:
程序代码:
SQLSetprop(nhandle,'Transactions',2)        && 开启远程手工事务
BEGIN TRANSACTION
a1=TABLEUPDATE(.t.)
IF a1=.t. 

 END TRANSACTION  
ELSE
    rollback  
ENDIF
SQLSetprop(nhandle,'Transactions',1)        && 开启远程自动事务
= SQLDISCONNECT(nhandle) &&关闭

加入a1=.f.,rollback 是否就已经结束事件了,它的后面还需要加上一句  END TRANSACTION  吗

2022-01-10 11:31



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




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

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