以文本方式查看主题 - 易表在线答疑 (http://www.egrid2000.com/dvbbs/index.asp) -- 用户社区 (http://www.egrid2000.com/dvbbs/list.asp?boardid=2) ---- [求助]病案明细表的[病案号]列怎样实现自动编号? (http://www.egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=4144) |
-- 作者:郑颖 -- 发布时间:2006/9/29 0:02:00 -- [求助]病案明细表的[病案号]列怎样实现自动编号? [这个贴子最后由郑颖在 2006/09/29 01:08am 第 2 次编辑] 各位大虾!有谁能帮忙实现这个功能。那就是“病案明细表”中的病案号能根据[科室]列的内容进行自动编号。比如说科室列写“内科”那么病案号列就会自动生成A20060001……;如果说科室列写的是“外科”那么病案号列就会自动生成B20060001……而且没有重复编号。egd文件下载egd文件下载 密码是:Z125320 |
-- 作者:smileboy -- 发布时间:2006/9/29 0:04:00 -- 发文件 |
-- 作者:郑颖 -- 发布时间:2006/9/29 0:16:00 -- egd文件下载 |
-- 作者:czy -- 发布时间:2006/9/29 0:24:00 -- 密码? |
-- 作者:smileboy -- 发布时间:2006/9/29 10:50:00 -- 内科:"A"+text(Year(today()))+Format(Row,"0000") 其他类似 |
-- 作者:wjq1072 -- 发布时间:2006/9/29 13:58:00 -- http://bbs.egrid2000.com/cgi-bin/topic.cgi?forum=9&topic=1098&show=0 |
-- 作者:郑颖 -- 发布时间:2006/9/29 22:31:00 -- 你好!这样的话,病案编号就不会出分类连续的号码了。我用手工录入了一些资料请你帮忙看看。egd文件下载 是按照这样的方式进行的。还啊!怎么我自己设置的复制公式不起作用呢?那就是把表一的内容复制到表二、表三、表四中。我的公式是: AppendFor("病案明细表","[病案明细表!姓名],[病案明细表!性别],[病案明细表!年龄],[病案明细表!病案号],[病案明细表!入院日期],[病案明细表!出院日期],[病案明细表!住院天数],[病案明细表!家庭住址],[病案明细表!出院诊断],[病案明细表!转归],[病案明细表!经治医师],[病案明细表!病历等级],[病案明细表!是否合保]","[姓名],[性别],[年龄],[病案号],[入院日期],[出院日期],[住院天数],[家庭住址],[出院诊断],[转归],[经治医师],[病历等级],[是否合保]","[病案明细表!科室]"," = ","[科室]") |
-- 作者:czy -- 发布时间:2006/9/29 22:37:00 -- 第二个问题从函数语法来看应该这样才对: AppendFor("病案明细表","姓名,性别,年龄,病案号,入院日期,出院日期,住院天数,家庭住址,出院诊断,转归,经治医师,病历等级,是否合保","姓名,性别,年龄,病案号,入院日期,出院日期,住院天数,家庭住址,出院诊断,转归,经治医师,病历等级,是否合保","科室","=",[科室]) |
-- 作者:smileboy -- 发布时间:2006/9/29 22:37:00 -- AppendFor("病案明细表","姓名,性别,年龄,病案号,入院日期,出院日期,住院天数,家庭住址,出院诊断,转归,经治医师,病历等级,是否合保","姓名,性别,年龄,病案号,入院日期,出院日期,住院天数,家庭住址,出院诊断,转归,经治医师,病历等级,是否合保","科室"," = ",[科室]) |
-- 作者:czy -- 发布时间:2006/9/29 23:01:00 -- 楼主的编号用A、B、C来区分各科室,为何不用首字母来区分呢?如果用首字母来区分各科室并编号,公式可以这样: Left(GetPY([科室]),1)+text(Year([入院日期]))+right("000"+text(CountFor(Grid,"科室","=",[科室],1,Row)),4) |