Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: IBDEI023

IBDEI023.m

Go to the documentation of this file.
IBDEI023 ; ; 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,4753,1,3,0)
 ;;=3^Acute Ischemia of Intestine
 ;;^UTILITY(U,$J,358.3,4753,1,4,0)
 ;;=4^K55.059
 ;;^UTILITY(U,$J,358.3,4753,2)
 ;;=^5138733
 ;;^UTILITY(U,$J,358.3,4754,0)
 ;;=C79.9^^32^274^30
 ;;^UTILITY(U,$J,358.3,4754,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4754,1,3,0)
 ;;=3^Metastatses
 ;;^UTILITY(U,$J,358.3,4754,1,4,0)
 ;;=4^C79.9
 ;;^UTILITY(U,$J,358.3,4754,2)
 ;;=^5133344
 ;;^UTILITY(U,$J,358.3,4755,0)
 ;;=C71.9^^32^274^31
 ;;^UTILITY(U,$J,358.3,4755,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4755,1,3,0)
 ;;=3^Malig Neopl of Brain
 ;;^UTILITY(U,$J,358.3,4755,1,4,0)
 ;;=4^C71.9
 ;;^UTILITY(U,$J,358.3,4755,2)
 ;;=^5001297
 ;;^UTILITY(U,$J,358.3,4756,0)
 ;;=C76.0^^32^274^32
 ;;^UTILITY(U,$J,358.3,4756,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4756,1,3,0)
 ;;=3^Malig Neopl of Head/Face/Neck
 ;;^UTILITY(U,$J,358.3,4756,1,4,0)
 ;;=4^C76.0
 ;;^UTILITY(U,$J,358.3,4756,2)
 ;;=^5001324
 ;;^UTILITY(U,$J,358.3,4757,0)
 ;;=C34.10^^32^274^33
 ;;^UTILITY(U,$J,358.3,4757,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4757,1,3,0)
 ;;=3^Malig Neopl of Lung or Bronchus
 ;;^UTILITY(U,$J,358.3,4757,1,4,0)
 ;;=4^C34.10
 ;;^UTILITY(U,$J,358.3,4757,2)
 ;;=^5000960
 ;;^UTILITY(U,$J,358.3,4758,0)
 ;;=C18.9^^32^274^34
 ;;^UTILITY(U,$J,358.3,4758,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4758,1,3,0)
 ;;=3^Malig Neopl of Colon
 ;;^UTILITY(U,$J,358.3,4758,1,4,0)
 ;;=4^C18.9
 ;;^UTILITY(U,$J,358.3,4758,2)
 ;;=^5000929
 ;;^UTILITY(U,$J,358.3,4759,0)
 ;;=C20.^^32^274^35
 ;;^UTILITY(U,$J,358.3,4759,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4759,1,3,0)
 ;;=3^Malig Neopl of Rectum
 ;;^UTILITY(U,$J,358.3,4759,1,4,0)
 ;;=4^C20.
 ;;^UTILITY(U,$J,358.3,4759,2)
 ;;=^267090
 ;;^UTILITY(U,$J,358.3,4760,0)
 ;;=C22.8^^32^274^36
 ;;^UTILITY(U,$J,358.3,4760,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4760,1,3,0)
 ;;=3^Malig Neopl of Liver
 ;;^UTILITY(U,$J,358.3,4760,1,4,0)
 ;;=4^C22.8
 ;;^UTILITY(U,$J,358.3,4760,2)
 ;;=^5000939
 ;;^UTILITY(U,$J,358.3,4761,0)
 ;;=C25.9^^32^274^37
 ;;^UTILITY(U,$J,358.3,4761,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4761,1,3,0)
 ;;=3^Malig Neopl of Pancreas
 ;;^UTILITY(U,$J,358.3,4761,1,4,0)
 ;;=4^C25.9
 ;;^UTILITY(U,$J,358.3,4761,2)
 ;;=^5000946
 ;;^UTILITY(U,$J,358.3,4762,0)
 ;;=C64.9^^32^274^38
 ;;^UTILITY(U,$J,358.3,4762,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4762,1,3,0)
 ;;=3^Malig Neopl of Kidney
 ;;^UTILITY(U,$J,358.3,4762,1,4,0)
 ;;=4^C64.9
 ;;^UTILITY(U,$J,358.3,4762,2)
 ;;=^5001250
 ;;^UTILITY(U,$J,358.3,4763,0)
 ;;=C67.9^^32^274^39
 ;;^UTILITY(U,$J,358.3,4763,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4763,1,3,0)
 ;;=3^Malig Neopl of Bladder
 ;;^UTILITY(U,$J,358.3,4763,1,4,0)
 ;;=4^C67.9
 ;;^UTILITY(U,$J,358.3,4763,2)
 ;;=^5001263
 ;;^UTILITY(U,$J,358.3,4764,0)
 ;;=C61.^^32^274^40
 ;;^UTILITY(U,$J,358.3,4764,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4764,1,3,0)
 ;;=3^Malig Neopl of Prostate
 ;;^UTILITY(U,$J,358.3,4764,1,4,0)
 ;;=4^C61.
 ;;^UTILITY(U,$J,358.3,4764,2)
 ;;=^267239
 ;;^UTILITY(U,$J,358.3,4765,0)
 ;;=C56.9^^32^274^41
 ;;^UTILITY(U,$J,358.3,4765,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4765,1,3,0)
 ;;=3^Malig Neopl of Ovary
 ;;^UTILITY(U,$J,358.3,4765,1,4,0)
 ;;=4^C56.9
 ;;^UTILITY(U,$J,358.3,4765,2)
 ;;=^5001214
 ;;^UTILITY(U,$J,358.3,4766,0)
 ;;=C43.9^^32^274^42
 ;;^UTILITY(U,$J,358.3,4766,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4766,1,3,0)
 ;;=3^Melanoma
 ;;^UTILITY(U,$J,358.3,4766,1,4,0)
 ;;=4^C43.9
 ;;^UTILITY(U,$J,358.3,4766,2)
 ;;=^5001015
 ;;^UTILITY(U,$J,358.3,4767,0)
 ;;=J06.9^^32^275^1
 ;;^UTILITY(U,$J,358.3,4767,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4767,1,3,0)
 ;;=3^Acute Upper Respiratory Infection
 ;;^UTILITY(U,$J,358.3,4767,1,4,0)
 ;;=4^J06.9
 ;;^UTILITY(U,$J,358.3,4767,2)
 ;;=^5008143
 ;;^UTILITY(U,$J,358.3,4768,0)
 ;;=J20.9^^32^275^2
 ;;^UTILITY(U,$J,358.3,4768,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4768,1,3,0)
 ;;=3^Acute Bronchitis
 ;;^UTILITY(U,$J,358.3,4768,1,4,0)
 ;;=4^J20.9
 ;;^UTILITY(U,$J,358.3,4768,2)
 ;;=^5008195
 ;;^UTILITY(U,$J,358.3,4769,0)
 ;;=J18.9^^32^275^3
 ;;^UTILITY(U,$J,358.3,4769,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4769,1,3,0)
 ;;=3^Pneumonia
 ;;^UTILITY(U,$J,358.3,4769,1,4,0)
 ;;=4^J18.9
 ;;^UTILITY(U,$J,358.3,4769,2)
 ;;=^95632
 ;;^UTILITY(U,$J,358.3,4770,0)
 ;;=J11.1^^32^275^4
 ;;^UTILITY(U,$J,358.3,4770,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4770,1,3,0)
 ;;=3^Flu w/ Respiratory Manifestations
 ;;^UTILITY(U,$J,358.3,4770,1,4,0)
 ;;=4^J11.1
 ;;^UTILITY(U,$J,358.3,4770,2)
 ;;=^5008158
 ;;^UTILITY(U,$J,358.3,4771,0)
 ;;=J01.90^^32^275^5
 ;;^UTILITY(U,$J,358.3,4771,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4771,1,3,0)
 ;;=3^Acute Sinusitis
 ;;^UTILITY(U,$J,358.3,4771,1,4,0)
 ;;=4^J01.90
 ;;^UTILITY(U,$J,358.3,4771,2)
 ;;=^5008127
 ;;^UTILITY(U,$J,358.3,4772,0)
 ;;=J02.9^^32^275^6
 ;;^UTILITY(U,$J,358.3,4772,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4772,1,3,0)
 ;;=3^Acute Pharyngitis
 ;;^UTILITY(U,$J,358.3,4772,1,4,0)
 ;;=4^J02.9
 ;;^UTILITY(U,$J,358.3,4772,2)
 ;;=^5008130
 ;;^UTILITY(U,$J,358.3,4773,0)
 ;;=J02.0^^32^275^7
 ;;^UTILITY(U,$J,358.3,4773,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4773,1,3,0)
 ;;=3^Streptococcal Pharyngitis
 ;;^UTILITY(U,$J,358.3,4773,1,4,0)
 ;;=4^J02.0
 ;;^UTILITY(U,$J,358.3,4773,2)
 ;;=^114607
 ;;^UTILITY(U,$J,358.3,4774,0)
 ;;=N39.0^^32^275^8
 ;;^UTILITY(U,$J,358.3,4774,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4774,1,3,0)
 ;;=3^UTI
 ;;^UTILITY(U,$J,358.3,4774,1,4,0)
 ;;=4^N39.0
 ;;^UTILITY(U,$J,358.3,4774,2)
 ;;=^124436
 ;;^UTILITY(U,$J,358.3,4775,0)
 ;;=N10.^^32^275^9
 ;;^UTILITY(U,$J,358.3,4775,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4775,1,3,0)
 ;;=3^Acute Pyelonephritis
 ;;^UTILITY(U,$J,358.3,4775,1,4,0)
 ;;=4^N10.
 ;;^UTILITY(U,$J,358.3,4775,2)
 ;;=^5015570
 ;;^UTILITY(U,$J,358.3,4776,0)
 ;;=R78.81^^32^275^10
 ;;^UTILITY(U,$J,358.3,4776,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4776,1,3,0)
 ;;=3^Bacteremia
 ;;^UTILITY(U,$J,358.3,4776,1,4,0)
 ;;=4^R78.81
 ;;^UTILITY(U,$J,358.3,4776,2)
 ;;=^12280
 ;;^UTILITY(U,$J,358.3,4777,0)
 ;;=A41.9^^32^275^11
 ;;^UTILITY(U,$J,358.3,4777,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4777,1,3,0)
 ;;=3^Sepsis
 ;;^UTILITY(U,$J,358.3,4777,1,4,0)
 ;;=4^A41.9
 ;;^UTILITY(U,$J,358.3,4777,2)
 ;;=^5000214
 ;;^UTILITY(U,$J,358.3,4778,0)
 ;;=R65.20^^32^275^12
 ;;^UTILITY(U,$J,358.3,4778,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4778,1,3,0)
 ;;=3^Severe Sepsis w/o Septic Shock
 ;;^UTILITY(U,$J,358.3,4778,1,4,0)
 ;;=4^R65.20
 ;;^UTILITY(U,$J,358.3,4778,2)
 ;;=^5019547
 ;;^UTILITY(U,$J,358.3,4779,0)
 ;;=R65.21^^32^275^13
 ;;^UTILITY(U,$J,358.3,4779,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4779,1,3,0)
 ;;=3^Severe Sepsis w/ Septic Shock
 ;;^UTILITY(U,$J,358.3,4779,1,4,0)
 ;;=4^R65.21
 ;;^UTILITY(U,$J,358.3,4779,2)
 ;;=^5019548
 ;;^UTILITY(U,$J,358.3,4780,0)
 ;;=R50.9^^32^275^15
 ;;^UTILITY(U,$J,358.3,4780,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4780,1,3,0)
 ;;=3^Fever
 ;;^UTILITY(U,$J,358.3,4780,1,4,0)
 ;;=4^R50.9
 ;;^UTILITY(U,$J,358.3,4780,2)
 ;;=^5019512
 ;;^UTILITY(U,$J,358.3,4781,0)
 ;;=D70.9^^32^275^16
 ;;^UTILITY(U,$J,358.3,4781,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4781,1,3,0)
 ;;=3^Neutropenia
 ;;^UTILITY(U,$J,358.3,4781,1,4,0)
 ;;=4^D70.9
 ;;^UTILITY(U,$J,358.3,4781,2)
 ;;=^334186
 ;;^UTILITY(U,$J,358.3,4782,0)
 ;;=L02.91^^32^275^17
 ;;^UTILITY(U,$J,358.3,4782,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4782,1,3,0)
 ;;=3^Cutaneous Abscess
 ;;^UTILITY(U,$J,358.3,4782,1,4,0)
 ;;=4^L02.91
 ;;^UTILITY(U,$J,358.3,4782,2)
 ;;=^5009016
 ;;^UTILITY(U,$J,358.3,4783,0)
 ;;=L02.419^^32^275^18
 ;;^UTILITY(U,$J,358.3,4783,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4783,1,3,0)
 ;;=3^Cutaneous Abscess,Limb
 ;;^UTILITY(U,$J,358.3,4783,1,4,0)
 ;;=4^L02.419
 ;;^UTILITY(U,$J,358.3,4783,2)
 ;;=^5008979
 ;;^UTILITY(U,$J,358.3,4784,0)
 ;;=L03.90^^32^275^19
 ;;^UTILITY(U,$J,358.3,4784,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4784,1,3,0)
 ;;=3^Cellulitis
 ;;^UTILITY(U,$J,358.3,4784,1,4,0)
 ;;=4^L03.90
 ;;^UTILITY(U,$J,358.3,4784,2)
 ;;=^5009067
 ;;^UTILITY(U,$J,358.3,4785,0)
 ;;=L03.119^^32^275^20
 ;;^UTILITY(U,$J,358.3,4785,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4785,1,3,0)
 ;;=3^Cellulitis,Limb
 ;;^UTILITY(U,$J,358.3,4785,1,4,0)
 ;;=4^L03.119
 ;;^UTILITY(U,$J,358.3,4785,2)
 ;;=^5009036
 ;;^UTILITY(U,$J,358.3,4786,0)
 ;;=L03.211^^32^275^21
 ;;^UTILITY(U,$J,358.3,4786,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4786,1,3,0)
 ;;=3^Cellulitis,Face
 ;;^UTILITY(U,$J,358.3,4786,1,4,0)
 ;;=4^L03.211
 ;;^UTILITY(U,$J,358.3,4786,2)
 ;;=^5009043
 ;;^UTILITY(U,$J,358.3,4787,0)
 ;;=E11.621^^32^275^22
 ;;^UTILITY(U,$J,358.3,4787,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4787,1,3,0)
 ;;=3^Type 2 Diabetes Foot Ulcer
 ;;^UTILITY(U,$J,358.3,4787,1,4,0)
 ;;=4^E11.621
 ;;^UTILITY(U,$J,358.3,4787,2)
 ;;=^5002656
 ;;^UTILITY(U,$J,358.3,4788,0)
 ;;=M86.10^^32^275^23
 ;;^UTILITY(U,$J,358.3,4788,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4788,1,3,0)
 ;;=3^Acute Osteomyelitis
 ;;^UTILITY(U,$J,358.3,4788,1,4,0)
 ;;=4^M86.10
 ;;^UTILITY(U,$J,358.3,4788,2)
 ;;=^5014521
 ;;^UTILITY(U,$J,358.3,4789,0)
 ;;=B02.9^^32^275^24
 ;;^UTILITY(U,$J,358.3,4789,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4789,1,3,0)
 ;;=3^Zoster w/o Complications
 ;;^UTILITY(U,$J,358.3,4789,1,4,0)
 ;;=4^B02.9
 ;;^UTILITY(U,$J,358.3,4789,2)
 ;;=^5000501
 ;;^UTILITY(U,$J,358.3,4790,0)
 ;;=W55.81XA^^32^275^25
 ;;^UTILITY(U,$J,358.3,4790,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4790,1,3,0)
 ;;=3^Animal Bite,Mammals
 ;;^UTILITY(U,$J,358.3,4790,1,4,0)
 ;;=4^W55.81XA
 ;;^UTILITY(U,$J,358.3,4790,2)
 ;;=^5060319
 ;;^UTILITY(U,$J,358.3,4791,0)
 ;;=W46.1XXA^^32^275^26
 ;;^UTILITY(U,$J,358.3,4791,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4791,1,3,0)
 ;;=3^Needlestick
 ;;^UTILITY(U,$J,358.3,4791,1,4,0)
 ;;=4^W46.1XXA
 ;;^UTILITY(U,$J,358.3,4791,2)
 ;;=^5060190
 ;;^UTILITY(U,$J,358.3,4792,0)
 ;;=A09.^^32^275^27
 ;;^UTILITY(U,$J,358.3,4792,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4792,1,3,0)
 ;;=3^Gastroenteritis,Infectious
 ;;^UTILITY(U,$J,358.3,4792,1,4,0)
 ;;=4^A09.
 ;;^UTILITY(U,$J,358.3,4792,2)
 ;;=^5000061
 ;;^UTILITY(U,$J,358.3,4793,0)
 ;;=M72.6^^32^275^30
 ;;^UTILITY(U,$J,358.3,4793,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4793,1,3,0)
 ;;=3^Necrotizing Fasciitis
 ;;^UTILITY(U,$J,358.3,4793,1,4,0)
 ;;=4^M72.6
 ;;^UTILITY(U,$J,358.3,4793,2)
 ;;=^303314
 ;;^UTILITY(U,$J,358.3,4794,0)
 ;;=Z11.1^^32^275^31
 ;;^UTILITY(U,$J,358.3,4794,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4794,1,3,0)
 ;;=3^Screening/Reading TB Test
 ;;^UTILITY(U,$J,358.3,4794,1,4,0)
 ;;=4^Z11.1
 ;;^UTILITY(U,$J,358.3,4794,2)
 ;;=^5062670
 ;;^UTILITY(U,$J,358.3,4795,0)
 ;;=N76.0^^32^275^33
 ;;^UTILITY(U,$J,358.3,4795,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4795,1,3,0)
 ;;=3^Acute Vaginitis
 ;;^UTILITY(U,$J,358.3,4795,1,4,0)
 ;;=4^N76.0
 ;;^UTILITY(U,$J,358.3,4795,2)
 ;;=^5015826
 ;;^UTILITY(U,$J,358.3,4796,0)
 ;;=A60.9^^32^275^34
 ;;^UTILITY(U,$J,358.3,4796,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4796,1,3,0)
 ;;=3^Genital Herpesviral Infection
 ;;^UTILITY(U,$J,358.3,4796,1,4,0)
 ;;=4^A60.9
 ;;^UTILITY(U,$J,358.3,4796,2)
 ;;=^5000359
 ;;^UTILITY(U,$J,358.3,4797,0)
 ;;=Z11.3^^32^275^35
 ;;^UTILITY(U,$J,358.3,4797,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4797,1,3,0)
 ;;=3^STD Screen
 ;;^UTILITY(U,$J,358.3,4797,1,4,0)
 ;;=4^Z11.3
 ;;^UTILITY(U,$J,358.3,4797,2)
 ;;=^5062672
 ;;^UTILITY(U,$J,358.3,4798,0)
 ;;=B20.^^32^275^36
 ;;^UTILITY(U,$J,358.3,4798,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4798,1,3,0)
 ;;=3^HIV
 ;;^UTILITY(U,$J,358.3,4798,1,4,0)
 ;;=4^B20.
 ;;^UTILITY(U,$J,358.3,4798,2)
 ;;=^5000555
 ;;^UTILITY(U,$J,358.3,4799,0)
 ;;=B18.2^^32^275^37
 ;;^UTILITY(U,$J,358.3,4799,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4799,1,3,0)
 ;;=3^Chronic Viral Hepatitis C
 ;;^UTILITY(U,$J,358.3,4799,1,4,0)
 ;;=4^B18.2
 ;;^UTILITY(U,$J,358.3,4799,2)
 ;;=^5000548
 ;;^UTILITY(U,$J,358.3,4800,0)
 ;;=G03.9^^32^275^38
 ;;^UTILITY(U,$J,358.3,4800,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4800,1,3,0)
 ;;=3^Meningitis
 ;;^UTILITY(U,$J,358.3,4800,1,4,0)
 ;;=4^G03.9
 ;;^UTILITY(U,$J,358.3,4800,2)
 ;;=^5003729
 ;;^UTILITY(U,$J,358.3,4801,0)
 ;;=G04.90^^32^275^39
 ;;^UTILITY(U,$J,358.3,4801,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4801,1,3,0)
 ;;=3^Encephalitis & Encephalopathy
 ;;^UTILITY(U,$J,358.3,4801,1,4,0)
 ;;=4^G04.90
 ;;^UTILITY(U,$J,358.3,4801,2)
 ;;=^5003741
 ;;^UTILITY(U,$J,358.3,4802,0)
 ;;=A15.0^^32^275^32
 ;;^UTILITY(U,$J,358.3,4802,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4802,1,3,0)
 ;;=3^Tuberculosis,Pulmonary
 ;;^UTILITY(U,$J,358.3,4802,1,4,0)
 ;;=4^A15.0
 ;;^UTILITY(U,$J,358.3,4802,2)
 ;;=^5000062
 ;;^UTILITY(U,$J,358.3,4803,0)
 ;;=A04.71^^32^275^28
 ;;^UTILITY(U,$J,358.3,4803,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4803,1,3,0)
 ;;=3^Clostridium Difficile Enterocolitis,Recurrent
 ;;^UTILITY(U,$J,358.3,4803,1,4,0)
 ;;=4^A04.71
 ;;^UTILITY(U,$J,358.3,4803,2)
 ;;=^5151291
 ;;^UTILITY(U,$J,358.3,4804,0)
 ;;=A04.72^^32^275^29
 ;;^UTILITY(U,$J,358.3,4804,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4804,1,3,0)
 ;;=3^Clostridium Difficile Enterocolitis,Not Spec as Recurrent
 ;;^UTILITY(U,$J,358.3,4804,1,4,0)
 ;;=4^A04.72
 ;;^UTILITY(U,$J,358.3,4804,2)
 ;;=^5151292
 ;;^UTILITY(U,$J,358.3,4805,0)
 ;;=T81.44XA^^32^275^14
 ;;^UTILITY(U,$J,358.3,4805,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4805,1,3,0)
 ;;=3^Sepsis Following a Procedure,Init Encntr
 ;;^UTILITY(U,$J,358.3,4805,1,4,0)
 ;;=4^T81.44XA
 ;;^UTILITY(U,$J,358.3,4805,2)
 ;;=^5157596
 ;;^UTILITY(U,$J,358.3,4806,0)
 ;;=T81.41XA^^32^275^40
 ;;^UTILITY(U,$J,358.3,4806,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4806,1,3,0)
 ;;=3^Stitch Abscess Following a Procedure,Init Encntr
 ;;^UTILITY(U,$J,358.3,4806,1,4,0)
 ;;=4^T81.41XA
 ;;^UTILITY(U,$J,358.3,4806,2)
 ;;=^5157587
 ;;^UTILITY(U,$J,358.3,4807,0)
 ;;=T81.42XA^^32^275^41
 ;;^UTILITY(U,$J,358.3,4807,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4807,1,3,0)
 ;;=3^Intra-Muscular Abscess Following a Procedure,Init Encntr
 ;;^UTILITY(U,$J,358.3,4807,1,4,0)
 ;;=4^T81.42XA
 ;;^UTILITY(U,$J,358.3,4807,2)
 ;;=^5157590
 ;;^UTILITY(U,$J,358.3,4808,0)
 ;;=T81.43XA^^32^275^42
 ;;^UTILITY(U,$J,358.3,4808,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4808,1,3,0)
 ;;=3^Intra-Abdominal Abscess Following a Procedure,Init Encntr
 ;;^UTILITY(U,$J,358.3,4808,1,4,0)
 ;;=4^T81.43XA
 ;;^UTILITY(U,$J,358.3,4808,2)
 ;;=^5157593
 ;;^UTILITY(U,$J,358.3,4809,0)
 ;;=M25.50^^32^276^1
 ;;^UTILITY(U,$J,358.3,4809,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4809,1,3,0)
 ;;=3^Pain in Joint
 ;;^UTILITY(U,$J,358.3,4809,1,4,0)
 ;;=4^M25.50
 ;;^UTILITY(U,$J,358.3,4809,2)
 ;;=^5011601
 ;;^UTILITY(U,$J,358.3,4810,0)
 ;;=M10.9^^32^276^2
 ;;^UTILITY(U,$J,358.3,4810,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4810,1,3,0)
 ;;=3^Gout
 ;;^UTILITY(U,$J,358.3,4810,1,4,0)
 ;;=4^M10.9
 ;;^UTILITY(U,$J,358.3,4810,2)
 ;;=^5010404
 ;;^UTILITY(U,$J,358.3,4811,0)
 ;;=S09.90XA^^32^276^3
 ;;^UTILITY(U,$J,358.3,4811,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4811,1,3,0)
 ;;=3^Head Injury
 ;;^UTILITY(U,$J,358.3,4811,1,4,0)
 ;;=4^S09.90XA
 ;;^UTILITY(U,$J,358.3,4811,2)
 ;;=^5021332
 ;;^UTILITY(U,$J,358.3,4812,0)
 ;;=S02.91XA^^32^276^4
 ;;^UTILITY(U,$J,358.3,4812,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4812,1,3,0)
 ;;=3^Skull Fracture
 ;;^UTILITY(U,$J,358.3,4812,1,4,0)
 ;;=4^S02.91XA
 ;;^UTILITY(U,$J,358.3,4812,2)
 ;;=^5020432
 ;;^UTILITY(U,$J,358.3,4813,0)
 ;;=S06.5X0A^^32^276^5
 ;;^UTILITY(U,$J,358.3,4813,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4813,1,3,0)
 ;;=3^Traumatic Subdural Hemorrhage w/o LOC
 ;;^UTILITY(U,$J,358.3,4813,1,4,0)
 ;;=4^S06.5X0A
 ;;^UTILITY(U,$J,358.3,4813,2)
 ;;=^5021056
 ;;^UTILITY(U,$J,358.3,4814,0)
 ;;=S06.5X1A^^32^276^6
 ;;^UTILITY(U,$J,358.3,4814,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4814,1,3,0)
 ;;=3^Traumatic Subdural Hemorrhage w/ LOC
 ;;^UTILITY(U,$J,358.3,4814,1,4,0)
 ;;=4^S06.5X1A
 ;;^UTILITY(U,$J,358.3,4814,2)
 ;;=^5021059
 ;;^UTILITY(U,$J,358.3,4815,0)
 ;;=S06.6X0A^^32^276^7
 ;;^UTILITY(U,$J,358.3,4815,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4815,1,3,0)
 ;;=3^Traumatic Subarachnoid Hemorrhage w/o LOC
 ;;^UTILITY(U,$J,358.3,4815,1,4,0)
 ;;=4^S06.6X0A
 ;;^UTILITY(U,$J,358.3,4815,2)
 ;;=^5021086
 ;;^UTILITY(U,$J,358.3,4816,0)
 ;;=S06.6X1A^^32^276^8
 ;;^UTILITY(U,$J,358.3,4816,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4816,1,3,0)
 ;;=3^Traumatic Subarachnoid Hemorrhage w/ LOC
 ;;^UTILITY(U,$J,358.3,4816,1,4,0)
 ;;=4^S06.6X1A
 ;;^UTILITY(U,$J,358.3,4816,2)
 ;;=^5021089
 ;;^UTILITY(U,$J,358.3,4817,0)
 ;;=S06.330A^^32^276^9
 ;;^UTILITY(U,$J,358.3,4817,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4817,1,3,0)
 ;;=3^Cerebral Contusion w/o LOC
 ;;^UTILITY(U,$J,358.3,4817,1,4,0)
 ;;=4^S06.330A
 ;;^UTILITY(U,$J,358.3,4817,2)
 ;;=^5020846
 ;;^UTILITY(U,$J,358.3,4818,0)
 ;;=S06.331A^^32^276^10
 ;;^UTILITY(U,$J,358.3,4818,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4818,1,3,0)
 ;;=3^Cerebral Contusion w/ LOC
 ;;^UTILITY(U,$J,358.3,4818,1,4,0)
 ;;=4^S06.331A
 ;;^UTILITY(U,$J,358.3,4818,2)
 ;;=^5020849
 ;;^UTILITY(U,$J,358.3,4819,0)
 ;;=S06.0X0A^^32^276^11
 ;;^UTILITY(U,$J,358.3,4819,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4819,1,3,0)
 ;;=3^Concussion w/o LOC
 ;;^UTILITY(U,$J,358.3,4819,1,4,0)
 ;;=4^S06.0X0A
 ;;^UTILITY(U,$J,358.3,4819,2)
 ;;=^5020666
 ;;^UTILITY(U,$J,358.3,4820,0)
 ;;=S06.0X1A^^32^276^12
 ;;^UTILITY(U,$J,358.3,4820,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4820,1,3,0)
 ;;=3^Concussion w/ LOC
 ;;^UTILITY(U,$J,358.3,4820,1,4,0)
 ;;=4^S06.0X1A
 ;;^UTILITY(U,$J,358.3,4820,2)
 ;;=^5020669
 ;;^UTILITY(U,$J,358.3,4821,0)
 ;;=S00.91XA^^32^276^13
 ;;^UTILITY(U,$J,358.3,4821,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4821,1,3,0)
 ;;=3^Head,Any Site,Abrasion
 ;;^UTILITY(U,$J,358.3,4821,1,4,0)
 ;;=4^S00.91XA
 ;;^UTILITY(U,$J,358.3,4821,2)
 ;;=^5020012
 ;;^UTILITY(U,$J,358.3,4822,0)
 ;;=S00.93XA^^32^276^14
 ;;^UTILITY(U,$J,358.3,4822,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4822,1,3,0)
 ;;=3^Head,Any Site,Contusion
 ;;^UTILITY(U,$J,358.3,4822,1,4,0)
 ;;=4^S00.93XA
 ;;^UTILITY(U,$J,358.3,4822,2)
 ;;=^5020018
 ;;^UTILITY(U,$J,358.3,4823,0)
 ;;=S02.2XXA^^32^276^15
 ;;^UTILITY(U,$J,358.3,4823,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4823,1,3,0)
 ;;=3^Nasal Fracture
 ;;^UTILITY(U,$J,358.3,4823,1,4,0)
 ;;=4^S02.2XXA
 ;;^UTILITY(U,$J,358.3,4823,2)
 ;;=^5020306
 ;;^UTILITY(U,$J,358.3,4824,0)
 ;;=S02.92XA^^32^276^16
 ;;^UTILITY(U,$J,358.3,4824,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4824,1,3,0)
 ;;=3^Facial Bones Fracture
 ;;^UTILITY(U,$J,358.3,4824,1,4,0)
 ;;=4^S02.92XA
 ;;^UTILITY(U,$J,358.3,4824,2)
 ;;=^5020438
 ;;^UTILITY(U,$J,358.3,4825,0)
 ;;=S10.91XA^^32^276^17
 ;;^UTILITY(U,$J,358.3,4825,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4825,1,3,0)
 ;;=3^Neck Abrasion