文档介绍：第9章输入输出格式设计
用@命令建立屏幕格式文件
打印机输出格式设计命令
标签输出
用@命令建立屏幕格式文件
@命令和READ命令配套, 可设计出各种屏幕输入格式。
例根据表 9 — 1, 设计一个屏幕输入格式, 来修改“”库文件内容。
程序如下:
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
执行此程序时, 将对“”的所有记录逐一按设计的格式在屏幕上显示修改。第一记录的编辑格式如下:
职工情况输入表
职工姓名胡一民1 职工号 1002 性别男
出生时间 01/30/60
婚否 T 职称助工月工资
用户设计的屏幕格式, 可存放在屏幕格式文件中。需要时, 打开此文件以供使用。
1. 建立屏幕格式文件
屏幕格式文件实际上是一种特殊的命令文件, 它只能由@语句, 注释语句, CLEAR语句组成。因此, MAND命令建立之。
命令格式: MAND 〈屏幕格式文件名〉
但应注意, , 。
当然, 也可用操作系统的编辑软件建立之。
例1 屏幕格式文件“”如下:
@ 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 〈格式文件名〉/?
在缺省扩展名时, 。
(2) 屏幕格式文件的使用。被打开的格式文件可供READ命令使用。值得注意的是, 当有格式文件打开时, APPEND, INSERT, EDIT及CHANGE命令也要以格式文件的格式提供使用。
例2 :
USE 职工
SET FORMAT TO F
EDIT 2
执行这一程序, 将显示出第二记录编辑格式。但显示格式由屏幕格式文件“”规定。本例显示如下:
职工情况输入表
职工姓名王爱民职工号 1004 性别男
出生时间 10/05/39
婚否 T 职称技师月工资
例3 :
USE 职工
SET FORMAT TO F
APPEND
执行后, 屏幕显示如下:
职工姓名职工号性别
出生时间/ /
婚否? 职称月工资
打开了屏幕格式文件后, 将改变一些全屏幕编辑命令的显示格式, 但不影响这些命令的功能和执行过程。
(3) 关闭屏幕格式文件。屏幕格式文件使用完后, 应及时使用关闭命令关闭。命令格式: CLOSE FORMAT或SET FORMAT TO&&无任选项