Informix/4GL数据库查寻中的翻屏编程技巧

informix-4GL是一个综合性的第四代应用程序开发和生成环境，它具有强大的数据库管理功能，编程灵活方便，界面友好，已被广泛应用于UNIX操作系统下的数据库管理。下面介绍一段借助屏幕表格完成查询的小程序，它可通过在屏幕上相应字段输入模糊查询条件，如*、=、？等，据此搜索出满足条件的全部记录，再按Ctrl-F或Ctrl-B分屏浏览（调用一个游标管理函数que_gz ），用上下光标键并结合Esc键选择所需记录，再通过内部函数arr_curr()将此记录所包括的信息传出它用，在实际工作中可将此段程序写成函数形式，简洁明快，需要时只要改写相应变量即可，省时省力。此段程序在SCO UNIX Open Sever5.05、online7.3上编译通过。 

程序清单： 

屏幕格式： 

database 数据库名

screen

{

人员代码  [a     ] 

人员姓名  [b       ]

====================================

人员代码      人员姓名      工   资

[f000  ]     [f001    ]    [f002   ]

[f000  ]     [f001    ]    [f002   ]

[f000  ]     [f001    ]    [f002   ]

[f000  ]     [f001    ]    [f002   ]

[f000  ]     [f001    ]    [f002   ]

[f000  ]     [f001    ]    [f002   ]

[f000  ]     [f001    ]    [f002   ]

}

end

tables

gz

attributes

a=gz.xh,autonext;

b=gz.xm,autonext;

f000=formonly.xh type char;

f001=formonly.xm type char;

f002=formonly.gz type decimal(6,2);

end

instructions

screen record s_gz[7](formonly.xh,formonly.xm,formonly.gz)



gz库表结构：

序号：xh char(6)

姓名：xm char(8)

工资：gz decimal(7,2)