| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1644 人关注过本帖
标题:将DBF表的某列值相加后输出到报表
只看楼主 加入收藏
wangjiayu45
Rank: 1
等 级:新手上路
帖 子:189
专家分:0
注 册:2010-4-23
收藏
得分:0 
文件夹放在C根目录下
要求:
初审报告,不要在报表“细节"上体显。
请以下列形式:同个学校的放在一起。
1:XXX学校:XX老师于xx年xx月xx日获得XXXXXXXX;XX老师于xx年xx月xx日获得XXXXXXXX
2:YYY学校:XX老师于xx年xx月xx日获得XXXXXXXX;XX老师于xx年xx月xx日获得XXXXXXXX
代码写在表单:生成报表 的command1.click
老师.zip (5.48 KB)


[此贴子已经被作者于2021-6-1 18:19编辑过]

2021-06-01 18:16
wangjiayu45
Rank: 1
等 级:新手上路
帖 子:189
专家分:0
注 册:2010-4-23
收藏
得分:0 
回复 10楼 sdta
上传了数据,请老师帮忙看下
2021-06-01 18:20
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
以下是引用wangjiayu45在2021-6-1 18:20:36的发言:

上传了数据,请老师帮忙看下

程序代码:
CREATE CURSOR test (学校 C(10), 姓名 M)
INSERT INTO test (学校) SELECT DISTINCT 学校名称 FROM 老师
INDEX ON 学校 TAG XX
SELECT 老师
SET RELATION TO 学校名称 INTO test
SCAN
    REPLACE 姓名 WITH 姓名 - "、" - 老师.老师姓名 IN test
ENDSCAN
SET RELATION TO
SELECT test
REPLACE 姓名 WITH SUBSTR(姓名, 3) ALL
SET ORDER TO
BROWSE

坚守VFP最后的阵地
2021-06-01 18:53
xuminxz
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:41
帖 子:766
专家分:2517
注 册:2011-5-8
收藏
得分:0 
回复 11楼 wangjiayu45
细节上显示什么?
先按下列代码准备好数据,再调用报表。你的报表要求我没看明白。
程序代码:
CLOSE TABLES all
SELECT distinct 学校名称 xxmc FROM 老师  INTO CURSOR rptemp READWRITE 
ALTER table rptemp ADD jsxx m
SCAN
    _xxmc=ALLTRIM(xxmc)
    SELECT 老师姓名 xm FROM 老师 INTO CURSOR mpmp WHERE ALLTRIM(学校名称)==_xxmc
    _jsxx=''
    SCAN
        _jsxx=_jsxx+''+ALLTRIM(mpmp.xm)
    ENDSCAN
    REPLACE jsxx WITH SUBSTRC(_jsxx,2) IN rptemp
ENDSCAN

是不是细节区只放学校与老师姓名
页脚放获奖信息?

[此贴子已经被作者于2021-6-1 20:15编辑过]


dBase有人接盘了。
2021-06-01 19:51
wangjiayu45
Rank: 1
等 级:新手上路
帖 子:189
专家分:0
注 册:2010-4-23
收藏
得分:0 
回复 14楼 xuminxz
谢谢,是的。细节区只放学校与老师姓名
页脚放获奖信息
2021-06-02 08:12
快速回复:将DBF表的某列值相加后输出到报表
数据加载中...
 
   



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

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