INFORMIX/4GL database Search inside the screen-making program flexible technology

Source: Internet
Author: User
Tags informix

INFORMIX-4GL is a comprehensive fourth generation application development and generation environment, it has the formidable database management function, the programming is nimble and convenient, the interface is friendly, has been widely used in the UNIX operating system the database management. The following is a small program that completes a query by using a screen table, which allows you to enter a fuzzy query condition, such as *, =,, and so on the corresponding field on the screen. And so on, and then search for all the records to meet the conditions, and then press CTRL-F or ctrl-b screen browsing (call a cursor management function Que_gz), with the up and down cursor key and the ESC key to select the required records, and then through the internal function Arr_curr () the information included in this record out of it, In the actual work can be written in this section of the program function form, concise and crisp, as long as the need to rewrite the corresponding variable can save time and effort. This program is compiled on the SCO UNIX Open Sever5.05, online7.3.

List of programs:

Screen format:

Database name

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 Library Table structure:

Serial number: XH char (6)

Name: XM char (8)

Salary: GZ Decimal (7,2)

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.