输入输出格式设计.pptVIP

第9章 输入输出格式设计 9.1 用@命令建立屏幕格式文件 9.2 打印机输出格式设计命令 9.3 标签输出 9.1 用@命令建立屏幕格式文件 9.1.1设计屏幕输入格式 @命令和READ命令配套, 可设计出各种屏幕输入格式。 例 根据表 9 — 1, 设计一个屏幕输入格式, 来修改“职工.DBF”库文件内容。 程序如下: CLEAR @ 1, 35 SAY[KG*2]“职工情况输入表” USE职工 DO WHILE .NOT .EOF( ) @ 3,20 SAY “职工姓名” GET 姓名 @ 3,40 SAY “职工号” GET 职工号 @ 3,60 SAY “性别” GET 性别 @ 5,20 SAY “出生时间” GET 出生日期 @ 7,20 SAY “婚否” GET 婚否 @ 7,40 SAY “职称” GET 职称 @ 7,60 SAY “月工资” GET 工资 READ SKIP ENDDO 执行此程序时, 将对“职工.DBF”的所有记录逐一按设计的格式在屏幕上显示修改。 第一记录的编辑格式如下: 职工情况输入表 职工姓名 胡一民1 职工号 1002 性别 男 出生时间 01/30/60 婚否 T 职称 助工 月工资 85.00 9.1.2建立屏幕格式文件 用户设计的屏幕格式, 可存放在屏幕格式文件中。 需要时, 打开此文件以供使用。 1. 建立屏幕格式文件 屏幕格式文件实际上是一种特殊的命令文件, 它只能由@语句, 注释语句, CLEAR语句组成。 因此, 可用MODIFY COMMAND命令建立之。 命令格式: MODIFY COMMAND 〈屏幕格式文件名〉 但应注意, 此命令的默认扩展名为 .PRG, 而屏幕格式文件的系统默认扩展名为 .FMT或 .PRX。 当然, 也可用操作系统的编辑软件建立之。 例1 屏幕格式文件“F.FMT”如下: @ 3,20 SAY “职工姓名” GET 姓名 @ 3,40 SAY “职工号” GET 职工号 @ 3,60 SAY “性别” GET 性别 @ 5,20 SAY “出生时间” GET 出生日期 @ 7,20 SAY “婚否” GET 婚否 @ 7,40 SAY “职称” GET 职称 @ 7,60 SAY “月工资” GET 工资 2. 屏幕格式文件的使用 (1) 打开屏幕格式文件。 使用屏幕格式文件时, 首先应把它打开。 命令格式: SET FORMAT TO 〈格式文件名〉/? 在缺省扩展名时, 系统默认为 .FMT。 (2) 屏幕格式文件的使用。 被打开的格式文件可供READ命令使用。 值得注意的是, 当有格式文件打开时, APPEND, INSERT, EDIT及CHANGE命令也要以格式文件的格式提供使用。 例2 G7.PRG程序如下: USE 职工 SET FORMAT TO F EDIT 2 执行这一程序, 将显示出第二记录编辑格式。 但显示格式由屏幕格式文件“F.FMT”规定。 本例显示如下: 职工情况输入表 职工姓名 王爱民 职工号 1004 性别 男 出生时间 10/05/39 婚否 T 职称 技师 月工资 128.34 例3 G8.PRG程序如下: USE 职工 SET FORMAT TO F APPEND