- 1、本文档共8页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
[最新实达病案系统制作出院病人调查表步骤20130416
制作出院病人调查表.DBF步骤:
第一步:安装Visual Foxpro 软件。
1、下载Visual Foxpro 软件(从网络上搜索VFP 6.0 软件);
2、下载“DBF转换工具”(卫生统计直报系统公告栏);
第二步:把病案系统(实达软件)导出的DBF转换成可由EXCEL或VFP打开的DBF表。
1、打开DBF转换工具;
2、导出DBF,并保存为wt4b.dbf(卫统4表的简称);
3、由于实达病案系统只能2000条记录导出1个DBF文件,所以按第二步操作后,依次把实达系统导出来的DBF转换成wt4b.dbf、wt4b1.dbf、wt4b2.dbf、……。
第三步:合并wt4b.dbf、wt4b1.dbf、wt4b2.dbf、……。(注:这些DBF文件必须放在同一个文件夹中)
1、在VFP命令窗口输入:use wt4b.dbf 回车
2、在VFP命令窗口输入:brow 回车
3、在VFP命令窗口输入:append from wt4b1.dbf 回车
4、在VFP命令窗口输入:append from wt4b2.dbf 回车
5、在VFP命令窗口输入:append from wt4b3.dbf 回车
……
即可把wt4b1.dbf、wt4b2.dbf、……合并到wt4b.dbf。
第四步:生成N04_XX医院.dbf。
1、用VFP打开wt4b.dbf;
2、打开命令窗口(菜单:窗口——命令窗口);
输入命令:brow 回车(即ENTER)
3、生成N04_XX医院.dbf;
输入命令:select yymc00 username,jffs00 ylfkfs,zycs00 zycs,bah000 bah,brxb00 xb,brnl00 ll,hyzk00 hyzk,zy0000 zydm,ryrq00 ryrq,rykb00 rykbdm,cyrq00 cyrq,cykb00 cykbdm,ryqk00 rysqk,ryzd00 ryzd,qzrq00 ryhqzrq,zyzd00 cyszyzd,zyzlxg zyzdzljg,qtzd00 cysqtzd,qtzlxg qtzdzljg,yygr00 yygrmc,grzlxg yygrmczljg,xszd00 sshzdwbyy,ssm000 ssbm,zje000 zyfyzj,cwf000 cw,hlf000 zc,xyf000 xy,zyf000 zy,hyf000 hy,zlf000 hl,ssf000 sx,jcf000 mz,qtf000 qtfy,xx0000 xx,hxb000 hxb,xxb000 xxb,xj0000 xj,qx0000 qx,sxqt00 qt from wt4b into table C:\Documents and Settings\huntrima\桌面\N04_XX医院.dbf
(把以上的命令直接复制粘贴到命令窗口)
其中C:\Documents and Settings\huntrima\桌面\N04_XX医院.dbf是指N04_XX医院.dbf文件所放置的位置。可以从地址栏直接复制粘贴。
4、打开N04_XX医院.dbf;
在命令窗口输入命令:brow 回车(即ENTER)
第五步:规范数据。(在住院诊断治疗结果zyzdzljg前所有字段不能有空格;除是否有测血型外,任何字段都不能含有中文。)
1、将单位名称写入“username”
在命令窗口输入命令:replace username with XX医院 all 回车(即ENTER)
注: “username”中的XX医院必须与卫生统计直报系统中的名称一致。以上命令的含义是将username列全部用“XX医院”替换。
2、医疗付款方式ylfkfs字段不能为空,该字段的值要求要与系统值一至,因此建议在病案系统中进行修改。如果有出现空格,请按以下命令处理:
replace ylfkfs with 9 for ylfkfs= 回车
3、性别xb不能为中文(男、女),应该替换成1或2。按以下命令处理:
replace xb with 1 for xb=男 回车
replace xb with 2 for xb=女 回车
replace xb with 9 for xb= 回车(如果性别为空)
4、年龄ll,不能有小数点,如果小于1岁的可以按以下命令处理:
replace ll with 0 for ll1 回车
5、婚姻状况hyzk不能有中文,请按以下命令处理:
replace hyzk with 1 for hyzk=未婚 回车
replace hyzk with 2 for hyzk=已婚 回车
replace hyzk with 3 for hyzk=离婚
文档评论(0)