易拓程序设计TIPTOP GP 5X 单档维护程序撰写.ppt

锁与解锁的时机点（1） 条件：当B 5 时，C不可输入 A B C Before Field After Field Before Field After Field Before Field After Field D Before Field After Field 情况一：从A进B，且B=3，点C欲进，可进 情况二：从A进B，且B=6，点C欲进，不可进 情况三：B=3时，从A欲进C，可进 情况四：B=6时，从A欲进C，不可进 情况五：一进来就到D，要进C BEFORE INPUT 控端 被控端 锁与解锁的时机点（2） 条件：当B+X 5 时，C不可输入 A Before Field After Field BEFORE INPUT 控端 被控端 B Before Field After Field C Before Field After Field X Before Field After Field D Before Field After Field 控端 情况很多，但可由单锁类推 锁与解锁的时机点（3） 条件：当X 5 时，C不可输入 A B C Before Field After Field Before Field After Field Before Field After Field D Before Field After Field 只须写在 BEFORE INPUT BEFORE INPUT 被控端 set_entry/set_no_entry CALL xxx_set_entry(p_cmd) CALL xxx_set_no_entry(p_cmd) p_cmd表示状态：a为新增，u为修改 cl_set_comp_entry此公用函数可以同时让多个栏位开启或关闭 cl_set_comp_entry( ps_fields, pi_entry ) ps_fields STRING设定元件的栏位名称，逗号分隔不同栏位 pi_entry SMALLINT 是否可输入，TRUE：可输入；FALSE：不可输入 第三天课程结束，谢谢大家 附录1 单档作业设计流程 1、建立数据库表，r.s2 2、p_tabname，p_feldname 3、设计画面档，即编辑per档 4、p_perlang画面多语言维护 5、编辑源代码，即编辑4gl档 6、p_zz程序设置资料维护 7、p_link程序链接设置 8、权限设置 6、挂载程序，维护p_zm 附录2 单档4gl程序设计流程 Global setting 主函数MAIN 菜单函数Menu cursor函数curs/cs 查询入口函数q()，资料抓取函数fetch() 资料显示函数show() 录入功能函数i() 新增功能函数a()，修改功能函数u()，有效/无效x() 删除功能函数r() 复制功能函数copy() 附录3 复制功能函数的流程图 模版 资料 临时表 temp 用户user 数据库 db 1 2 3 4 1：将模版资料放到临时表中 2：要求user修改key值， 并更新临时表中的资料 3：将修改后的临时表内的资料insert至db中 4：询问用户是否修改资料，若修改则对db中的资料update。 注意：2和4是不相同的。 1、第二步修改的关键字段而第四步则是对其他非关键字段的修改 2、第二步是必须要做的，目的是保证key值不重复。而第四步可做可不做。 p_qry动态查询程序介绍 1.动态查询程序名称代码(.form) 2.查询视窗标题 3.本函式为Hard-Code函式：用于占位，防止两种查询 程序名称冲突 4.是否忽略单身营运中心设置：一旦勾选，查询仅限于用户所在db 5.本查询程序单身资料不上锁，可更改：勾选后才能更改设置资料 6.客制查询程序：若为客制程序，则须勾选。 p_qry动态查询程序介绍 1.Input时的Where条件：录入状态下，开窗查询的条件。 2.Construct时的Where条件：查询状态下，开窗查询的条件。 3.需JOIN的TABLE：查询时所涉及到的非查询字段的表。 4.资料会重复，需要DISTINCT属性：增加distinct属性，去除重复资料。 p_qry动态查询程序介绍 1.资料数据库代码：设定查询资料所在数据库 2.资料表代码： 设定查询资料表 3.字段代码： 设定查询字段 4.字段宽度： 设定窗体中该栏位的宽度 5.本栏回传： 设定是否回传该字段的值 6.字段类型： 设定窗体中该栏位的画面栏位类型 7.本栏需Outer： 设定该字段是否需要outer 8.串查程序代码： 可在窗体中增加相关资料的查询功能