void MER_LAND()
{
this.Text = "Landbase Medical Examination Certificate Print-Out";
R_Landbade_MER1.Load(@"C:\Report\R_Landbade_MER.rpt");
crystalReportViewer10.ReportSource = R_Landbade_MER1;
crystalReportViewer10.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox(); TextBox txt_ISO = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '17'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '17'", txt_RevNo, "Revision");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '17'", txt_ISO, "ISO");
TextObject FormNo = (TextObject)R_Landbade_MER1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_Landbade_MER1.ReportDefinition.ReportObjects["txt_RevNo"];
TextObject Iso = (TextObject)R_Landbade_MER1.ReportDefinition.ReportObjects["txt_iso"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
Iso.Text = txt_ISO.Text;
crystalReportViewer10.RefreshReport();
RemoveTab(crystalReportViewer10);
// this.Text = "Landbase Medical Examination Certificate Print-Out";
LandBase_MER21.Load(@"C:\Report\LandBase_MER2.rpt");
crystalReportViewer11.ReportSource = LandBase_MER21;
crystalReportViewer11.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
crystalReportViewer11.RefreshReport();
RemoveTab(crystalReportViewer11);
}
void Detailed_LAND()
{
this.Text = "Landbase Medical Examination Certificate Print-Out";
R_Landbase_Detailed1.Load(@"C:\Report\R_Landbase_Detailed.rpt");
crystalReportViewer12.ReportSource = R_Landbase_Detailed1;
crystalReportViewer12.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox(); TextBox txt_ISO = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '16'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '16'", txt_RevNo, "Revision");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '16'", txt_ISO, "ISO");
TextObject FormNo = (TextObject)R_Landbase_Detailed1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_Landbase_Detailed1.ReportDefinition.ReportObjects["txt_RevNo"];
TextObject Iso = (TextObject)R_Landbase_Detailed1.ReportDefinition.ReportObjects["txt_iso"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
Iso.Text = txt_ISO.Text;
//R_Landbase_Detailed1.Refresh();
crystalReportViewer12.RefreshReport();
RemoveTab(crystalReportViewer12);
// wizard1.SelectedTab = tabPage12;
}
void Load_MLC()
{
this.Text = "Seafarer's Medical Examination Certificate Print-Out";
R_Seabase_MLC1.Load(@"C:\Report\R_Seabase_MLC.rpt");
crystalReportViewer1.ReportSource = R_Seabase_MLC1;
crystalReportViewer1.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '14'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '14'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)R_Seabase_MLC1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_Seabase_MLC1.ReportDefinition.ReportObjects["txt_RevNo"];
//TextObject CompanyName = (TextObject)R_Seabase_Summary1.ReportDefinition.ReportObjects["txt_CompanyName"];
//TextObject CompanyAdd = (TextObject)R_Seabase_Summary1.ReportDefinition.ReportObjects["txt_CompanyAdd"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
//CompanyName.Text = Properties.Settings.Default.CompanyName.ToString();
//CompanyAdd.Text = Properties.Settings.Default.CompanyAdd.ToString();
// R_Seabase_MLC1.Refresh();
crystalReportViewer1.RefreshReport();
RemoveTab(crystalReportViewer1);
// wizard1.SelectedTab = tabPage1;
}
void MER_SEA()
{
this.Text = "Seafarer's Medical Examination Certificate Print-Out";
R_Seabase_MER1.Load(@"C:\Report\R_Seabase_MER.rpt");
crystalReportViewer7.ReportSource = R_Seabase_MER1;
crystalReportViewer7.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '13'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '13'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)R_Seabase_MER1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_Seabase_MER1.ReportDefinition.ReportObjects["txt_RevNo"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
//R_Seabase_MER1.Refresh();
crystalReportViewer7.RefreshReport();
RemoveTab(crystalReportViewer7);
// this.Text = "Seafarer's Medical Examination Certificate Print-Out";
Seabase_MER_Page21.Load(@"C:\Report\Seabase_MER_Page2.rpt");
crystalReportViewer14.ReportSource = Seabase_MER_Page21;
crystalReportViewer14.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
//R_Seabase_MER1.Refresh();
crystalReportViewer14.RefreshReport();
RemoveTab(crystalReportViewer14);
// wizard1.SelectedTab = tabPage7;
}
void Load_XRay()
{
IniFile ini = new IniFile(ClassSql.MMS_Path);
//IniFile ini = new IniFile(ClassSql.MMS_Path);
R_Xray1.SetDatabaseLogon(ini.IniReadValue("CONNECTIONSTRING", "Uid"), ini.IniReadValue("CONNECTIONSTRING", "Pwd"), ini.IniReadValue("CONNECTIONSTRING", "Server"), ini.IniReadValue("CONNECTIONSTRING", "Database"));
this.Text = "X-Ray Report Print-Out";
R_Xray1.Load(@"C:\Report\R_Xray.rpt");
Viewer_XRAY.ReportSource = R_Xray1;
Viewer_XRAY.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
//TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
//a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '20'", txt_ForNo, "Form");
//a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '20'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)R_Xray1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_Xray1.ReportDefinition.ReportObjects["txt_RevNo"];
FormNo.Text = ini.IniReadValue("FORM", "XRAY");
RevNo.Text = ini.IniReadValue("REVISION", "XRAY");
Viewer_XRAY.RefreshReport();
RemoveTab(Viewer_XRAY);
// wizard1.SelectedTab = tabPage3;
}
void Search_byDate()
{
try
{
ClassSql a = new ClassSql(); DataTable dt;
dt = a.Table("SELECT t_result_main.cn, t_result_main.resultid, t_result_main.resulttype, t_result_main.papin, t_result_main.result_date, t_result_main.`status`, m_patient.lastname, m_patient.firstname, m_patient.middlename FROM t_result_main INNER JOIN m_patient ON t_result_main.papin = m_patient.papin WHERE result_date = '" + dt_retrieve.Text + "' ORDER BY cn ASC ");
this.dg_result.Rows.Clear();
foreach (DataRow dr in dt.Rows)
{
string name = dr["lastname"].ToString() + " , " + dr["firstname"].ToString() + " " + dr["middlename"].ToString();
string[] rows = new string[] { dr["cn"].ToString(), dr["resultid"].ToString(), dr["result_date"].ToString(), dr["resulttype"].ToString(), name.ToString(), dr["status"].ToString() };
dg_result.Rows.Add(rows);
}
}
catch (Exception ex)
{
MessageBox.Show(this, string.Format("An error occured {0}", ex.Message), Properties.Settings.Default.SystemName.ToString(), MessageBoxButtons.OK, MessageBoxIcon.Exclamation); return;
}
finally
{
if (ClassSql.cnn != null)
{
ClassSql.DbClose();
}
if (ClassSql.dr != null)
{
ClassSql.dr.Close();
}
}
}
void Load_MER()
{
R_Landbade_MER1.Load(@"C:\Report\R_Landbade_MER.rpt");
crystalReportViewer4.ReportSource = R_Landbade_MER1;
crystalReportViewer4.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox(); TextBox txt_ISO = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '17'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '17'", txt_RevNo, "Revision");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '17'", txt_ISO, "ISO");
TextObject FormNo = (TextObject)R_Landbade_MER1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_Landbade_MER1.ReportDefinition.ReportObjects["txt_RevNo"];
TextObject Iso = (TextObject)R_Landbade_MER1.ReportDefinition.ReportObjects["txt_iso"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
Iso.Text = txt_ISO.Text;
// R_Landbade_MER1.Refresh();
crystalReportViewer4.RefreshReport();
RemoveTab(crystalReportViewer4);
LandBase_MER21.Load(@"C:\Report\LandBase_MER2.rpt");
crystalReportViewer5.ReportSource = LandBase_MER21;
crystalReportViewer5.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
//ClassSql a = new ClassSql();
//TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox(); TextBox txt_ISO = new TextBox();
//a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '17'", txt_ForNo, "Form");
//a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '17'", txt_RevNo, "Revision");
//a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '17'", txt_ISO, "ISO");
//TextObject FormNo = (TextObject)R_Landbade_MER1.ReportDefinition.ReportObjects["txt_formNo"];
//TextObject RevNo = (TextObject)R_Landbade_MER1.ReportDefinition.ReportObjects["txt_RevNo"];
//TextObject Iso = (TextObject)R_Landbade_MER1.ReportDefinition.ReportObjects["txt_iso"];
//FormNo.Text = txt_ForNo.Text;
//RevNo.Text = txt_RevNo.Text;
//Iso.Text = txt_ISO.Text;
// R_Landbade_MER1.Refresh();
crystalReportViewer5.RefreshReport();
RemoveTab(crystalReportViewer5);
}
void Load_MLC()
{
R_landbaseMLC1.Load(@"C:\Report\R_landbaseMLC.rpt");
crystalReportViewer2.ReportSource = R_landbaseMLC1;
crystalReportViewer2.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '18'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '18'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)R_landbaseMLC1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_landbaseMLC1.ReportDefinition.ReportObjects["txt_RevNo"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
// R_landbaseMLC1.Refresh();
crystalReportViewer2.RefreshReport();
RemoveTab(crystalReportViewer2);
}
void Load_HIV()
{
this.Text = "Human Immunodeficiency Virus (HIV) Screening Certificate";
R_HIV1.Load(@"C:\Report\R_HIV.rpt");
crystalReportViewer4.ReportSource = R_HIV1;
crystalReportViewer4.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '7'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '7'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)R_HIV1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_HIV1.ReportDefinition.ReportObjects["txt_RevNo"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
crystalReportViewer4.RefreshReport();
RemoveTab(crystalReportViewer4);
// wizard1.SelectedTab = tabPage4;
}
void Load_XRay()
{
this.Text = "X-Ray Report Print-Out";
R_Xray1.Load(@"C:\Report\R_Xray.rpt");
crystalReportViewer3.ReportSource = R_Xray1;
crystalReportViewer3.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '20'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '20'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)R_Xray1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_Xray1.ReportDefinition.ReportObjects["txt_RevNo"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
crystalReportViewer3.RefreshReport();
RemoveTab(crystalReportViewer3);
// wizard1.SelectedTab = tabPage3;
}
private void R_Hema_CheckedChanged(object sender, EventArgs e)
{
Hema_Sub1.Load(@"C:\Report\Hema_Sub.rpt");
crystalReportViewer3.ReportSource = Hema_Sub1;
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '3'", txt_ForNo, "Form");
//a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '2'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)Hema_Sub1.ReportDefinition.ReportObjects["txt_formNo"];
//TextObject RevNo = (TextObject)R_lab_061.ReportDefinition.ReportObjects["txt_RevNo"];
FormNo.Text = txt_ForNo.Text;
//RevNo.Text = txt_RevNo.Text;
//Hema_Sub1.Refresh();
crystalReportViewer3.RefreshReport();
RemoveTab(crystalReportViewer3);
wizard1.SelectedTab = tabPage3;
}
public void load_lab06()
{
R_lab_061.Load(@"C:\Report\R_lab_06.rpt");
crystalReportViewer1.ReportSource = R_lab_061;
crystalReportViewer1.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '1'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '1'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)R_lab_061.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_lab_061.ReportDefinition.ReportObjects["txt_RevNo"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
//R_lab_061.Refresh();
crystalReportViewer1.RefreshReport();
RemoveTab(crystalReportViewer1);
wizard1.SelectedTab = tabPage1;
}
void load_Lab06()
{
lab06_sub1.Load(@"C:\Report\lab06_sub.rpt");
crystalReportViewer1.ReportSource = lab06_sub1;
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '1'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '1'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)lab06_sub1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)lab06_sub1.ReportDefinition.ReportObjects["txt_RevNo"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
//lab06_sub1.Refresh();
crystalReportViewer1.RefreshReport();
RemoveTab(crystalReportViewer1);
wizard1.SelectedTab = tabPage1;
}
private void R_Urine_CheckedChanged(object sender, EventArgs e)
{
Urine_sub1.Load(@"C:\Report\Urine_sub.rpt");
crystalReportViewer5.ReportSource = Urine_sub1;
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '5'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '5'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)Urine_sub1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)Urine_sub1.ReportDefinition.ReportObjects["txt_RevNo"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
//Urine_sub1.Refresh();
crystalReportViewer5.RefreshReport();
RemoveTab(crystalReportViewer5);
wizard1.SelectedTab = tabPage5;
}
void Psych_Eval()
{
this.Text = "Landbase Medical Examination Certificate Print-Out";
R_PsychEval1.Load(@"C:\Report\R_PsychEval.rpt");
crystalReportViewer5.ReportSource = R_PsychEval1;
//crystalReportViewer5.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "' and {t_result_main1.resulttype} = '" + "PSYCHO " + "'";
crystalReportViewer5.SelectionFormula = "{t_result_main1.resultid} ='" + this.Tag.ToString() + "' and {t_result_main1.resulttype} = '" + "PSYCHO " + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '10'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '10'", txt_RevNo, "Revision");
TextObject FormNo = (TextObject)R_PsychEval1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_PsychEval1.ReportDefinition.ReportObjects["txt_RevNo"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
//R_PsychEval1.Refresh();
crystalReportViewer5.RefreshReport();
RemoveTab(crystalReportViewer5);
wizard1.SelectedTab = tabPage5;
}
void load_Detailed()
{
R_Landbase_Detailed1.Load(@"C:\Report\R_Landbase_Detailed.rpt");
crystalReportViewer3.ReportSource = R_Landbase_Detailed1;
crystalReportViewer3.SelectionFormula = "{t_result_main1.resultid} = '" + this.Tag.ToString() + "'";
ClassSql a = new ClassSql();
TextBox txt_ForNo = new TextBox(); TextBox txt_RevNo = new TextBox(); TextBox txt_ISO = new TextBox();
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '16'", txt_ForNo, "Form");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '16'", txt_RevNo, "Revision");
a.PutDataTOTextBox("SELECT * FROM tbl_formno WHERE cn = '16'", txt_ISO, "ISO");
TextObject FormNo = (TextObject)R_Landbase_Detailed1.ReportDefinition.ReportObjects["txt_formNo"];
TextObject RevNo = (TextObject)R_Landbase_Detailed1.ReportDefinition.ReportObjects["txt_RevNo"];
TextObject Iso = (TextObject)R_Landbase_Detailed1.ReportDefinition.ReportObjects["txt_iso"];
FormNo.Text = txt_ForNo.Text;
RevNo.Text = txt_RevNo.Text;
Iso.Text = txt_ISO.Text;
// R_Landbase_Detailed1.Refresh();
crystalReportViewer3.RefreshReport();
RemoveTab(crystalReportViewer3);
}
