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

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>

src/SheetMe.Data/Stores/PatientExtraStore.cs

@@ -614,6 +614,62 @@ public sealed class PatientExtraStore
             .ToArray();
     }
 
+    /// <summary>
+    /// 적용 진료과 이름(OCM_적용진료과, :5659) — 통합 대표행의 AdpDepCod/AdpDtm 은
+    /// 진료행(CodDepCod)과 적용일시의 별칭이다(dtHISOperatingInfo.vb:3699).
+    /// 원문은 적용일시 <b>12자리 전체</b>를 8자리 유효기간과 비교한다(절단 없음) — 그대로.
+    /// </summary>
+    public string AppliedDepartmentName(string depCod, string adpDtm)
+        => depCod.Trim().Length == 0 || adpDtm.Trim().Length == 0 ? string.Empty
+            : Scalar(
+                "SELECT v FROM (SELECT DepKorNam v FROM M_DepMst"
+                + " WHERE TRIM(DepCod) = :d AND :y BETWEEN DepStrDte AND DepEndDte)"
+                + " WHERE ROWNUM = 1",
+                ("d", depCod.Trim()), ("y", adpDtm.Trim()));
+
+    /// <summary>
+    /// 전과 목록(OCM_전과, :12924 — GetCodInfDT(With_Join, 전체) 대응, dtCommonLib.vb:2777-2832).
+    /// 원문의 이름 조인(오늘 기준 유효기간, DepWrkTyp IN ('D','A') — SYBS·NYHY 의 'B' 추가는
+    /// 미이식)과 정렬(CodStrDtm 오름차순) 그대로. 원문이 DefaultView 에 건 필터·정렬은
+    /// 순회에 반영되지 않지만 SQL 이 이미 같은 조건·순서라 실질 무해했다.
+    /// </summary>
+    public IReadOnlyList<IReadOnlyDictionary<string, string>> TransferList(decimal comNum)
+        => Rows(
+            "SELECT DepKorNam AS DepNam, Cod.CodDepCod, Cod.CodStrDtm, Cod.CodEndDtm FROM P_CodInf Cod"
+            + " LEFT OUTER JOIN M_UidMst Usr ON Usr.UidCod = CodDtrCod AND Usr.UidDtrYon = 'Y'"
+            + "   AND TO_CHAR(SYSDATE, 'YYYYMMDD') BETWEEN Usr.UidStrDte AND Usr.UidEndDte"
+            + " LEFT OUTER JOIN M_DepMst Dep ON DepCod = CodDepCod AND DepHspCod = Usr.UidHspCod"
+            + "   AND DepWrkTyp IN ('D','A')"
+            + "   AND TO_CHAR(SYSDATE, 'YYYYMMDD') BETWEEN DepStrDte AND DepEndDte"
+            + " WHERE CodComNum = :m AND CodMtiSeq = '0' ORDER BY CodStrDtm",
+            ("m", comNum));
+
+    /// <summary>
+    /// 간호정보조사지의 과거력 행(OCM_간호정보조사지_과거력 :13030 + GetNurseEmrDT :13523 +
+    /// GetNurseShtCod :13770) — 서식 우선순위(S113 성인 → S202 소아 → S163 산모, SRCH 갈래)로
+    /// 고른 기록의 병력 항목 6칸을 PIVOT 한 행. 레거시는 서식 확인 3왕복 + 본조회였다 —
+    /// 우선순위를 CASE 정렬로 접어 한 왕복이다. 기록이 없으면 빈 사전.
+    /// </summary>
+    public IReadOnlyDictionary<string, string> NurseHistoryRow(decimal comNum)
+        => Row(
+            "WITH Sht AS (SELECT v FROM (SELECT EmrShtCod v FROM E_EmrInf"
+            + "  WHERE EmrComNum = :m AND EmrShtCod IN ('S113','S202','S163')"
+            + "  AND (EmrSttFlg IS NULL OR EmrSttFlg <> 'D')"
+            + "  ORDER BY CASE EmrShtCod WHEN 'S113' THEN 1 WHEN 'S202' THEN 2 ELSE 3 END)"
+            + "  WHERE ROWNUM = 1),"
+            + " Data AS (SELECT SctObjNam, EmdRecord, ShtCod FROM E_EmrInf"
+            + "  INNER JOIN E_ShtMst ON ShtCod = EmrShtCod"
+            + "  INNER JOIN E_EmdInf ON EmdEmrKey = EmrKey"
+            + "  INNER JOIN E_SctMst ON SctKey = EmdItmKey AND SctObjNam IN"
+            + "   ('chkMedHis_1','chkMedHis_2','chkMedHis_3','chkMedHis_4','chkMedHis_5','txtMedHis')"
+            + "  WHERE EmrComNum = :m AND EmrShtCod = (SELECT v FROM Sht)"
+            + "  AND (EmrSttFlg IS NULL OR EmrSttFlg <> 'D'))"
+            + " SELECT * FROM (SELECT EmdRecord, SctObjNam, ShtCod FROM Data)"
+            + " PIVOT (MIN(EmdRecord) FOR SctObjNam IN ('chkMedHis_1' AS 당뇨, 'chkMedHis_2' AS 고혈압,"
+            + " 'chkMedHis_3' AS 간염, 'chkMedHis_4' AS 결핵, 'chkMedHis_5' AS 병력기타,"
+            + " 'txtMedHis' AS 병력기타내용))",
+            ("m", comNum));
+
     /// <summary>스칼라 1칸 — 0행이거나 NULL 이면 빈 문자열. 잔여 공백은 걷는다(문맥 행과 같은 규칙)</summary>
     private string Scalar(string sql, params (string Name, object Value)[] binds)
     {