cuongpv/csharpcode
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Upload to server

Browse Source 
uploading
This commit is contained in:
Pham Viet Cuong
2025-08-02 05:20:17 +07:00
commit a5eccbd452
984 changed files with 3031800 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

770
patientman/PatientMan/Forms/frmExamWaitingList.cs Normal file
View File

@@ -0,0 +1,770 @@
using System;
using System.Collections.Generic;
using Datalib.EntityClasses;
using System.Linq;
using Datalib.HelperClasses;
using DevExpress.XtraGrid.Views.Grid;
using System.Drawing;
using Datalib.Linq;
using System.Windows.Forms;
namespace PatientMan.Forms
{
public partial class frmExamWaitingList : PatientMan.BasicForms.frmCommon
{
private EntityCollection<TblExaminationInfoEntity> ExamInfo { get; set; }
public EntityCollection<TblWaitingListEntity> WaitingList = new EntityCollection<TblWaitingListEntity>();
private hsphgrid focugrid;
public frmExamWaitingList()
{
InitializeComponent();
}
private void frmExamWaitingList_Load(object sender, EventArgs e)
{
xtraTabControl.SelectedTabPageIndex = 0;
}
private void gridViewExam_DoubleClick(object sender, EventArgs e)
{
string _PatientID;
_PatientID = gridViewExam.GetFocusedRowCellValue(PatientId).ToString();
var frm = new frmPatientInfo();
frm.PatientsCollection = new EntityCollection<TblPatientEntity>();
var PatientInfo = new TblPatientEntity(_PatientID);
adapter.FetchEntity(PatientInfo);
frm.PatientsCollection.Add(PatientInfo);
frm.PatientInfo = PatientInfo;
frm.LoadData();
frm.gotoExam();
frm.ShowDialog();
}
public override void LoadData()
{
var exams = new EntityCollection<TblExaminationInfoEntity>();
var patients = new EntityCollection<TblPatientEntity>();
var testcd4 = new EntityCollection<TblPreClinicsInfoEntity>();
var followup = new EntityCollection<TblDiaryEntity>();
var referrals = new EntityCollection<TblReferralsToEntity>();
adapter.FetchEntityCollection(exams, null);
adapter.FetchEntityCollection(patients, null);
adapter.FetchEntityCollection(testcd4, null);
adapter.FetchEntityCollection(followup, null);
adapter.FetchEntityCollection(referrals, null);
var res = (from element in exams
group element by element.PatientId
into groups
select groups.OrderBy(p => p.ExamDate).Last<TblExaminationInfoEntity>()).ToList<TblExaminationInfoEntity>();
var prev = (from q in res
join p in patients on q.PatientId equals p.PatientId
where (q.EndExamDate == null && q.ReExamDate >= (DateTime)barBeginDate.EditValue && q.ReExamDate <= (DateTime)barEndDate.EditValue)
select new { ARV = p.DateofArv != null ? true : false, p.TelephoneNo, p.PatientId, PatientName = strUtil.Decrypt(p.PatientName), q.ExamDate, q.ReExamDate, q.LateTimes }).ToList();
var cd4 = (from element in testcd4
where element.Testid == "01" group element by element.PatientId
into groups
select new
{
PatientId = groups.Key,
maxCD4 = groups.Max(m => m.QuantityResult),
lastCD4 = groups.Last().QuantityResult,
firstCD4 = groups.First().QuantityResult,
FirstTestDate = groups.OrderBy(m =>m.TestDate).First().TestDate,
LastTestDate = groups.OrderBy(m =>m.TestDate).Last().TestDate
}
).ToList();
var VL = (from element in testcd4
where element.Testid == "02"
group element by element.PatientId
into groups
select new
{
PatientId = groups.Key,
lastVL = groups.Last().QuantityResult,
}
).ToList();
var folowInfo = (from q in followup group q by q.PatientId into groups select new { PatientId = groups.Key, FollowNum = groups.Count(), lastFolowResult = groups.LastOrDefault().Result }).ToList();
var preresult = (from p in prev
join q in cd4 on p.PatientId equals q.PatientId into r from g in r.DefaultIfEmpty()
select new
{
p.ARV,
p.PatientId,
p.TelephoneNo,
p.PatientName,
p.ExamDate,
p.ReExamDate,
FirstTestDate=(g==null)?null:g.FirstTestDate,
LastTestDate= (g==null)?null:g.LastTestDate,
CD4 = (g==null)?null:(g.LastTestDate != null ? (DateTime.Today - g.LastTestDate.Value).Days.ToString() : "N/A"),
firstCD4=(g==null)?null:g.firstCD4,
maxCD4=(g==null)?null:g.maxCD4,
lastCD4=(g==null)?null:g.lastCD4,
TreatmentDays = (g == null) ? 0 : ((DateTime)barEndDate.EditValue - g.FirstTestDate.Value).Days,
Warning1 = (g == null) ? false : (((DateTime)barEndDate.EditValue - g.FirstTestDate.Value).Days > 365 && g.lastCD4 < 100 ? true : false),
Warning2 = (g == null) ? false : (g.lastCD4 < g.maxCD4 / 2 ? true : false),
Warning3 = (g == null) ? false : (g.lastCD4 < g.firstCD4 ? true : false),
LateTimes = p.LateTimes
}).ToList();
var result1 = (from p in preresult
join q in folowInfo on p.PatientId equals q.PatientId into g
from m in g.DefaultIfEmpty()
select new
{
p.ARV,
p.PatientId,
p.TelephoneNo,
p.PatientName,
p.ExamDate,
p.ReExamDate,
p.FirstTestDate,
p.LastTestDate,
p.CD4,
p.firstCD4,
p.maxCD4,
p.lastCD4,
p.TreatmentDays,
p.Warning1,
p.Warning2,
p.Warning3,
p.LateTimes,
FollowNum = (m == null) ? 0 : m.FollowNum,
LastFollowResult = (m == null) ? null : m.lastFolowResult
}
).ToList();
var result = (from p in result1
join q in VL on p.PatientId equals q.PatientId into g
from m in g.DefaultIfEmpty()
select new
{
p.ARV,
p.PatientId,
p.TelephoneNo,
p.PatientName,
p.ExamDate,
p.ReExamDate,
p.FirstTestDate,
p.LastTestDate,
p.CD4,
p.firstCD4,
p.maxCD4,
p.lastCD4,
p.TreatmentDays,
p.Warning1,
p.Warning2,
p.Warning3,
p.LateTimes,
p.FollowNum,
p.LastFollowResult,
vl = (m == null) ? null : m.lastVL
}
).ToList();
grdIndaysExams.DataSource = result;
grdIndaysExams.Patients = result.Select(q => q.PatientId).ToList();
}
public void GetToDayExamPatientList()
{
var exams = new EntityCollection<TblExaminationInfoEntity>();
var patients = new EntityCollection<TblPatientEntity>();
var Follows = new EntityCollection<TblDiaryEntity>();
var referrals = new EntityCollection<TblReferralsToEntity>();
DateTime Today = DateTime.Today;
adapter.FetchEntityCollection(referrals, null);
adapter.FetchEntityCollection(exams, null);
adapter.FetchEntityCollection(patients, null);
adapter.FetchEntityCollection(Follows, null);
LinqMetaData meta = new LinqMetaData(adapter);
var exclusive = (from q in referrals select q.PatientId).ToList();
var folowInfo = Follows.GroupBy(m => m.PatientId).Select(g => new { PatientId = g.Key, FollowNum = g.Count(), lastFolowResult = g.OrderBy(q => q.EventDate).Last().Result }).ToList();
var res = (from element in exams orderby element.ExamDate
group element by element.PatientId
into groups
select groups.OrderBy(p => p.ExamDate).Last<TblExaminationInfoEntity>()).Where(p=>p.EndExamDate==null).ToList<TblExaminationInfoEntity>();
var prev = (from q in res
join p in patients on q.PatientId equals p.PatientId
where ( q.ReExamDate != null && ((Today - q.ReExamDate.Value).Days >= 0) && (Today - q.ReExamDate.Value).Days > 0 && ((Today - q.ReExamDate.Value).Days <= (p.DateofArv != null ? 90 : 180)))
select new { ARV = p.DateofArv != null ? true : false, p.PatientId, PatientName = strUtil.Decrypt(p.PatientName), p.TelephoneNo, q.ExamDate, q.ReExamDate, Status = (Today - q.ReExamDate.Value).Days, LateTimes = q.LateTimes }).ToList();
var result = (from q in prev
join p in folowInfo on q.PatientId equals p.PatientId into g
from m in g.DefaultIfEmpty()
select new
{
q.ARV,
q.PatientId,
q.PatientName,
q.TelephoneNo,
q.ExamDate,
q.ReExamDate,
q.Status,
FollowNum = (m == null) ? "N/A" : m.FollowNum.ToString(),
lastFolowResult = (m == null) ? "0" : m.lastFolowResult,
q.LateTimes
}).ToList();
this.grdWaitingClients.DataSource = result;
//WaitingList.Clear();
//adapter.FetchEntityCollection(WaitingList, null);
//adapter.DeleteEntityCollection(WaitingList);
//foreach (var g in result)
//{
// TblWaitingListEntity w = new TblWaitingListEntity();
// w.PatientId = g.PatientId;
// w.PatientName = g.PatientName;
// w.ReExamDate = g.ReExamDate;
// w.FollowNum = g.FollowNum;
// w.LastFolowResult = g.lastFolowResult;
// w.LateTimes = g.LateTimes;
// w.TelephoneNo = g.TelephoneNo;
// w.Status = g.Status.ToString();
// w.Selected = false;
// w.Arv = g.ARV;
// adapter.SaveEntity(w, true, true);
//}
}
private void barSearch_ItemClick(object sender, DevExpress.XtraBars.ItemClickEventArgs e)
{
if (xtraTabControl.SelectedTabPageIndex == 0)
{
LoadData();
}
else
{
LoadDataExam();
}
}
private void gridItervalView_DoubleClick(object sender, EventArgs e)
{
string _PatientID;
_PatientID = gridItervalView.GetFocusedRowCellValue(PatientId).ToString();
var frm = new frmPatientInfo();
frm.PatientsCollection = new EntityCollection<TblPatientEntity>();
var PatientInfo = new TblPatientEntity(_PatientID);
adapter.FetchEntity(PatientInfo);
frm.PatientsCollection.Add(PatientInfo);
frm.PatientInfo = PatientInfo;
frm.LoadData();
frm.gotoExam();
frm.ShowDialog();
}
private void FillLostFollowUp()
{
var exams = new EntityCollection<TblExaminationInfoEntity>();
var patients = new EntityCollection<TblPatientEntity>();
DateTime thisToday = DateTime.Today;
adapter.FetchEntityCollection(exams, null);
adapter.FetchEntityCollection(patients, null);
var presult = (from element in exams
group element by element.PatientId
into groups
select groups.OrderBy(p => p.ExamDate).Last<TblExaminationInfoEntity>()).ToList<TblExaminationInfoEntity>();
var result = (from q in presult
join p in patients on q.PatientId equals p.PatientId
where (q.EndExamDate == null && q.ReExamDate != null && ((thisToday - q.ReExamDate.Value).Days >= 0) && (thisToday - q.ReExamDate.Value).Days > 0 && ((thisToday - q.ReExamDate.Value).Days > (p.DateofArv != null ? 90 : 180)))
select new { ARV = p.DateofArv != null ? true : false, p.PatientId, PatientName = strUtil.Decrypt(p.PatientName), p.Sex, p.BirthYear, p.TelephoneNo }).ToList();
grdLostClients.DataSource = result;
grdLostClients.Patients = result.Select(q => q.PatientId).ToList();
grdLostClients.Enabled = true;
}
private void barLoadToDay_ItemClick(object sender, DevExpress.XtraBars.ItemClickEventArgs e)
{
GetToDayExamPatientList();
LoadData();
}
public void LoadWaitingList()
{
var patients = new EntityCollection<TblPatientEntity>();
adapter.FetchEntityCollection(patients, null);
WaitingList.Clear();
adapter.FetchEntityCollection(WaitingList, null);
this.grdWaitingClients.DataSource = null;
this.grdWaitingClients.DataSource = WaitingList.Join(patients, p => p.PatientId, q => q.PatientId, (p, q) => new
{
p.PatientId,
PatientName = strUtil.Decrypt(p.PatientName),
p.ReExamDate,
p.FollowNum,
p.LastFolowResult,
p.LateTimes,
p.TelephoneNo,
p.Status,
p.Selected,
p.Arv,
q.SupporterInfo
}).ToList();
grdWaitingClients.Patients = WaitingList.Select(q => q.PatientId).ToList();
}
public void FirstLoad()
{
LoadData();
GetToDayExamPatientList();
FillLostFollowUp();
}
private void xtraTabControl_SelectedPageChanged(object sender, DevExpress.XtraTab.TabPageChangedEventArgs e)
{
switch (xtraTabControl.SelectedTabPageIndex)
{
case 1:
this.barLoadToDay.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barExamList.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barTransfer.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barBeginDate.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barEndDate.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barFilter.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientId.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientName.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientSearch.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barEndTreat.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
focugrid = (hsphgrid)grdWaitingClients;
break;
case 0:
this.barLoadToDay.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barExamList.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barTransfer.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barBeginDate.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barEndDate.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barFilter.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barEndTreat.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientId.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientName.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientSearch.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barEndTreat.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
focugrid = (hsphgrid)grdIndaysExams;
break;
case 2:
this.barExamList.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barLoadToDay.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barTransfer.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barBeginDate.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barEndDate.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barFilter.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientId.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientName.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientSearch.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barEndTreat.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
focugrid = (hsphgrid)grdLostClients;
break;
case 3:
this.barExamList.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barLoadToDay.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barTransfer.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barBeginDate.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barEndDate.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barFilter.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barEndTreat.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientId.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barPatientName.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barPatientSearch.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
focugrid = (hsphgrid)grdPatientSearch;
break;
case 4:
this.barLoadToDay.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barExamList.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barTransfer.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barBeginDate.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barEndDate.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barFilter.Visibility = DevExpress.XtraBars.BarItemVisibility.Always;
this.barEndTreat.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientId.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientName.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
this.barPatientSearch.Visibility = DevExpress.XtraBars.BarItemVisibility.Never;
focugrid = (hsphgrid)this.grdInterExam;
break;
}
}
private void frmExamWaitingList_FormClosing(object sender, FormClosingEventArgs e)
{
this.BindingContext[WaitingList].EndCurrentEdit();
adapter.SaveEntityCollection(WaitingList,true,true);
}
private void LostFollowupEnd()
{
for (int i = 0; i < gridLostView.DataRowCount; i++)
{
string Patientid = gridLostView.GetRowCellValue(i, colPatientId).ToString();
var ARV = (Boolean)gridLostView.GetRowCellValue(i, colLostArv);
LinqMetaData metadata = new LinqMetaData();
metadata.AdapterToUse = adapter;
DateTime EndDate = ARV == true ? metadata.TblExaminationInfo.Where(m => m.PatientId == Patientid).OrderByDescending(m => m.ExamDate).First().ReExamDate.Value.AddMonths(3) : metadata.TblExaminationInfo.Where(m => m.PatientId == Patientid).OrderByDescending(m => m.ExamDate).First().ReExamDate.Value.AddMonths(6);
if (metadata.TblTreatmentInfo.Where(m => m.PatientId == Patientid).Where(m => m.TreatmentId == "01").Count() > 0)
{
string Unique = metadata.TblTreatmentInfo.Where(m => m.PatientId == Patientid).Where(m => m.TreatmentId == "01").OrderByDescending(m => m.TreatmentSdate).First().UniqueKey;
TblTreatmentInfoEntity TreatmentInfo = new TblTreatmentInfoEntity(Unique);
adapter.FetchEntity(TreatmentInfo);
TreatmentInfo.TreatmentEdate = EndDate;
TreatmentInfo.ReasonId = "10";
adapter.SaveEntity(TreatmentInfo);
}
if (metadata.TblExaminationInfo.Where(m => m.PatientId == Patientid).Count() > 0)
{
string Unique = metadata.TblExaminationInfo.Where(m => m.PatientId == Patientid).OrderByDescending(m => m.ExamDate).First().UniqueKey;
TblExaminationInfoEntity Exam = new TblExaminationInfoEntity(Unique);
adapter.FetchEntity(Exam);
Exam.EndExamDate = EndDate;
Exam.ReasonEnd = "10";
adapter.SaveEntity(Exam);
}
if (metadata.TblReferralsTo.Where(m => m.PatientId == Patientid).Where(m => m.EndDate.Value == EndDate).Where(m => m.TypeId == "2").Count() == 0)
{
TblReferralsToEntity Referral = new TblReferralsToEntity(Guid.NewGuid().ToString("N"));
adapter.FetchEntity(Referral);
Referral.EndDate = EndDate;
Referral.PatientId = Patientid;
Referral.TypeId = "10";
adapter.SaveEntity(Referral);
}
}
}
private void barPatientSearch_ItemClick(object sender, DevExpress.XtraBars.ItemClickEventArgs e)
{
LinqMetaData metadata = new LinqMetaData();
metadata.AdapterToUse = adapter;
EntityCollection<TblPatientEntity> Patients = new EntityCollection<TblPatientEntity>();
adapter.FetchEntityCollection(Patients, null);
try
{
if (this.barPatientId.EditValue!=null && this.barPatientId.EditValue.ToString() != "")
{
var q = this.barPatientId.EditValue;
var result = Patients.Where(m => m.PatientId.Contains(q.ToString())).ToList();
foreach(var r in result)
{
r.PatientName = strUtil.Decrypt(r.PatientName);
}
this.grdPatientSearch.DataSource = result; return;
}
if (this.barPatientName.EditValue.ToString() != string.Empty)
{
var q = this.barPatientName.EditValue;
var result = Patients.Where(m => strUtil.Decrypt(m.PatientName).Contains(q.ToString())).ToList();
foreach (var r in result)
{
r.PatientName = strUtil.Decrypt(r.PatientName);
}
this.grdPatientSearch.DataSource = result;
return;
}
}
catch(Exception er)
{
MessageBox.Show(er.Message);
}
}
private void gridClientSearchView_DoubleClick(object sender, EventArgs e)
{
string _PatientID;
_PatientID = gridClientSearchView.GetFocusedRowCellValue(SearchPatientId).ToString();
var frm = new frmPatientInfo();
frm.PatientsCollection = new EntityCollection<TblPatientEntity>();
var PatientInfo = new TblPatientEntity(_PatientID);
adapter.FetchEntity(PatientInfo);
frm.PatientsCollection.Add(PatientInfo);
frm.PatientInfo = PatientInfo;
frm.LoadData();
frm.gotoExam();
frm.ShowDialog();
}
private void gridView_DoubleClick(object sender, EventArgs e)
{
string _PatientID = "";
_PatientID = gridLostView.GetFocusedRowCellValue(colPatientId).ToString();
var frm = new frmPatientInfo();
frm.PatientsCollection = new EntityCollection<TblPatientEntity>();
var PatientInfo = new TblPatientEntity(_PatientID);
adapter.FetchEntity(PatientInfo);
frm.PatientsCollection.Add(PatientInfo);
frm.PatientInfo = PatientInfo;
frm.LoadData();
frm.gotoExam();
frm.ShowDialog();
}
public void LoadDataExam()
{
var exams = new EntityCollection<TblExaminationInfoEntity>();
var patients = new EntityCollection<TblPatientEntity>();
var testcd4 = new EntityCollection<TblPreClinicsInfoEntity>();
var followup = new EntityCollection<TblDiaryEntity>();
var referrals = new EntityCollection<TblReferralsToEntity>();
adapter.FetchEntityCollection(exams, null);
adapter.FetchEntityCollection(patients, null);
adapter.FetchEntityCollection(testcd4, null);
adapter.FetchEntityCollection(followup, null);
adapter.FetchEntityCollection(referrals, null);
var prev = (from q in exams
join p in patients on q.PatientId equals p.PatientId
where (q.ExamDate >= (DateTime)barBeginDate.EditValue && q.ExamDate <= (DateTime)barEndDate.EditValue)
select new { ARV = p.DateofArv != null ? true : false, p.TelephoneNo, p.PatientId, PatientName = strUtil.Decrypt(p.PatientName), q.ExamDate, q.ReExamDate, q.LateTimes }).ToList();
var cd4 = (from element in testcd4
where element.Testid == "01"
group element by element.PatientId
into groups
select new
{
PatientId = groups.Key,
maxCD4 = groups.Max(m => m.QuantityResult),
lastCD4 = groups.Last().QuantityResult,
firstCD4 = groups.First().QuantityResult,
FirstTestDate = groups.OrderBy(m => m.TestDate).First().TestDate,
LastTestDate = groups.OrderBy(m => m.TestDate).Last().TestDate
}
).ToList();
var VL = (from element in testcd4
where element.Testid == "02"
group element by element.PatientId
into groups
select new
{
PatientId = groups.Key,
lastVL = groups.Last().QuantityResult,
}
).ToList();
var folowInfo = (from q in followup group q by q.PatientId into groups select new { PatientId = groups.Key, FollowNum = groups.Count(), lastFolowResult = groups.LastOrDefault().Result }).ToList();
var preresult = (from p in prev
join q in cd4 on p.PatientId equals q.PatientId into r
from g in r.DefaultIfEmpty()
select new
{
p.ARV,
p.PatientId,
p.TelephoneNo,
p.PatientName,
p.ExamDate,
p.ReExamDate,
FirstTestDate = (g == null) ? null : g.FirstTestDate,
LastTestDate = (g == null) ? null : g.LastTestDate,
CD4 = (g == null) ? null : (g.LastTestDate != null ? (DateTime.Today - g.LastTestDate.Value).Days.ToString() : "N/A"),
firstCD4 = (g == null) ? null : g.firstCD4,
maxCD4 = (g == null) ? null : g.maxCD4,
lastCD4 = (g == null) ? null : g.lastCD4,
TreatmentDays = (g == null) ? 0 : ((DateTime)barEndDate.EditValue - g.FirstTestDate.Value).Days,
Warning1 = (g == null) ? false : (((DateTime)barEndDate.EditValue - g.FirstTestDate.Value).Days > 365 && g.lastCD4 < 100 ? true : false),
Warning2 = (g == null) ? false : (g.lastCD4 < g.maxCD4 / 2 ? true : false),
Warning3 = (g == null) ? false : (g.lastCD4 < g.firstCD4 ? true : false),
LateTimes = p.LateTimes
}).ToList();
var result1 = (from p in preresult
join q in folowInfo on p.PatientId equals q.PatientId into g
from m in g.DefaultIfEmpty()
select new
{
p.ARV,
p.PatientId,
p.TelephoneNo,
p.PatientName,
p.ExamDate,
p.ReExamDate,
p.FirstTestDate,
p.LastTestDate,
p.CD4,
p.firstCD4,
p.maxCD4,
p.lastCD4,
p.TreatmentDays,
p.Warning1,
p.Warning2,
p.Warning3,
p.LateTimes,
FollowNum = (m == null) ? 0 : m.FollowNum,
LastFollowResult = (m == null) ? null : m.lastFolowResult
}
).ToList();
var result = (from p in result1
join q in VL on p.PatientId equals q.PatientId into g
from m in g.DefaultIfEmpty()
select new
{
p.ARV,
p.PatientId,
p.TelephoneNo,
p.PatientName,
p.ExamDate,
p.ReExamDate,
p.FirstTestDate,
p.LastTestDate,
p.CD4,
p.firstCD4,
p.maxCD4,
p.lastCD4,
p.TreatmentDays,
p.Warning1,
p.Warning2,
p.Warning3,
p.LateTimes,
p.FollowNum,
p.LastFollowResult,
vl = (m == null) ? null : m.lastVL
}
).ToList();
grdInterExam.DataSource = result;
grdInterExam.Patients = result.Select(q => q.PatientId).ToList();
}
private void barEndTreat_ItemClick(object sender, DevExpress.XtraBars.ItemClickEventArgs e)
{
if (MessageBox.Show("Bạn chắc chắn liệt các bệnh nhân trên trong danh sách vào đối tượng mất dấu", "Khẳng định mất dấu", MessageBoxButtons.OKCancel, MessageBoxIcon.Question) == System.Windows.Forms.DialogResult.OK)
{
LostFollowupEnd();
FillLostFollowUp();
}
}
private void grdInterExam_Click(object sender, EventArgs e)
{
focugrid = (hsphgrid) sender;
}
private void barEdit_ItemClick(object sender, DevExpress.XtraBars.ItemClickEventArgs e)
{
string _PatientID;
_PatientID = ((GridView)this.focugrid.MainView).GetFocusedRowCellValue(PatientId).ToString();
var frm = new frmPatientInfo();
frm.PatientsCollection = new EntityCollection<TblPatientEntity>();
var PatientInfo = new TblPatientEntity(_PatientID);
adapter.FetchEntity(PatientInfo);
frm.PatientsCollection.Add(PatientInfo);
frm.PatientInfo = PatientInfo;
frm.LoadData();
frm.gotoExam();
frm.ShowDialog();
}
private void grdWaitintClients_Click(object sender, EventArgs e)
{
focugrid = (hsphgrid)sender;
}
private void grdLostClients_Click(object sender, EventArgs e)
{
focugrid = (hsphgrid)sender;
}
private void grdPatientSearch_Click(object sender, EventArgs e)
{
focugrid = (hsphgrid)sender;
}
private void grdIndaysExams_Click(object sender, EventArgs e)
{
focugrid = (hsphgrid)sender;
}
}
}