public string GetPatientData(string strParam)
{
string strReturn = String.Empty;
try
{
System.Data.DataTable dt = new System.Data.DataTable();
string strSql = "Select to_char(birth_date) As birth_date, lpad(insurance, 2,'0') As insurance, to_char(first_opd_date) As first_opd_date, to_char(last_opd_date) As last_opd_date, * From reg_file Where reg_no=? Or id_no=?";
System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
cmd.Parameters.Add("@Param1", System.Data.Odbc.OdbcType.Char).Value = strParam;
cmd.Parameters.Add("@Param2", System.Data.Odbc.OdbcType.Char).Value = strParam;
Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();
dt = conn.GetData(cmd);
if (dt.Rows.Count > 0)
{
strReturn = JsonData(dt);
}
}
catch (Exception ex)
{
strReturn = ex.Message;
}
return(strReturn);
}
protected void GetPatientData(string strParam)
{
try
{
System.Data.DataTable dt = new System.Data.DataTable();
string strSql = "Select to_char(birth_date) As birthday, * From reg_file Where reg_no=?";
System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
cmd.Parameters.Add("@Param", System.Data.Odbc.OdbcType.Char).Value = strParam;
Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();
dt = conn.GetData(cmd);
if (dt.Rows.Count > 0)
{
txtReg_No_Show.Text = dt.Rows[0]["reg_no"].ToString();
txtId_No_Show.Text = dt.Rows[0]["id_no"].ToString();
txtName_Show.Text = dt.Rows[0]["p_name"].ToString();
ddlSex_Show.SelectedValue = dt.Rows[0]["sex"].ToString();
txtBirth_Date_Show.Text = dt.Rows[0]["birthday"].ToString();
}
}
catch (Exception ex)
{
PublicLib.handleError("", this.GetType().Name, ex.Message);
}
}
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);
}
}
protected void Get_AppointmentList()
{
string strSql = "select to_char(a.opd_date) as opd_date,a.reg_no,a.card_no, b.p_name from opd_reg a,reg_file b where a.reg_no = b.reg_no and a.card_no in ('21','22','23','24') and a.reg_type = '1' and a.time_shift = '1' order by opd_date,a.reg_no";
System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();
dt = conn.GetData(cmd);
GridView1.DataSource = dt;
GridView1.DataBind();
}
protected void btnSubmit_Click(object sender, ImageClickEventArgs e)
{
bool flag = true;
string strAlert = String.Empty;
if (flag)
{
string strSql = "Select userid From users Where userid=? And userpasswd=?";
System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
cmd.Parameters.Add("@userid", System.Data.Odbc.OdbcType.Char).Value = txtUID.Text.Trim();
cmd.Parameters.Add("@userpasswd", System.Data.Odbc.OdbcType.Char).Value = txtPwd.Text.Trim();
Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();
dt = conn.GetData(cmd);
if (dt.Rows.Count <= 0)
{
flag = false;
strAlert += "此帳號不存在或密碼錯誤";
}
}
if (flag)
{
//string strSql = "Select prog_id From ctrl_mpriv Where user_id=? And prog_id=?";
string strSql = "Select b.* From users b Inner Join ctrl_mpriv a On a.user_id=b.userid Where a.user_id=?";
System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
cmd.Parameters.Add("@user_id", System.Data.Odbc.OdbcType.Char).Value = txtUID.Text.Trim();
Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();
dt = conn.GetData(cmd);
if (dt.Rows.Count <= 0)
{
flag = false;
strAlert += "此帳號沒有本系統權限";
}
}
if (flag)
{
string strSql = "If NOT EXISTS (Select ID From HMC_Permit Where UID=@UID And ProcID='hmc0000p')" +
" Begin Insert Into HMC_Permit (ID, UID, ProcID, Cre_Date, Cre_User) Values (NEWID(), @UID, @ProcID, @Cre_Date, @Cre_User) End";
System.Data.SqlClient.SqlCommand cmd = new System.Data.SqlClient.SqlCommand(strSql);
cmd.Parameters.Add("@UID", System.Data.SqlDbType.VarChar).Value = dt.Rows[0]["userid"].ToString();
cmd.Parameters.Add("@ProcID", System.Data.SqlDbType.VarChar).Value = "hmc0000p";
cmd.Parameters.Add("@Cre_Date", System.Data.SqlDbType.DateTime).Value = DateTime.Now;
cmd.Parameters.Add("@Cre_User", System.Data.SqlDbType.VarChar).Value = dt.Rows[0]["userid"].ToString();
Dev.Sql.MyConnection conn = new Dev.Sql.MyConnection();
conn.ExecuteQuery(cmd);
Session["UID"] = dt.Rows[0][0].ToString();
Response.Redirect(ResolveUrl("~/Default.aspx"));
}
}
protected void querySql()
{
try
{
string strParam = " and a.opd_date=?";
if (!txtRegSearch.Text.Equals(""))
{
strParam += " and a.reg_no=?";
}
if (!txtIdNo.Text.Equals(""))
{
strParam += " and b.id_no=?";
}
// and room_no = 'HE'
string strSql = "select to_char(a.opd_date) as opd_date,a.reg_no,a.card_no, b.p_name, b.id_no from opd_reg a,reg_file b where a.reg_no = b.reg_no and dep_no = 'I9' " + strParam + " Order by opd_date desc, a.reg_no";
System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();
cmd.Parameters.Add("opd_date", System.Data.Odbc.OdbcType.Date).Value = DateTime.Now.ToString("yyyy/MM/dd");
if (!txtRegSearch.Text.Equals(""))
{
cmd.Parameters.Add("reg_no", System.Data.Odbc.OdbcType.Char).Value = txtRegSearch.Text;
}
if (!txtIdNo.Text.Equals(""))
{
cmd.Parameters.Add("id_no", System.Data.Odbc.OdbcType.Char).Value = txtIdNo.Text;
}
dt = conn.GetData(cmd);
PlaceHolder1.Controls.Clear();
foreach (System.Data.DataRow dr in dt.Rows)
{
string strName = dr["p_name"].ToString();
string strRegNo = dr["reg_no"].ToString();
PlaceHolder1.Controls.Add(creat_div_tophalf(strName, strRegNo));
PlaceHolder1.Controls.Add(creat_detail_btn(strName, strRegNo));
PlaceHolder1.Controls.Add(creat_div_bottomhalf(strRegNo));
}
ViewState["Generated"] = "true";
}
catch (Exception ex)
{
PublicLib.handleError("", this.GetType().Name, ex.Message);
}
}
protected void GetOpd_Reg(string strParam)
{
System.Data.DataTable dt = new System.Data.DataTable();
string strSql = "Select First 10 * From opd_reg Where reg_no=? Order By opd_date DESC";
System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
cmd.Parameters.Add("@Param", System.Data.Odbc.OdbcType.Char).Value = strParam;
Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();
dt = conn.GetData(cmd);
GridView1.DataSource = dt;
GridView1.DataBind();
}
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");
}
public string GetPackageData(string strParam)
{
string strReturn = String.Empty;
System.Data.DataTable dt = new System.Data.DataTable();
string strSql = "Select pat_code, pat_name From ordpatm Where doc_no='0000' And pat_code[1,2]='/h' And (pat_code Like '%" + strParam + "%' Or pat_name Like '%" + strParam + "%')";
System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();
dt = conn.GetData(cmd);
if (dt.Rows.Count > 0)
{
strReturn = JsonData(dt);
}
return(strReturn);
}
public string GetCodeData(string strType)
{
string strReturn = String.Empty;
System.Data.DataTable dt = new System.Data.DataTable();
string strSql = "Select * From code_file Where check_flag='Y' And item_type=?";
System.Data.Odbc.OdbcCommand cmd = new System.Data.Odbc.OdbcCommand(strSql);
cmd.Parameters.Add("@Param", System.Data.Odbc.OdbcType.Char).Value = strType;
Dev.ODBCSql.MyODBCConnection conn = new Dev.ODBCSql.MyODBCConnection();
dt = conn.GetData(cmd);
if (dt.Rows.Count > 0)
{
strReturn = JsonData(dt);
}
return(strReturn);
}
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");
}
