| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 967 人关注过本帖
标题:三表合并单位不全求助!要求将所有单位都统计出来!谢谢大师!
只看楼主 加入收藏
wangguowu
Rank: 2
等 级:论坛游民
帖 子:73
专家分:18
注 册:2012-2-15
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:8 
三表合并单位不全求助!要求将所有单位都统计出来!谢谢大师!
dat.zip (1.51 KB)

Select Recn() As 序号,tt1.权利人;
    ,""+Transform(tt1.一月)+"/"+Transform(tt2.一月)+"/"+Transform(tt3.一月)-Space(10)-"" 一月;
    ,""+IIF(tt1.二月=0,'',Transform(tt1.二月))+"/"+IIF(tt2.二月=0,'',Transform(tt2.二月))+"/"+IIF(tt3.二月=0,'',Transform(tt3.二月))-Space(10)-"" 二月;
    ,""+IIF(tt1.三月=0,'',Transform(tt1.三月))+"/"+IIF(tt2.三月=0,'',Transform(tt2.三月))+"/"+IIF(tt3.三月=0,'',Transform(tt3.三月))-Space(10)-"" 三月;   
    ,""+IIF(tt1.四月=0,'',Transform(tt1.四月))+"/"+IIF(tt2.四月=0,'',Transform(tt2.四月))+"/"+IIF(tt3.四月=0,'',Transform(tt3.四月))-Space(10)-"" 四月;
    ,""+IIF(tt1.五月=0,'',Transform(tt1.五月))+"/"+IIF(tt2.五月=0,'',Transform(tt2.五月))+"/"+IIF(tt3.五月=0,'',Transform(tt3.五月))-Space(10)-"" 五月;   
    ,""+IIF(tt1.六月=0,'',Transform(tt1.六月))+"/"+IIF(tt2.六月=0,'',Transform(tt2.六月))+"/"+IIF(tt3.六月=0,'',Transform(tt3.六月))-Space(10)-"" 六月;
    ,""+IIF(tt1.七月=0,'',Transform(tt1.七月))+"/"+IIF(tt2.七月=0,'',Transform(tt2.七月))+"/"+IIF(tt3.七月=0,'',Transform(tt3.七月))-Space(10)-"" 七月;   
    ,""+IIF(tt1.八月=0,'',Transform(tt1.八月))+"/"+IIF(tt2.八月=0,'',Transform(tt2.八月))+"/"+IIF(tt3.八月=0,'',Transform(tt3.八月))-Space(10)-"" 八月;
    ,""+IIF(tt1.九月=0,'',Transform(tt1.九月))+"/"+IIF(tt2.九月=0,'',Transform(tt2.九月))+"/"+IIF(tt3.九月=0,'',Transform(tt3.九月))-Space(10)-"" 九月;   
    ,""+IIF(tt1.十月=0,'',Transform(tt1.十月))+"/"+IIF(tt2.十月=0,'',Transform(tt2.十月))+"/"+IIF(tt3.十月=0,'',Transform(tt3.十月))-Space(10)-"" 十月;
    ,""+IIF(tt1.十一月=0,'',Transform(tt1.十一月))+"/"+IIF(tt2.十一月=0,'',Transform(tt2.十一月))+"/"+IIF(tt3.十一月=0,'',Transform(tt3.十一月))-Space(10)-"" 十一月;   
    ,""+IIF(tt1.十二月=0,'',Transform(tt1.十二月))+"/"+IIF(tt2.十二月=0,'',Transform(tt2.十二月))+"/"+IIF(tt3.十二月=0,'',Transform(tt3.十二月))-Space(10)-"" 十二月;
    ,""+Transform(tt1.合计)+"/"+Transform(tt2.合计) +"/"+Transform(tt3.合计)-Space(10)-"" 抵清销合计;
    From tt1,tt2,tt3  Where  tt2.权利人==tt1.权利人 and  tt2.权利人==tt3.权利人 Into Cursor Tt4 Readwrite

[此贴子已经被作者于2023-2-18 10:41编辑过]

搜索更多相关主题的帖子: 合并 要求 Into 统计 单位 
2023-02-18 10:38
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:66
帖 子:1089
专家分:2682
注 册:2015-12-30
收藏
得分:2 
 From tt1,tt2,tt3  Where  tt2.权利人==tt1.权利人 and  tt2.权利人==tt3.权利人 


这种where条件只能取出最小集合(8条)
2023-02-18 10:58
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:18 
按下面的代码改下

Select 00 序号,NVL(tt1.权利人, tt2.权利人) 权利人;
    ,""+Transform(NVL(tt1.一月, "0"))+"/"+Transform(NVL(tt2.一月, "0"))+"/"+Transform(NVL(tt3.一月, "0"))-Space(10)-"" 一月;
    From tt1 FULL JOIN tt2 ON tt2.权利人==tt1.权利人 FULL JOIN tt3 ON tt2.权利人==tt3.权利人 Into Cursor Tt4 Readwrite
  REPLACE ALL 序号 WITH RECNO()  
BROWSE


[此贴子已经被作者于2023-2-18 11:56编辑过]


坚守VFP最后的阵地
2023-02-18 11:00
wangguowu
Rank: 2
等 级:论坛游民
帖 子:73
专家分:18
注 册:2012-2-15
收藏
得分:0 
回复 3楼 sdta
[附件]107793[/附件]成这样的

Select Recn() As 序号,tt1.权利人;
    ,""+Transform(tt1.一月)+"/"+Transform(tt2.一月)+"/"+Transform(tt3.一月)-Space(10)-"" 一月;
    ,""+IIF(tt1.二月=0,'',Transform(tt1.二月))+"/"+IIF(tt2.二月=0,'',Transform(tt2.二月))+"/"+IIF(tt3.二月=0,'',Transform(tt3.二月))-Space(10)-"" 二月;
    ,""+IIF(tt1.三月=0,'',Transform(tt1.三月))+"/"+IIF(tt2.三月=0,'',Transform(tt2.三月))+"/"+IIF(tt3.三月=0,'',Transform(tt3.三月))-Space(10)-"" 三月;   
    ,""+IIF(tt1.四月=0,'',Transform(tt1.四月))+"/"+IIF(tt2.四月=0,'',Transform(tt2.四月))+"/"+IIF(tt3.四月=0,'',Transform(tt3.四月))-Space(10)-"" 四月;
    ,""+IIF(tt1.五月=0,'',Transform(tt1.五月))+"/"+IIF(tt2.五月=0,'',Transform(tt2.五月))+"/"+IIF(tt3.五月=0,'',Transform(tt3.五月))-Space(10)-"" 五月;   
    ,""+IIF(tt1.六月=0,'',Transform(tt1.六月))+"/"+IIF(tt2.六月=0,'',Transform(tt2.六月))+"/"+IIF(tt3.六月=0,'',Transform(tt3.六月))-Space(10)-"" 六月;
    ,""+IIF(tt1.七月=0,'',Transform(tt1.七月))+"/"+IIF(tt2.七月=0,'',Transform(tt2.七月))+"/"+IIF(tt3.七月=0,'',Transform(tt3.七月))-Space(10)-"" 七月;   
    ,""+IIF(tt1.八月=0,'',Transform(tt1.八月))+"/"+IIF(tt2.八月=0,'',Transform(tt2.八月))+"/"+IIF(tt3.八月=0,'',Transform(tt3.八月))-Space(10)-"" 八月;
    ,""+IIF(tt1.九月=0,'',Transform(tt1.九月))+"/"+IIF(tt2.九月=0,'',Transform(tt2.九月))+"/"+IIF(tt3.九月=0,'',Transform(tt3.九月))-Space(10)-"" 九月;   
    ,""+IIF(tt1.十月=0,'',Transform(tt1.十月))+"/"+IIF(tt2.十月=0,'',Transform(tt2.十月))+"/"+IIF(tt3.十月=0,'',Transform(tt3.十月))-Space(10)-"" 十月;
    ,""+IIF(tt1.十一月=0,'',Transform(tt1.十一月))+"/"+IIF(tt2.十一月=0,'',Transform(tt2.十一月))+"/"+IIF(tt3.十一月=0,'',Transform(tt3.十一月))-Space(10)-"" 十一月;   
    ,""+IIF(tt1.十二月=0,'',Transform(tt1.十二月))+"/"+IIF(tt2.十二月=0,'',Transform(tt2.十二月))+"/"+IIF(tt3.十二月=0,'',Transform(tt3.十二月))-Space(10)-"" 十二月;
    ,""+Transform(tt1.合计)+"/"+Transform(tt2.合计) +"/"+Transform(tt3.合计)-Space(10)-"" 抵清销合计;
 From (tt2 Left Join tt3 On tt2.权利人=tt3.权利人) Left Join tt1 On tt2.权利人=tt1.权利人 Order By tt2.权利人


加上这句权利人成空的了
图片附件: 游客没有浏览图片的权限,请 登录注册
Tt4.zip (762 Bytes)


[此贴子已经被作者于2023-2-18 12:15编辑过]

2023-02-18 11:57
schtg
Rank: 12Rank: 12Rank: 12
来 自:Usa
等 级:贵宾
威 望:67
帖 子:1730
专家分:3324
注 册:2012-2-29
收藏
得分:0 
三楼正解,不是你需要的结果吗?
图片附件: 游客没有浏览图片的权限,请 登录注册
2023-02-18 13:02
wangguowu
Rank: 2
等 级:论坛游民
帖 子:73
专家分:18
注 册:2012-2-15
收藏
得分:0 
回复 3楼 sdta
谢谢
2023-02-18 18:30
wangguowu
Rank: 2
等 级:论坛游民
帖 子:73
专家分:18
注 册:2012-2-15
收藏
得分:0 
回复 5楼 schtg
2023-02-18 18:32
sam_jiang
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:14
帖 子:789
专家分:1165
注 册:2021-10-13
收藏
得分:0 
你这是给单位写软件吗?
2023-02-18 18:51
wangguowu
Rank: 2
等 级:论坛游民
帖 子:73
专家分:18
注 册:2012-2-15
收藏
得分:0 
回复 8楼 sam_jiang
工作之需要!嗯😊
2023-02-19 10:40
快速回复:三表合并单位不全求助!要求将所有单位都统计出来!谢谢大师!
数据加载中...
 
   



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

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