IBDEI0DV ; ; 03-MAY-2022
;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 2022
Q:'DIFQR(358.3) F I=1:2 S X=$T(Q+I) Q:X="" S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E S @X=Y
Q Q
;;^UTILITY(U,$J,358.3,34773,1,3,0)
;;=3^Arthritis Streptococcal,Unspec Joint
;;^UTILITY(U,$J,358.3,34773,1,4,0)
;;=4^M00.20
;;^UTILITY(U,$J,358.3,34773,2)
;;=^5009645
;;^UTILITY(U,$J,358.3,34774,0)
;;=M00.80^^105^1435^4
;;^UTILITY(U,$J,358.3,34774,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34774,1,3,0)
;;=3^Arthritis d/t Bacteria,Unspec Joint
;;^UTILITY(U,$J,358.3,34774,1,4,0)
;;=4^M00.80
;;^UTILITY(U,$J,358.3,34774,2)
;;=^5009669
;;^UTILITY(U,$J,358.3,34775,0)
;;=M00.9^^105^1435^77
;;^UTILITY(U,$J,358.3,34775,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34775,1,3,0)
;;=3^Pyogenic Arthritis,Unspec
;;^UTILITY(U,$J,358.3,34775,1,4,0)
;;=4^M00.9
;;^UTILITY(U,$J,358.3,34775,2)
;;=^5009693
;;^UTILITY(U,$J,358.3,34776,0)
;;=M00.00^^105^1435^83
;;^UTILITY(U,$J,358.3,34776,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34776,1,3,0)
;;=3^Staphylococcal Arthritis,Unspec Joint
;;^UTILITY(U,$J,358.3,34776,1,4,0)
;;=4^M00.00
;;^UTILITY(U,$J,358.3,34776,2)
;;=^5009597
;;^UTILITY(U,$J,358.3,34777,0)
;;=M00.10^^105^1435^69
;;^UTILITY(U,$J,358.3,34777,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34777,1,3,0)
;;=3^Pneumococcal Arthritis,Unspec Joint
;;^UTILITY(U,$J,358.3,34777,1,4,0)
;;=4^M00.10
;;^UTILITY(U,$J,358.3,34777,2)
;;=^5009621
;;^UTILITY(U,$J,358.3,34778,0)
;;=M86.20^^105^1435^65
;;^UTILITY(U,$J,358.3,34778,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34778,1,3,0)
;;=3^Osteomyelitis,Subacute,Unspec Site
;;^UTILITY(U,$J,358.3,34778,1,4,0)
;;=4^M86.20
;;^UTILITY(U,$J,358.3,34778,2)
;;=^5014535
;;^UTILITY(U,$J,358.3,34779,0)
;;=M86.10^^105^1435^61
;;^UTILITY(U,$J,358.3,34779,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34779,1,3,0)
;;=3^Osteomyelitis,Acute,Unspec Site
;;^UTILITY(U,$J,358.3,34779,1,4,0)
;;=4^M86.10
;;^UTILITY(U,$J,358.3,34779,2)
;;=^5014521
;;^UTILITY(U,$J,358.3,34780,0)
;;=M86.00^^105^1435^60
;;^UTILITY(U,$J,358.3,34780,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34780,1,3,0)
;;=3^Osteomyelitis,Acute Hematogenous,Unspec Site
;;^UTILITY(U,$J,358.3,34780,1,4,0)
;;=4^M86.00
;;^UTILITY(U,$J,358.3,34780,2)
;;=^5014497
;;^UTILITY(U,$J,358.3,34781,0)
;;=M86.50^^105^1435^62
;;^UTILITY(U,$J,358.3,34781,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34781,1,3,0)
;;=3^Osteomyelitis,Chronic Hematogenous,Unspec Site
;;^UTILITY(U,$J,358.3,34781,1,4,0)
;;=4^M86.50
;;^UTILITY(U,$J,358.3,34781,2)
;;=^5014607
;;^UTILITY(U,$J,358.3,34782,0)
;;=M86.30^^105^1435^63
;;^UTILITY(U,$J,358.3,34782,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34782,1,3,0)
;;=3^Osteomyelitis,Chronic Multifocal,Unspec Site
;;^UTILITY(U,$J,358.3,34782,1,4,0)
;;=4^M86.30
;;^UTILITY(U,$J,358.3,34782,2)
;;=^5014559
;;^UTILITY(U,$J,358.3,34783,0)
;;=M86.8X9^^105^1435^66
;;^UTILITY(U,$J,358.3,34783,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34783,1,3,0)
;;=3^Osteomyelitis,Unspec Sites
;;^UTILITY(U,$J,358.3,34783,1,4,0)
;;=4^M86.8X9
;;^UTILITY(U,$J,358.3,34783,2)
;;=^5014655
;;^UTILITY(U,$J,358.3,34784,0)
;;=M86.60^^105^1435^64
;;^UTILITY(U,$J,358.3,34784,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34784,1,3,0)
;;=3^Osteomyelitis,Chronic,Unspec Site
;;^UTILITY(U,$J,358.3,34784,1,4,0)
;;=4^M86.60
;;^UTILITY(U,$J,358.3,34784,2)
;;=^5014630
;;^UTILITY(U,$J,358.3,34785,0)
;;=M86.40^^105^1435^59
;;^UTILITY(U,$J,358.3,34785,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34785,1,3,0)
;;=3^Osteomyelitis w/ Draining Sinus,Chronic,Unspec Site
;;^UTILITY(U,$J,358.3,34785,1,4,0)
;;=4^M86.40
;;^UTILITY(U,$J,358.3,34785,2)
;;=^5014583
;;^UTILITY(U,$J,358.3,34786,0)
;;=R50.2^^105^1435^26
;;^UTILITY(U,$J,358.3,34786,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34786,1,3,0)
;;=3^Fever,Drug-Induced
;;^UTILITY(U,$J,358.3,34786,1,4,0)
;;=4^R50.2
;;^UTILITY(U,$J,358.3,34786,2)
;;=^5019507
;;^UTILITY(U,$J,358.3,34787,0)
;;=R50.9^^105^1435^30
;;^UTILITY(U,$J,358.3,34787,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34787,1,3,0)
;;=3^Fever,Unspec
;;^UTILITY(U,$J,358.3,34787,1,4,0)
;;=4^R50.9
;;^UTILITY(U,$J,358.3,34787,2)
;;=^5019512
;;^UTILITY(U,$J,358.3,34788,0)
;;=R76.11^^105^1435^1
;;^UTILITY(U,$J,358.3,34788,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34788,1,3,0)
;;=3^Abnormal Reaction to TB Test w/o Active TB
;;^UTILITY(U,$J,358.3,34788,1,4,0)
;;=4^R76.11
;;^UTILITY(U,$J,358.3,34788,2)
;;=^5019570
;;^UTILITY(U,$J,358.3,34789,0)
;;=Z21.^^105^1435^33
;;^UTILITY(U,$J,358.3,34789,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34789,1,3,0)
;;=3^HIV Asymptomatic,Infection Status
;;^UTILITY(U,$J,358.3,34789,1,4,0)
;;=4^Z21.
;;^UTILITY(U,$J,358.3,34789,2)
;;=^5062777
;;^UTILITY(U,$J,358.3,34790,0)
;;=B37.0^^105^1435^18
;;^UTILITY(U,$J,358.3,34790,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34790,1,3,0)
;;=3^Candidal Stomatitis (Oral Thrush)
;;^UTILITY(U,$J,358.3,34790,1,4,0)
;;=4^B37.0
;;^UTILITY(U,$J,358.3,34790,2)
;;=^5000612
;;^UTILITY(U,$J,358.3,34791,0)
;;=B97.10^^105^1435^25
;;^UTILITY(U,$J,358.3,34791,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34791,1,3,0)
;;=3^Enterovirus,Unspec,as Cause of Disease
;;^UTILITY(U,$J,358.3,34791,1,4,0)
;;=4^B97.10
;;^UTILITY(U,$J,358.3,34791,2)
;;=^5000861
;;^UTILITY(U,$J,358.3,34792,0)
;;=R50.82^^105^1435^27
;;^UTILITY(U,$J,358.3,34792,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34792,1,3,0)
;;=3^Fever,Postprocedural
;;^UTILITY(U,$J,358.3,34792,1,4,0)
;;=4^R50.82
;;^UTILITY(U,$J,358.3,34792,2)
;;=^5019509
;;^UTILITY(U,$J,358.3,34793,0)
;;=R50.83^^105^1435^29
;;^UTILITY(U,$J,358.3,34793,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34793,1,3,0)
;;=3^Fever,Postvaccination
;;^UTILITY(U,$J,358.3,34793,1,4,0)
;;=4^R50.83
;;^UTILITY(U,$J,358.3,34793,2)
;;=^5019510
;;^UTILITY(U,$J,358.3,34794,0)
;;=R50.84^^105^1435^28
;;^UTILITY(U,$J,358.3,34794,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34794,1,3,0)
;;=3^Fever,Posttransfusion
;;^UTILITY(U,$J,358.3,34794,1,4,0)
;;=4^R50.84
;;^UTILITY(U,$J,358.3,34794,2)
;;=^5019511
;;^UTILITY(U,$J,358.3,34795,0)
;;=B02.23^^105^1435^74
;;^UTILITY(U,$J,358.3,34795,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34795,1,3,0)
;;=3^Postherpetic Polyneuropathy
;;^UTILITY(U,$J,358.3,34795,1,4,0)
;;=4^B02.23
;;^UTILITY(U,$J,358.3,34795,2)
;;=^266550
;;^UTILITY(U,$J,358.3,34796,0)
;;=B02.22^^105^1435^75
;;^UTILITY(U,$J,358.3,34796,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34796,1,3,0)
;;=3^Postherpetic Trigeminal Neuralgia
;;^UTILITY(U,$J,358.3,34796,1,4,0)
;;=4^B02.22
;;^UTILITY(U,$J,358.3,34796,2)
;;=^266546
;;^UTILITY(U,$J,358.3,34797,0)
;;=J03.91^^105^1435^87
;;^UTILITY(U,$J,358.3,34797,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34797,1,3,0)
;;=3^Tonsillitis,Acute Recurrent,Unspec
;;^UTILITY(U,$J,358.3,34797,1,4,0)
;;=4^J03.91
;;^UTILITY(U,$J,358.3,34797,2)
;;=^5008136
;;^UTILITY(U,$J,358.3,34798,0)
;;=U07.1^^105^1435^16
;;^UTILITY(U,$J,358.3,34798,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34798,1,3,0)
;;=3^COVID-19
;;^UTILITY(U,$J,358.3,34798,1,4,0)
;;=4^U07.1
;;^UTILITY(U,$J,358.3,34798,2)
;;=^5159070
;;^UTILITY(U,$J,358.3,34799,0)
;;=A84.81^^105^1435^76
;;^UTILITY(U,$J,358.3,34799,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34799,1,3,0)
;;=3^Powassan Virus Disease
;;^UTILITY(U,$J,358.3,34799,1,4,0)
;;=4^A84.81
;;^UTILITY(U,$J,358.3,34799,2)
;;=^5159071
;;^UTILITY(U,$J,358.3,34800,0)
;;=A84.89^^105^1435^85
;;^UTILITY(U,$J,358.3,34800,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34800,1,3,0)
;;=3^Tick-Borne Viral Encephalitis,Other
;;^UTILITY(U,$J,358.3,34800,1,4,0)
;;=4^A84.89
;;^UTILITY(U,$J,358.3,34800,2)
;;=^5159072
;;^UTILITY(U,$J,358.3,34801,0)
;;=A84.9^^105^1435^86
;;^UTILITY(U,$J,358.3,34801,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34801,1,3,0)
;;=3^Tick-Borne Viral Encephalitis,Unspec
;;^UTILITY(U,$J,358.3,34801,1,4,0)
;;=4^A84.9
;;^UTILITY(U,$J,358.3,34801,2)
;;=^5000426
;;^UTILITY(U,$J,358.3,34802,0)
;;=Z11.52^^105^1435^17
;;^UTILITY(U,$J,358.3,34802,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34802,1,3,0)
;;=3^COVID-19 Screening
;;^UTILITY(U,$J,358.3,34802,1,4,0)
;;=4^Z11.52
;;^UTILITY(U,$J,358.3,34802,2)
;;=^5160186
;;^UTILITY(U,$J,358.3,34803,0)
;;=Z20.822^^105^1435^21
;;^UTILITY(U,$J,358.3,34803,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34803,1,3,0)
;;=3^Contact with & Suspected Exposure to COVID-19
;;^UTILITY(U,$J,358.3,34803,1,4,0)
;;=4^Z20.822
;;^UTILITY(U,$J,358.3,34803,2)
;;=^5160187
;;^UTILITY(U,$J,358.3,34804,0)
;;=Z86.16^^105^1435^68
;;^UTILITY(U,$J,358.3,34804,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34804,1,3,0)
;;=3^Personal Hx of COVID-19
;;^UTILITY(U,$J,358.3,34804,1,4,0)
;;=4^Z86.16
;;^UTILITY(U,$J,358.3,34804,2)
;;=^5160188
;;^UTILITY(U,$J,358.3,34805,0)
;;=K70.0^^105^1436^3
;;^UTILITY(U,$J,358.3,34805,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34805,1,3,0)
;;=3^Alcoholic Fatty Liver
;;^UTILITY(U,$J,358.3,34805,1,4,0)
;;=4^K70.0
;;^UTILITY(U,$J,358.3,34805,2)
;;=^5008784
;;^UTILITY(U,$J,358.3,34806,0)
;;=K70.11^^105^1436^7
;;^UTILITY(U,$J,358.3,34806,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34806,1,3,0)
;;=3^Alcoholic Hepatitis w/ Ascites
;;^UTILITY(U,$J,358.3,34806,1,4,0)
;;=4^K70.11
;;^UTILITY(U,$J,358.3,34806,2)
;;=^5008786
;;^UTILITY(U,$J,358.3,34807,0)
;;=K70.10^^105^1436^8
;;^UTILITY(U,$J,358.3,34807,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34807,1,3,0)
;;=3^Alcoholic Hepatitis w/o Ascites
;;^UTILITY(U,$J,358.3,34807,1,4,0)
;;=4^K70.10
;;^UTILITY(U,$J,358.3,34807,2)
;;=^5008785
;;^UTILITY(U,$J,358.3,34808,0)
;;=K70.2^^105^1436^4
;;^UTILITY(U,$J,358.3,34808,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34808,1,3,0)
;;=3^Alcoholic Fibrosis & Sclerosis of Liver
;;^UTILITY(U,$J,358.3,34808,1,4,0)
;;=4^K70.2
;;^UTILITY(U,$J,358.3,34808,2)
;;=^5008787
;;^UTILITY(U,$J,358.3,34809,0)
;;=K70.30^^105^1436^2
;;^UTILITY(U,$J,358.3,34809,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34809,1,3,0)
;;=3^Alcoholic Cirrhosis of Liver w/o Ascites
;;^UTILITY(U,$J,358.3,34809,1,4,0)
;;=4^K70.30
;;^UTILITY(U,$J,358.3,34809,2)
;;=^5008788
;;^UTILITY(U,$J,358.3,34810,0)
;;=K70.31^^105^1436^1
;;^UTILITY(U,$J,358.3,34810,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34810,1,3,0)
;;=3^Alcoholic Cirrhosis of Liver w/ Ascites
;;^UTILITY(U,$J,358.3,34810,1,4,0)
;;=4^K70.31
;;^UTILITY(U,$J,358.3,34810,2)
;;=^5008789
;;^UTILITY(U,$J,358.3,34811,0)
;;=K70.9^^105^1436^9
;;^UTILITY(U,$J,358.3,34811,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34811,1,3,0)
;;=3^Alcoholic Liver Disease,Unspec
;;^UTILITY(U,$J,358.3,34811,1,4,0)
;;=4^K70.9
;;^UTILITY(U,$J,358.3,34811,2)
;;=^5008792
;;^UTILITY(U,$J,358.3,34812,0)
;;=K70.40^^105^1436^6
;;^UTILITY(U,$J,358.3,34812,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34812,1,3,0)
;;=3^Alcoholic Hepatic Failure w/o Coma
;;^UTILITY(U,$J,358.3,34812,1,4,0)
;;=4^K70.40
;;^UTILITY(U,$J,358.3,34812,2)
;;=^5008790
;;^UTILITY(U,$J,358.3,34813,0)
;;=K70.41^^105^1436^5
;;^UTILITY(U,$J,358.3,34813,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34813,1,3,0)
;;=3^Alcoholic Hepatic Failure w/ Coma
;;^UTILITY(U,$J,358.3,34813,1,4,0)
;;=4^K70.41
;;^UTILITY(U,$J,358.3,34813,2)
;;=^5008791
;;^UTILITY(U,$J,358.3,34814,0)
;;=K73.0^^105^1436^17
;;^UTILITY(U,$J,358.3,34814,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34814,1,3,0)
;;=3^Hepatitis, Chronic Persistent NEC
;;^UTILITY(U,$J,358.3,34814,1,4,0)
;;=4^K73.0
;;^UTILITY(U,$J,358.3,34814,2)
;;=^5008811
;;^UTILITY(U,$J,358.3,34815,0)
;;=K74.69^^105^1436^10
;;^UTILITY(U,$J,358.3,34815,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34815,1,3,0)
;;=3^Cirrhosis of Liver,Oth
;;^UTILITY(U,$J,358.3,34815,1,4,0)
;;=4^K74.69
;;^UTILITY(U,$J,358.3,34815,2)
;;=^5008823
;;^UTILITY(U,$J,358.3,34816,0)
;;=K74.60^^105^1436^11
;;^UTILITY(U,$J,358.3,34816,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34816,1,3,0)
;;=3^Cirrhosis of Liver,Unspec
;;^UTILITY(U,$J,358.3,34816,1,4,0)
;;=4^K74.60
;;^UTILITY(U,$J,358.3,34816,2)
;;=^5008822
;;^UTILITY(U,$J,358.3,34817,0)
;;=K76.0^^105^1436^12
;;^UTILITY(U,$J,358.3,34817,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34817,1,3,0)
;;=3^Fatty Liver NEC
;;^UTILITY(U,$J,358.3,34817,1,4,0)
;;=4^K76.0
;;^UTILITY(U,$J,358.3,34817,2)
;;=^5008831
;;^UTILITY(U,$J,358.3,34818,0)
;;=K76.89^^105^1436^20
;;^UTILITY(U,$J,358.3,34818,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34818,1,3,0)
;;=3^Liver Disease NEC
;;^UTILITY(U,$J,358.3,34818,1,4,0)
;;=4^K76.89
;;^UTILITY(U,$J,358.3,34818,2)
;;=^5008835
;;^UTILITY(U,$J,358.3,34819,0)
;;=K71.6^^105^1436^34
;;^UTILITY(U,$J,358.3,34819,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34819,1,3,0)
;;=3^Toxic Liver Disease w/ Hepatitis NEC
;;^UTILITY(U,$J,358.3,34819,1,4,0)
;;=4^K71.6
;;^UTILITY(U,$J,358.3,34819,2)
;;=^5008801
;;^UTILITY(U,$J,358.3,34820,0)
;;=K75.9^^105^1436^19
;;^UTILITY(U,$J,358.3,34820,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34820,1,3,0)
;;=3^Inflammatory Liver Disease,Unspec
;;^UTILITY(U,$J,358.3,34820,1,4,0)
;;=4^K75.9
;;^UTILITY(U,$J,358.3,34820,2)
;;=^5008830
;;^UTILITY(U,$J,358.3,34821,0)
;;=K71.0^^105^1436^26
;;^UTILITY(U,$J,358.3,34821,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34821,1,3,0)
;;=3^Toxic Liver Disease w/ Cholestasis
;;^UTILITY(U,$J,358.3,34821,1,4,0)
;;=4^K71.0
;;^UTILITY(U,$J,358.3,34821,2)
;;=^5008793
;;^UTILITY(U,$J,358.3,34822,0)
;;=K71.10^^105^1436^32
;;^UTILITY(U,$J,358.3,34822,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34822,1,3,0)
;;=3^Toxic Liver Disease w/ Hepatic Necrosis w/o Coma
;;^UTILITY(U,$J,358.3,34822,1,4,0)
;;=4^K71.10
;;^UTILITY(U,$J,358.3,34822,2)
;;=^5008794
;;^UTILITY(U,$J,358.3,34823,0)
;;=K71.11^^105^1436^33
;;^UTILITY(U,$J,358.3,34823,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34823,1,3,0)
;;=3^Toxic Liver Disease w/ Hepatic Necrosis w/ Coma
;;^UTILITY(U,$J,358.3,34823,1,4,0)
;;=4^K71.11
;;^UTILITY(U,$J,358.3,34823,2)
;;=^5008795
;;^UTILITY(U,$J,358.3,34824,0)
;;=K71.2^^105^1436^25
;;^UTILITY(U,$J,358.3,34824,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34824,1,3,0)
;;=3^Toxic Liver Disease w/ Acute Hepatitis
;;^UTILITY(U,$J,358.3,34824,1,4,0)
;;=4^K71.2
;;^UTILITY(U,$J,358.3,34824,2)
;;=^5008796
;;^UTILITY(U,$J,358.3,34825,0)
;;=K71.3^^105^1436^30
;;^UTILITY(U,$J,358.3,34825,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34825,1,3,0)
;;=3^Toxic Liver Disease w/ Chronic Persistent Hepatitis
;;^UTILITY(U,$J,358.3,34825,1,4,0)
;;=4^K71.3
;;^UTILITY(U,$J,358.3,34825,2)
;;=^5008797
;;^UTILITY(U,$J,358.3,34826,0)
;;=K71.4^^105^1436^29
;;^UTILITY(U,$J,358.3,34826,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34826,1,3,0)
;;=3^Toxic Liver Disease w/ Chronic Lobular Hepatitis
;;^UTILITY(U,$J,358.3,34826,1,4,0)
;;=4^K71.4
;;^UTILITY(U,$J,358.3,34826,2)
;;=^5008798
;;^UTILITY(U,$J,358.3,34827,0)
;;=K75.81^^105^1436^21
;;^UTILITY(U,$J,358.3,34827,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34827,1,3,0)
;;=3^Nonalcoholic Steatohepatitis (NASH)
;;^UTILITY(U,$J,358.3,34827,1,4,0)
;;=4^K75.81
;;^UTILITY(U,$J,358.3,34827,2)
;;=^5008828
;;^UTILITY(U,$J,358.3,34828,0)
;;=K75.89^^105^1436^18
;;^UTILITY(U,$J,358.3,34828,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34828,1,3,0)
;;=3^Inflammatory Liver Disease,Oth Spec
;;^UTILITY(U,$J,358.3,34828,1,4,0)
;;=4^K75.89
;;^UTILITY(U,$J,358.3,34828,2)
;;=^5008829
;;^UTILITY(U,$J,358.3,34829,0)
;;=K76.4^^105^1436^23
;;^UTILITY(U,$J,358.3,34829,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34829,1,3,0)
;;=3^Peliosis Hepatis
;;^UTILITY(U,$J,358.3,34829,1,4,0)
;;=4^K76.4
;;^UTILITY(U,$J,358.3,34829,2)
;;=^91041
;;^UTILITY(U,$J,358.3,34830,0)
;;=K71.50^^105^1436^27
;;^UTILITY(U,$J,358.3,34830,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34830,1,3,0)
;;=3^Toxic Liver Disease w/ Chronic Active Hepatitis w/o Ascites
;;^UTILITY(U,$J,358.3,34830,1,4,0)
;;=4^K71.50
;;^UTILITY(U,$J,358.3,34830,2)
;;=^5008799
;;^UTILITY(U,$J,358.3,34831,0)
;;=K71.51^^105^1436^28
;;^UTILITY(U,$J,358.3,34831,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34831,1,3,0)
;;=3^Toxic Liver Disease w/ Chronic Active Hepatitis w/ Ascites
;;^UTILITY(U,$J,358.3,34831,1,4,0)
;;=4^K71.51
;;^UTILITY(U,$J,358.3,34831,2)
;;=^5008800
;;^UTILITY(U,$J,358.3,34832,0)
;;=K71.7^^105^1436^31
;;^UTILITY(U,$J,358.3,34832,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34832,1,3,0)
;;=3^Toxic Liver Disease w/ Fibrosis & Cirrhosis of Liver
;;^UTILITY(U,$J,358.3,34832,1,4,0)
;;=4^K71.7
;;^UTILITY(U,$J,358.3,34832,2)
;;=^5008802
;;^UTILITY(U,$J,358.3,34833,0)
;;=K71.8^^105^1436^35
;;^UTILITY(U,$J,358.3,34833,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34833,1,3,0)
;;=3^Toxic Liver Disease w/ Oth Disorders of Liver
;;^UTILITY(U,$J,358.3,34833,1,4,0)
;;=4^K71.8
;;^UTILITY(U,$J,358.3,34833,2)
;;=^5008803
;;^UTILITY(U,$J,358.3,34834,0)
;;=K71.9^^105^1436^36
;;^UTILITY(U,$J,358.3,34834,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34834,1,3,0)
;;=3^Toxic Liver Disease,Unspec
;;^UTILITY(U,$J,358.3,34834,1,4,0)
;;=4^K71.9
;;^UTILITY(U,$J,358.3,34834,2)
;;=^5008804
;;^UTILITY(U,$J,358.3,34835,0)
;;=K75.2^^105^1436^22
;;^UTILITY(U,$J,358.3,34835,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34835,1,3,0)
;;=3^Nonspecific Reactive Hepatitis
;;^UTILITY(U,$J,358.3,34835,1,4,0)
;;=4^K75.2
;;^UTILITY(U,$J,358.3,34835,2)
;;=^5008826
;;^UTILITY(U,$J,358.3,34836,0)
;;=K75.3^^105^1436^13
;;^UTILITY(U,$J,358.3,34836,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34836,1,3,0)
;;=3^Granulomatous Hepatitis NEC
;;^UTILITY(U,$J,358.3,34836,1,4,0)
;;=4^K75.3
;;^UTILITY(U,$J,358.3,34836,2)
;;=^5008827
;;^UTILITY(U,$J,358.3,34837,0)
;;=K76.6^^105^1436^24
;;^UTILITY(U,$J,358.3,34837,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34837,1,3,0)
;;=3^Portal Hypertension
;;^UTILITY(U,$J,358.3,34837,1,4,0)
;;=4^K76.6
;;^UTILITY(U,$J,358.3,34837,2)
;;=^5008834
;;^UTILITY(U,$J,358.3,34838,0)
;;=K74.00^^105^1436^16
;;^UTILITY(U,$J,358.3,34838,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34838,1,3,0)
;;=3^Hepatic Fibrosis,Unspec
;;^UTILITY(U,$J,358.3,34838,1,4,0)
;;=4^K74.00
;;^UTILITY(U,$J,358.3,34838,2)
;;=^5159218
;;^UTILITY(U,$J,358.3,34839,0)
;;=K74.01^^105^1436^15
;;^UTILITY(U,$J,358.3,34839,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34839,1,3,0)
;;=3^Hepatic Fibrosis,Early Fibrosis
;;^UTILITY(U,$J,358.3,34839,1,4,0)
;;=4^K74.01
;;^UTILITY(U,$J,358.3,34839,2)
;;=^5159219
;;^UTILITY(U,$J,358.3,34840,0)
;;=K74.02^^105^1436^14
;;^UTILITY(U,$J,358.3,34840,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,34840,1,3,0)
;;=3^Hepatic Fibrosis,Advanced Fibrosis
;;^UTILITY(U,$J,358.3,34840,1,4,0)
;;=4^K74.02
;;^UTILITY(U,$J,358.3,34840,2)
;;=^5159220
;;^UTILITY(U,$J,358.3,34841,0)
;;=F20.3^^105^1437^31
;;^UTILITY(U,$J,358.3,34841,1,0)
;;=^358.31IA^4^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0DV 19762 printed Sep 23, 2025@19:22:44 Page 2
IBDEI0DV ; ; 03-MAY-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 2022
+2 if 'DIFQR(358.3)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
if X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
if $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)
if $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,358.3,34773,1,3,0)
+2 ;;=3^Arthritis Streptococcal,Unspec Joint
+3 ;;^UTILITY(U,$J,358.3,34773,1,4,0)
+4 ;;=4^M00.20
+5 ;;^UTILITY(U,$J,358.3,34773,2)
+6 ;;=^5009645
+7 ;;^UTILITY(U,$J,358.3,34774,0)
+8 ;;=M00.80^^105^1435^4
+9 ;;^UTILITY(U,$J,358.3,34774,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,34774,1,3,0)
+12 ;;=3^Arthritis d/t Bacteria,Unspec Joint
+13 ;;^UTILITY(U,$J,358.3,34774,1,4,0)
+14 ;;=4^M00.80
+15 ;;^UTILITY(U,$J,358.3,34774,2)
+16 ;;=^5009669
+17 ;;^UTILITY(U,$J,358.3,34775,0)
+18 ;;=M00.9^^105^1435^77
+19 ;;^UTILITY(U,$J,358.3,34775,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,34775,1,3,0)
+22 ;;=3^Pyogenic Arthritis,Unspec
+23 ;;^UTILITY(U,$J,358.3,34775,1,4,0)
+24 ;;=4^M00.9
+25 ;;^UTILITY(U,$J,358.3,34775,2)
+26 ;;=^5009693
+27 ;;^UTILITY(U,$J,358.3,34776,0)
+28 ;;=M00.00^^105^1435^83
+29 ;;^UTILITY(U,$J,358.3,34776,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,34776,1,3,0)
+32 ;;=3^Staphylococcal Arthritis,Unspec Joint
+33 ;;^UTILITY(U,$J,358.3,34776,1,4,0)
+34 ;;=4^M00.00
+35 ;;^UTILITY(U,$J,358.3,34776,2)
+36 ;;=^5009597
+37 ;;^UTILITY(U,$J,358.3,34777,0)
+38 ;;=M00.10^^105^1435^69
+39 ;;^UTILITY(U,$J,358.3,34777,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,34777,1,3,0)
+42 ;;=3^Pneumococcal Arthritis,Unspec Joint
+43 ;;^UTILITY(U,$J,358.3,34777,1,4,0)
+44 ;;=4^M00.10
+45 ;;^UTILITY(U,$J,358.3,34777,2)
+46 ;;=^5009621
+47 ;;^UTILITY(U,$J,358.3,34778,0)
+48 ;;=M86.20^^105^1435^65
+49 ;;^UTILITY(U,$J,358.3,34778,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,34778,1,3,0)
+52 ;;=3^Osteomyelitis,Subacute,Unspec Site
+53 ;;^UTILITY(U,$J,358.3,34778,1,4,0)
+54 ;;=4^M86.20
+55 ;;^UTILITY(U,$J,358.3,34778,2)
+56 ;;=^5014535
+57 ;;^UTILITY(U,$J,358.3,34779,0)
+58 ;;=M86.10^^105^1435^61
+59 ;;^UTILITY(U,$J,358.3,34779,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,34779,1,3,0)
+62 ;;=3^Osteomyelitis,Acute,Unspec Site
+63 ;;^UTILITY(U,$J,358.3,34779,1,4,0)
+64 ;;=4^M86.10
+65 ;;^UTILITY(U,$J,358.3,34779,2)
+66 ;;=^5014521
+67 ;;^UTILITY(U,$J,358.3,34780,0)
+68 ;;=M86.00^^105^1435^60
+69 ;;^UTILITY(U,$J,358.3,34780,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,34780,1,3,0)
+72 ;;=3^Osteomyelitis,Acute Hematogenous,Unspec Site
+73 ;;^UTILITY(U,$J,358.3,34780,1,4,0)
+74 ;;=4^M86.00
+75 ;;^UTILITY(U,$J,358.3,34780,2)
+76 ;;=^5014497
+77 ;;^UTILITY(U,$J,358.3,34781,0)
+78 ;;=M86.50^^105^1435^62
+79 ;;^UTILITY(U,$J,358.3,34781,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,34781,1,3,0)
+82 ;;=3^Osteomyelitis,Chronic Hematogenous,Unspec Site
+83 ;;^UTILITY(U,$J,358.3,34781,1,4,0)
+84 ;;=4^M86.50
+85 ;;^UTILITY(U,$J,358.3,34781,2)
+86 ;;=^5014607
+87 ;;^UTILITY(U,$J,358.3,34782,0)
+88 ;;=M86.30^^105^1435^63
+89 ;;^UTILITY(U,$J,358.3,34782,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,34782,1,3,0)
+92 ;;=3^Osteomyelitis,Chronic Multifocal,Unspec Site
+93 ;;^UTILITY(U,$J,358.3,34782,1,4,0)
+94 ;;=4^M86.30
+95 ;;^UTILITY(U,$J,358.3,34782,2)
+96 ;;=^5014559
+97 ;;^UTILITY(U,$J,358.3,34783,0)
+98 ;;=M86.8X9^^105^1435^66
+99 ;;^UTILITY(U,$J,358.3,34783,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,34783,1,3,0)
+102 ;;=3^Osteomyelitis,Unspec Sites
+103 ;;^UTILITY(U,$J,358.3,34783,1,4,0)
+104 ;;=4^M86.8X9
+105 ;;^UTILITY(U,$J,358.3,34783,2)
+106 ;;=^5014655
+107 ;;^UTILITY(U,$J,358.3,34784,0)
+108 ;;=M86.60^^105^1435^64
+109 ;;^UTILITY(U,$J,358.3,34784,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,34784,1,3,0)
+112 ;;=3^Osteomyelitis,Chronic,Unspec Site
+113 ;;^UTILITY(U,$J,358.3,34784,1,4,0)
+114 ;;=4^M86.60
+115 ;;^UTILITY(U,$J,358.3,34784,2)
+116 ;;=^5014630
+117 ;;^UTILITY(U,$J,358.3,34785,0)
+118 ;;=M86.40^^105^1435^59
+119 ;;^UTILITY(U,$J,358.3,34785,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,34785,1,3,0)
+122 ;;=3^Osteomyelitis w/ Draining Sinus,Chronic,Unspec Site
+123 ;;^UTILITY(U,$J,358.3,34785,1,4,0)
+124 ;;=4^M86.40
+125 ;;^UTILITY(U,$J,358.3,34785,2)
+126 ;;=^5014583
+127 ;;^UTILITY(U,$J,358.3,34786,0)
+128 ;;=R50.2^^105^1435^26
+129 ;;^UTILITY(U,$J,358.3,34786,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,34786,1,3,0)
+132 ;;=3^Fever,Drug-Induced
+133 ;;^UTILITY(U,$J,358.3,34786,1,4,0)
+134 ;;=4^R50.2
+135 ;;^UTILITY(U,$J,358.3,34786,2)
+136 ;;=^5019507
+137 ;;^UTILITY(U,$J,358.3,34787,0)
+138 ;;=R50.9^^105^1435^30
+139 ;;^UTILITY(U,$J,358.3,34787,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,34787,1,3,0)
+142 ;;=3^Fever,Unspec
+143 ;;^UTILITY(U,$J,358.3,34787,1,4,0)
+144 ;;=4^R50.9
+145 ;;^UTILITY(U,$J,358.3,34787,2)
+146 ;;=^5019512
+147 ;;^UTILITY(U,$J,358.3,34788,0)
+148 ;;=R76.11^^105^1435^1
+149 ;;^UTILITY(U,$J,358.3,34788,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,34788,1,3,0)
+152 ;;=3^Abnormal Reaction to TB Test w/o Active TB
+153 ;;^UTILITY(U,$J,358.3,34788,1,4,0)
+154 ;;=4^R76.11
+155 ;;^UTILITY(U,$J,358.3,34788,2)
+156 ;;=^5019570
+157 ;;^UTILITY(U,$J,358.3,34789,0)
+158 ;;=Z21.^^105^1435^33
+159 ;;^UTILITY(U,$J,358.3,34789,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,34789,1,3,0)
+162 ;;=3^HIV Asymptomatic,Infection Status
+163 ;;^UTILITY(U,$J,358.3,34789,1,4,0)
+164 ;;=4^Z21.
+165 ;;^UTILITY(U,$J,358.3,34789,2)
+166 ;;=^5062777
+167 ;;^UTILITY(U,$J,358.3,34790,0)
+168 ;;=B37.0^^105^1435^18
+169 ;;^UTILITY(U,$J,358.3,34790,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,34790,1,3,0)
+172 ;;=3^Candidal Stomatitis (Oral Thrush)
+173 ;;^UTILITY(U,$J,358.3,34790,1,4,0)
+174 ;;=4^B37.0
+175 ;;^UTILITY(U,$J,358.3,34790,2)
+176 ;;=^5000612
+177 ;;^UTILITY(U,$J,358.3,34791,0)
+178 ;;=B97.10^^105^1435^25
+179 ;;^UTILITY(U,$J,358.3,34791,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,34791,1,3,0)
+182 ;;=3^Enterovirus,Unspec,as Cause of Disease
+183 ;;^UTILITY(U,$J,358.3,34791,1,4,0)
+184 ;;=4^B97.10
+185 ;;^UTILITY(U,$J,358.3,34791,2)
+186 ;;=^5000861
+187 ;;^UTILITY(U,$J,358.3,34792,0)
+188 ;;=R50.82^^105^1435^27
+189 ;;^UTILITY(U,$J,358.3,34792,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,34792,1,3,0)
+192 ;;=3^Fever,Postprocedural
+193 ;;^UTILITY(U,$J,358.3,34792,1,4,0)
+194 ;;=4^R50.82
+195 ;;^UTILITY(U,$J,358.3,34792,2)
+196 ;;=^5019509
+197 ;;^UTILITY(U,$J,358.3,34793,0)
+198 ;;=R50.83^^105^1435^29
+199 ;;^UTILITY(U,$J,358.3,34793,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,34793,1,3,0)
+202 ;;=3^Fever,Postvaccination
+203 ;;^UTILITY(U,$J,358.3,34793,1,4,0)
+204 ;;=4^R50.83
+205 ;;^UTILITY(U,$J,358.3,34793,2)
+206 ;;=^5019510
+207 ;;^UTILITY(U,$J,358.3,34794,0)
+208 ;;=R50.84^^105^1435^28
+209 ;;^UTILITY(U,$J,358.3,34794,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,34794,1,3,0)
+212 ;;=3^Fever,Posttransfusion
+213 ;;^UTILITY(U,$J,358.3,34794,1,4,0)
+214 ;;=4^R50.84
+215 ;;^UTILITY(U,$J,358.3,34794,2)
+216 ;;=^5019511
+217 ;;^UTILITY(U,$J,358.3,34795,0)
+218 ;;=B02.23^^105^1435^74
+219 ;;^UTILITY(U,$J,358.3,34795,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,34795,1,3,0)
+222 ;;=3^Postherpetic Polyneuropathy
+223 ;;^UTILITY(U,$J,358.3,34795,1,4,0)
+224 ;;=4^B02.23
+225 ;;^UTILITY(U,$J,358.3,34795,2)
+226 ;;=^266550
+227 ;;^UTILITY(U,$J,358.3,34796,0)
+228 ;;=B02.22^^105^1435^75
+229 ;;^UTILITY(U,$J,358.3,34796,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,34796,1,3,0)
+232 ;;=3^Postherpetic Trigeminal Neuralgia
+233 ;;^UTILITY(U,$J,358.3,34796,1,4,0)
+234 ;;=4^B02.22
+235 ;;^UTILITY(U,$J,358.3,34796,2)
+236 ;;=^266546
+237 ;;^UTILITY(U,$J,358.3,34797,0)
+238 ;;=J03.91^^105^1435^87
+239 ;;^UTILITY(U,$J,358.3,34797,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,34797,1,3,0)
+242 ;;=3^Tonsillitis,Acute Recurrent,Unspec
+243 ;;^UTILITY(U,$J,358.3,34797,1,4,0)
+244 ;;=4^J03.91
+245 ;;^UTILITY(U,$J,358.3,34797,2)
+246 ;;=^5008136
+247 ;;^UTILITY(U,$J,358.3,34798,0)
+248 ;;=U07.1^^105^1435^16
+249 ;;^UTILITY(U,$J,358.3,34798,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,34798,1,3,0)
+252 ;;=3^COVID-19
+253 ;;^UTILITY(U,$J,358.3,34798,1,4,0)
+254 ;;=4^U07.1
+255 ;;^UTILITY(U,$J,358.3,34798,2)
+256 ;;=^5159070
+257 ;;^UTILITY(U,$J,358.3,34799,0)
+258 ;;=A84.81^^105^1435^76
+259 ;;^UTILITY(U,$J,358.3,34799,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,34799,1,3,0)
+262 ;;=3^Powassan Virus Disease
+263 ;;^UTILITY(U,$J,358.3,34799,1,4,0)
+264 ;;=4^A84.81
+265 ;;^UTILITY(U,$J,358.3,34799,2)
+266 ;;=^5159071
+267 ;;^UTILITY(U,$J,358.3,34800,0)
+268 ;;=A84.89^^105^1435^85
+269 ;;^UTILITY(U,$J,358.3,34800,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,34800,1,3,0)
+272 ;;=3^Tick-Borne Viral Encephalitis,Other
+273 ;;^UTILITY(U,$J,358.3,34800,1,4,0)
+274 ;;=4^A84.89
+275 ;;^UTILITY(U,$J,358.3,34800,2)
+276 ;;=^5159072
+277 ;;^UTILITY(U,$J,358.3,34801,0)
+278 ;;=A84.9^^105^1435^86
+279 ;;^UTILITY(U,$J,358.3,34801,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,34801,1,3,0)
+282 ;;=3^Tick-Borne Viral Encephalitis,Unspec
+283 ;;^UTILITY(U,$J,358.3,34801,1,4,0)
+284 ;;=4^A84.9
+285 ;;^UTILITY(U,$J,358.3,34801,2)
+286 ;;=^5000426
+287 ;;^UTILITY(U,$J,358.3,34802,0)
+288 ;;=Z11.52^^105^1435^17
+289 ;;^UTILITY(U,$J,358.3,34802,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,34802,1,3,0)
+292 ;;=3^COVID-19 Screening
+293 ;;^UTILITY(U,$J,358.3,34802,1,4,0)
+294 ;;=4^Z11.52
+295 ;;^UTILITY(U,$J,358.3,34802,2)
+296 ;;=^5160186
+297 ;;^UTILITY(U,$J,358.3,34803,0)
+298 ;;=Z20.822^^105^1435^21
+299 ;;^UTILITY(U,$J,358.3,34803,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,34803,1,3,0)
+302 ;;=3^Contact with & Suspected Exposure to COVID-19
+303 ;;^UTILITY(U,$J,358.3,34803,1,4,0)
+304 ;;=4^Z20.822
+305 ;;^UTILITY(U,$J,358.3,34803,2)
+306 ;;=^5160187
+307 ;;^UTILITY(U,$J,358.3,34804,0)
+308 ;;=Z86.16^^105^1435^68
+309 ;;^UTILITY(U,$J,358.3,34804,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,34804,1,3,0)
+312 ;;=3^Personal Hx of COVID-19
+313 ;;^UTILITY(U,$J,358.3,34804,1,4,0)
+314 ;;=4^Z86.16
+315 ;;^UTILITY(U,$J,358.3,34804,2)
+316 ;;=^5160188
+317 ;;^UTILITY(U,$J,358.3,34805,0)
+318 ;;=K70.0^^105^1436^3
+319 ;;^UTILITY(U,$J,358.3,34805,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,34805,1,3,0)
+322 ;;=3^Alcoholic Fatty Liver
+323 ;;^UTILITY(U,$J,358.3,34805,1,4,0)
+324 ;;=4^K70.0
+325 ;;^UTILITY(U,$J,358.3,34805,2)
+326 ;;=^5008784
+327 ;;^UTILITY(U,$J,358.3,34806,0)
+328 ;;=K70.11^^105^1436^7
+329 ;;^UTILITY(U,$J,358.3,34806,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,34806,1,3,0)
+332 ;;=3^Alcoholic Hepatitis w/ Ascites
+333 ;;^UTILITY(U,$J,358.3,34806,1,4,0)
+334 ;;=4^K70.11
+335 ;;^UTILITY(U,$J,358.3,34806,2)
+336 ;;=^5008786
+337 ;;^UTILITY(U,$J,358.3,34807,0)
+338 ;;=K70.10^^105^1436^8
+339 ;;^UTILITY(U,$J,358.3,34807,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,34807,1,3,0)
+342 ;;=3^Alcoholic Hepatitis w/o Ascites
+343 ;;^UTILITY(U,$J,358.3,34807,1,4,0)
+344 ;;=4^K70.10
+345 ;;^UTILITY(U,$J,358.3,34807,2)
+346 ;;=^5008785
+347 ;;^UTILITY(U,$J,358.3,34808,0)
+348 ;;=K70.2^^105^1436^4
+349 ;;^UTILITY(U,$J,358.3,34808,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,34808,1,3,0)
+352 ;;=3^Alcoholic Fibrosis & Sclerosis of Liver
+353 ;;^UTILITY(U,$J,358.3,34808,1,4,0)
+354 ;;=4^K70.2
+355 ;;^UTILITY(U,$J,358.3,34808,2)
+356 ;;=^5008787
+357 ;;^UTILITY(U,$J,358.3,34809,0)
+358 ;;=K70.30^^105^1436^2
+359 ;;^UTILITY(U,$J,358.3,34809,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,34809,1,3,0)
+362 ;;=3^Alcoholic Cirrhosis of Liver w/o Ascites
+363 ;;^UTILITY(U,$J,358.3,34809,1,4,0)
+364 ;;=4^K70.30
+365 ;;^UTILITY(U,$J,358.3,34809,2)
+366 ;;=^5008788
+367 ;;^UTILITY(U,$J,358.3,34810,0)
+368 ;;=K70.31^^105^1436^1
+369 ;;^UTILITY(U,$J,358.3,34810,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,34810,1,3,0)
+372 ;;=3^Alcoholic Cirrhosis of Liver w/ Ascites
+373 ;;^UTILITY(U,$J,358.3,34810,1,4,0)
+374 ;;=4^K70.31
+375 ;;^UTILITY(U,$J,358.3,34810,2)
+376 ;;=^5008789
+377 ;;^UTILITY(U,$J,358.3,34811,0)
+378 ;;=K70.9^^105^1436^9
+379 ;;^UTILITY(U,$J,358.3,34811,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,34811,1,3,0)
+382 ;;=3^Alcoholic Liver Disease,Unspec
+383 ;;^UTILITY(U,$J,358.3,34811,1,4,0)
+384 ;;=4^K70.9
+385 ;;^UTILITY(U,$J,358.3,34811,2)
+386 ;;=^5008792
+387 ;;^UTILITY(U,$J,358.3,34812,0)
+388 ;;=K70.40^^105^1436^6
+389 ;;^UTILITY(U,$J,358.3,34812,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,34812,1,3,0)
+392 ;;=3^Alcoholic Hepatic Failure w/o Coma
+393 ;;^UTILITY(U,$J,358.3,34812,1,4,0)
+394 ;;=4^K70.40
+395 ;;^UTILITY(U,$J,358.3,34812,2)
+396 ;;=^5008790
+397 ;;^UTILITY(U,$J,358.3,34813,0)
+398 ;;=K70.41^^105^1436^5
+399 ;;^UTILITY(U,$J,358.3,34813,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,34813,1,3,0)
+402 ;;=3^Alcoholic Hepatic Failure w/ Coma
+403 ;;^UTILITY(U,$J,358.3,34813,1,4,0)
+404 ;;=4^K70.41
+405 ;;^UTILITY(U,$J,358.3,34813,2)
+406 ;;=^5008791
+407 ;;^UTILITY(U,$J,358.3,34814,0)
+408 ;;=K73.0^^105^1436^17
+409 ;;^UTILITY(U,$J,358.3,34814,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,34814,1,3,0)
+412 ;;=3^Hepatitis, Chronic Persistent NEC
+413 ;;^UTILITY(U,$J,358.3,34814,1,4,0)
+414 ;;=4^K73.0
+415 ;;^UTILITY(U,$J,358.3,34814,2)
+416 ;;=^5008811
+417 ;;^UTILITY(U,$J,358.3,34815,0)
+418 ;;=K74.69^^105^1436^10
+419 ;;^UTILITY(U,$J,358.3,34815,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,34815,1,3,0)
+422 ;;=3^Cirrhosis of Liver,Oth
+423 ;;^UTILITY(U,$J,358.3,34815,1,4,0)
+424 ;;=4^K74.69
+425 ;;^UTILITY(U,$J,358.3,34815,2)
+426 ;;=^5008823
+427 ;;^UTILITY(U,$J,358.3,34816,0)
+428 ;;=K74.60^^105^1436^11
+429 ;;^UTILITY(U,$J,358.3,34816,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,34816,1,3,0)
+432 ;;=3^Cirrhosis of Liver,Unspec
+433 ;;^UTILITY(U,$J,358.3,34816,1,4,0)
+434 ;;=4^K74.60
+435 ;;^UTILITY(U,$J,358.3,34816,2)
+436 ;;=^5008822
+437 ;;^UTILITY(U,$J,358.3,34817,0)
+438 ;;=K76.0^^105^1436^12
+439 ;;^UTILITY(U,$J,358.3,34817,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,34817,1,3,0)
+442 ;;=3^Fatty Liver NEC
+443 ;;^UTILITY(U,$J,358.3,34817,1,4,0)
+444 ;;=4^K76.0
+445 ;;^UTILITY(U,$J,358.3,34817,2)
+446 ;;=^5008831
+447 ;;^UTILITY(U,$J,358.3,34818,0)
+448 ;;=K76.89^^105^1436^20
+449 ;;^UTILITY(U,$J,358.3,34818,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,34818,1,3,0)
+452 ;;=3^Liver Disease NEC
+453 ;;^UTILITY(U,$J,358.3,34818,1,4,0)
+454 ;;=4^K76.89
+455 ;;^UTILITY(U,$J,358.3,34818,2)
+456 ;;=^5008835
+457 ;;^UTILITY(U,$J,358.3,34819,0)
+458 ;;=K71.6^^105^1436^34
+459 ;;^UTILITY(U,$J,358.3,34819,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,34819,1,3,0)
+462 ;;=3^Toxic Liver Disease w/ Hepatitis NEC
+463 ;;^UTILITY(U,$J,358.3,34819,1,4,0)
+464 ;;=4^K71.6
+465 ;;^UTILITY(U,$J,358.3,34819,2)
+466 ;;=^5008801
+467 ;;^UTILITY(U,$J,358.3,34820,0)
+468 ;;=K75.9^^105^1436^19
+469 ;;^UTILITY(U,$J,358.3,34820,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,34820,1,3,0)
+472 ;;=3^Inflammatory Liver Disease,Unspec
+473 ;;^UTILITY(U,$J,358.3,34820,1,4,0)
+474 ;;=4^K75.9
+475 ;;^UTILITY(U,$J,358.3,34820,2)
+476 ;;=^5008830
+477 ;;^UTILITY(U,$J,358.3,34821,0)
+478 ;;=K71.0^^105^1436^26
+479 ;;^UTILITY(U,$J,358.3,34821,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,34821,1,3,0)
+482 ;;=3^Toxic Liver Disease w/ Cholestasis
+483 ;;^UTILITY(U,$J,358.3,34821,1,4,0)
+484 ;;=4^K71.0
+485 ;;^UTILITY(U,$J,358.3,34821,2)
+486 ;;=^5008793
+487 ;;^UTILITY(U,$J,358.3,34822,0)
+488 ;;=K71.10^^105^1436^32
+489 ;;^UTILITY(U,$J,358.3,34822,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,34822,1,3,0)
+492 ;;=3^Toxic Liver Disease w/ Hepatic Necrosis w/o Coma
+493 ;;^UTILITY(U,$J,358.3,34822,1,4,0)
+494 ;;=4^K71.10
+495 ;;^UTILITY(U,$J,358.3,34822,2)
+496 ;;=^5008794
+497 ;;^UTILITY(U,$J,358.3,34823,0)
+498 ;;=K71.11^^105^1436^33
+499 ;;^UTILITY(U,$J,358.3,34823,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,34823,1,3,0)
+502 ;;=3^Toxic Liver Disease w/ Hepatic Necrosis w/ Coma
+503 ;;^UTILITY(U,$J,358.3,34823,1,4,0)
+504 ;;=4^K71.11
+505 ;;^UTILITY(U,$J,358.3,34823,2)
+506 ;;=^5008795
+507 ;;^UTILITY(U,$J,358.3,34824,0)
+508 ;;=K71.2^^105^1436^25
+509 ;;^UTILITY(U,$J,358.3,34824,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,34824,1,3,0)
+512 ;;=3^Toxic Liver Disease w/ Acute Hepatitis
+513 ;;^UTILITY(U,$J,358.3,34824,1,4,0)
+514 ;;=4^K71.2
+515 ;;^UTILITY(U,$J,358.3,34824,2)
+516 ;;=^5008796
+517 ;;^UTILITY(U,$J,358.3,34825,0)
+518 ;;=K71.3^^105^1436^30
+519 ;;^UTILITY(U,$J,358.3,34825,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,34825,1,3,0)
+522 ;;=3^Toxic Liver Disease w/ Chronic Persistent Hepatitis
+523 ;;^UTILITY(U,$J,358.3,34825,1,4,0)
+524 ;;=4^K71.3
+525 ;;^UTILITY(U,$J,358.3,34825,2)
+526 ;;=^5008797
+527 ;;^UTILITY(U,$J,358.3,34826,0)
+528 ;;=K71.4^^105^1436^29
+529 ;;^UTILITY(U,$J,358.3,34826,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,34826,1,3,0)
+532 ;;=3^Toxic Liver Disease w/ Chronic Lobular Hepatitis
+533 ;;^UTILITY(U,$J,358.3,34826,1,4,0)
+534 ;;=4^K71.4
+535 ;;^UTILITY(U,$J,358.3,34826,2)
+536 ;;=^5008798
+537 ;;^UTILITY(U,$J,358.3,34827,0)
+538 ;;=K75.81^^105^1436^21
+539 ;;^UTILITY(U,$J,358.3,34827,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,34827,1,3,0)
+542 ;;=3^Nonalcoholic Steatohepatitis (NASH)
+543 ;;^UTILITY(U,$J,358.3,34827,1,4,0)
+544 ;;=4^K75.81
+545 ;;^UTILITY(U,$J,358.3,34827,2)
+546 ;;=^5008828
+547 ;;^UTILITY(U,$J,358.3,34828,0)
+548 ;;=K75.89^^105^1436^18
+549 ;;^UTILITY(U,$J,358.3,34828,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,34828,1,3,0)
+552 ;;=3^Inflammatory Liver Disease,Oth Spec
+553 ;;^UTILITY(U,$J,358.3,34828,1,4,0)
+554 ;;=4^K75.89
+555 ;;^UTILITY(U,$J,358.3,34828,2)
+556 ;;=^5008829
+557 ;;^UTILITY(U,$J,358.3,34829,0)
+558 ;;=K76.4^^105^1436^23
+559 ;;^UTILITY(U,$J,358.3,34829,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,34829,1,3,0)
+562 ;;=3^Peliosis Hepatis
+563 ;;^UTILITY(U,$J,358.3,34829,1,4,0)
+564 ;;=4^K76.4
+565 ;;^UTILITY(U,$J,358.3,34829,2)
+566 ;;=^91041
+567 ;;^UTILITY(U,$J,358.3,34830,0)
+568 ;;=K71.50^^105^1436^27
+569 ;;^UTILITY(U,$J,358.3,34830,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,34830,1,3,0)
+572 ;;=3^Toxic Liver Disease w/ Chronic Active Hepatitis w/o Ascites
+573 ;;^UTILITY(U,$J,358.3,34830,1,4,0)
+574 ;;=4^K71.50
+575 ;;^UTILITY(U,$J,358.3,34830,2)
+576 ;;=^5008799
+577 ;;^UTILITY(U,$J,358.3,34831,0)
+578 ;;=K71.51^^105^1436^28
+579 ;;^UTILITY(U,$J,358.3,34831,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,34831,1,3,0)
+582 ;;=3^Toxic Liver Disease w/ Chronic Active Hepatitis w/ Ascites
+583 ;;^UTILITY(U,$J,358.3,34831,1,4,0)
+584 ;;=4^K71.51
+585 ;;^UTILITY(U,$J,358.3,34831,2)
+586 ;;=^5008800
+587 ;;^UTILITY(U,$J,358.3,34832,0)
+588 ;;=K71.7^^105^1436^31
+589 ;;^UTILITY(U,$J,358.3,34832,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,34832,1,3,0)
+592 ;;=3^Toxic Liver Disease w/ Fibrosis & Cirrhosis of Liver
+593 ;;^UTILITY(U,$J,358.3,34832,1,4,0)
+594 ;;=4^K71.7
+595 ;;^UTILITY(U,$J,358.3,34832,2)
+596 ;;=^5008802
+597 ;;^UTILITY(U,$J,358.3,34833,0)
+598 ;;=K71.8^^105^1436^35
+599 ;;^UTILITY(U,$J,358.3,34833,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,34833,1,3,0)
+602 ;;=3^Toxic Liver Disease w/ Oth Disorders of Liver
+603 ;;^UTILITY(U,$J,358.3,34833,1,4,0)
+604 ;;=4^K71.8
+605 ;;^UTILITY(U,$J,358.3,34833,2)
+606 ;;=^5008803
+607 ;;^UTILITY(U,$J,358.3,34834,0)
+608 ;;=K71.9^^105^1436^36
+609 ;;^UTILITY(U,$J,358.3,34834,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,34834,1,3,0)
+612 ;;=3^Toxic Liver Disease,Unspec
+613 ;;^UTILITY(U,$J,358.3,34834,1,4,0)
+614 ;;=4^K71.9
+615 ;;^UTILITY(U,$J,358.3,34834,2)
+616 ;;=^5008804
+617 ;;^UTILITY(U,$J,358.3,34835,0)
+618 ;;=K75.2^^105^1436^22
+619 ;;^UTILITY(U,$J,358.3,34835,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,34835,1,3,0)
+622 ;;=3^Nonspecific Reactive Hepatitis
+623 ;;^UTILITY(U,$J,358.3,34835,1,4,0)
+624 ;;=4^K75.2
+625 ;;^UTILITY(U,$J,358.3,34835,2)
+626 ;;=^5008826
+627 ;;^UTILITY(U,$J,358.3,34836,0)
+628 ;;=K75.3^^105^1436^13
+629 ;;^UTILITY(U,$J,358.3,34836,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,34836,1,3,0)
+632 ;;=3^Granulomatous Hepatitis NEC
+633 ;;^UTILITY(U,$J,358.3,34836,1,4,0)
+634 ;;=4^K75.3
+635 ;;^UTILITY(U,$J,358.3,34836,2)
+636 ;;=^5008827
+637 ;;^UTILITY(U,$J,358.3,34837,0)
+638 ;;=K76.6^^105^1436^24
+639 ;;^UTILITY(U,$J,358.3,34837,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,34837,1,3,0)
+642 ;;=3^Portal Hypertension
+643 ;;^UTILITY(U,$J,358.3,34837,1,4,0)
+644 ;;=4^K76.6
+645 ;;^UTILITY(U,$J,358.3,34837,2)
+646 ;;=^5008834
+647 ;;^UTILITY(U,$J,358.3,34838,0)
+648 ;;=K74.00^^105^1436^16
+649 ;;^UTILITY(U,$J,358.3,34838,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,34838,1,3,0)
+652 ;;=3^Hepatic Fibrosis,Unspec
+653 ;;^UTILITY(U,$J,358.3,34838,1,4,0)
+654 ;;=4^K74.00
+655 ;;^UTILITY(U,$J,358.3,34838,2)
+656 ;;=^5159218
+657 ;;^UTILITY(U,$J,358.3,34839,0)
+658 ;;=K74.01^^105^1436^15
+659 ;;^UTILITY(U,$J,358.3,34839,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,34839,1,3,0)
+662 ;;=3^Hepatic Fibrosis,Early Fibrosis
+663 ;;^UTILITY(U,$J,358.3,34839,1,4,0)
+664 ;;=4^K74.01
+665 ;;^UTILITY(U,$J,358.3,34839,2)
+666 ;;=^5159219
+667 ;;^UTILITY(U,$J,358.3,34840,0)
+668 ;;=K74.02^^105^1436^14
+669 ;;^UTILITY(U,$J,358.3,34840,1,0)
+670 ;;=^358.31IA^4^2
+671 ;;^UTILITY(U,$J,358.3,34840,1,3,0)
+672 ;;=3^Hepatic Fibrosis,Advanced Fibrosis
+673 ;;^UTILITY(U,$J,358.3,34840,1,4,0)
+674 ;;=4^K74.02
+675 ;;^UTILITY(U,$J,358.3,34840,2)
+676 ;;=^5159220
+677 ;;^UTILITY(U,$J,358.3,34841,0)
+678 ;;=F20.3^^105^1437^31
+679 ;;^UTILITY(U,$J,358.3,34841,1,0)
+680 ;;=^358.31IA^4^2
