Proress学习.docVIP

PROGRESS编程其实很简单（一） 一、变量定义。 变量必须在第一次被使用之前定义，可以定义在程序的任何地方！但是通常为了增加程序的可读性，变量定义都放在程序的开始处！以下是变量定义的几个实例： 说明，第一行：str01是变量名变量名不要与系统关键字重复，字符或者下划线开头，比如strModel,_Model ；string 表示变量类型，本例指字符型变量，其它类似的比如integer，date，logical等 ；label 就是后续程序中对变量的描述，比如需要用户输入这个变量值时，系统提示“DemoString ；initial 变量初始值第二行：def和var都是简写，def是define的简写，var是variable的简写；PROGRESS支持语法简写，但是初学者最好先写全，后面有经验了再简写。like和as的不同点是：as后面直接说明变量类型，而like后面跟另外一个变量或者字段。第三行：extent 5 ，表示该变量是数组变量。第四行：format 9? 变量格式指定变量格式一个最大的好处就是预留宽度，这个对变量的输入或报表的输出都很有用的。比如年份的宽度一定是4位的，那么你就可以指定格式 format 9999。PROGRESS程序每行结束必须有个“.”号！！！二、注释。 注释就是用/*? ...?? */ ，可以嵌套，比如 ?三、记录的显示。 如果进入PROGRESS编程模式以后连接了数据库，那么直接显示记录的值即可，比如： /*显示TABLE_NAME所有字段所有记录*/或者： 通常显示记录值都是采用这2种方式！当然，可以按要求显示特殊的字段，比如： 这个程序看起来真的很容易明白，简单说明：1、where 后面带条件，比如 =? ? = = 等等，这种关系符，对数字、日期或者字符串，都适用；关于条件的几种组合举例：条件1 and 条件2( 条件1? or 条件2）and (条件3 or 条件4)not 条件12、no-lock，这是关键字，你只要记住：如果接下来的程序要对记录进行修改，那么不能加no-lock，如果不要，请加上no-lock；3、break by ，就是按某个字段排列，默认是按这个字段的升序，如果降序则后面加上 desc，比如：break by pt_price desc。如果需要多次排列，那么by几次就可以，比如：break by pt_price by pt_date 另外一个常用的显示或者更新记录的语句是find！比如： 说明：1、where后面的条件跟for each语句类似；2、no-lock的作用跟for each的no-lock也是一样的；3、no-error，通常是find就加上，否则如果找不到满足条件的记录，系统会出错误提示；而实际上，通常需要在程序自己判断结果；4、find first 就是定位第一满足条件的记录；find last 定位最后一条满足条件的记录；4、还有一种叫find next，就是定位当前记录的下一条；5、find 和 find first / find last 不同的是，find后面带的条件，通常是满足TABLE的某个唯一索引。关于for each 和 find，这章你只要了解到这里就OK了！四、判断。 判断最简单了，就是一个if 条件 then ... else ...，比如： 当然，这个”条件“可能有很复杂的组合。如果，涉及到的动作比较多，那么做法是用do: ... end.，比如 if 支持嵌套，怎么嵌套？你自己会了！不是吗？五、循环。 PROGRESS的循环功能实在令人不敢恭维，没有when 没有while，没有loop、for什么的，只有一个repeat！不过，用好了这个repeat，一样实现任何功能。通常实现循环的模式： 现在，你试试用find 和 repeat 实现 for each的功能！ 或 六、赋值和计算。＋ － *? / ，就是 加 减 乘 除了！比如： 当然，日期和字符串不能做乘法或者除法！七、其它零星的语法。 显示： 退出编程模式： 执行UNIX命令： 好了，这章你学会了，如果熟悉数据库表和字段的结构，你也大概能看任何东西了，甚至做一些常规的统计也肯定没问题！ PROGRESS编程其实很简单（二） PROGRESS程序架构。PROGRESS启动应用程序，通常都是先启动一个主程序，比如mf.p，这个mf.p做一些全局变量设置，并初始化应用程序菜单。当用户执行菜单功能时，实际上是运行菜单所指定的程序！在这种模式下，PROGRESS的程序一般都不大，结构明了可读性很强，每个程序目的非常明确，但是也要遵循一定的准则，方便以后的阅读和修改。 一、程序扩展名