public IEnumerable <Model.Recourse> LoadRecourses(Model.InvoiceRecord irec, Model.OrderSection section, Model.ProphSubsection subsection)
{
// Query is cached
if (section != lastRecoursesSection || lastRecourceSubsection != subsection)
{
selectRecourses = null;
lastRecoursesSection = section;
lastRecourceSubsection = subsection;
}
if (selectRecourses == null)
{
string sql = LocalizeQuery(Queries.SELECT_RECOURSES);
sql = RecoursizeQuery(sql);
selectRecourses = connectionAlt.CreateCommand();
selectRecourses.CommandText = SectionizeQuery(sql, section, subsection);
AddStringParameters(selectRecourses, SELECT_RECOURSE_CASES_PARAMS);
}
string id = string.Format("{0,6}", irec.Person.Identity);
selectRecourses.Parameters[0].Value = id;
List <RecourseAux> rs = aRecourse.Load(selectRecourses).ToList();
foreach (RecourseAux ra in rs)
{
Model.Recourse rec = ra.ToRecourse();
invox.Dict.ResultOutcome.Instance.Repair(rec);
rec.Events = LoadEvents(rec, ra, section);
yield return(rec);
}
}
public IEnumerable <Model.OncologyDirection> LoadOncologyDirections(Model.Recourse rec, Model.Event evt)
{
string id = string.Format("{0,6}", evt.Identity);
selectOnkologyDirections.Parameters[0].Value = id;
return(aOncologyDirection.Load(selectOnkologyDirections));
}
public IEnumerable <Model.DispAssignment> GetDispanserisationAssignments(Model.Recourse rec, Model.Event evt)
{
string id = string.Format("{0,6}", evt.Identity);
selectDispDirections.Parameters[0].Value = id;
List <Model.DispAssignment> result = null;
Action <System.Data.Common.DbDataReader> onRead = r => {
string codes = (string)r["KSG"];
string values = (string)r["KSG2"];
Model.NeoSuspectDirection susp = null;
if (rec.SuspectOncology)
{
// TODO: Target clinic and service code for direction if oncology suspected
susp = new Model.NeoSuspectDirection()
{
Suspected = true,
DirectionDate = evt.DateTill,
TargetClinic = "XE3",
ServiceCode = "XE3"
};
}
result = Model.DispAssignment.Make(codes.Trim(), values.Trim(), susp).ToList();
};
ExecuteReader(selectDispDirections, onRead);
return(result);
}
public Model.OnkologyTreat GetOnkologyTreat(Model.Recourse rec, Model.Event evt)
{
string id = string.Format("{0,6}", evt.Identity);
selectOnkologyTreat.Parameters[0].Value = id;
Model.OnkologyTreat result = null;
ExecuteReader(selectOnkologyTreat, r => {
string mes1 = aStrings.Read(r, 0);
result = new Model.OnkologyTreat(mes1);
});
if (result != null)
{
var drugService = evt.Services.FirstOrDefault(s => s.ServiceCode / 10000 == 52);
if (drugService != null)
{
var oncoService = Lib.OncoTherapyHelper.Service[drugService.ServiceCode];
if (oncoService != null)
{
result.Services = new invox.Model.OncologyService[] { oncoService };
evt.ClinicalGroup = Lib.OncoTherapyHelper.Service.ClinicalCroupForService(drugService.ServiceCode);
oncoService.Drugs.First().Date = drugService.DateTill;
}
}
}
return(result);
}
/// <summary>
/// Создать событие и заполнить его доступными полями
/// </summary>
public Model.Event ToEvent(Model.Recourse rec, Model.OrderSection section)
{
Model.Event result = new Model.Event();
// result.Services; - Pool.LoadEvents
result.Identity = ServiceId;
result.Unit = Unit;
if (rec.IsHospitalization)
{
result.BedProfile = BedProfile;
result.Transfer = Model.Transfer.Independently;
}
else
{
result.Transfer = Model.Transfer.None;
}
result.Child = Child;
result.Reason = AidConditions == "3" ? InternalReasonHelper.ToVisitAim(InternalReason) : string.Empty;
#if FOMS
result.LocalReason = InternalReason.ToFomsReason(soul);
#endif
result.CardNumber = CardNumber;
//result.Transfer; - Pool.LoadEvents
//result.DateFrom; - Pool.LoadEvents
result.DateTill = Date;
//result.BedDays; - Pool.LoadEvents
//result.PrimaryDiagnosis; - Pool.LoadEvents
result.MainDiagnosis = MainDiagnosis;
//result.FirstIdentified; - Pool.LoadEvents
//result.ConcurrentDiagnosis; - Pool.LoadEvents
//result.ComplicationDiagnosis; - Pool.LoadEvents
//result.DispensarySupervision; - Pool.LoadEvents
//result.ConcurrentMesCode; - Pool.LoadEvents
// Hack to avoid oncology treatment services in polyclinic
//result.Rehabilitation = Rehabilitation || (section == Model.OrderSection.D4 && !rec.SuspectOncology);
result.Rehabilitation = Rehabilitation && !rec.SuspectOncology;
result.Quantity = Quantity;
result.SpecialityCode = SpecialityCode;
result.DoctorCode = DoctorCode;
//result.Tariff; - Pool.LoadEvents
//result.Total; - Pool.LoadEvents
// TODO: RecourseAux - HiTech data
//result.HiTechKind;
//result.HiTechMethod;
//result.HiTechCheckDate;
//result.HiTechCheckNumber;
//result.HiTechPlannedHospitalizationDate;
return(result);
}
/// <summary>
/// Создать повод обращения и заполнить его доступными полями
/// </summary>
public Model.Recourse ToRecourse()
{
Model.Recourse result = new Model.Recourse();
result.SuspectOncology = MainDiagnosis == SUSP_NEO_DIAGNOSIS;
result.Department = Department;
result.Profile = AidProfile;
result.Identity = ServiceId;
result.Conditions = AidConditions;
//result.AidKind; - Pool.LoadEvents
//result.AidForm; - Pool.LoadEvents
//result.DirectedFrom; - Pool.LoadEvents
// TODO: RecourseAux.DirectionDate - where to take from?
//result.DirectionDate;
//result.DateFrom; - Pool.LoadEvents
result.DateTill = Date;
//result.BedDays; - Pool.LoadEvents
//result.BirthWeight; - Pool.LoadEvents
result.Result = Result;
result.Outcome = Outcome;
//result.UnitShift - Pool.LoadEvents
result.PayKind = PayKind;
//result.Total - Pool.LoadEvents
result.PayType = PayType;
//result.AcceptedSum
//result.DeniedSum
result.MobileBrigade = MobileBrigade;
result.DispanserisationRefusal = REFUSAL_RESULTS.Contains(Result);
result.DispanserisationResult = Dict.DispResult.Get(RecourseResult);
return(result);
}
/// <summary>
/// Требуется ли направление для законченного случая
/// </summary>
/// <param name="rec">Законченный случай</param>
public static bool NeedsDirection(Model.Recourse rec)
{
// Slimed by order 285
//return rec.SuspectOncology
// // Плановая в круглосуточном стационаре или СДП
// || (rec.AidForm == AID_FORM_ORDINAL && rec.IsHospitalization)
// // Неотложная в круглосуточном стационаре
// || (rec.AidForm == AID_FORM_PRESSING && rec.Conditions == "1");
return
// В дневном стационаре
((rec.Conditions == "2")
// Плановая в круглосуточном стационаре
|| (rec.AidForm == AID_FORM_ORDINAL && rec.Conditions == "1"));
}
/// <summary>
/// Обновить вид и форму помощи случая по закрывающей услуге
/// </summary>
/// <param name="rec">Законченный случай, для которого требуется обновить вид и форму МП</param>
/// <param name="sa">Посещение, закрывающее случай</param>
public void UpdateMedicalAid(Model.Recourse rec, ServiceAux sa)
{
rec.AidKind = GetAidKind(sa);
//rec.AidForm = GetAidForm(sa);
if (InternalReason == Relax.InternalReason.Emergency)
{
rec.AidForm = AID_FORM_PRESSING;
}
else
{
rec.AidForm = AID_FORM_ORDINAL;
}
// Код врача и специальности был взят из услуги, обозначающей закрытый случай и привязанной к открывающей записи,
// но по приказу они должны соответствовать закрывающей записи
SpecialityCode = sa.SpecialityCode;
DoctorCode = sa.DoctorCode;
Result = sa.Result;
Outcome = sa.Outcome;
}
/// <summary>
/// Загрузить события для законченного случая
/// </summary>
/// <remarks>
/// В настоящий момент одному законченному случаю соответствует одно события (т.к. нет
/// внутрибольничных переводов). Здесь также загружаются услуги для события и обновляются
/// поля законченного случая данными, которые удалось получить на этом этапе.
/// </remarks>
List <Model.Event> LoadEvents(Model.Recourse rec, RecourseAux ra, Model.OrderSection section)
{
// Extract single event from the RecourseAux:
List <Model.Event> result = new List <Model.Event>();
Model.Event evt = ra.ToEvent(rec, section);
result.Add(evt);
// Load auxilliary service records and service models
List <ServiceAux> ss = LoadServices(ra, evt).Distinct(new ServiceComparer()).OrderBy(s => s.Date).ToList();
if (ra.InternalReason == InternalReason.SurgeryDayHosp &&
ss.Count(s => s.ServiceCode == ra.ServiceCode) > 1)
{
// Fix for:
// Два случая ЦАХ у одного пациента с одним и тем же диагнозом
// будут выгружены как два случая, но в каждом ВСЕ услуги из обеих госпитализаций
// Get main service
ServiceAux sa = ss.FirstOrDefault(s => s.Date == ra.Date && s.ServiceCode == ra.ServiceCode);
if (sa != null)
{
// Get hospitalization dates
DateTime till = sa.Date;
DateTime from = till.WorkingDaysBefore(sa.BedDays, true);
// Select only services with relevant dates
IEnumerable <ServiceAux> sas = ss.Where(s => s.Date <= till && s.Date >= from);
ra.UpdateMedicalAid(rec, sas.Last());
evt.Services = sas.Select(s => s.ToService(ra)).ToList();
// ...supposedly at least one services is selected: the main one
}
else
{
ra.UpdateMedicalAid(rec, ss.Last());
evt.Services = ss.Select(s => s.ToService(ra)).ToList();
}
}
else
{
ra.UpdateMedicalAid(rec, ss.Last());
evt.Services = ss.Select(s => s.ToService(ra)).ToList();
}
// 20190902 - Блядский вид медицинского вмешательства
if (ra.InternalReason == InternalReason.SurgeryDayHosp)
{
Model.Service service = evt.Services.FirstOrDefault(s => s.ServiceCode / 100000 == 3);
if (service != null)
{
string interventionKind = GetInterventionKind(service.ServiceCode);
if (!string.IsNullOrEmpty(interventionKind))
{
evt.Services.ForEach(s => s.InterventionKind = interventionKind);
}
}
}
// Код врача и специальности должны соответствовать закрывающей записи,
// приводим в соответствие из ra (где было изменено в UpdateMedicalAid())
evt.SpecialityCode = ra.SpecialityCode;
evt.DoctorCode = ra.DoctorCode;
if (rec.IsHospitalization)
{
// Update profile-shifting transfer and total of the bed days
ServiceAux serv = ss.Where(s => s.Transfer == Model.Transfer.Transferred).FirstOrDefault();
// Turn transfer to ProfileShift if there has been bed profile change:
if (serv != null &&
ss.GroupBy(s => s.BedProfile).Count() > 1)
{
serv.Transfer = Model.Transfer.ProfileShift;
}
evt.BedDays = ss.Select(s => s.BedDays).Sum();
}
// Event dates
if (ra.InternalReason == InternalReason.Stage1 || ra.InternalReason == InternalReason.Prof)
{
evt.DateTill = evt.Services.Max(s => s.DateTill);
// For DD1 - start of the recourse is an antropometry
ServiceAux sa = ss.Where(s => s.IsAntropometry()).FirstOrDefault();
if (sa != null)
{
evt.DateFrom = sa.Date;
}
else
{
evt.DateFrom = ss.Min(s => s.Date);
}
#if FOMS1
}
else if (ra.InternalReason == InternalReason.Prof)
{
// Work around error "Код способа оплаты не соответствует периоду лечения;
// Цель обращения не соответствует способу оплаты медицинской помощи"
// Prof events within a single day are discarded with this error
evt.DateFrom = ra.Date.ShiftDays(-1);
if (evt.DateFrom == ra.Date)
{
evt.DateTill = ra.Date.ShiftDays(1);
Model.Service s = evt.Services.First();
if (s != null)
{
s.DateFrom = evt.DateTill;
s.DateTill = evt.DateTill;
}
}
else
{
evt.DateTill = ra.Date;
}
#endif
}
else
{
// For other cases service with minimal date (mayhap hospitalization - reason why not ss.Min())
// 2 этап - пустая выборка
try {
evt.DateFrom = evt.Services.Min(s => s.DateFrom);
} catch (Exception e) {
Logger.Log(e.Message + string.Format(" - повод {0}, услуга {1}, S.RECID {2}", ra.InternalReason, ra.ServiceCode, ra.ServiceId));
}
evt.DateTill = evt.Services.Max(s => s.DateTill);
}
#if FOMS
// Задолбал ФОМС с их дурацкими ошибками: дд раз в 2 года ставит "неправильные даты", если дата начала и окончания не совпадают
// В подушевой услуге ставим даты начала и окончания как во всем закрытом случае
// 20190417 Хрен там, теперь не только обрезанная ДД
Model.Service ser = evt.Services.FirstOrDefault(s => s.ServiceCode / 10000 == 5);
if (ser != null)
{
ser.DateFrom = evt.DateFrom;
ser.DateTill = evt.DateTill;
}
#endif
// May change evt and ra's MainDiagnosis:
ra.FindConcurrentDiagnoses(evt, ss, section);
// Service diagnosis as recorse's in case of diagnostics
if (ra.InternalReason == InternalReason.Diagnostics)
{
evt.Services.ForEach(s => s.Diagnosis = ra.MainDiagnosis);
}
evt.ComplicationDiagnoses = ServiceAux.GetComplicationDiagnoses(ss);
// Statistic code
if (!string.IsNullOrEmpty(ra.MainDiagnosis) && ra.MainDiagnosis.First() != 'Z')
{
StatisticCode[] sc = ss
.Select(s => s.StatisticCode)
.Where(s => s > StatisticCode.None && s < StatisticCode.Dispensary)
.ToArray();
if (sc != null && sc.Count() > 0)
{
evt.StatisticsCode = (((int)sc.Max()) - 1).ToString();
}
else
{
evt.StatisticsCode = Dict.StatisticsCode.Instance.Get(ra.MainDiagnosis);
}
}
// Профиль МП случая - по профилю закрывающей записи
rec.Profile = ss.OrderBy(s => s.Date).Last().AidProfile;
// Other Event fields which can be taken from the services
evt.Tariff = evt.Services.Sum(s => s.Tariff);
evt.Total = evt.Services.Sum(s => s.Total);
evt.PrimaryDiagnosis = ss.Max(s => s.PrimaryDiagnosis);
evt.FirstIdentified = ss.Any(s => s.FirstIdentified);
if (ra.InternalReason == InternalReason.DispRegister)
{
evt.DispensarySupervision = ss.Max(s => s.DispensarySupervision);
if (evt.DispensarySupervision == Model.DispensarySupervision.None)
{
evt.DispensarySupervision = Model.DispensarySupervision.Observed;
}
}
else if (section == Model.OrderSection.D3)
{
// 20190430 - D3 section: disp supervision is explicit
evt.DispensarySupervision = ss.Max(s => s.DispensarySupervision);
// Диагнозы на R ФОМС считает подлежащими Д-учету
if (evt.DispensarySupervision < Model.DispensarySupervision.Observed ||
evt.DispensarySupervision > Model.DispensarySupervision.NotSubject)
{
if ("ZY".Contains(evt.MainDiagnosis.First()))
{
evt.DispensarySupervision = Model.DispensarySupervision.NotSubject;
}
else
{
if (evt.FirstIdentified)
{
evt.DispensarySupervision = Model.DispensarySupervision.Taken;
}
else
{
evt.DispensarySupervision = Model.DispensarySupervision.Observed;
}
}
}
}
evt.ConcurrentMesCode = ss.Max(s => s.ConcurrentMesCode);
var d2 = ss.Where(s => s.Transfer != Model.Transfer.None);
if (d2 != null && d2.Count() > 0)
{
evt.Transfer = d2.Min(s => s.Transfer);
}
// Other Recourse fields -"-
rec.UnitShift = ss.Any(s => s.Transfer == Model.Transfer.ProfileShift);
rec.BirthWeight = ss.Max(s => s.BirthWeight);
rec.DateFrom = evt.DateFrom;
rec.DateTill = evt.DateTill;
rec.Total = evt.Total;
rec.BedDays = evt.BedDays;
if (RecourseAux.NeedsDirection(rec))
{
// Extract directed-from in case when it is needed
rec.DirectedFrom = ss.Max(s => s.DirectedFrom);
if (string.IsNullOrEmpty(rec.DirectedFrom))
{
// TODO: LPU code from local to federal
rec.DirectedFrom = Options.LpuCode;
}
rec.DirectionDate = rec.DateFrom;
}
return(result);
}
public IEnumerable <Model.OncologyConsilium> LoadOncologyConsilium(Model.Recourse rec, Model.Event evt)
{
// У нас не проводятся консилиумы
yield return(new Model.OncologyConsilium(Model.OncologyConsiliumReason.NotNeeded, DateTime.Today));
}
public IEnumerable <Model.Sanction> LoadSanctions(Model.InvoiceRecord irec, Model.Recourse rec)
{
yield break;
}
public IEnumerable <string> LoadMesCodes(Model.InvoiceRecord irec, Model.Recourse rec, Model.Event evt)
{
// No sanctions yet - we're only presenting bills
yield break;
}
