Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\//将年报中的各月平均值计算后输入到年报平均值中
FileName1=InfoAppDir()+\年报\\report\本站点\\查询年, 0, \
Reportsaveas(\年报\//按照固定路径格式保存年报 ClosePicture(\后台月报\listClear(\报表查询\
ListLoadFileName( \报表查询\//刷新列表
ClosePicture(\年报输入\}
5、注意:在工程路径下有四个关键文件夹,报表、日报、月报、年报
日报按钮功能:
(1) 刷新列表 string FileName;
FileName=InfoAppDir()+\日报\\\listClear(\报表查询\
ListLoadFileName( \报表查询\(2) 删除报表 string FileName;
FileName=InfoAppDir()+\日报\\\本站点\\报表名; FileDelete( Filename ); string FileName1;
FileName1=InfoAppDir()+\日报\\*.rtl\listClear(\报表查询\
ListLoadFileName( \报表查询\(3)查询日报 string FileName;
FileName=InfoAppDir()+\日报\\\本站点\\报表名; ReportLoad(\(4)打印
ReportPrint2(\
//ReportPrint2(\,0);可以在打印前弹出打印机选择窗口 (5)页面设置
ReportPageSetup(\(6)报表预览
ReportPrintSetup(\
月报按钮功能:
(1)刷新列表 string FileName;
FileName=InfoAppDir()+\月报\\\listClear(\月报查询\
ListLoadFileName( \月报查询\(2)删除报表 string FileName;
FileName=InfoAppDir()+\月报\\\本站点\\报表名; FileDelete( Filename ); string FileName1;
FileName1=InfoAppDir()+\月报\\*.rtl\listClear(\月报查询\
ListLoadFileName( \月报查询\(3)月报查询 string FileName;
FileName=InfoAppDir()+\月报\\\本站点\\报表名; ReportLoad(\月报\
年报按钮功能:
(1)刷新列表 string FileName1;
FileName1=InfoAppDir()+\年报\\\listClear(\报表名\
ListLoadFileName( \报表名\(2)读取报表 string FileName;
FileName=InfoAppDir()+\年报\\\本站点\\报表名; ReportLoad(\年报\(3)删除报表 string FileName;
FileName=InfoAppDir()+\年报\\\本站点\\报表名; FileDelete( Filename ); string FileName1;
FileName1=InfoAppDir()+\年报\\\listClear(\报表名\
ListLoadFileName( \报表名\(4)生成新年报 string FileName; string str;
string FileName1; float Value;
FileName1=InfoAppDir()+\报表\\年报.rtl\ReportLoad(\年报\long hang; float month; long fanhui; hang= 6; month=1;
ShowPicture(\后台月报\HidePicture(\后台月报\while(month<=12) {
FileName=InfoAppDir()+\月报\\\本站点\\查询年, 0, \\
fanhui=InfoFile( Filename,1, \\\\本站点\\$分 ); if(fanhui==1) {
ReportLoad(\
str=StrFromReal(\\\\本站点\\查询年, 0, \年\月\ReportSetCellString(\年报\Value=ReportGetCellValue(\ReportSetCellValue(\年报\
Value=ReportGetCellValue(\ReportSetCellValue(\年报\Value=ReportGetCellValue(\ReportSetCellValue(\年报\Value=ReportGetCellValue(\ReportSetCellValue(\年报\Value=ReportGetCellValue(\ReportSetCellValue(\年报\Value=ReportGetCellValue(\ReportSetCellValue(\年报\Value=ReportGetCellValue(\ReportSetCellValue(\年报\Value=ReportGetCellValue(\ReportSetCellValue(\年报\Value=ReportGetCellValue(\ReportSetCellValue(\年报\Value=ReportGetCellValue(\ReportSetCellValue(\年报\hang=hang+1; }
//将月报表中的统计数据(平均值)输入到年报表中 month=month+1; }
hang=hang-6;
Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\
Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\Value=ReportGetCellValue(\年报\Value=Value/hang;
ReportSetCellValue(\年报\
//将年报中的各月平均值计算后输入到年报平均值中
FileName1=InfoAppDir()+\年报\\report\本站点\\查询年, 0, \Reportsaveas(\年报\//按照固定路径格式保存年报 ClosePicture(\后台月报\listClear(\报表查询\
ListLoadFileName( \报表查询\//刷新列表
ClosePicture(\年报输入\