RPG

1. PF文件

假设PF文件名字为BAE,内容如下:

A  R BAER                    //记录名字

A     AREA  3  COLHDG('AREA CODE')    //field

A    AREANM 22    COLHDG('AREA DESC')    //field

2.LF文件:按特定的关键字顺序来检索数据库里面的记录,可以先过滤一部分记录,减少搜索范围

A  R BAER

A              PFILE(BAE)  //LF引用的是BAE文件

A  K AREA                //搜索的关键字是AREA CODE

复杂一点的:

A  R BAER

A              PFILE(BAE)  //LF引用的是BAE文件

A  K AREANM              //搜索的关键字是AREA CODE

A  S AREA        COMP(EQ '001')

关键字S表示选择,COMP表示比较,EQ表示等于。含义为只选择AREA等于001的记录。

注意:如果一个PF每个库里面都有,如何确保被引用的就是自己希望的那个呢?将目标文件放在库列表的最上面的库里面。

3. RPG程序

  (1) 只从文件读取记录

  FFILENAME  IF  E  K  DISK

  (2) 只从文件写记录而不读取

  FFILENAME  O  E  K  DISK

  (3) 读取记录并更改和/或删除,不追加记录

  FFILENAME  UF  E  K  DISK

  (4) 读取记录并更改和/或删除,且追加记录

  FFILENAME  UF  E  K  DISK  A

  (5) 读取和追加记录,不更新和删除

  FFILENAME  IF  E  K  DISK  A

注意:追加调用必须有write,更新和删除必有update和delete

猜你喜欢

转载自www.cnblogs.com/leeyuxin/p/10759919.html
RPG