ncakanghan/SheetMe
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

적용진료과·전과·간호정보 과거력 4종 — 209종 → 213종

Browse Source 
OCM_적용진료과(bzDataInterface.vb:5659) — 통합 대표행의
AdpDepCod/AdpDtm 은 진료행 CodDepCod 와 적용일시의 별칭임을 확인
(dtHISOperatingInfo.vb:3699 — CodDepCod AdpDepCod, CodDtrCod
AdpDtrCod). 원문이 적용일시 12자리 전체를 8자리 유효기간과 비교하는
특이점 그대로. OCM_적용진료의사(:3939 — AdpDtrCod + 적용일 8자 →
UidNam, 기존 UserNameAt 재사용).

OCM_전과(:12924 + GetCodInfDT With_Join, dtCommonLib.vb:2777) —
진료행 전부(CodMtiSeq='0', 이름 조인은 오늘 기준·DepWrkTyp IN
('D','A'), SYBS·NYHY 의 'B' 추가 미이식)를 과가 바뀔 때만 "과명 /
시작 ~ 끝" 으로 AppendLine. 원문의 DefaultView 필터·정렬은 순회에
반영 안 되지만 SQL 이 같은 조건·순서(ORDER BY CodStrDtm)라 실질
무해였고, 무기한(2999-12-31) 판정은 Substring(1,8) 결함으로 절대
참이 안 되어 실제 값이 찍힌다 — 판정 없이 그대로.
새 사실: GetCodInfDT 는 항상 ORDER BY CodStrDtm(오름차순)이 있다 —
문맥 로드의 "최신순 1행" 결정과 다른 방향이지만 적용일시 구간에
행이 여럿 겹치는 비정상 데이터에서만 갈린다(기존 결정 유지, 기록만).

OCM_간호정보조사지_과거력(:13030 + GetNurseEmrDT :13523 +
GetNurseShtCod :13770) — 서식 우선순위(S113→S202→S163, SRCH 갈래)를
CASE 정렬로 접어 레거시 4왕복을 1왕복으로. 병력 결합 " ,"(공백+콤마)
와 무병력 시에도 붙는 개행까지 원문 그대로. GCRCH·SRH·GNBEDRO 의
서식 코드 분기는 미이식.

- dotnet test 338/338 · --edit-smoke 실패 0 (이름 검사 213종)
- --db-patient ①~㉟ 전건 통과 (적용진료과 실값 5자)
- --db-render P062 md5 8d683835f5d81e7bb41c79071d6bf954 불변

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
This commit is contained in:
Msystech
2026-08-19 19:29:33 +09:00
co-authored by Claude Fable 5
parent 7dcc4c2e48
commit f06740ae51
3 changed files with 153 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/SheetMe.Designer/Diagnostics/DbSmoke.cs
+3
View File
@@ -2448,6 +2448,9 @@ public static class DbSmoke
("수술일자", () => owner2 is null ? "-" : extra.SurgeryDate(owner2.Value, false).Length.ToString()),
("외래실진료일", () => extra.OutpatientVisitDays(extraOwner, "999912312359", "05", false).Count.ToString()),
("청구과목", () => extra.BillingDepartmentName("0506").Length.ToString()),
("적용진료과", () => extra.AppliedDepartmentName("0506", "202601011200").Length.ToString()),
("전과목록", () => owner2 is null ? "-" : extra.TransferList(owner2.Value).Count.ToString()),
("간호과거력", () => owner2 is null ? "-" : extra.NurseHistoryRow(owner2.Value).Count.ToString()),
};
var shapes2 = new List<string>();
var failed = new List<string>();
src/SheetMe.Designer/Services/PatientTagResolver.cs
+94
View File
@@ -1505,6 +1505,7 @@ public sealed class PatientTagResolver : ITagValueResolver
"OCM_당뇨식칼로리_List", "OCM_수술일자", "OCM_수술일자_마지막수술",
"OCM_외래실진료일", "OCM_외래실진료일_과목별", "OCM_외래실진료일수",
"ETC_승인의사", "OCM_수술소독간호사",
"OCM_적용진료과", "OCM_적용진료의사", "OCM_전과", "OCM_간호정보조사지_과거력",
};
/// <summary>
@@ -1943,6 +1944,98 @@ public sealed class PatientTagResolver : ITagValueResolver
// PURME 전용(:3028) — 그 밖의 병원은 빈 SQL 을 실행해 항상 빈 값이다
return new TagValue(false,
"PURME 전용 태그입니다 — 그 밖의 병원에서는 레거시도 항상 빈 값입니다");
case "OCM_적용진료과":
{
// AdpDepCod/AdpDtm 은 문맥 진료행·적용일시의 별칭이다(:5659,
// dtHISOperatingInfo.vb:3699). 원문은 12자리 적용일시를 그대로 비교한다.
var depCod = PatientContext.Value(context.CodInf, "CodDepCod");
return depCod.Length == 0
? new TagValue(false, "이 내원의 진료과 코드를 읽지 못했습니다")
: Wrap(store.AppliedDepartmentName(depCod, context.AdpDtm),
"적용일시에 유효한 진료과 마스터 행이 없습니다");
}
case "OCM_적용진료의사":
{
// GetUidMst(AdpDtrCod, 적용일 8자) → UidNam(:3939-3949)
var dtrCod = PatientContext.Value(context.CodInf, "CodDtrCod");
if (dtrCod.Length == 0)
{
return new TagValue(false, "이 내원의 담당의 코드를 읽지 못했습니다");
}
if (contextStoreSource?.Invoke() is not { } ctxStore)
{
return new TagValue(false, "진료과 시점 조회가 연결되지 않았습니다");
}
var name = ctxStore.UserNameAt(dtrCod, context.AdpDtm);
return name.Length > 0
? new TagValue(true, name)
: new TagValue(false, "적용일에 유효한 사용자 마스터 행이 없습니다");
}
case "OCM_전과":
{
var comNum = PatientContext.Value(context.ComInf, "ComNum");
if (!decimal.TryParse(comNum, out var m))
{
return new TagValue(false, "이 내원의 내원번호를 읽지 못했습니다");
}
var rows = store.TransferList(m);
if (rows.Count <= 1)
{
// 레거시는 행이 2개 이상일 때만 조립한다(:12940) — 전과가 없다는 뜻
return new TagValue(false, "전과 이력이 없습니다(진료 행이 1개 이하)");
}
// 원문 조립(:12944-12977): 과가 직전 행과 다를 때만 "과명 / 시작 ~ 끝" 을
// AppendLine — 마지막 줄 뒤에도 개행이 남는다. 무기한(2999-12-31) 판정은
// 원문의 Substring(1,8) 결함으로 절대 참이 되지 않아 실제 값이 그대로
// 찍힌다 — 그대로 옮겼다(판정 자체를 하지 않는다).
var text = new System.Text.StringBuilder();
for (var i = 0; i < rows.Count; i++)
{
var dep = PatientContext.Value(rows[i], "CodDepCod");
if (i > 0 && dep == PatientContext.Value(rows[i - 1], "CodDepCod"))
{
continue;
}
var depNam = PatientContext.Value(rows[i], "DepNam");
var from = Stamp(PatientContext.Value(rows[i], "CodStrDtm"));
var to = Stamp(PatientContext.Value(rows[i], "CodEndDtm"));
if (depNam.Length > 0 && from.Length > 0 && to.Length > 0)
{
text.Append($"{depNam} / {from} ~ {to}\r\n");
}
}
return text.Length > 0
? new TagValue(true, text.ToString())
: new TagValue(false, "조립할 전과 줄이 없습니다(과명 또는 구간이 비어 있음)");
}
case "OCM_간호정보조사지_과거력":
{
var comNum = PatientContext.Value(context.ComInf, "ComNum");
if (!decimal.TryParse(comNum, out var m))
{
return new TagValue(false, "이 내원의 내원번호를 읽지 못했습니다");
}
var row = store.NurseHistoryRow(m);
if (row.Count == 0)
{
return new TagValue(false,
"간호정보조사지 기록(S113·S202·S163)이 없습니다");
}
// 원문 조립(:13049-13092): 체크된 병력을 " ," 로 잇고(공백+콤마 — 원문
// 그대로), 기타는 리터럴 "기타". 마지막에 개행 + 기타내용 — 병력이 하나도
// 없어도 행만 있으면 개행은 붙는다.
var kinds = string.Empty;
foreach (var (column, label) in new[]
{ ("당뇨", "당뇨"), ("고혈압", "고혈압"), ("간염", "간염"),
("결핵", "결핵"), ("병력기타", "기타") })
{
if (PatientContext.Value(row, column).Length > 0)
{
kinds = kinds.Length > 0 ? $"{kinds} ,{label}" : label;
}
}
return new TagValue(true, $"{kinds}\r\n{PatientContext.Value(row, "병력기타내용")}");
}
case "OCM_전과내역":
{
var comNum = PatientContext.Value(context.ComInf, "ComNum");
@@ -2155,6 +2248,7 @@ public sealed class PatientTagResolver : ITagValueResolver
"OCM_당뇨식칼로리_List", "OCM_수술일자", "OCM_수술일자_마지막수술",
"OCM_외래실진료일", "OCM_외래실진료일_과목별", "OCM_외래실진료일수",
"ETC_승인의사", "OCM_수술소독간호사",
"OCM_적용진료과", "OCM_적용진료의사", "OCM_전과", "OCM_간호정보조사지_과거력",
"OCM_입원시간", "OCM_입원일시", "OCM_입원일시_영문", "OCM_입실시간",
"OCM_의사퇴원예고일시", "OCM_퇴원예정일시", "OCM_퇴원시간", "OCM_퇴원일시",
"OCM_퇴원예고일시", "OCM_재원일수", "OCM_퇴원예고재원일수", "OCM_입원일자_낮병동",