コード例 #1
0
 protected void Button2_Click(object sender, EventArgs e)
 {
     int ValueID = (int)Common.sink("ValueID", MethodType.Get, 255, 1, DataType.Int);
     sys_FieldValueTable ft = new sys_FieldValueTable();
     ft.DB_Option_Action_ = "Delete";
     ft.ValueID = ValueID;
     BusinessFacade.sys_FieldValueInsertUpdate(ft);
     EventMessage.EventWriteDB(1, string.Format("ɾ��Ӧ���ֶ�ֵ({0})�ɹ�!",ft.V_Text));
     ClientScriptManager cs = Page.ClientScript;
     cs.RegisterStartupScript(typeof(string), "TabJs", "<script language='javascript'>window.returnVal='ɾ���ɹ�!';window.parent.hidePopWin(true);</script>");
 }
コード例 #2
0
        /// <summary>
        /// 将记录集转为sys_FieldValueTable实体类
        /// </summary>
        /// <param name="dr">记录集</param>
        /// <returns>sys_FieldValueTable</returns>
        protected object Populatesys_FieldValue(IDataReader dr)
        {
            sys_FieldValueTable nc = new sys_FieldValueTable();

            if (!Convert.IsDBNull(dr["ValueID"])) nc.ValueID = Convert.ToInt32(dr["ValueID"]); // 索引ID号
            if (!Convert.IsDBNull(dr["V_F_Key"])) nc.V_F_Key = Convert.ToString(dr["V_F_Key"]).Trim(); // 与sys_Field表中F_Key字段关联
            if (!Convert.IsDBNull(dr["V_Text"])) nc.V_Text = Convert.ToString(dr["V_Text"]).Trim(); // 中文说明
            if (!Convert.IsDBNull(dr["V_Code"])) nc.V_Code = Convert.ToString(dr["V_Code"]).Trim(); // 编码
            if (!Convert.IsDBNull(dr["V_ShowOrder"])) nc.V_ShowOrder = Convert.ToInt32(dr["V_ShowOrder"]); // 同级显示顺序
            return nc;
        }
コード例 #3
0
 /// <summary>
 /// 新增/删除/修改 sys_FieldValue
 /// </summary>
 /// <param name="fam">sys_FieldValueTable实体类</param>
 /// <returns>返回0操正常</returns>
 public abstract int sys_FieldValueInsertUpdate(sys_FieldValueTable fam);
コード例 #4
0
ファイル: OracleDataProvider.cs プロジェクト: hezejiang/EHR
        /// <summary>
        /// ����/ɾ��/�޸� sys_FieldValue
        /// </summary>
        /// <param name="fam">sys_FieldValueTableʵ����</param>
        /// <returns>����0������</returns>
        public override int sys_FieldValueInsertUpdate(sys_FieldValueTable fam)
        {
            int rInt = 0;

            using (OracleConnection Conn = GetSqlConnection())
            {
                string CommTxt;
                OracleCommand cmd = new OracleCommand();
                cmd.Connection = Conn;
                if (fam.DB_Option_Action_ == "Insert")
                {
                    CommTxt = "Insert into 	sys_FieldValue(ValueID,V_F_Key,V_Text,V_Code,V_ShowOrder)VALUES(SEQ_sys_FieldValue_ID.NEXTVAL,:V_F_Key,:V_Text,:V_Code,:V_ShowOrder)";
                    cmd.CommandText = CommTxt;

                    cmd.Parameters.Add("V_F_Key", OracleType.VarChar).Value = fam.V_F_Key + ""; //��sys_Field����F_Key�ֶι���
                    cmd.Parameters.Add("V_Text", OracleType.NVarChar).Value = fam.V_Text + ""; //����˵��
                    cmd.Parameters.Add("V_Code", OracleType.NVarChar).Value = fam.V_Code + ""; //����
                    cmd.Parameters.Add("V_ShowOrder", OracleType.Int32).Value = fam.V_ShowOrder; //ͬ����ʾ˳��
                }
                else if (fam.DB_Option_Action_ == "Update")
                {

                    CommTxt = "UPDATE sys_FieldValue SET	V_F_Key = :V_F_Key,V_Text = :V_Text,V_Code = :V_Code,V_ShowOrder = :V_ShowOrder WHERE (ValueID = :ValueID)";
                    cmd.CommandText = CommTxt;

                    cmd.Parameters.Add("V_F_Key", OracleType.VarChar).Value = fam.V_F_Key + ""; //��sys_Field����F_Key�ֶι���
                    cmd.Parameters.Add("V_Text", OracleType.NVarChar).Value = fam.V_Text + ""; //����˵��
                    cmd.Parameters.Add("V_Code", OracleType.NVarChar).Value = fam.V_Code + ""; //����
                    cmd.Parameters.Add("V_ShowOrder", OracleType.Int32).Value = fam.V_ShowOrder; //ͬ����ʾ˳��
                    cmd.Parameters.Add("ValueID", OracleType.Int32).Value = fam.ValueID;
                }
                else if (fam.DB_Option_Action_ == "Delete")
                {
                    CommTxt = "Delete from  sys_FieldValue  WHERE (ValueID = :ValueID)";
                    cmd.CommandText = CommTxt;
                    cmd.Parameters.Add("ValueID", OracleType.Int32).Value = fam.ValueID;
                }
                else
                    throw new ApplicationException("�޷�ʶ��IJ�������!");
                Conn.Open();
                OracleTransaction Tran = Conn.BeginTransaction();
                cmd.Transaction = Tran;
                try
                {
                    rInt = cmd.ExecuteNonQuery();
                    cmd.Parameters.Clear();
                    if (fam.DB_Option_Action_ == "Insert")
                    {
                        cmd.CommandText = "select SEQ_sys_FieldValue_ID.CURRVAL from  dual";
                        rInt = Convert.ToInt32(cmd.ExecuteScalar());
                    }
                    Tran.Commit();
                }
                catch (Exception ex)
                {
                    Tran.Rollback();
                    throw new ApplicationException(ex.ToString());
                }
                finally
                {
                    Tran.Dispose();
                    cmd.Dispose();
                    Conn.Dispose();
                    Conn.Close();
                }
            }
            return rInt;
        }
コード例 #5
0
        /// <summary>
        /// 新增/删除/修改 sys_FieldValue
        /// </summary>
        /// <param name="fam">sys_FieldValueTable实体类</param>
        /// <returns>返回0操正常</returns>
        public override int sys_FieldValueInsertUpdate(sys_FieldValueTable fam)
        {
            int rInt = 0;

            using (OleDbConnection Conn = GetSqlConnection())
            {
                string CommTxt;
                OleDbCommand cmd = new OleDbCommand();
                cmd.Connection = Conn;
                if (fam.DB_Option_Action_ == "Insert")
                {
                    CommTxt = "Insert into 	sys_FieldValue(V_F_Key,V_Text,V_Code,V_ShowOrder)VALUES(@V_F_Key,@V_Text,@V_Code,@V_ShowOrder)";
                    cmd.CommandText = CommTxt;

                    cmd.Parameters.Add("@V_F_Key", OleDbType.VarWChar).Value = fam.V_F_Key + ""; //与sys_Field表中F_Key字段关联
                    cmd.Parameters.Add("@V_Text", OleDbType.VarWChar).Value = fam.V_Text + ""; //中文说明	
                    cmd.Parameters.Add("@V_Code", OleDbType.VarWChar).Value = fam.V_Code + ""; //编码
                    cmd.Parameters.Add("@V_ShowOrder", OleDbType.Integer).Value = fam.V_ShowOrder; //同级显示顺序
                }
                else if (fam.DB_Option_Action_ == "Update")
                {

                    CommTxt = "UPDATE sys_FieldValue SET	V_F_Key = @V_F_Key,V_Text = @V_Text,V_Code=@V_Code,V_ShowOrder = @V_ShowOrder WHERE (ValueID = @ValueID)";
                    cmd.CommandText = CommTxt;

                    cmd.Parameters.Add("@V_F_Key", OleDbType.VarWChar).Value = fam.V_F_Key + ""; //与sys_Field表中F_Key字段关联
                    cmd.Parameters.Add("@V_Text", OleDbType.VarWChar).Value = fam.V_Text + ""; //中文说明	
                    cmd.Parameters.Add("@V_Code", OleDbType.VarWChar).Value = fam.V_Code + ""; //编码	
                    cmd.Parameters.Add("@V_ShowOrder", OleDbType.Integer).Value = fam.V_ShowOrder; //同级显示顺序
                    cmd.Parameters.Add("@ValueID", OleDbType.Integer).Value = fam.ValueID;
                }
                else if (fam.DB_Option_Action_ == "Delete")
                {
                    CommTxt = "Delete from  sys_FieldValue  WHERE (ValueID = @ValueID)";
                    cmd.CommandText = CommTxt;
                    cmd.Parameters.Add("@ValueID", OleDbType.Integer).Value = fam.ValueID;
                }
                else
                    throw new ApplicationException("无法识别的操作命令!");
                Conn.Open();
                rInt = cmd.ExecuteNonQuery();
                if (fam.DB_Option_Action_ == "Insert")
                {
                    cmd.CommandText = "SELECT @@identity";
                    rInt = Convert.ToInt32(cmd.ExecuteScalar());
                }
                cmd.Dispose();
                Conn.Dispose();
                Conn.Close();
            }
            return rInt;
        }
コード例 #6
0
ファイル: BusinessFacade.cs プロジェクト: hezejiang/EHR
 /// <summary>
 /// 新增/删除/修改 sys_FieldValue
 /// </summary>
 /// <param name="fam">sys_FieldValueTable实体类</param>
 /// <returns>返回0操正常</returns>
 public static int sys_FieldValueInsertUpdate(sys_FieldValueTable fam)
 {
     return DataProvider.Instance().sys_FieldValueInsertUpdate(fam);
 }
コード例 #7
0
ファイル: BusinessFacade.cs プロジェクト: hezejiang/EHR
 /// <summary>
 /// 根据key和code获得应用字段值
 /// </summary>
 /// <param name="key">key</param>
 /// <param name="code">code</param>
 /// <returns>sys_FieldValueTable实体类</returns>
 public static sys_FieldValueTable sys_FieldValueFromKey(string key, string code)
 {
     sys_FieldValueTable fam = new sys_FieldValueTable();
     QueryParam qp = new QueryParam();
     qp.PageIndex = 1;
     qp.PageSize = 1;
     qp.Where = string.Format(" Where sys_FieldValue.V_F_Key = '{0}' and sys_FieldValue.V_Code='{1}' ", Common.inSQL(key), Common.inSQL(code));
     int RecordCount = 0;
     ArrayList lst = sys_FieldValueList(qp, out RecordCount);
     if (RecordCount > 0)
     {
         fam = (sys_FieldValueTable)lst[0];
     }
     return fam;
 }
コード例 #8
0
ファイル: BusinessFacade.cs プロジェクト: hezejiang/EHR
 /// <summary>
 /// 根据ID返回 sys_FieldValueTable实体类 单笔资料
 /// </summary>
 /// <param name="ValueID">索引ID号</param>
 /// <returns>返回sys_FieldValueTable实体类 ValueID为0则无记录</returns>
 public static sys_FieldValueTable sys_FieldValueDisp(int ValueID)
 {
     sys_FieldValueTable fam = new sys_FieldValueTable();
     QueryParam qp = new QueryParam();
     qp.PageIndex = 1;
     qp.PageSize = 1;
     qp.Where = " Where sys_FieldValue.ValueID = " + ValueID;
     int RecordCount = 0;
     ArrayList lst = sys_FieldValueList(qp, out RecordCount);
     if (RecordCount > 0)
     {
         fam = (sys_FieldValueTable)lst[0];
     }
     return fam;
 }
コード例 #9
0
 /// <summary>
 /// 新增/删除/修改 sys_FieldValue
 /// </summary>
 /// <param name="fam">sys_FieldValueTable实体类</param>
 /// <returns>返回0操正常</returns>
 public override int sys_FieldValueInsertUpdate(sys_FieldValueTable fam)
 {
     int rInt = 0;
     using (SqlConnection Conn = GetSqlConnection())
     {
         SqlCommand cmd = new SqlCommand("sys_FieldValueInsertUpdateDelete", Conn);
         cmd.CommandType = CommandType.StoredProcedure;
         //设置参数
         cmd.Parameters.Add("@DB_Option_Action_", SqlDbType.NVarChar).Value = fam.DB_Option_Action_; //操作方法 Insert:增加 Update:修改 Delete:删除 Disp:显示单笔记录
         cmd.Parameters.Add("@ValueID", SqlDbType.Int).Value = fam.ValueID;  //索引ID号	
         cmd.Parameters.Add("@V_F_Key", SqlDbType.VarChar).Value = fam.V_F_Key;  //与sys_Field表中F_Key字段关联
         cmd.Parameters.Add("@V_Text", SqlDbType.NVarChar).Value = fam.V_Text;  //中文说明
         cmd.Parameters.Add("@V_Code", SqlDbType.NVarChar).Value = fam.V_Code;  //编码
         cmd.Parameters.Add("@V_ShowOrder", SqlDbType.Int).Value = fam.V_ShowOrder;  //同级显示顺序
         Conn.Open();
         rInt = Convert.ToInt32(cmd.ExecuteScalar());
         cmd.Dispose();
         Conn.Dispose();
         Conn.Close();
     }
     return rInt;
 }
コード例 #10
0
        /// <summary>
        /// 创建html
        /// </summary>
        /// <returns></returns>
        private string CreateHtml()
        {
            int RecordCount = 0;
            QueryParam qp = new QueryParam();
            qp.Where = string.Format("Where V_F_Key='{0}'", Common.inSQL(this.F_Key));
            qp.Orderfld = " V_ShowOrder ";
            qp.OrderType = 0;
            ArrayList lst = new ArrayList();
            try
            {
                lst = BusinessFacade.sys_FieldValueList(qp, out RecordCount);
            }
            catch
            {
                for (int i = 0; i < 5; i++)
                {
                    sys_FieldValueTable fv = new sys_FieldValueTable();
                    fv.ValueID = i;
                    fv.V_Text = string.Format("测试{0}", i);
                    lst.Add(fv);
                }
            }
            StringBuilder sb = new StringBuilder();
            string SelectOk = ""; //是否选中当前选项

            if (FieldDisp == FieldDispType.Select)
            {
                sb.AppendFormat("<select name={0}>", Field_Name);
                sb.Append("<option value=\"\">请选择...</option>");
                foreach (sys_FieldValueTable var in lst)
                {
                    if (Common.Check_Char_Is(UseCodeValue==false? var.ValueID.ToString():var.V_Code.Trim(), Field_Value))
                        SelectOk = "selected";
                    else
                        SelectOk = "";
                    sb.AppendFormat("<option value=\"{0}\" {2}>{1}</option>", UseCodeValue==false? var.ValueID.ToString():var.V_Code, var.V_Text, SelectOk);
                }
                sb.Append("</select>");
            }
            else if (FieldDisp == FieldDispType.CheckBox || FieldDisp== FieldDispType.RadioBox)
            {
                if (!LineNumOn)
                {
                    LineNum = 1;
                }
                int Tempi = 1; //当前记录数
                int TdWidth = 100/LineNum; //TD宽度
                int C_nextline = 0; //换行标识

                string InputTypeTxt = "checkbox";

                if (FieldDisp == FieldDispType.RadioBox)
                {
                    InputTypeTxt = "radio";
                }

                sb.Append("<table width=\"100%\" border=\"0\" cellpadding=\"2\" cellspacing=\"1\" ><tr>");

                foreach (sys_FieldValueTable var in lst)
                {
                    if (C_nextline == 1)
                    {
                        sb.Append("</tr>");
                        C_nextline = 0;
                        sb.Append("<tr>");
                    }
                    if (Common.Check_Char_Is(UseCodeValue == false ? var.ValueID.ToString() : var.V_Code.Trim(), Field_Value))
                        SelectOk = "checked";
                    else
                        SelectOk = "";
                    sb.AppendFormat("<td width=\"{5}%\"><input name=\"{0}\" id=\"{0}{6}\" type={4} value=\"{1}\" {3}><label for=\"{0}{6}\">{2}</label></td>", Field_Name, UseCodeValue == false ? var.ValueID.ToString() : var.V_Code.Trim(), var.V_Text, SelectOk, InputTypeTxt, TdWidth, Tempi);

                    //产生换行标识
                    if ((Tempi % LineNum) == 0)
                    {
                        C_nextline = 1;
                    }
                    Tempi++;
                }
                //补齐td
                int LostTDNum = LineNum-lst.Count % LineNum;
                if (LostTDNum != LineNum && LineNum > 0)
                {
                    for (int i = 0; i < LostTDNum; i++)
                    {
                        sb.AppendFormat("<td width=\"{0}%\">&nbsp;</td>",TdWidth);
                    }
                    sb.Append("</tr>");
                }

                sb.Append("</table>");
            }
            return sb.ToString();
        }