Beispiel #1
0
        protected void btnSubmit_Click(object sender, EventArgs e)
        {
            try
            {
                string strSql = "Insert Into reg_file (reg_no, p_name, birth_date, sex, id_no, area, merry, native, belief, insurance, p_type, special, pay_type, first_opd_date, last_opd_date, opd_count, miss_count, rent_man, iccard_id)" +
                                " Values (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)";
                System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
                #region 測試資料
                //cmd.Parameters.Add("@reg_no", System.Data.Odbc.OdbcType.Char).Value = "Y99001";
                //cmd.Parameters.Add("@p_name", System.Data.Odbc.OdbcType.Char).Value = "測試號";
                //cmd.Parameters.Add("@birth_date", System.Data.Odbc.OdbcType.Date).Value = "1989/06/20";
                //cmd.Parameters.Add("@sex", System.Data.Odbc.OdbcType.Char).Value = "1";
                //cmd.Parameters.Add("@id_no", System.Data.Odbc.OdbcType.Char).Value = "E123456789";
                //cmd.Parameters.Add("@area", System.Data.Odbc.OdbcType.Char).Value = "4301";
                //cmd.Parameters.Add("@merry", System.Data.Odbc.OdbcType.Char).Value = "0";
                //cmd.Parameters.Add("@native", System.Data.Odbc.OdbcType.Char).Value = "01";
                //cmd.Parameters.Add("@belief", System.Data.Odbc.OdbcType.Char).Value = "0";
                //cmd.Parameters.Add("@insurance", System.Data.Odbc.OdbcType.Char).Value = "01";
                //cmd.Parameters.Add("@p_type", System.Data.Odbc.OdbcType.Char).Value = "00";
                //cmd.Parameters.Add("@special", System.Data.Odbc.OdbcType.Char).Value = "00";
                //cmd.Parameters.Add("@pay_type", System.Data.Odbc.OdbcType.Char).Value = "01";
                //cmd.Parameters.Add("@first_opd_date", System.Data.Odbc.OdbcType.Date).Value = DateTime.Now.Date;
                //cmd.Parameters.Add("@last_opd_date", System.Data.Odbc.OdbcType.Date).Value = DateTime.Now.Date;
                //cmd.Parameters.Add("@opd_count", System.Data.Odbc.OdbcType.SmallInt).Value = "0";
                //cmd.Parameters.Add("@miss_count", System.Data.Odbc.OdbcType.SmallInt).Value = "0";
                //cmd.Parameters.Add("@rent_man", System.Data.Odbc.OdbcType.Char).Value = "f872";
                //cmd.Parameters.Add("@iccard_id", System.Data.Odbc.OdbcType.Char).Value = "";
                #endregion
                cmd.Parameters.Add("@reg_no", System.Data.Odbc.OdbcType.Char).Value         = txtReg_No.Text;
                cmd.Parameters.Add("@p_name", System.Data.Odbc.OdbcType.Char).Value         = txtName.Text;
                cmd.Parameters.Add("@birth_date", System.Data.Odbc.OdbcType.Date).Value     = txtBirth.Text;
                cmd.Parameters.Add("@sex", System.Data.Odbc.OdbcType.Char).Value            = ddlSex.SelectedValue;
                cmd.Parameters.Add("@id_no", System.Data.Odbc.OdbcType.Char).Value          = txtId_No.Text;
                cmd.Parameters.Add("@area", System.Data.Odbc.OdbcType.Char).Value           = "4301";
                cmd.Parameters.Add("@merry", System.Data.Odbc.OdbcType.Char).Value          = "0";
                cmd.Parameters.Add("@native", System.Data.Odbc.OdbcType.Char).Value         = "01";
                cmd.Parameters.Add("@belief", System.Data.Odbc.OdbcType.Char).Value         = "0";
                cmd.Parameters.Add("@insurance", System.Data.Odbc.OdbcType.Char).Value      = "01";
                cmd.Parameters.Add("@p_type", System.Data.Odbc.OdbcType.Char).Value         = "00";
                cmd.Parameters.Add("@special", System.Data.Odbc.OdbcType.Char).Value        = "00";
                cmd.Parameters.Add("@pay_type", System.Data.Odbc.OdbcType.Char).Value       = "01";
                cmd.Parameters.Add("@first_opd_date", System.Data.Odbc.OdbcType.Date).Value = DateTime.Now.Date;
                cmd.Parameters.Add("@last_opd_date", System.Data.Odbc.OdbcType.Date).Value  = DateTime.Now.Date;
                cmd.Parameters.Add("@opd_count", System.Data.Odbc.OdbcType.SmallInt).Value  = "0";
                cmd.Parameters.Add("@miss_count", System.Data.Odbc.OdbcType.SmallInt).Value = "0";
                cmd.Parameters.Add("@rent_man", System.Data.Odbc.OdbcType.Char).Value       = "f872";
                cmd.Parameters.Add("@iccard_id", System.Data.Odbc.OdbcType.Char).Value      = "";
                Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();
                conn.ExecuteQuery(cmd);

                hfReg_No.Value = txtReg_No.Text;
                Response.Redirect(ResolveUrl(string.Format("~/AppointOnsite.aspx?ID={0}", hfReg_No.Value)));
            }
            catch (Exception ex)
            {
                PublicLib.handleError("", this.GetType().Name, ex.Message);
            }
        }
Beispiel #2
0
        public string SavaPatient02(string cont_name, string cont_tel_no, string cont_rel, string cont_area, string cont_addr, string reg_no)
        {
            string strSql = "Update reg_file Set cont_name=?, cont_tel_no=?, cont_rel=?,cont_area=?, cont_addr=? Where reg_no=?";

            System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
            cmd.Parameters.Add("@cont_name", System.Data.Odbc.OdbcType.VarChar).Value   = cont_name;
            cmd.Parameters.Add("@cont_tel_no", System.Data.Odbc.OdbcType.VarChar).Value = cont_tel_no;
            cmd.Parameters.Add("@cont_rel", System.Data.Odbc.OdbcType.VarChar).Value    = cont_rel;
            cmd.Parameters.Add("@cont_area", System.Data.Odbc.OdbcType.Char).Value      = cont_area;
            cmd.Parameters.Add("@cont_addr", System.Data.Odbc.OdbcType.VarChar).Value   = cont_addr;
            cmd.Parameters.Add("@reg_no", System.Data.Odbc.OdbcType.Char).Value         = reg_no;
            Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();

            return(conn.ExecuteQuery(cmd) ? "1" : "0");
        }
Beispiel #3
0
        public string SavaPatient01(string p_name, string birth_date, string sex, string merry, string native, string belief, string tel_no, string con_name, string con_tel, string area, string address, string area1, string address1, string reg_no)
        {
            string strSql = "Update reg_file Set p_name=?, birth_date=?, sex=?, merry=?, native=?, belief=?, tel_no=?, con_name=?, con_tel=?, area=?, address=?, area1=?, address1=? Where reg_no=?";

            System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
            cmd.Parameters.Add("@p_name", System.Data.Odbc.OdbcType.Char).Value      = p_name;
            cmd.Parameters.Add("@birth_date", System.Data.Odbc.OdbcType.Date).Value  = birth_date;
            cmd.Parameters.Add("@sex", System.Data.Odbc.OdbcType.Char).Value         = sex;
            cmd.Parameters.Add("@merry", System.Data.Odbc.OdbcType.Char).Value       = merry;
            cmd.Parameters.Add("@native", System.Data.Odbc.OdbcType.Char).Value      = native;
            cmd.Parameters.Add("@belief", System.Data.Odbc.OdbcType.Char).Value      = belief;
            cmd.Parameters.Add("@tel_no", System.Data.Odbc.OdbcType.VarChar).Value   = tel_no;
            cmd.Parameters.Add("@con_name", System.Data.Odbc.OdbcType.VarChar).Value = con_name;
            cmd.Parameters.Add("@con_tel", System.Data.Odbc.OdbcType.VarChar).Value  = con_tel;
            cmd.Parameters.Add("@area", System.Data.Odbc.OdbcType.Char).Value        = area;
            cmd.Parameters.Add("@address", System.Data.Odbc.OdbcType.Char).Value     = address;
            cmd.Parameters.Add("@area1", System.Data.Odbc.OdbcType.Char).Value       = area1;
            cmd.Parameters.Add("@address1", System.Data.Odbc.OdbcType.VarChar).Value = address1;
            cmd.Parameters.Add("@reg_no", System.Data.Odbc.OdbcType.Char).Value      = reg_no;
            Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();

            return(conn.ExecuteQuery(cmd) ? "1" : "0");
        }