GeneroBDL_CrystalReport操作流程手册.docx
EDIT FORMONLY.cnt TYPE SMALLINT, NOENTRY, EDIT FORMONLY.cn2 TYPE SMALLINT, NOENTRY,EDIT FORMONLY.idx TYPE SMALLINT, NOENTRY, 询价单号：pmw01, ACTION=controlp, IMAGE="zoom"- FORMONLY.smydesc, NOENTRY询价日期：.pmw06交易币种：pmw04, ACTION=controlp, IMAGE="zoom" - FORMONLY.azi02, NOENTRY税种：.pmw05, ACTION=controlp, IMAGE="zoom"- pmw_file.pmw051, NOENTRY单价含税：CHECKBOX FORMONLY.gec07, TEXT="With Tax", NOENTRY, VALUECHECKED="Y",UNCHECKED="N", 资料所有者：pmwuser, NOENTRY, 资料更改者：pmwmodu, NOENTRY, 资料有效码： pmwacti, NOENTRY, UPSHIFT, 资料所有部门：pmwgrup, NOENTRY,最近修改日：pmwdate, NOENTRY,项次：pmx02；NOT NULL, REQUIRED，TITLE="Line#"供应厂商编号：pmx12, ACTION=controlp, IMAGE="zoom", TITLE="Vendor No"简称：FORMONLY.pmc03, NOENTRY, TITLE="Vendor name料件编号： pmx08, ACTION=controlp, IMAGE="zoom", TITLE="Item No."品名：pmx_file.pmx081, NOENTRY, TITLE="Part Name"规格：pmx_file.pmx082, NOENTRY, TITLE="Specification"询价单位：pmx09, ACTION=controlp, IMAGE="zoom",TITLE="Inquiry Unit"采购单位：FORMONLY.ima44, NOENTRY, TITLE="Purchase Unit"计价单位：FORMONLY.ima908, NOENTRY, , TITLE="Price Unit"FORMONLY.ima44, NOENTRY, TITLE="Purchase Unit"生效日期：pmx_file.pmx04, TITLE="Effective Date"失效日期：pmx_file.pmx05, TITLE="Expiry Date"下限数量：pmx_file.pmx03, TITLE="Min.Qty"询价税前单价：pmx_file.pmx06, NOT NULL, REQUIRED, TITLE="Unit Price"询价含税单价：pmx_file.pmx06t, NOT NULL, REQUIRED, TITLE="Tax Price"折扣比率：pmx_file.pmx07, TITLE="Discount Rate%"ButtonEdit:控件属性要设置 ACTION=controlp, IMAGE="zoom"引用数据库表字段：1、画面档编译上传文档至客制目录下对应模块的4fd下(下载用sz命令)Cd ./4fdrz y 文件所在目录r.f2 文件名r.gf 文件名 2 c运行p_perlang程序查询相应程序，调出其它界面语言转换进行修改。2、不调用公共变量和函数的程序编译执行：Cd ./4glr.c2 ccot001cd ./42mfglrun cco_ccot001 p_zz录入程序资料后，才可用ctrl+g或者exe2运行程序。3、完整编译链接程序：(1)Cd ./4gl(2)Rz -y-上传源码(3)R.c2 程序名 -编译(4)维护p_zz(点维护链接档，双击单身；点维护action档，双击单身)（录入程序资料，程序编号，style,类型，运行指令：$FGLRUN $程序名+i（不含流水号）/程序名(5)r.c2 程序名 -重新编译(6)r.l2 程序名 -生成链接文件(7)exe2 程序名 -执行程序(8)r.d2+ 程序名 -调试程序step in/out -进出内部函数step over -一步一步执行程序restart -重新开始执行程序至断点处P_zta查询表结构程序练习:模块ccoCd cco/4glVi ccoi001.4glr.c2 ccoi001cd cco/42mfglrun cco_ccoi001根据错误码调用其中文显示cl_err()4、制作水晶报表：(1)Exe2 p_genxml -生成xml数据源输入程序代号，把临时表的字段名称拷贝过来，确定生成数据库，下载xml文件。(2)在本地以程序名建立文件夹，把xml拷贝到文件中。同时建立语言别以0和2命名的文件夹。(3)制作模板：打开水晶报表工具，报表向导，创建新连接，ADO.net双击，选择XML文件。全部字段添加过去，下一步至过虑字段画面，点击完成。点击下一步点击完成选择模板，先预览，再点选设计，点击字段管理器。公式字段命名location，其它默认即可。参数字段（26个）：title1,title2,date,time, user,prog,p1-p20报表命名：程序代号_语言别号_std(4)放到cr服务器: 把以程序命名的整个文件夹拷贝至服务器对应模组目录下。打开服务器上报表模板，打开数据库设置数据源位置，更新报表连接xml文件夹路径为服务器上xml文件路径(5)维护p_zaw样板编号输入文件夹名称。语言别设置，cr样版名称为模板实际名称。最终报表：报表增加栏位：（pmc30 like pmc_file.pmc30）（1） 修改4gl源文件修改临时表字段。Temptable pmc30.pmc_file.pmc30L_sql select pmc30 from pmc_file where 上传、编译、打包和跟踪调试注意：4gl文件中临时表字段顺序与对就变量组字段顺序要一致。（2） Xml文件修改P_genxml重新根据临时表字段生成xml文件并下载至本地（3） CR打开本地原来的CR模板文件，更改数据源位置，创建新ADO数据连接，更新后。在字段管理器中把新增数据字段pmc30添加至报表中把更新后的整个报表目录上传覆盖原来cr服务器上的报表目录5、自定议报表（1）新建表表P_query(2)p_zz建目录（3）p_zm连接目录至menu菜单并执行重新生成menu程序范例：1、9x9乘法口决11x1=122x1=2 2x2=433x1=3 3x2=6 3x3=9mainDEFINE i,j,i_min,i_max INTEGERDEFINE optmsg VCHAR(100)LET i_min=0LET i_max=9FOR i=i_min TO i_maxLET optmsg=""FOR j=1 to iLET optmsg=optmsg," ",i*j," "END FORDISPLAY optmsgEND FOREND MAIN
