住院登记病种下拉框选项改为日间手术HisType=8

Forms/OutpatientRegistration.cs

@@ -40,7 +40,7 @@ namespace PTMedicalInsurance.Forms
                               + " WHERE B.Code='" + Global.pat.insuType + "' and A.InsuCode = 'insutype'" + sqlCondition;
                 SetDBLKCombox(ref dblkcbxInsuranceType, sqlStr);
 
-                sqlStr = "select A.Code, A.Name FROM HB_MedInsuDirectory A where A.UseFlag='1' And A.HisType=7" + sqlCondition; //A.Code='" + Global.pat.DiseasecCode + "' and 
+                sqlStr = "select A.Code, A.Name FROM HB_MedInsuDirectory A where A.UseFlag='1' And A.HisType=8" + sqlCondition; //A.Code='" + Global.pat.DiseasecCode + "' and 
                 SetDBLKCombox(ref dblkcbxDisease, sqlStr);
 
                 sqlStr = "select A.Code, A.Name FROM HB_MedInsuDirectory A where A.UseFlag='1' And A.HisType=5" + sqlCondition;