使用伪代码开发数据表维护屏幕

回顾我们过去开发过的VisualFoxpro应用程序，虽然会发现不同的应用程序有不同的大小、需求和开发难度，但是这些不同的应用程序都有一个共同的特点:表格维护屏幕(包括数据录入)的开发是必不可少的一部分，并且占据了相当大的比重，占用了我们大量的开发时间和精力。因此，有必要对数据表维护屏幕(包括数据录入)的开发进行总结和研究。

为了使数据表中存储的数据准确及时，提供正确及时的查询，必须对数据表进行人工维护(包括数据录入)，因此必须为其开发一个数据表维护画面，作为人机对话的界面。总结各种数据表维护画面，会发现都差不多，既不是很复杂，也不是很简单。一般来说，的数据表维护屏幕需要添加(添加新记录)、编辑(修改记录)、删除(删除记录)、漫游(指记录指针向上、向下、向上、向下移动，以及各种记录搜索和定位)功能。此外，数据表维护屏幕还必须检查用户输入数据的合法性，尤其是输入关键字的合法性。一定要保持主关键字的完整性和外部关键字的引用完整性，否则会对整个数据系统造成很大的混乱。请注意，虽然VisualFoxpro对主关键字的完整性和外来关键字的引用完整性提供了系统维护，但这只是给数据系统的安全性增加了最后一道防线，并不能代替开发数据表维护画面中输入关键字的合法性检查，否则用户在面对VisualFoxpro系统陌生的对话框时会无所适从。

由于输入关键字的合法性检查是开发数据表维护屏幕不可或缺的一部分，增加了开发数据表维护屏幕的复杂性，所以数据表维护屏幕的代码不可能很简单。一个代码非常简单的数据表维护画面，在功能上总是不完善，在使用上总是出问题。那么如何才能减少开发数据表和维护屏幕的时间和精力呢？我的解决办法是用伪代码。因为数据表维护屏幕的代码很复杂，所以它们都有很强的共性。我们可以事先编写一套可以被各种数据表维护屏幕应用的伪代码，然后我们在编写数据表维护屏幕的时候就从伪代码开始，而不是从头开始。虽然伪代码不能直接编译运行，但是面对特定的数据表结构和应用需求，大部分开发者可以很容易地将伪代码改写成正式代码。

作者介绍了自己编写的数据表维护界面的伪代码，它由一个自定义类和一些程序组成。为了方便伪代码的应用，作者将嵌入式代码尽量在形式上移动，并在嵌入式代码中使用do。下面的伪代码大部分不需要修剪就能读懂美文，但是里面全是美文，不需要抄袭。

下面是使用伪代码设计数据表维护屏幕的具体步骤:

1.首先，建立下面的工作面表
，记下编号工作面的名称
1
2
3
4
...
16

此表适用于整个应用程序。这里说的工作面和我们平时说的有些不同。它把处于同一工作面但主要指标不同的情况作为不同的工作面，使用不同的编号。

2.根据工作面的表重写下面的伪代码，使之成为可以编译运行的正式代码。

{伪代码启动}
公共工作站
工作站= createobject ("workstation ")

* * = =下面的工作状态class = = * *
定义class workstation为custom
curws = 1
declare AIendfunc，或[16]

* *以下工作状态定义
* * 1
{
AI[1]= " A1 " & &工作面
Or[1]= " O1 " & &顺序
AI [2] = "A2

func Get

retu curWS

[16]

proc Set
para p
sele(Ai[p])
Set order to(Or[p])
curWS = p
end proc