Progress的常用语句

Progress程序的分类:

.p 主程序（源程序）
.i 子程序（不能被单独执行，只能被.p程序引用）
.r 编译后的可执行程序

注释用/* */ 框起来，必须成对使用，否则报错。

[@more@]

定义一个变量：

define variable 变量名 as|like character|date|decimal|integer|logical.
例如: define variable a as character. /*定义了一个字符变量a*/
define variable b like pt_part. /*定义一个和pt_part一样的变量b*/

修改一个变量或者表字段(让用户输入新值)：
update 变量名|字段名 with frame a.
例如：update a b with frame a. /*一次可以修改多个字段,用空格隔开即可*/

显示一条消息: message "想要显示的内容".
会在屏幕下方显示出引号中的字符串.

最简单的查找语句：
find first 表名 where 字段名>=条件 no-lock no-error.
if available 表名 then do: end.
else do: end.
例如: find first pt_mstr where pt_part = "123" no-lock no-error.
if available pt_mstr then do: message "找到啦". end.
else message "没找到". end.

在屏幕上显示数据：
display 变量名 字段名 字符串. /*中间用空格隔开*/
例如: display a pt_part "Progress".

如果要遍历某个表的所有数据:
for each 表名 where 条件 :
display 字段1 字段2 字段3.
end.
for each xxxx: end. 是固定格式,最后一定要加上end,否则报错.

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/182208/viewspace-910393/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/182208/viewspace-910393/