/// <summary>
/// Получить вид медицинской помощи V008
/// </summary>
int GetAidKind(ServiceAux sa)
{
switch (sa.ServiceCode / 100000)
{
case 7:
return(AID_KIND_HITECH);
case 4:
return(AID_KIND_EMERGENCY);
default:
switch (sa.ServiceCode / 1000)
{
case 98:
//return AID_KIND_PRIMARY_SPECIALIZED;
return(AID_KIND_PRIMARY);
default:
if (sa.AidProfile == "97")
{
return(AID_KIND_PRIMARY);
}
else
{
return(AID_KIND_PRIMARY_SPECIALIZED);
}
}
}
}
/// <summary>
/// Получить форму оказания медицинской помощи V014
/// </summary>
int GetAidForm(ServiceAux sa)
{
if (sa.ServiceCode / 10000 == 4)
{
return(AID_FORM_URGENT);
}
if (sa.ServiceCode / 1000 == 7)
{
return(AID_FORM_PRESSING);
}
return(AID_FORM_ORDINAL);
}
public override ConcomitantDisease Read(System.Data.Common.DbDataReader reader, int number)
{
ConcomitantDisease result = new ConcomitantDisease();
result.Code = ReadString(reader["DIAG2"]);
result.DispensarySupervision = ServiceAux.GetDispensarySupervision(ReadInt(reader["HR2"]),
ReadInt(reader["HRO2"]));
StatisticCode code = (StatisticCode)ReadInt(reader["F"]);
result.FirstIdentified = code == StatisticCode.Acute ||
code == Relax.StatisticCode.ChronicalManifest;
return(result);
}
/// <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);
}