产权产籍信息系统的开发与应用

丁启宁 赵建 刘红兵

（河南南阳油田房产处，河南，南阳，473132）

产权产籍信息系统的开发与应用

丁启宁 赵建 刘红兵

（河南南阳油田房产处，河南，南阳，473132）

产权、产籍管理是工作的重点。由于住宅小区多，难于管理，工作量大。采用人工方式管理住宅资料，不但效率低下，而且容易出错，为了提高办事效率，急需开发一套操作简单方便的产权产籍管理系统。

产权产籍；系统

一、系统的运行环境

经过分析研究,我们使用 MICROSOFT公司的 VISUAL FOXPRO开发工具,利用其提供的各种面向对象的可视化对象表单、工具栏、网格等开发出通用的和功能完备的交互界面，在短时间内利用项目管理器建立系统应用原型,不断修正和改进,形成运行稳定、操作简便的可行性应用系统。

二、系统设计

产权产籍管理系统是针对房地产管理单位的房屋权属确认工作而开发的管理软件。根据工作的要求，实现住户基本信息管理、住房基本信息管理、房权证号的管理和房屋他项权利的管理几个方面的功能，形成直观、全面、准确的房屋产权信息，以供用户输入、修改、删除、查询、统计、打印，用户通过对基本信息的更新，实现房地产权属的动态管理。

1、 数据库设计

在设计数据库时，不同主题的信息应存储在不同的表中，另外根据工作量规模，我们建立一个数据库bsc.dbc，四个数据表,分别是sjk.dbf、txql.dbf、gyqr.dbf、 dj.dbf，其中sjk.dbf表与其它三个表是一对多的关系,把数据库参照完整性的更新、删除设为级联，插入设为限制。四个表的结构分别如下：

·sjk.dbf

主索引 ：房权证号

字段字段名类型宽度小数位索引 字段 字段名 类型 宽度 小数位 索引1 房权证号 字符型 9 22 结构3 字符型 4 2 所有权人 字符型 20 23 结构4 字符型 4 3 性别 字符型 2 24 总层次1 字符型 1 4 单位 字符型 14 25 总层次2 字符型 1 5 乡镇 字符型 6 26 总层次3 字符型 1 6 路区 字符型 24 27 总层次4 字符型 1 7 幢号1 字符型 4 28 总建筑面积1 数值型 8 2 8 幢号2 字符型 2 29 总建筑面积2 数值型 8 2 9 幢号3 字符型 2 30 总建筑面积3 数值型 8 2 10 幢号4 字符型 2 31 总建筑面积4 数值型 8 2 11 幢 字符型 5 32 面积总计 数值型 8 2 12 楼号 字符型 2 33 用途1 字符型 6 13 单元 字符型 1 34 用途2 字符型 6 14 室号 字符型 3 35 用途3 字符型 6 15 丘地号 字符型 5 36 用途4 字符型 6 16 坐向1 字符型 2 37 产别 字符型 8 17 坐向2 字符型 2 38 登记种类 字符型 4 18 坐向3 字符型 2 39 附记 字符型 16 19 坐向4 字符型 2 40 他项权利 字符型 6 20 结构1 字符型 4 41 是否冻结 字符型 8 21 结构2 字符型 4 42 缮证日期 日期型 8

·txql.dbf

gyqr.dbf

普通索引 ：房权证号

普通索引 ：房权证号、共有权号

字段字段名类型宽度小数位索引字段字段名类型宽度小数位索引1 房权证号 字符型 9 1 房权证号 字符型 9 2 他项证号 字符型 7 2 共有权人 字符型 8 3 他项权人 字符型 18 3 性别 字符型 2 4 种类 字符型 4 4 关系 字符型 4 5 价值 字符型 10 5 共有比例 字符型 8 6 设定日期 日期型 8 6 共有权号 字符型 11 7 次数 字符型 1 8 注销日期 日期型 8 9 约定期限 字符型 6 10 约定日期 日期型 8 11 填发日期 日期型 8

· dj.dbf

普通索引 ：房权证号

字段字段名类型宽度小数位索引1 房权证号 字符型 9 2 冻结日期 日期型 8 3 冻结事由 字符型 20 4 解冻日期 日期型 8 5 解冻事由 字符型 20

2、模块设计

本系统共有七个子模块组成。分别是数据录入、综合查询、证号管理、他项权利设定、产权查封模块和统计模块、退出系统模块。分别简介如下：

（1）数据录入模块

此模块提供对“房屋所有权登记审批表”的数据录入，涵盖审批表的五十多个字段，满足多幢房屋，多个共有人的添加、删除、打印功能。调用lr.scx，其中建筑面积在过程gotfocus中自动计算添加，填证日期也在过程中自动添加。

(2)综合查询模块

提供对房屋状况、所有权人、共有权人、他项权利状况的查询所需信息。此模块没有特殊的算法，只是把所需要的表添加到数据环境中，利用可视类库中的命令按钮来实现查询功能。

(3)证号管理模块

根据房屋所处的地理位置划分三个区块，分别为911、910、Y01，为使三者之间不相互混淆，通过证号管理模块可以方便的浏览，做到心中有数。其对应的命令911按钮的click代码如下：

index on sjk.房权证号 to tempid for substr(alltrim(sjk.房权证号),1,3)="911"

go bott

thisform.refresh

（4）他项权利设定模块

抵押权、租赁权是在房屋所有权基础上派生的他项权利，此模块对已设定的他项权利添加、作记，对已注销的他项权利删除、注销。通过对表格的录入完成对他项权利的设定，以房权证号为纽带使之与主库联系在一起，填发日期不为空，说明他项权利已设定，注销日期不为空，说明他项权利已注销，并在填发日期、注销日期的text的lostfocus过程中写入如下代码：

if messagebox("确认设定他项权利？",48+4,"信息提示")=6

select sjk

repl 他项权利 with "已设定"

endif

select sjk

本研究结果表明，研究组治疗总有效率显著高于对照组（P＜0.05），治疗后两组患者的IL-6、PCT水平及APACHEⅡ评分较治疗前均显著降低，且研究组低于对照组，两组比较差异具有统计学意义（P＜0.05），两组患者均未发生不良反应。

if dtoc(thisform.grid1.column10.text1.value)<>" "

select sjk

repl 他项权利 with "已注销"

endif

select sjk

(5)产权查封模块

随着房地产市场的壮大，房地产交易日益活跃，为保护产权人的合法权益不受侵犯，对法院查封、冻结的房产进行保护义不容辞，此模块对查封、解冻的房产予以确认，并在查询模块作相应标志。此模块的设计与上一模块异曲同工。

(6)统计模块

按日期统计出初始登记、转移登记、他项权利设定的户数、建筑面积等所需信息，并可打印出汇总表。三个命令按钮的click代码如下：

SELECT Sjk.房权证号, Sjk.所有权人, Sjk.面积总计, Txql.他项证号,;

Txql.他项权人, Txql.种类, Txql.价值, Txql.填发日期;

FROM bsc!sjk INNER JOIN bsc!txql ON Sjk.房权证号 = Txql.房权证号;

WHERE Txql.填发日期>=ctod(thisform.text1.value).and.Txql.填发日期<=ctod(thisform.text2.value) ORDER BY Txql.填发日期;

INTO TABLE d:sc j2.dbf report form 统计他.frx preview in screen

(7)退出系统

退出系统简单快捷，click代码如下：

close all

thisform.release

quit

三、编译

在全部任务设计完成之后,利用 VF的项目管理器将整个程序连编成可执行文件(.EXE文件)，即可在Windows下直接运行。

[1]《企业工资管理系统》 谢伟民

[2]《vf系统的理论与技术》 张志明

[3]《信息传播与文献检索》 詹明芝

TU114

1674-3954（2011）03-0340-02