2009年9月7日

更改病人类别为 医保病人

摘要：      btnhjsf.Caption :='医保卡收费' ;      if cblb.ItemIndex <>4 then ChangeSickToYB(edtkh.Text );  //更改病人类别为 医保病人 procedure TGetPatientForm.ChangeSickTo... 阅读全文

posted @ 2009-09-07 23:45 舟山牙医 阅读(439) 评论(0) 推荐(0) 编辑

总论

摘要： 1. //修改发票主表 update Out_Invoice set JieZhangDH=:JieZhangDH where DanJuID=:DanJuID'; 2.//生成操作员结帐单       Sql.Add(' insert into Out_SettlTab (SerialNo,JieZhangDH,JieZhangLB,JieZh... 阅读全文

posted @ 2009-09-07 23:37 舟山牙医 阅读(293) 评论(0) 推荐(0) 编辑

导航