9.0检验系统: UnitJY_GSJGCL:界面上的 “髓”和“血”后面要加个“片”字 控件:qryGSBG的sql属性改成: select B.DYSX00,B.BGXMID,J.JYJG00,J.SP0000, (select CKFW00 from JY_XMCKZ0 where BGXMID=B.BGXMID) CKFW00 from JY_BGXMZD B,JY_JYJG00_TEMP J where J.BGXMID=B.BGXMID and J.PYRQ00=:PYRQ00 and J.YBH000=:YBH000 and J.YQDH00=:YQDH00 and (J.TXM000=:TXM000 or J.TXM000 is null) and DYSX00 is not null order by DYSX00 检验结果处理界面: 方法:FXJSH:13972行:加上SP0000字段: sql.Add('select a.bgxmid,a.jyjg00,A.SP0000,a.BGXMMC,b.ECTSBZ,b.ECSHNR,b.SFJZSH from vw_jy_jyjg00_temp a,JY_BGXMZD b where a.bgxmid=b.bgxmid and a.PYRQ00='''+VEPYRQ0+''' and a.YBH000='''+strYBH+''' and nvl(a.jyywid,0)<>0'); 加上SP0000字段,并在下行的结果那个去判断,没有结果也没有髓片结果的情况下: if (Trim(fieldbyname('JYJG00').asstring) = '') and (Trim(fieldbyname('SP0000').asstring) = '') then sBGXMID := sBGXMID + ',' + Trim(fieldbyname('bgxmid').asstring); 触发器:TR_JY_YW0000_UPDATE_JGZT00: trim(JYJG00) IS NOT NULL or ZLXMID=99999999 尾巴加上:or trim(SP0000) IS NOT NULL 触发器:TR_JY_JYJG00_GSBGD_UPD:脚本 昊平那边备份了