**1、判断人员表中是否有已导入人员***************************
**判断临时表ry_temp中身份证在人员表中ry是否已存在
SELECT * from ry_temp where !EMPTY(bz) OR ry_temp.sfzh in(select sfzh FROM ry)
INTO CURSOR aaaa
SELECT aaaa
a=RECCOUNT()
dwmc=aaaa.dwmc
IF a!=0
COPY TO &dwmc. FIELDS dwbh,dwmc,ryxm,sfzh,bz SDF &&这个地方和下边的&dwmc.导出表同名
MESSAGEBOX("身份证号有错误或数据重复,数据已导出!位置在:"+(Mymllj),0+48,"居民医保警告")
RETURN **这个地方最好能不停止运行继续判断下面
ENDIF
**2、判断临时表中是否有录入重复人员****
***判断临时表自身是否有重复录入人员,身份证是否重复
SELECT * from ry_temp where
ry_temp.sfzh in(select sfzh FROM ry_temp group by ry_temp.sfzh HAVING COUNT(ry_temp.sfzh)>1) INTO CURSOR ccc
SELECT ccc
b=RECCOUNT()
dwmc=ccc.dwmc
IF b!=0
COPY TO &dwmc. FIELDS dwbh,dwmc,ryxm,sfzh SDF &&如何让它加上别的符号?
MESSAGEBOX("单位内部身份证号重复,数据已导出!位置在:"+(Mymllj),0+48,"居民医保警告")
RETURN
ENDIF
***以上两条最好在一个判断中,最后说明中的情况
**3、以上如都果正确则可导入***********
MESSAGEBOX("数据可以导入!",1+48,"居民医保管理系统")
最好是满足以下
要的是四个判断:
1、判断**1有错误,则拷贝出,继续判断**2有错误,则拷贝出,提示:身份证号有错误或数据重复/单位内部身份证号重复,程序停止。
2、判断**1有错误,则拷贝出,继续判断**2无错误,提示:身份证号有错误或数据重复,程序停止。
3、判断**1无错误,继续判断**2有错误,则拷贝出,提示:单位内部身份证号重复,程序停止。
4、判断**1无错误,继续判断**2无错误,由运行**3