IBDEI09A ; ; 01-AUG-2022
;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 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,22693,1,4,0)
;;=4^R50.2
;;^UTILITY(U,$J,358.3,22693,2)
;;=^5019507
;;^UTILITY(U,$J,358.3,22694,0)
;;=R50.9^^71^916^30
;;^UTILITY(U,$J,358.3,22694,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22694,1,3,0)
;;=3^Fever,Unspec
;;^UTILITY(U,$J,358.3,22694,1,4,0)
;;=4^R50.9
;;^UTILITY(U,$J,358.3,22694,2)
;;=^5019512
;;^UTILITY(U,$J,358.3,22695,0)
;;=R76.11^^71^916^1
;;^UTILITY(U,$J,358.3,22695,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22695,1,3,0)
;;=3^Abnormal Reaction to TB Test w/o Active TB
;;^UTILITY(U,$J,358.3,22695,1,4,0)
;;=4^R76.11
;;^UTILITY(U,$J,358.3,22695,2)
;;=^5019570
;;^UTILITY(U,$J,358.3,22696,0)
;;=Z21.^^71^916^33
;;^UTILITY(U,$J,358.3,22696,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22696,1,3,0)
;;=3^HIV Asymptomatic,Infection Status
;;^UTILITY(U,$J,358.3,22696,1,4,0)
;;=4^Z21.
;;^UTILITY(U,$J,358.3,22696,2)
;;=^5062777
;;^UTILITY(U,$J,358.3,22697,0)
;;=B37.0^^71^916^18
;;^UTILITY(U,$J,358.3,22697,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22697,1,3,0)
;;=3^Candidal Stomatitis (Oral Thrush)
;;^UTILITY(U,$J,358.3,22697,1,4,0)
;;=4^B37.0
;;^UTILITY(U,$J,358.3,22697,2)
;;=^5000612
;;^UTILITY(U,$J,358.3,22698,0)
;;=B97.10^^71^916^25
;;^UTILITY(U,$J,358.3,22698,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22698,1,3,0)
;;=3^Enterovirus,Unspec,as Cause of Disease
;;^UTILITY(U,$J,358.3,22698,1,4,0)
;;=4^B97.10
;;^UTILITY(U,$J,358.3,22698,2)
;;=^5000861
;;^UTILITY(U,$J,358.3,22699,0)
;;=R50.82^^71^916^27
;;^UTILITY(U,$J,358.3,22699,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22699,1,3,0)
;;=3^Fever,Postprocedural
;;^UTILITY(U,$J,358.3,22699,1,4,0)
;;=4^R50.82
;;^UTILITY(U,$J,358.3,22699,2)
;;=^5019509
;;^UTILITY(U,$J,358.3,22700,0)
;;=R50.83^^71^916^29
;;^UTILITY(U,$J,358.3,22700,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22700,1,3,0)
;;=3^Fever,Postvaccination
;;^UTILITY(U,$J,358.3,22700,1,4,0)
;;=4^R50.83
;;^UTILITY(U,$J,358.3,22700,2)
;;=^5019510
;;^UTILITY(U,$J,358.3,22701,0)
;;=R50.84^^71^916^28
;;^UTILITY(U,$J,358.3,22701,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22701,1,3,0)
;;=3^Fever,Posttransfusion
;;^UTILITY(U,$J,358.3,22701,1,4,0)
;;=4^R50.84
;;^UTILITY(U,$J,358.3,22701,2)
;;=^5019511
;;^UTILITY(U,$J,358.3,22702,0)
;;=B02.23^^71^916^74
;;^UTILITY(U,$J,358.3,22702,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22702,1,3,0)
;;=3^Postherpetic Polyneuropathy
;;^UTILITY(U,$J,358.3,22702,1,4,0)
;;=4^B02.23
;;^UTILITY(U,$J,358.3,22702,2)
;;=^266550
;;^UTILITY(U,$J,358.3,22703,0)
;;=B02.22^^71^916^75
;;^UTILITY(U,$J,358.3,22703,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22703,1,3,0)
;;=3^Postherpetic Trigeminal Neuralgia
;;^UTILITY(U,$J,358.3,22703,1,4,0)
;;=4^B02.22
;;^UTILITY(U,$J,358.3,22703,2)
;;=^266546
;;^UTILITY(U,$J,358.3,22704,0)
;;=J03.91^^71^916^87
;;^UTILITY(U,$J,358.3,22704,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22704,1,3,0)
;;=3^Tonsillitis,Acute Recurrent,Unspec
;;^UTILITY(U,$J,358.3,22704,1,4,0)
;;=4^J03.91
;;^UTILITY(U,$J,358.3,22704,2)
;;=^5008136
;;^UTILITY(U,$J,358.3,22705,0)
;;=U07.1^^71^916^16
;;^UTILITY(U,$J,358.3,22705,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22705,1,3,0)
;;=3^COVID-19
;;^UTILITY(U,$J,358.3,22705,1,4,0)
;;=4^U07.1
;;^UTILITY(U,$J,358.3,22705,2)
;;=^5159070
;;^UTILITY(U,$J,358.3,22706,0)
;;=A84.81^^71^916^76
;;^UTILITY(U,$J,358.3,22706,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22706,1,3,0)
;;=3^Powassan Virus Disease
;;^UTILITY(U,$J,358.3,22706,1,4,0)
;;=4^A84.81
;;^UTILITY(U,$J,358.3,22706,2)
;;=^5159071
;;^UTILITY(U,$J,358.3,22707,0)
;;=A84.89^^71^916^85
;;^UTILITY(U,$J,358.3,22707,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22707,1,3,0)
;;=3^Tick-Borne Viral Encephalitis,Other
;;^UTILITY(U,$J,358.3,22707,1,4,0)
;;=4^A84.89
;;^UTILITY(U,$J,358.3,22707,2)
;;=^5159072
;;^UTILITY(U,$J,358.3,22708,0)
;;=A84.9^^71^916^86
;;^UTILITY(U,$J,358.3,22708,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22708,1,3,0)
;;=3^Tick-Borne Viral Encephalitis,Unspec
;;^UTILITY(U,$J,358.3,22708,1,4,0)
;;=4^A84.9
;;^UTILITY(U,$J,358.3,22708,2)
;;=^5000426
;;^UTILITY(U,$J,358.3,22709,0)
;;=Z11.52^^71^916^17
;;^UTILITY(U,$J,358.3,22709,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22709,1,3,0)
;;=3^COVID-19 Screening
;;^UTILITY(U,$J,358.3,22709,1,4,0)
;;=4^Z11.52
;;^UTILITY(U,$J,358.3,22709,2)
;;=^5160186
;;^UTILITY(U,$J,358.3,22710,0)
;;=Z20.822^^71^916^21
;;^UTILITY(U,$J,358.3,22710,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22710,1,3,0)
;;=3^Contact with & Suspected Exposure to COVID-19
;;^UTILITY(U,$J,358.3,22710,1,4,0)
;;=4^Z20.822
;;^UTILITY(U,$J,358.3,22710,2)
;;=^5160187
;;^UTILITY(U,$J,358.3,22711,0)
;;=Z86.16^^71^916^68
;;^UTILITY(U,$J,358.3,22711,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22711,1,3,0)
;;=3^Personal Hx of COVID-19
;;^UTILITY(U,$J,358.3,22711,1,4,0)
;;=4^Z86.16
;;^UTILITY(U,$J,358.3,22711,2)
;;=^5160188
;;^UTILITY(U,$J,358.3,22712,0)
;;=K70.0^^71^917^3
;;^UTILITY(U,$J,358.3,22712,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22712,1,3,0)
;;=3^Alcoholic Fatty Liver
;;^UTILITY(U,$J,358.3,22712,1,4,0)
;;=4^K70.0
;;^UTILITY(U,$J,358.3,22712,2)
;;=^5008784
;;^UTILITY(U,$J,358.3,22713,0)
;;=K70.11^^71^917^7
;;^UTILITY(U,$J,358.3,22713,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22713,1,3,0)
;;=3^Alcoholic Hepatitis w/ Ascites
;;^UTILITY(U,$J,358.3,22713,1,4,0)
;;=4^K70.11
;;^UTILITY(U,$J,358.3,22713,2)
;;=^5008786
;;^UTILITY(U,$J,358.3,22714,0)
;;=K70.10^^71^917^8
;;^UTILITY(U,$J,358.3,22714,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22714,1,3,0)
;;=3^Alcoholic Hepatitis w/o Ascites
;;^UTILITY(U,$J,358.3,22714,1,4,0)
;;=4^K70.10
;;^UTILITY(U,$J,358.3,22714,2)
;;=^5008785
;;^UTILITY(U,$J,358.3,22715,0)
;;=K70.2^^71^917^4
;;^UTILITY(U,$J,358.3,22715,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22715,1,3,0)
;;=3^Alcoholic Fibrosis & Sclerosis of Liver
;;^UTILITY(U,$J,358.3,22715,1,4,0)
;;=4^K70.2
;;^UTILITY(U,$J,358.3,22715,2)
;;=^5008787
;;^UTILITY(U,$J,358.3,22716,0)
;;=K70.30^^71^917^2
;;^UTILITY(U,$J,358.3,22716,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22716,1,3,0)
;;=3^Alcoholic Cirrhosis of Liver w/o Ascites
;;^UTILITY(U,$J,358.3,22716,1,4,0)
;;=4^K70.30
;;^UTILITY(U,$J,358.3,22716,2)
;;=^5008788
;;^UTILITY(U,$J,358.3,22717,0)
;;=K70.31^^71^917^1
;;^UTILITY(U,$J,358.3,22717,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22717,1,3,0)
;;=3^Alcoholic Cirrhosis of Liver w/ Ascites
;;^UTILITY(U,$J,358.3,22717,1,4,0)
;;=4^K70.31
;;^UTILITY(U,$J,358.3,22717,2)
;;=^5008789
;;^UTILITY(U,$J,358.3,22718,0)
;;=K70.9^^71^917^9
;;^UTILITY(U,$J,358.3,22718,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22718,1,3,0)
;;=3^Alcoholic Liver Disease,Unspec
;;^UTILITY(U,$J,358.3,22718,1,4,0)
;;=4^K70.9
;;^UTILITY(U,$J,358.3,22718,2)
;;=^5008792
;;^UTILITY(U,$J,358.3,22719,0)
;;=K70.40^^71^917^6
;;^UTILITY(U,$J,358.3,22719,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22719,1,3,0)
;;=3^Alcoholic Hepatic Failure w/o Coma
;;^UTILITY(U,$J,358.3,22719,1,4,0)
;;=4^K70.40
;;^UTILITY(U,$J,358.3,22719,2)
;;=^5008790
;;^UTILITY(U,$J,358.3,22720,0)
;;=K70.41^^71^917^5
;;^UTILITY(U,$J,358.3,22720,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22720,1,3,0)
;;=3^Alcoholic Hepatic Failure w/ Coma
;;^UTILITY(U,$J,358.3,22720,1,4,0)
;;=4^K70.41
;;^UTILITY(U,$J,358.3,22720,2)
;;=^5008791
;;^UTILITY(U,$J,358.3,22721,0)
;;=K73.0^^71^917^17
;;^UTILITY(U,$J,358.3,22721,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22721,1,3,0)
;;=3^Hepatitis, Chronic Persistent NEC
;;^UTILITY(U,$J,358.3,22721,1,4,0)
;;=4^K73.0
;;^UTILITY(U,$J,358.3,22721,2)
;;=^5008811
;;^UTILITY(U,$J,358.3,22722,0)
;;=K74.69^^71^917^10
;;^UTILITY(U,$J,358.3,22722,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22722,1,3,0)
;;=3^Cirrhosis of Liver,Oth
;;^UTILITY(U,$J,358.3,22722,1,4,0)
;;=4^K74.69
;;^UTILITY(U,$J,358.3,22722,2)
;;=^5008823
;;^UTILITY(U,$J,358.3,22723,0)
;;=K74.60^^71^917^11
;;^UTILITY(U,$J,358.3,22723,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22723,1,3,0)
;;=3^Cirrhosis of Liver,Unspec
;;^UTILITY(U,$J,358.3,22723,1,4,0)
;;=4^K74.60
;;^UTILITY(U,$J,358.3,22723,2)
;;=^5008822
;;^UTILITY(U,$J,358.3,22724,0)
;;=K76.0^^71^917^12
;;^UTILITY(U,$J,358.3,22724,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22724,1,3,0)
;;=3^Fatty Liver NEC
;;^UTILITY(U,$J,358.3,22724,1,4,0)
;;=4^K76.0
;;^UTILITY(U,$J,358.3,22724,2)
;;=^5008831
;;^UTILITY(U,$J,358.3,22725,0)
;;=K76.89^^71^917^20
;;^UTILITY(U,$J,358.3,22725,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22725,1,3,0)
;;=3^Liver Disease NEC
;;^UTILITY(U,$J,358.3,22725,1,4,0)
;;=4^K76.89
;;^UTILITY(U,$J,358.3,22725,2)
;;=^5008835
;;^UTILITY(U,$J,358.3,22726,0)
;;=K71.6^^71^917^34
;;^UTILITY(U,$J,358.3,22726,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22726,1,3,0)
;;=3^Toxic Liver Disease w/ Hepatitis NEC
;;^UTILITY(U,$J,358.3,22726,1,4,0)
;;=4^K71.6
;;^UTILITY(U,$J,358.3,22726,2)
;;=^5008801
;;^UTILITY(U,$J,358.3,22727,0)
;;=K75.9^^71^917^19
;;^UTILITY(U,$J,358.3,22727,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22727,1,3,0)
;;=3^Inflammatory Liver Disease,Unspec
;;^UTILITY(U,$J,358.3,22727,1,4,0)
;;=4^K75.9
;;^UTILITY(U,$J,358.3,22727,2)
;;=^5008830
;;^UTILITY(U,$J,358.3,22728,0)
;;=K71.0^^71^917^26
;;^UTILITY(U,$J,358.3,22728,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22728,1,3,0)
;;=3^Toxic Liver Disease w/ Cholestasis
;;^UTILITY(U,$J,358.3,22728,1,4,0)
;;=4^K71.0
;;^UTILITY(U,$J,358.3,22728,2)
;;=^5008793
;;^UTILITY(U,$J,358.3,22729,0)
;;=K71.10^^71^917^32
;;^UTILITY(U,$J,358.3,22729,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22729,1,3,0)
;;=3^Toxic Liver Disease w/ Hepatic Necrosis w/o Coma
;;^UTILITY(U,$J,358.3,22729,1,4,0)
;;=4^K71.10
;;^UTILITY(U,$J,358.3,22729,2)
;;=^5008794
;;^UTILITY(U,$J,358.3,22730,0)
;;=K71.11^^71^917^33
;;^UTILITY(U,$J,358.3,22730,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22730,1,3,0)
;;=3^Toxic Liver Disease w/ Hepatic Necrosis w/ Coma
;;^UTILITY(U,$J,358.3,22730,1,4,0)
;;=4^K71.11
;;^UTILITY(U,$J,358.3,22730,2)
;;=^5008795
;;^UTILITY(U,$J,358.3,22731,0)
;;=K71.2^^71^917^25
;;^UTILITY(U,$J,358.3,22731,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22731,1,3,0)
;;=3^Toxic Liver Disease w/ Acute Hepatitis
;;^UTILITY(U,$J,358.3,22731,1,4,0)
;;=4^K71.2
;;^UTILITY(U,$J,358.3,22731,2)
;;=^5008796
;;^UTILITY(U,$J,358.3,22732,0)
;;=K71.3^^71^917^30
;;^UTILITY(U,$J,358.3,22732,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22732,1,3,0)
;;=3^Toxic Liver Disease w/ Chronic Persistent Hepatitis
;;^UTILITY(U,$J,358.3,22732,1,4,0)
;;=4^K71.3
;;^UTILITY(U,$J,358.3,22732,2)
;;=^5008797
;;^UTILITY(U,$J,358.3,22733,0)
;;=K71.4^^71^917^29
;;^UTILITY(U,$J,358.3,22733,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22733,1,3,0)
;;=3^Toxic Liver Disease w/ Chronic Lobular Hepatitis
;;^UTILITY(U,$J,358.3,22733,1,4,0)
;;=4^K71.4
;;^UTILITY(U,$J,358.3,22733,2)
;;=^5008798
;;^UTILITY(U,$J,358.3,22734,0)
;;=K75.81^^71^917^21
;;^UTILITY(U,$J,358.3,22734,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22734,1,3,0)
;;=3^Nonalcoholic Steatohepatitis (NASH)
;;^UTILITY(U,$J,358.3,22734,1,4,0)
;;=4^K75.81
;;^UTILITY(U,$J,358.3,22734,2)
;;=^5008828
;;^UTILITY(U,$J,358.3,22735,0)
;;=K75.89^^71^917^18
;;^UTILITY(U,$J,358.3,22735,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22735,1,3,0)
;;=3^Inflammatory Liver Disease,Oth Spec
;;^UTILITY(U,$J,358.3,22735,1,4,0)
;;=4^K75.89
;;^UTILITY(U,$J,358.3,22735,2)
;;=^5008829
;;^UTILITY(U,$J,358.3,22736,0)
;;=K76.4^^71^917^23
;;^UTILITY(U,$J,358.3,22736,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22736,1,3,0)
;;=3^Peliosis Hepatis
;;^UTILITY(U,$J,358.3,22736,1,4,0)
;;=4^K76.4
;;^UTILITY(U,$J,358.3,22736,2)
;;=^91041
;;^UTILITY(U,$J,358.3,22737,0)
;;=K71.50^^71^917^27
;;^UTILITY(U,$J,358.3,22737,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22737,1,3,0)
;;=3^Toxic Liver Disease w/ Chronic Active Hepatitis w/o Ascites
;;^UTILITY(U,$J,358.3,22737,1,4,0)
;;=4^K71.50
;;^UTILITY(U,$J,358.3,22737,2)
;;=^5008799
;;^UTILITY(U,$J,358.3,22738,0)
;;=K71.51^^71^917^28
;;^UTILITY(U,$J,358.3,22738,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22738,1,3,0)
;;=3^Toxic Liver Disease w/ Chronic Active Hepatitis w/ Ascites
;;^UTILITY(U,$J,358.3,22738,1,4,0)
;;=4^K71.51
;;^UTILITY(U,$J,358.3,22738,2)
;;=^5008800
;;^UTILITY(U,$J,358.3,22739,0)
;;=K71.7^^71^917^31
;;^UTILITY(U,$J,358.3,22739,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22739,1,3,0)
;;=3^Toxic Liver Disease w/ Fibrosis & Cirrhosis of Liver
;;^UTILITY(U,$J,358.3,22739,1,4,0)
;;=4^K71.7
;;^UTILITY(U,$J,358.3,22739,2)
;;=^5008802
;;^UTILITY(U,$J,358.3,22740,0)
;;=K71.8^^71^917^35
;;^UTILITY(U,$J,358.3,22740,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22740,1,3,0)
;;=3^Toxic Liver Disease w/ Oth Disorders of Liver
;;^UTILITY(U,$J,358.3,22740,1,4,0)
;;=4^K71.8
;;^UTILITY(U,$J,358.3,22740,2)
;;=^5008803
;;^UTILITY(U,$J,358.3,22741,0)
;;=K71.9^^71^917^36
;;^UTILITY(U,$J,358.3,22741,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22741,1,3,0)
;;=3^Toxic Liver Disease,Unspec
;;^UTILITY(U,$J,358.3,22741,1,4,0)
;;=4^K71.9
;;^UTILITY(U,$J,358.3,22741,2)
;;=^5008804
;;^UTILITY(U,$J,358.3,22742,0)
;;=K75.2^^71^917^22
;;^UTILITY(U,$J,358.3,22742,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22742,1,3,0)
;;=3^Nonspecific Reactive Hepatitis
;;^UTILITY(U,$J,358.3,22742,1,4,0)
;;=4^K75.2
;;^UTILITY(U,$J,358.3,22742,2)
;;=^5008826
;;^UTILITY(U,$J,358.3,22743,0)
;;=K75.3^^71^917^13
;;^UTILITY(U,$J,358.3,22743,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22743,1,3,0)
;;=3^Granulomatous Hepatitis NEC
;;^UTILITY(U,$J,358.3,22743,1,4,0)
;;=4^K75.3
;;^UTILITY(U,$J,358.3,22743,2)
;;=^5008827
;;^UTILITY(U,$J,358.3,22744,0)
;;=K76.6^^71^917^24
;;^UTILITY(U,$J,358.3,22744,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22744,1,3,0)
;;=3^Portal Hypertension
;;^UTILITY(U,$J,358.3,22744,1,4,0)
;;=4^K76.6
;;^UTILITY(U,$J,358.3,22744,2)
;;=^5008834
;;^UTILITY(U,$J,358.3,22745,0)
;;=K74.00^^71^917^16
;;^UTILITY(U,$J,358.3,22745,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22745,1,3,0)
;;=3^Hepatic Fibrosis,Unspec
;;^UTILITY(U,$J,358.3,22745,1,4,0)
;;=4^K74.00
;;^UTILITY(U,$J,358.3,22745,2)
;;=^5159218
;;^UTILITY(U,$J,358.3,22746,0)
;;=K74.01^^71^917^15
;;^UTILITY(U,$J,358.3,22746,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22746,1,3,0)
;;=3^Hepatic Fibrosis,Early Fibrosis
;;^UTILITY(U,$J,358.3,22746,1,4,0)
;;=4^K74.01
;;^UTILITY(U,$J,358.3,22746,2)
;;=^5159219
;;^UTILITY(U,$J,358.3,22747,0)
;;=K74.02^^71^917^14
;;^UTILITY(U,$J,358.3,22747,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22747,1,3,0)
;;=3^Hepatic Fibrosis,Advanced Fibrosis
;;^UTILITY(U,$J,358.3,22747,1,4,0)
;;=4^K74.02
;;^UTILITY(U,$J,358.3,22747,2)
;;=^5159220
;;^UTILITY(U,$J,358.3,22748,0)
;;=F20.3^^71^918^31
;;^UTILITY(U,$J,358.3,22748,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22748,1,3,0)
;;=3^Undifferentiated/Atypical Schizophrenia
;;^UTILITY(U,$J,358.3,22748,1,4,0)
;;=4^F20.3
;;^UTILITY(U,$J,358.3,22748,2)
;;=^5003472
;;^UTILITY(U,$J,358.3,22749,0)
;;=F20.9^^71^918^27
;;^UTILITY(U,$J,358.3,22749,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22749,1,3,0)
;;=3^Schizophrenia,Unspec
;;^UTILITY(U,$J,358.3,22749,1,4,0)
;;=4^F20.9
;;^UTILITY(U,$J,358.3,22749,2)
;;=^5003476
;;^UTILITY(U,$J,358.3,22750,0)
;;=F31.9^^71^918^6
;;^UTILITY(U,$J,358.3,22750,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22750,1,3,0)
;;=3^Bipolar Disorder,Unspec
;;^UTILITY(U,$J,358.3,22750,1,4,0)
;;=4^F31.9
;;^UTILITY(U,$J,358.3,22750,2)
;;=^331892
;;^UTILITY(U,$J,358.3,22751,0)
;;=F31.72^^71^918^7
;;^UTILITY(U,$J,358.3,22751,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22751,1,3,0)
;;=3^Bipolr Disorder,Full Remis,Most Recent Episode Hypomanic
;;^UTILITY(U,$J,358.3,22751,1,4,0)
;;=4^F31.72
;;^UTILITY(U,$J,358.3,22751,2)
;;=^5003512
;;^UTILITY(U,$J,358.3,22752,0)
;;=F31.71^^71^918^5
;;^UTILITY(U,$J,358.3,22752,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22752,1,3,0)
;;=3^Bipolar Disorder,Part Remis,Most Recent Episode Hypomanic
;;^UTILITY(U,$J,358.3,22752,1,4,0)
;;=4^F31.71
;;^UTILITY(U,$J,358.3,22752,2)
;;=^5003511
;;^UTILITY(U,$J,358.3,22753,0)
;;=F31.70^^71^918^4
;;^UTILITY(U,$J,358.3,22753,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22753,1,3,0)
;;=3^Bipolar Disorder,In Remis,Most Recent Episode Unspec
;;^UTILITY(U,$J,358.3,22753,1,4,0)
;;=4^F31.70
;;^UTILITY(U,$J,358.3,22753,2)
;;=^5003510
;;^UTILITY(U,$J,358.3,22754,0)
;;=F29.^^71^918^25
;;^UTILITY(U,$J,358.3,22754,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22754,1,3,0)
;;=3^Psychosis not d/t Substance/Known Physiol Cond,Unspec
;;^UTILITY(U,$J,358.3,22754,1,4,0)
;;=4^F29.
;;^UTILITY(U,$J,358.3,22754,2)
;;=^5003484
;;^UTILITY(U,$J,358.3,22755,0)
;;=F28.^^71^918^26
;;^UTILITY(U,$J,358.3,22755,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22755,1,3,0)
;;=3^Psychosis not d/t Substance/Known Physiol Cond NEC
;;^UTILITY(U,$J,358.3,22755,1,4,0)
;;=4^F28.
;;^UTILITY(U,$J,358.3,22755,2)
;;=^5003483
;;^UTILITY(U,$J,358.3,22756,0)
;;=F41.9^^71^918^3
;;^UTILITY(U,$J,358.3,22756,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22756,1,3,0)
;;=3^Anxiety Disorder,Unspec
;;^UTILITY(U,$J,358.3,22756,1,4,0)
;;=4^F41.9
;;^UTILITY(U,$J,358.3,22756,2)
;;=^5003567
;;^UTILITY(U,$J,358.3,22757,0)
;;=F45.0^^71^918^29
;;^UTILITY(U,$J,358.3,22757,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22757,1,3,0)
;;=3^Somatization Disorder
;;^UTILITY(U,$J,358.3,22757,1,4,0)
;;=4^F45.0
;;^UTILITY(U,$J,358.3,22757,2)
;;=^112280
;;^UTILITY(U,$J,358.3,22758,0)
;;=F69.^^71^918^2
;;^UTILITY(U,$J,358.3,22758,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22758,1,3,0)
;;=3^Adult Personality and Behavior Disorder,Unspec
;;^UTILITY(U,$J,358.3,22758,1,4,0)
;;=4^F69.
;;^UTILITY(U,$J,358.3,22758,2)
;;=^5003667
;;^UTILITY(U,$J,358.3,22759,0)
;;=F60.9^^71^918^23
;;^UTILITY(U,$J,358.3,22759,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22759,1,3,0)
;;=3^Personality Disorder,Unspec
;;^UTILITY(U,$J,358.3,22759,1,4,0)
;;=4^F60.9
;;^UTILITY(U,$J,358.3,22759,2)
;;=^5003639
;;^UTILITY(U,$J,358.3,22760,0)
;;=F32.9^^71^918^16
;;^UTILITY(U,$J,358.3,22760,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22760,1,3,0)
;;=3^MDD,Single Episode,Unspec
;;^UTILITY(U,$J,358.3,22760,1,4,0)
;;=4^F32.9
;;^UTILITY(U,$J,358.3,22760,2)
;;=^5003528
;;^UTILITY(U,$J,358.3,22761,0)
;;=F40.231^^71^918^12
;;^UTILITY(U,$J,358.3,22761,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,22761,1,3,0)
;;=3^Fear of Injections/Transfusions
;;^UTILITY(U,$J,358.3,22761,1,4,0)
;;=4^F40.231
;;^UTILITY(U,$J,358.3,22761,2)
;;=^5003551
;;^UTILITY(U,$J,358.3,22762,0)
;;=F40.240^^71^918^8
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI09A 19779 printed Sep 23, 2025@19:20:09 Page 2
IBDEI09A ; ; 01-AUG-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 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,22693,1,4,0)
+2 ;;=4^R50.2
+3 ;;^UTILITY(U,$J,358.3,22693,2)
+4 ;;=^5019507
+5 ;;^UTILITY(U,$J,358.3,22694,0)
+6 ;;=R50.9^^71^916^30
+7 ;;^UTILITY(U,$J,358.3,22694,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,22694,1,3,0)
+10 ;;=3^Fever,Unspec
+11 ;;^UTILITY(U,$J,358.3,22694,1,4,0)
+12 ;;=4^R50.9
+13 ;;^UTILITY(U,$J,358.3,22694,2)
+14 ;;=^5019512
+15 ;;^UTILITY(U,$J,358.3,22695,0)
+16 ;;=R76.11^^71^916^1
+17 ;;^UTILITY(U,$J,358.3,22695,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,22695,1,3,0)
+20 ;;=3^Abnormal Reaction to TB Test w/o Active TB
+21 ;;^UTILITY(U,$J,358.3,22695,1,4,0)
+22 ;;=4^R76.11
+23 ;;^UTILITY(U,$J,358.3,22695,2)
+24 ;;=^5019570
+25 ;;^UTILITY(U,$J,358.3,22696,0)
+26 ;;=Z21.^^71^916^33
+27 ;;^UTILITY(U,$J,358.3,22696,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,22696,1,3,0)
+30 ;;=3^HIV Asymptomatic,Infection Status
+31 ;;^UTILITY(U,$J,358.3,22696,1,4,0)
+32 ;;=4^Z21.
+33 ;;^UTILITY(U,$J,358.3,22696,2)
+34 ;;=^5062777
+35 ;;^UTILITY(U,$J,358.3,22697,0)
+36 ;;=B37.0^^71^916^18
+37 ;;^UTILITY(U,$J,358.3,22697,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,22697,1,3,0)
+40 ;;=3^Candidal Stomatitis (Oral Thrush)
+41 ;;^UTILITY(U,$J,358.3,22697,1,4,0)
+42 ;;=4^B37.0
+43 ;;^UTILITY(U,$J,358.3,22697,2)
+44 ;;=^5000612
+45 ;;^UTILITY(U,$J,358.3,22698,0)
+46 ;;=B97.10^^71^916^25
+47 ;;^UTILITY(U,$J,358.3,22698,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,22698,1,3,0)
+50 ;;=3^Enterovirus,Unspec,as Cause of Disease
+51 ;;^UTILITY(U,$J,358.3,22698,1,4,0)
+52 ;;=4^B97.10
+53 ;;^UTILITY(U,$J,358.3,22698,2)
+54 ;;=^5000861
+55 ;;^UTILITY(U,$J,358.3,22699,0)
+56 ;;=R50.82^^71^916^27
+57 ;;^UTILITY(U,$J,358.3,22699,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,22699,1,3,0)
+60 ;;=3^Fever,Postprocedural
+61 ;;^UTILITY(U,$J,358.3,22699,1,4,0)
+62 ;;=4^R50.82
+63 ;;^UTILITY(U,$J,358.3,22699,2)
+64 ;;=^5019509
+65 ;;^UTILITY(U,$J,358.3,22700,0)
+66 ;;=R50.83^^71^916^29
+67 ;;^UTILITY(U,$J,358.3,22700,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,22700,1,3,0)
+70 ;;=3^Fever,Postvaccination
+71 ;;^UTILITY(U,$J,358.3,22700,1,4,0)
+72 ;;=4^R50.83
+73 ;;^UTILITY(U,$J,358.3,22700,2)
+74 ;;=^5019510
+75 ;;^UTILITY(U,$J,358.3,22701,0)
+76 ;;=R50.84^^71^916^28
+77 ;;^UTILITY(U,$J,358.3,22701,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,22701,1,3,0)
+80 ;;=3^Fever,Posttransfusion
+81 ;;^UTILITY(U,$J,358.3,22701,1,4,0)
+82 ;;=4^R50.84
+83 ;;^UTILITY(U,$J,358.3,22701,2)
+84 ;;=^5019511
+85 ;;^UTILITY(U,$J,358.3,22702,0)
+86 ;;=B02.23^^71^916^74
+87 ;;^UTILITY(U,$J,358.3,22702,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,22702,1,3,0)
+90 ;;=3^Postherpetic Polyneuropathy
+91 ;;^UTILITY(U,$J,358.3,22702,1,4,0)
+92 ;;=4^B02.23
+93 ;;^UTILITY(U,$J,358.3,22702,2)
+94 ;;=^266550
+95 ;;^UTILITY(U,$J,358.3,22703,0)
+96 ;;=B02.22^^71^916^75
+97 ;;^UTILITY(U,$J,358.3,22703,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,22703,1,3,0)
+100 ;;=3^Postherpetic Trigeminal Neuralgia
+101 ;;^UTILITY(U,$J,358.3,22703,1,4,0)
+102 ;;=4^B02.22
+103 ;;^UTILITY(U,$J,358.3,22703,2)
+104 ;;=^266546
+105 ;;^UTILITY(U,$J,358.3,22704,0)
+106 ;;=J03.91^^71^916^87
+107 ;;^UTILITY(U,$J,358.3,22704,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,22704,1,3,0)
+110 ;;=3^Tonsillitis,Acute Recurrent,Unspec
+111 ;;^UTILITY(U,$J,358.3,22704,1,4,0)
+112 ;;=4^J03.91
+113 ;;^UTILITY(U,$J,358.3,22704,2)
+114 ;;=^5008136
+115 ;;^UTILITY(U,$J,358.3,22705,0)
+116 ;;=U07.1^^71^916^16
+117 ;;^UTILITY(U,$J,358.3,22705,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,22705,1,3,0)
+120 ;;=3^COVID-19
+121 ;;^UTILITY(U,$J,358.3,22705,1,4,0)
+122 ;;=4^U07.1
+123 ;;^UTILITY(U,$J,358.3,22705,2)
+124 ;;=^5159070
+125 ;;^UTILITY(U,$J,358.3,22706,0)
+126 ;;=A84.81^^71^916^76
+127 ;;^UTILITY(U,$J,358.3,22706,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,22706,1,3,0)
+130 ;;=3^Powassan Virus Disease
+131 ;;^UTILITY(U,$J,358.3,22706,1,4,0)
+132 ;;=4^A84.81
+133 ;;^UTILITY(U,$J,358.3,22706,2)
+134 ;;=^5159071
+135 ;;^UTILITY(U,$J,358.3,22707,0)
+136 ;;=A84.89^^71^916^85
+137 ;;^UTILITY(U,$J,358.3,22707,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,22707,1,3,0)
+140 ;;=3^Tick-Borne Viral Encephalitis,Other
+141 ;;^UTILITY(U,$J,358.3,22707,1,4,0)
+142 ;;=4^A84.89
+143 ;;^UTILITY(U,$J,358.3,22707,2)
+144 ;;=^5159072
+145 ;;^UTILITY(U,$J,358.3,22708,0)
+146 ;;=A84.9^^71^916^86
+147 ;;^UTILITY(U,$J,358.3,22708,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,22708,1,3,0)
+150 ;;=3^Tick-Borne Viral Encephalitis,Unspec
+151 ;;^UTILITY(U,$J,358.3,22708,1,4,0)
+152 ;;=4^A84.9
+153 ;;^UTILITY(U,$J,358.3,22708,2)
+154 ;;=^5000426
+155 ;;^UTILITY(U,$J,358.3,22709,0)
+156 ;;=Z11.52^^71^916^17
+157 ;;^UTILITY(U,$J,358.3,22709,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,22709,1,3,0)
+160 ;;=3^COVID-19 Screening
+161 ;;^UTILITY(U,$J,358.3,22709,1,4,0)
+162 ;;=4^Z11.52
+163 ;;^UTILITY(U,$J,358.3,22709,2)
+164 ;;=^5160186
+165 ;;^UTILITY(U,$J,358.3,22710,0)
+166 ;;=Z20.822^^71^916^21
+167 ;;^UTILITY(U,$J,358.3,22710,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,22710,1,3,0)
+170 ;;=3^Contact with & Suspected Exposure to COVID-19
+171 ;;^UTILITY(U,$J,358.3,22710,1,4,0)
+172 ;;=4^Z20.822
+173 ;;^UTILITY(U,$J,358.3,22710,2)
+174 ;;=^5160187
+175 ;;^UTILITY(U,$J,358.3,22711,0)
+176 ;;=Z86.16^^71^916^68
+177 ;;^UTILITY(U,$J,358.3,22711,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,22711,1,3,0)
+180 ;;=3^Personal Hx of COVID-19
+181 ;;^UTILITY(U,$J,358.3,22711,1,4,0)
+182 ;;=4^Z86.16
+183 ;;^UTILITY(U,$J,358.3,22711,2)
+184 ;;=^5160188
+185 ;;^UTILITY(U,$J,358.3,22712,0)
+186 ;;=K70.0^^71^917^3
+187 ;;^UTILITY(U,$J,358.3,22712,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,22712,1,3,0)
+190 ;;=3^Alcoholic Fatty Liver
+191 ;;^UTILITY(U,$J,358.3,22712,1,4,0)
+192 ;;=4^K70.0
+193 ;;^UTILITY(U,$J,358.3,22712,2)
+194 ;;=^5008784
+195 ;;^UTILITY(U,$J,358.3,22713,0)
+196 ;;=K70.11^^71^917^7
+197 ;;^UTILITY(U,$J,358.3,22713,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,22713,1,3,0)
+200 ;;=3^Alcoholic Hepatitis w/ Ascites
+201 ;;^UTILITY(U,$J,358.3,22713,1,4,0)
+202 ;;=4^K70.11
+203 ;;^UTILITY(U,$J,358.3,22713,2)
+204 ;;=^5008786
+205 ;;^UTILITY(U,$J,358.3,22714,0)
+206 ;;=K70.10^^71^917^8
+207 ;;^UTILITY(U,$J,358.3,22714,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,22714,1,3,0)
+210 ;;=3^Alcoholic Hepatitis w/o Ascites
+211 ;;^UTILITY(U,$J,358.3,22714,1,4,0)
+212 ;;=4^K70.10
+213 ;;^UTILITY(U,$J,358.3,22714,2)
+214 ;;=^5008785
+215 ;;^UTILITY(U,$J,358.3,22715,0)
+216 ;;=K70.2^^71^917^4
+217 ;;^UTILITY(U,$J,358.3,22715,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,22715,1,3,0)
+220 ;;=3^Alcoholic Fibrosis & Sclerosis of Liver
+221 ;;^UTILITY(U,$J,358.3,22715,1,4,0)
+222 ;;=4^K70.2
+223 ;;^UTILITY(U,$J,358.3,22715,2)
+224 ;;=^5008787
+225 ;;^UTILITY(U,$J,358.3,22716,0)
+226 ;;=K70.30^^71^917^2
+227 ;;^UTILITY(U,$J,358.3,22716,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,22716,1,3,0)
+230 ;;=3^Alcoholic Cirrhosis of Liver w/o Ascites
+231 ;;^UTILITY(U,$J,358.3,22716,1,4,0)
+232 ;;=4^K70.30
+233 ;;^UTILITY(U,$J,358.3,22716,2)
+234 ;;=^5008788
+235 ;;^UTILITY(U,$J,358.3,22717,0)
+236 ;;=K70.31^^71^917^1
+237 ;;^UTILITY(U,$J,358.3,22717,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,22717,1,3,0)
+240 ;;=3^Alcoholic Cirrhosis of Liver w/ Ascites
+241 ;;^UTILITY(U,$J,358.3,22717,1,4,0)
+242 ;;=4^K70.31
+243 ;;^UTILITY(U,$J,358.3,22717,2)
+244 ;;=^5008789
+245 ;;^UTILITY(U,$J,358.3,22718,0)
+246 ;;=K70.9^^71^917^9
+247 ;;^UTILITY(U,$J,358.3,22718,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,22718,1,3,0)
+250 ;;=3^Alcoholic Liver Disease,Unspec
+251 ;;^UTILITY(U,$J,358.3,22718,1,4,0)
+252 ;;=4^K70.9
+253 ;;^UTILITY(U,$J,358.3,22718,2)
+254 ;;=^5008792
+255 ;;^UTILITY(U,$J,358.3,22719,0)
+256 ;;=K70.40^^71^917^6
+257 ;;^UTILITY(U,$J,358.3,22719,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,22719,1,3,0)
+260 ;;=3^Alcoholic Hepatic Failure w/o Coma
+261 ;;^UTILITY(U,$J,358.3,22719,1,4,0)
+262 ;;=4^K70.40
+263 ;;^UTILITY(U,$J,358.3,22719,2)
+264 ;;=^5008790
+265 ;;^UTILITY(U,$J,358.3,22720,0)
+266 ;;=K70.41^^71^917^5
+267 ;;^UTILITY(U,$J,358.3,22720,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,22720,1,3,0)
+270 ;;=3^Alcoholic Hepatic Failure w/ Coma
+271 ;;^UTILITY(U,$J,358.3,22720,1,4,0)
+272 ;;=4^K70.41
+273 ;;^UTILITY(U,$J,358.3,22720,2)
+274 ;;=^5008791
+275 ;;^UTILITY(U,$J,358.3,22721,0)
+276 ;;=K73.0^^71^917^17
+277 ;;^UTILITY(U,$J,358.3,22721,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,22721,1,3,0)
+280 ;;=3^Hepatitis, Chronic Persistent NEC
+281 ;;^UTILITY(U,$J,358.3,22721,1,4,0)
+282 ;;=4^K73.0
+283 ;;^UTILITY(U,$J,358.3,22721,2)
+284 ;;=^5008811
+285 ;;^UTILITY(U,$J,358.3,22722,0)
+286 ;;=K74.69^^71^917^10
+287 ;;^UTILITY(U,$J,358.3,22722,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,22722,1,3,0)
+290 ;;=3^Cirrhosis of Liver,Oth
+291 ;;^UTILITY(U,$J,358.3,22722,1,4,0)
+292 ;;=4^K74.69
+293 ;;^UTILITY(U,$J,358.3,22722,2)
+294 ;;=^5008823
+295 ;;^UTILITY(U,$J,358.3,22723,0)
+296 ;;=K74.60^^71^917^11
+297 ;;^UTILITY(U,$J,358.3,22723,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,22723,1,3,0)
+300 ;;=3^Cirrhosis of Liver,Unspec
+301 ;;^UTILITY(U,$J,358.3,22723,1,4,0)
+302 ;;=4^K74.60
+303 ;;^UTILITY(U,$J,358.3,22723,2)
+304 ;;=^5008822
+305 ;;^UTILITY(U,$J,358.3,22724,0)
+306 ;;=K76.0^^71^917^12
+307 ;;^UTILITY(U,$J,358.3,22724,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,22724,1,3,0)
+310 ;;=3^Fatty Liver NEC
+311 ;;^UTILITY(U,$J,358.3,22724,1,4,0)
+312 ;;=4^K76.0
+313 ;;^UTILITY(U,$J,358.3,22724,2)
+314 ;;=^5008831
+315 ;;^UTILITY(U,$J,358.3,22725,0)
+316 ;;=K76.89^^71^917^20
+317 ;;^UTILITY(U,$J,358.3,22725,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,22725,1,3,0)
+320 ;;=3^Liver Disease NEC
+321 ;;^UTILITY(U,$J,358.3,22725,1,4,0)
+322 ;;=4^K76.89
+323 ;;^UTILITY(U,$J,358.3,22725,2)
+324 ;;=^5008835
+325 ;;^UTILITY(U,$J,358.3,22726,0)
+326 ;;=K71.6^^71^917^34
+327 ;;^UTILITY(U,$J,358.3,22726,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,22726,1,3,0)
+330 ;;=3^Toxic Liver Disease w/ Hepatitis NEC
+331 ;;^UTILITY(U,$J,358.3,22726,1,4,0)
+332 ;;=4^K71.6
+333 ;;^UTILITY(U,$J,358.3,22726,2)
+334 ;;=^5008801
+335 ;;^UTILITY(U,$J,358.3,22727,0)
+336 ;;=K75.9^^71^917^19
+337 ;;^UTILITY(U,$J,358.3,22727,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,22727,1,3,0)
+340 ;;=3^Inflammatory Liver Disease,Unspec
+341 ;;^UTILITY(U,$J,358.3,22727,1,4,0)
+342 ;;=4^K75.9
+343 ;;^UTILITY(U,$J,358.3,22727,2)
+344 ;;=^5008830
+345 ;;^UTILITY(U,$J,358.3,22728,0)
+346 ;;=K71.0^^71^917^26
+347 ;;^UTILITY(U,$J,358.3,22728,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,22728,1,3,0)
+350 ;;=3^Toxic Liver Disease w/ Cholestasis
+351 ;;^UTILITY(U,$J,358.3,22728,1,4,0)
+352 ;;=4^K71.0
+353 ;;^UTILITY(U,$J,358.3,22728,2)
+354 ;;=^5008793
+355 ;;^UTILITY(U,$J,358.3,22729,0)
+356 ;;=K71.10^^71^917^32
+357 ;;^UTILITY(U,$J,358.3,22729,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,22729,1,3,0)
+360 ;;=3^Toxic Liver Disease w/ Hepatic Necrosis w/o Coma
+361 ;;^UTILITY(U,$J,358.3,22729,1,4,0)
+362 ;;=4^K71.10
+363 ;;^UTILITY(U,$J,358.3,22729,2)
+364 ;;=^5008794
+365 ;;^UTILITY(U,$J,358.3,22730,0)
+366 ;;=K71.11^^71^917^33
+367 ;;^UTILITY(U,$J,358.3,22730,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,22730,1,3,0)
+370 ;;=3^Toxic Liver Disease w/ Hepatic Necrosis w/ Coma
+371 ;;^UTILITY(U,$J,358.3,22730,1,4,0)
+372 ;;=4^K71.11
+373 ;;^UTILITY(U,$J,358.3,22730,2)
+374 ;;=^5008795
+375 ;;^UTILITY(U,$J,358.3,22731,0)
+376 ;;=K71.2^^71^917^25
+377 ;;^UTILITY(U,$J,358.3,22731,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,22731,1,3,0)
+380 ;;=3^Toxic Liver Disease w/ Acute Hepatitis
+381 ;;^UTILITY(U,$J,358.3,22731,1,4,0)
+382 ;;=4^K71.2
+383 ;;^UTILITY(U,$J,358.3,22731,2)
+384 ;;=^5008796
+385 ;;^UTILITY(U,$J,358.3,22732,0)
+386 ;;=K71.3^^71^917^30
+387 ;;^UTILITY(U,$J,358.3,22732,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,22732,1,3,0)
+390 ;;=3^Toxic Liver Disease w/ Chronic Persistent Hepatitis
+391 ;;^UTILITY(U,$J,358.3,22732,1,4,0)
+392 ;;=4^K71.3
+393 ;;^UTILITY(U,$J,358.3,22732,2)
+394 ;;=^5008797
+395 ;;^UTILITY(U,$J,358.3,22733,0)
+396 ;;=K71.4^^71^917^29
+397 ;;^UTILITY(U,$J,358.3,22733,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,22733,1,3,0)
+400 ;;=3^Toxic Liver Disease w/ Chronic Lobular Hepatitis
+401 ;;^UTILITY(U,$J,358.3,22733,1,4,0)
+402 ;;=4^K71.4
+403 ;;^UTILITY(U,$J,358.3,22733,2)
+404 ;;=^5008798
+405 ;;^UTILITY(U,$J,358.3,22734,0)
+406 ;;=K75.81^^71^917^21
+407 ;;^UTILITY(U,$J,358.3,22734,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,22734,1,3,0)
+410 ;;=3^Nonalcoholic Steatohepatitis (NASH)
+411 ;;^UTILITY(U,$J,358.3,22734,1,4,0)
+412 ;;=4^K75.81
+413 ;;^UTILITY(U,$J,358.3,22734,2)
+414 ;;=^5008828
+415 ;;^UTILITY(U,$J,358.3,22735,0)
+416 ;;=K75.89^^71^917^18
+417 ;;^UTILITY(U,$J,358.3,22735,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,22735,1,3,0)
+420 ;;=3^Inflammatory Liver Disease,Oth Spec
+421 ;;^UTILITY(U,$J,358.3,22735,1,4,0)
+422 ;;=4^K75.89
+423 ;;^UTILITY(U,$J,358.3,22735,2)
+424 ;;=^5008829
+425 ;;^UTILITY(U,$J,358.3,22736,0)
+426 ;;=K76.4^^71^917^23
+427 ;;^UTILITY(U,$J,358.3,22736,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,22736,1,3,0)
+430 ;;=3^Peliosis Hepatis
+431 ;;^UTILITY(U,$J,358.3,22736,1,4,0)
+432 ;;=4^K76.4
+433 ;;^UTILITY(U,$J,358.3,22736,2)
+434 ;;=^91041
+435 ;;^UTILITY(U,$J,358.3,22737,0)
+436 ;;=K71.50^^71^917^27
+437 ;;^UTILITY(U,$J,358.3,22737,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,22737,1,3,0)
+440 ;;=3^Toxic Liver Disease w/ Chronic Active Hepatitis w/o Ascites
+441 ;;^UTILITY(U,$J,358.3,22737,1,4,0)
+442 ;;=4^K71.50
+443 ;;^UTILITY(U,$J,358.3,22737,2)
+444 ;;=^5008799
+445 ;;^UTILITY(U,$J,358.3,22738,0)
+446 ;;=K71.51^^71^917^28
+447 ;;^UTILITY(U,$J,358.3,22738,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,22738,1,3,0)
+450 ;;=3^Toxic Liver Disease w/ Chronic Active Hepatitis w/ Ascites
+451 ;;^UTILITY(U,$J,358.3,22738,1,4,0)
+452 ;;=4^K71.51
+453 ;;^UTILITY(U,$J,358.3,22738,2)
+454 ;;=^5008800
+455 ;;^UTILITY(U,$J,358.3,22739,0)
+456 ;;=K71.7^^71^917^31
+457 ;;^UTILITY(U,$J,358.3,22739,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,22739,1,3,0)
+460 ;;=3^Toxic Liver Disease w/ Fibrosis & Cirrhosis of Liver
+461 ;;^UTILITY(U,$J,358.3,22739,1,4,0)
+462 ;;=4^K71.7
+463 ;;^UTILITY(U,$J,358.3,22739,2)
+464 ;;=^5008802
+465 ;;^UTILITY(U,$J,358.3,22740,0)
+466 ;;=K71.8^^71^917^35
+467 ;;^UTILITY(U,$J,358.3,22740,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,22740,1,3,0)
+470 ;;=3^Toxic Liver Disease w/ Oth Disorders of Liver
+471 ;;^UTILITY(U,$J,358.3,22740,1,4,0)
+472 ;;=4^K71.8
+473 ;;^UTILITY(U,$J,358.3,22740,2)
+474 ;;=^5008803
+475 ;;^UTILITY(U,$J,358.3,22741,0)
+476 ;;=K71.9^^71^917^36
+477 ;;^UTILITY(U,$J,358.3,22741,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,22741,1,3,0)
+480 ;;=3^Toxic Liver Disease,Unspec
+481 ;;^UTILITY(U,$J,358.3,22741,1,4,0)
+482 ;;=4^K71.9
+483 ;;^UTILITY(U,$J,358.3,22741,2)
+484 ;;=^5008804
+485 ;;^UTILITY(U,$J,358.3,22742,0)
+486 ;;=K75.2^^71^917^22
+487 ;;^UTILITY(U,$J,358.3,22742,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,22742,1,3,0)
+490 ;;=3^Nonspecific Reactive Hepatitis
+491 ;;^UTILITY(U,$J,358.3,22742,1,4,0)
+492 ;;=4^K75.2
+493 ;;^UTILITY(U,$J,358.3,22742,2)
+494 ;;=^5008826
+495 ;;^UTILITY(U,$J,358.3,22743,0)
+496 ;;=K75.3^^71^917^13
+497 ;;^UTILITY(U,$J,358.3,22743,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,22743,1,3,0)
+500 ;;=3^Granulomatous Hepatitis NEC
+501 ;;^UTILITY(U,$J,358.3,22743,1,4,0)
+502 ;;=4^K75.3
+503 ;;^UTILITY(U,$J,358.3,22743,2)
+504 ;;=^5008827
+505 ;;^UTILITY(U,$J,358.3,22744,0)
+506 ;;=K76.6^^71^917^24
+507 ;;^UTILITY(U,$J,358.3,22744,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,22744,1,3,0)
+510 ;;=3^Portal Hypertension
+511 ;;^UTILITY(U,$J,358.3,22744,1,4,0)
+512 ;;=4^K76.6
+513 ;;^UTILITY(U,$J,358.3,22744,2)
+514 ;;=^5008834
+515 ;;^UTILITY(U,$J,358.3,22745,0)
+516 ;;=K74.00^^71^917^16
+517 ;;^UTILITY(U,$J,358.3,22745,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,22745,1,3,0)
+520 ;;=3^Hepatic Fibrosis,Unspec
+521 ;;^UTILITY(U,$J,358.3,22745,1,4,0)
+522 ;;=4^K74.00
+523 ;;^UTILITY(U,$J,358.3,22745,2)
+524 ;;=^5159218
+525 ;;^UTILITY(U,$J,358.3,22746,0)
+526 ;;=K74.01^^71^917^15
+527 ;;^UTILITY(U,$J,358.3,22746,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,22746,1,3,0)
+530 ;;=3^Hepatic Fibrosis,Early Fibrosis
+531 ;;^UTILITY(U,$J,358.3,22746,1,4,0)
+532 ;;=4^K74.01
+533 ;;^UTILITY(U,$J,358.3,22746,2)
+534 ;;=^5159219
+535 ;;^UTILITY(U,$J,358.3,22747,0)
+536 ;;=K74.02^^71^917^14
+537 ;;^UTILITY(U,$J,358.3,22747,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,22747,1,3,0)
+540 ;;=3^Hepatic Fibrosis,Advanced Fibrosis
+541 ;;^UTILITY(U,$J,358.3,22747,1,4,0)
+542 ;;=4^K74.02
+543 ;;^UTILITY(U,$J,358.3,22747,2)
+544 ;;=^5159220
+545 ;;^UTILITY(U,$J,358.3,22748,0)
+546 ;;=F20.3^^71^918^31
+547 ;;^UTILITY(U,$J,358.3,22748,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,22748,1,3,0)
+550 ;;=3^Undifferentiated/Atypical Schizophrenia
+551 ;;^UTILITY(U,$J,358.3,22748,1,4,0)
+552 ;;=4^F20.3
+553 ;;^UTILITY(U,$J,358.3,22748,2)
+554 ;;=^5003472
+555 ;;^UTILITY(U,$J,358.3,22749,0)
+556 ;;=F20.9^^71^918^27
+557 ;;^UTILITY(U,$J,358.3,22749,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,22749,1,3,0)
+560 ;;=3^Schizophrenia,Unspec
+561 ;;^UTILITY(U,$J,358.3,22749,1,4,0)
+562 ;;=4^F20.9
+563 ;;^UTILITY(U,$J,358.3,22749,2)
+564 ;;=^5003476
+565 ;;^UTILITY(U,$J,358.3,22750,0)
+566 ;;=F31.9^^71^918^6
+567 ;;^UTILITY(U,$J,358.3,22750,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,22750,1,3,0)
+570 ;;=3^Bipolar Disorder,Unspec
+571 ;;^UTILITY(U,$J,358.3,22750,1,4,0)
+572 ;;=4^F31.9
+573 ;;^UTILITY(U,$J,358.3,22750,2)
+574 ;;=^331892
+575 ;;^UTILITY(U,$J,358.3,22751,0)
+576 ;;=F31.72^^71^918^7
+577 ;;^UTILITY(U,$J,358.3,22751,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,22751,1,3,0)
+580 ;;=3^Bipolr Disorder,Full Remis,Most Recent Episode Hypomanic
+581 ;;^UTILITY(U,$J,358.3,22751,1,4,0)
+582 ;;=4^F31.72
+583 ;;^UTILITY(U,$J,358.3,22751,2)
+584 ;;=^5003512
+585 ;;^UTILITY(U,$J,358.3,22752,0)
+586 ;;=F31.71^^71^918^5
+587 ;;^UTILITY(U,$J,358.3,22752,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,22752,1,3,0)
+590 ;;=3^Bipolar Disorder,Part Remis,Most Recent Episode Hypomanic
+591 ;;^UTILITY(U,$J,358.3,22752,1,4,0)
+592 ;;=4^F31.71
+593 ;;^UTILITY(U,$J,358.3,22752,2)
+594 ;;=^5003511
+595 ;;^UTILITY(U,$J,358.3,22753,0)
+596 ;;=F31.70^^71^918^4
+597 ;;^UTILITY(U,$J,358.3,22753,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,22753,1,3,0)
+600 ;;=3^Bipolar Disorder,In Remis,Most Recent Episode Unspec
+601 ;;^UTILITY(U,$J,358.3,22753,1,4,0)
+602 ;;=4^F31.70
+603 ;;^UTILITY(U,$J,358.3,22753,2)
+604 ;;=^5003510
+605 ;;^UTILITY(U,$J,358.3,22754,0)
+606 ;;=F29.^^71^918^25
+607 ;;^UTILITY(U,$J,358.3,22754,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,22754,1,3,0)
+610 ;;=3^Psychosis not d/t Substance/Known Physiol Cond,Unspec
+611 ;;^UTILITY(U,$J,358.3,22754,1,4,0)
+612 ;;=4^F29.
+613 ;;^UTILITY(U,$J,358.3,22754,2)
+614 ;;=^5003484
+615 ;;^UTILITY(U,$J,358.3,22755,0)
+616 ;;=F28.^^71^918^26
+617 ;;^UTILITY(U,$J,358.3,22755,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,22755,1,3,0)
+620 ;;=3^Psychosis not d/t Substance/Known Physiol Cond NEC
+621 ;;^UTILITY(U,$J,358.3,22755,1,4,0)
+622 ;;=4^F28.
+623 ;;^UTILITY(U,$J,358.3,22755,2)
+624 ;;=^5003483
+625 ;;^UTILITY(U,$J,358.3,22756,0)
+626 ;;=F41.9^^71^918^3
+627 ;;^UTILITY(U,$J,358.3,22756,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,22756,1,3,0)
+630 ;;=3^Anxiety Disorder,Unspec
+631 ;;^UTILITY(U,$J,358.3,22756,1,4,0)
+632 ;;=4^F41.9
+633 ;;^UTILITY(U,$J,358.3,22756,2)
+634 ;;=^5003567
+635 ;;^UTILITY(U,$J,358.3,22757,0)
+636 ;;=F45.0^^71^918^29
+637 ;;^UTILITY(U,$J,358.3,22757,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,22757,1,3,0)
+640 ;;=3^Somatization Disorder
+641 ;;^UTILITY(U,$J,358.3,22757,1,4,0)
+642 ;;=4^F45.0
+643 ;;^UTILITY(U,$J,358.3,22757,2)
+644 ;;=^112280
+645 ;;^UTILITY(U,$J,358.3,22758,0)
+646 ;;=F69.^^71^918^2
+647 ;;^UTILITY(U,$J,358.3,22758,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,22758,1,3,0)
+650 ;;=3^Adult Personality and Behavior Disorder,Unspec
+651 ;;^UTILITY(U,$J,358.3,22758,1,4,0)
+652 ;;=4^F69.
+653 ;;^UTILITY(U,$J,358.3,22758,2)
+654 ;;=^5003667
+655 ;;^UTILITY(U,$J,358.3,22759,0)
+656 ;;=F60.9^^71^918^23
+657 ;;^UTILITY(U,$J,358.3,22759,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,22759,1,3,0)
+660 ;;=3^Personality Disorder,Unspec
+661 ;;^UTILITY(U,$J,358.3,22759,1,4,0)
+662 ;;=4^F60.9
+663 ;;^UTILITY(U,$J,358.3,22759,2)
+664 ;;=^5003639
+665 ;;^UTILITY(U,$J,358.3,22760,0)
+666 ;;=F32.9^^71^918^16
+667 ;;^UTILITY(U,$J,358.3,22760,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,22760,1,3,0)
+670 ;;=3^MDD,Single Episode,Unspec
+671 ;;^UTILITY(U,$J,358.3,22760,1,4,0)
+672 ;;=4^F32.9
+673 ;;^UTILITY(U,$J,358.3,22760,2)
+674 ;;=^5003528
+675 ;;^UTILITY(U,$J,358.3,22761,0)
+676 ;;=F40.231^^71^918^12
+677 ;;^UTILITY(U,$J,358.3,22761,1,0)
+678 ;;=^358.31IA^4^2
+679 ;;^UTILITY(U,$J,358.3,22761,1,3,0)
+680 ;;=3^Fear of Injections/Transfusions
+681 ;;^UTILITY(U,$J,358.3,22761,1,4,0)
+682 ;;=4^F40.231
+683 ;;^UTILITY(U,$J,358.3,22761,2)
+684 ;;=^5003551
+685 ;;^UTILITY(U,$J,358.3,22762,0)
+686 ;;=F40.240^^71^918^8
