IBDEI0D1 ; ; 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,32703,0)
;;=M54.50^^99^1348^10
;;^UTILITY(U,$J,358.3,32703,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32703,1,3,0)
;;=3^Low Back Pain,Unspec
;;^UTILITY(U,$J,358.3,32703,1,4,0)
;;=4^M54.50
;;^UTILITY(U,$J,358.3,32703,2)
;;=^5161215
;;^UTILITY(U,$J,358.3,32704,0)
;;=M54.59^^99^1348^9
;;^UTILITY(U,$J,358.3,32704,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32704,1,3,0)
;;=3^Low Back Pain,Other
;;^UTILITY(U,$J,358.3,32704,1,4,0)
;;=4^M54.59
;;^UTILITY(U,$J,358.3,32704,2)
;;=^5161217
;;^UTILITY(U,$J,358.3,32705,0)
;;=J06.9^^99^1349^18
;;^UTILITY(U,$J,358.3,32705,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32705,1,3,0)
;;=3^Upper respiratory infection, acute
;;^UTILITY(U,$J,358.3,32705,1,4,0)
;;=4^J06.9
;;^UTILITY(U,$J,358.3,32705,2)
;;=^5008143
;;^UTILITY(U,$J,358.3,32706,0)
;;=J10.1^^99^1349^8
;;^UTILITY(U,$J,358.3,32706,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32706,1,3,0)
;;=3^Flu d/t indent influ virus w/ oth resp manifest
;;^UTILITY(U,$J,358.3,32706,1,4,0)
;;=4^J10.1
;;^UTILITY(U,$J,358.3,32706,2)
;;=^5008151
;;^UTILITY(U,$J,358.3,32707,0)
;;=J11.1^^99^1349^9
;;^UTILITY(U,$J,358.3,32707,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32707,1,3,0)
;;=3^Flu d/t unident influ virus w/ oth resp manifest
;;^UTILITY(U,$J,358.3,32707,1,4,0)
;;=4^J11.1
;;^UTILITY(U,$J,358.3,32707,2)
;;=^5008158
;;^UTILITY(U,$J,358.3,32708,0)
;;=J43.9^^99^1349^7
;;^UTILITY(U,$J,358.3,32708,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32708,1,3,0)
;;=3^Emphysema, unspecified
;;^UTILITY(U,$J,358.3,32708,1,4,0)
;;=4^J43.9
;;^UTILITY(U,$J,358.3,32708,2)
;;=^5008238
;;^UTILITY(U,$J,358.3,32709,0)
;;=J44.9^^99^1349^4
;;^UTILITY(U,$J,358.3,32709,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32709,1,3,0)
;;=3^COPD, unspec
;;^UTILITY(U,$J,358.3,32709,1,4,0)
;;=4^J44.9
;;^UTILITY(U,$J,358.3,32709,2)
;;=^5008241
;;^UTILITY(U,$J,358.3,32710,0)
;;=J45.909^^99^1349^1
;;^UTILITY(U,$J,358.3,32710,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32710,1,3,0)
;;=3^Asthma, uncomplicated, unspec
;;^UTILITY(U,$J,358.3,32710,1,4,0)
;;=4^J45.909
;;^UTILITY(U,$J,358.3,32710,2)
;;=^5008256
;;^UTILITY(U,$J,358.3,32711,0)
;;=J91.8^^99^1349^10
;;^UTILITY(U,$J,358.3,32711,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32711,1,3,0)
;;=3^Pleural effusion in other conditions classified elsewhere
;;^UTILITY(U,$J,358.3,32711,1,4,0)
;;=4^J91.8
;;^UTILITY(U,$J,358.3,32711,2)
;;=^5008311
;;^UTILITY(U,$J,358.3,32712,0)
;;=J20.9^^99^1349^2
;;^UTILITY(U,$J,358.3,32712,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32712,1,3,0)
;;=3^Bronchitis,Acute,Unspec
;;^UTILITY(U,$J,358.3,32712,1,4,0)
;;=4^J20.9
;;^UTILITY(U,$J,358.3,32712,2)
;;=^5008195
;;^UTILITY(U,$J,358.3,32713,0)
;;=J98.01^^99^1349^3
;;^UTILITY(U,$J,358.3,32713,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32713,1,3,0)
;;=3^Bronchospasm,Acute
;;^UTILITY(U,$J,358.3,32713,1,4,0)
;;=4^J98.01
;;^UTILITY(U,$J,358.3,32713,2)
;;=^334092
;;^UTILITY(U,$J,358.3,32714,0)
;;=R06.00^^99^1349^6
;;^UTILITY(U,$J,358.3,32714,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32714,1,3,0)
;;=3^Dyspnea
;;^UTILITY(U,$J,358.3,32714,1,4,0)
;;=4^R06.00
;;^UTILITY(U,$J,358.3,32714,2)
;;=^5019180
;;^UTILITY(U,$J,358.3,32715,0)
;;=J18.9^^99^1349^11
;;^UTILITY(U,$J,358.3,32715,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32715,1,3,0)
;;=3^Pneumonia,Unspec
;;^UTILITY(U,$J,358.3,32715,1,4,0)
;;=4^J18.9
;;^UTILITY(U,$J,358.3,32715,2)
;;=^95632
;;^UTILITY(U,$J,358.3,32716,0)
;;=J12.9^^99^1349^12
;;^UTILITY(U,$J,358.3,32716,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32716,1,3,0)
;;=3^Pneumonia,Viral
;;^UTILITY(U,$J,358.3,32716,1,4,0)
;;=4^J12.9
;;^UTILITY(U,$J,358.3,32716,2)
;;=^5008169
;;^UTILITY(U,$J,358.3,32717,0)
;;=G47.33^^99^1349^14
;;^UTILITY(U,$J,358.3,32717,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32717,1,3,0)
;;=3^Sleep Apnea,Obstructive
;;^UTILITY(U,$J,358.3,32717,1,4,0)
;;=4^G47.33
;;^UTILITY(U,$J,358.3,32717,2)
;;=^332763
;;^UTILITY(U,$J,358.3,32718,0)
;;=R06.1^^99^1349^15
;;^UTILITY(U,$J,358.3,32718,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32718,1,3,0)
;;=3^Stridor
;;^UTILITY(U,$J,358.3,32718,1,4,0)
;;=4^R06.1
;;^UTILITY(U,$J,358.3,32718,2)
;;=^5019183
;;^UTILITY(U,$J,358.3,32719,0)
;;=R06.82^^99^1349^17
;;^UTILITY(U,$J,358.3,32719,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32719,1,3,0)
;;=3^Tachypnea
;;^UTILITY(U,$J,358.3,32719,1,4,0)
;;=4^R06.82
;;^UTILITY(U,$J,358.3,32719,2)
;;=^5019191
;;^UTILITY(U,$J,358.3,32720,0)
;;=R55.^^99^1349^16
;;^UTILITY(U,$J,358.3,32720,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32720,1,3,0)
;;=3^Syncope/Collapse
;;^UTILITY(U,$J,358.3,32720,1,4,0)
;;=4^R55.
;;^UTILITY(U,$J,358.3,32720,2)
;;=^116707
;;^UTILITY(U,$J,358.3,32721,0)
;;=R06.2^^99^1349^19
;;^UTILITY(U,$J,358.3,32721,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32721,1,3,0)
;;=3^Wheezing
;;^UTILITY(U,$J,358.3,32721,1,4,0)
;;=4^R06.2
;;^UTILITY(U,$J,358.3,32721,2)
;;=^5019184
;;^UTILITY(U,$J,358.3,32722,0)
;;=R05.9^^99^1349^5
;;^UTILITY(U,$J,358.3,32722,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32722,1,3,0)
;;=3^Cough,Unspec
;;^UTILITY(U,$J,358.3,32722,1,4,0)
;;=4^R05.9
;;^UTILITY(U,$J,358.3,32722,2)
;;=^5161232
;;^UTILITY(U,$J,358.3,32723,0)
;;=R06.02^^99^1349^13
;;^UTILITY(U,$J,358.3,32723,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32723,1,3,0)
;;=3^Shortness of Breath
;;^UTILITY(U,$J,358.3,32723,1,4,0)
;;=4^R06.02
;;^UTILITY(U,$J,358.3,32723,2)
;;=^5019181
;;^UTILITY(U,$J,358.3,32724,0)
;;=S23.9XXA^^99^1350^52
;;^UTILITY(U,$J,358.3,32724,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32724,1,3,0)
;;=3^Sprain Thorax,Unspec Part,Initial Encounter
;;^UTILITY(U,$J,358.3,32724,1,4,0)
;;=4^S23.9XXA
;;^UTILITY(U,$J,358.3,32724,2)
;;=^5023267
;;^UTILITY(U,$J,358.3,32725,0)
;;=S13.4XXA^^99^1350^51
;;^UTILITY(U,$J,358.3,32725,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32725,1,3,0)
;;=3^Sprain Ligaments Cervical Spine,Initial Encounter
;;^UTILITY(U,$J,358.3,32725,1,4,0)
;;=4^S13.4XXA
;;^UTILITY(U,$J,358.3,32725,2)
;;=^5022028
;;^UTILITY(U,$J,358.3,32726,0)
;;=R22.2^^99^1350^53
;;^UTILITY(U,$J,358.3,32726,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32726,1,3,0)
;;=3^Swelling,Mass & Lump,Trunk
;;^UTILITY(U,$J,358.3,32726,1,4,0)
;;=4^R22.2
;;^UTILITY(U,$J,358.3,32726,2)
;;=^5019286
;;^UTILITY(U,$J,358.3,32727,0)
;;=R55.^^99^1350^54
;;^UTILITY(U,$J,358.3,32727,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32727,1,3,0)
;;=3^Syncope and Collapse
;;^UTILITY(U,$J,358.3,32727,1,4,0)
;;=4^R55.
;;^UTILITY(U,$J,358.3,32727,2)
;;=^116707
;;^UTILITY(U,$J,358.3,32728,0)
;;=R10.9^^99^1350^2
;;^UTILITY(U,$J,358.3,32728,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32728,1,3,0)
;;=3^Abdominal pain, unspec
;;^UTILITY(U,$J,358.3,32728,1,4,0)
;;=4^R10.9
;;^UTILITY(U,$J,358.3,32728,2)
;;=^5019230
;;^UTILITY(U,$J,358.3,32729,0)
;;=Z89.512^^99^1350^4
;;^UTILITY(U,$J,358.3,32729,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32729,1,3,0)
;;=3^Acquired absence of left leg below knee
;;^UTILITY(U,$J,358.3,32729,1,4,0)
;;=4^Z89.512
;;^UTILITY(U,$J,358.3,32729,2)
;;=^5063567
;;^UTILITY(U,$J,358.3,32730,0)
;;=Z89.511^^99^1350^5
;;^UTILITY(U,$J,358.3,32730,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32730,1,3,0)
;;=3^Acquired absence of right leg below knee
;;^UTILITY(U,$J,358.3,32730,1,4,0)
;;=4^Z89.511
;;^UTILITY(U,$J,358.3,32730,2)
;;=^5063566
;;^UTILITY(U,$J,358.3,32731,0)
;;=T78.40XA^^99^1350^6
;;^UTILITY(U,$J,358.3,32731,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32731,1,3,0)
;;=3^Allergy, unspecified, initial encounter
;;^UTILITY(U,$J,358.3,32731,1,4,0)
;;=4^T78.40XA
;;^UTILITY(U,$J,358.3,32731,2)
;;=^5054284
;;^UTILITY(U,$J,358.3,32732,0)
;;=R00.1^^99^1350^10
;;^UTILITY(U,$J,358.3,32732,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32732,1,3,0)
;;=3^Bradycardia, unspecified
;;^UTILITY(U,$J,358.3,32732,1,4,0)
;;=4^R00.1
;;^UTILITY(U,$J,358.3,32732,2)
;;=^5019164
;;^UTILITY(U,$J,358.3,32733,0)
;;=R07.9^^99^1350^11
;;^UTILITY(U,$J,358.3,32733,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32733,1,3,0)
;;=3^Chest pain, unspecified
;;^UTILITY(U,$J,358.3,32733,1,4,0)
;;=4^R07.9
;;^UTILITY(U,$J,358.3,32733,2)
;;=^5019201
;;^UTILITY(U,$J,358.3,32734,0)
;;=R25.2^^99^1350^14
;;^UTILITY(U,$J,358.3,32734,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32734,1,3,0)
;;=3^Cramp and spasm
;;^UTILITY(U,$J,358.3,32734,1,4,0)
;;=4^R25.2
;;^UTILITY(U,$J,358.3,32734,2)
;;=^5019301
;;^UTILITY(U,$J,358.3,32735,0)
;;=R19.7^^99^1350^15
;;^UTILITY(U,$J,358.3,32735,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32735,1,3,0)
;;=3^Diarrhea, unspecified
;;^UTILITY(U,$J,358.3,32735,1,4,0)
;;=4^R19.7
;;^UTILITY(U,$J,358.3,32735,2)
;;=^5019276
;;^UTILITY(U,$J,358.3,32736,0)
;;=R42.^^99^1350^17
;;^UTILITY(U,$J,358.3,32736,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32736,1,3,0)
;;=3^Dizziness and giddiness
;;^UTILITY(U,$J,358.3,32736,1,4,0)
;;=4^R42.
;;^UTILITY(U,$J,358.3,32736,2)
;;=^5019450
;;^UTILITY(U,$J,358.3,32737,0)
;;=R13.10^^99^1350^18
;;^UTILITY(U,$J,358.3,32737,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32737,1,3,0)
;;=3^Dysphagia, unspecified
;;^UTILITY(U,$J,358.3,32737,1,4,0)
;;=4^R13.10
;;^UTILITY(U,$J,358.3,32737,2)
;;=^335307
;;^UTILITY(U,$J,358.3,32738,0)
;;=R06.00^^99^1350^19
;;^UTILITY(U,$J,358.3,32738,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32738,1,3,0)
;;=3^Dyspnea, unspecified
;;^UTILITY(U,$J,358.3,32738,1,4,0)
;;=4^R06.00
;;^UTILITY(U,$J,358.3,32738,2)
;;=^5019180
;;^UTILITY(U,$J,358.3,32739,0)
;;=R60.9^^99^1350^20
;;^UTILITY(U,$J,358.3,32739,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32739,1,3,0)
;;=3^Edema, unspecified
;;^UTILITY(U,$J,358.3,32739,1,4,0)
;;=4^R60.9
;;^UTILITY(U,$J,358.3,32739,2)
;;=^5019534
;;^UTILITY(U,$J,358.3,32740,0)
;;=R04.0^^99^1350^22
;;^UTILITY(U,$J,358.3,32740,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32740,1,3,0)
;;=3^Epistaxis
;;^UTILITY(U,$J,358.3,32740,1,4,0)
;;=4^R04.0
;;^UTILITY(U,$J,358.3,32740,2)
;;=^5019173
;;^UTILITY(U,$J,358.3,32741,0)
;;=R53.83^^99^1350^23
;;^UTILITY(U,$J,358.3,32741,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32741,1,3,0)
;;=3^Fatigue, other
;;^UTILITY(U,$J,358.3,32741,1,4,0)
;;=4^R53.83
;;^UTILITY(U,$J,358.3,32741,2)
;;=^5019520
;;^UTILITY(U,$J,358.3,32742,0)
;;=R50.9^^99^1350^24
;;^UTILITY(U,$J,358.3,32742,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32742,1,3,0)
;;=3^Fever, unspecified
;;^UTILITY(U,$J,358.3,32742,1,4,0)
;;=4^R50.9
;;^UTILITY(U,$J,358.3,32742,2)
;;=^5019512
;;^UTILITY(U,$J,358.3,32743,0)
;;=R31.9^^99^1350^28
;;^UTILITY(U,$J,358.3,32743,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32743,1,3,0)
;;=3^Hematuria, unspecified
;;^UTILITY(U,$J,358.3,32743,1,4,0)
;;=4^R31.9
;;^UTILITY(U,$J,358.3,32743,2)
;;=^5019328
;;^UTILITY(U,$J,358.3,32744,0)
;;=Z21.^^99^1350^25
;;^UTILITY(U,$J,358.3,32744,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32744,1,3,0)
;;=3^HIV status, asymptomatic
;;^UTILITY(U,$J,358.3,32744,1,4,0)
;;=4^Z21.
;;^UTILITY(U,$J,358.3,32744,2)
;;=^5062777
;;^UTILITY(U,$J,358.3,32745,0)
;;=R17.^^99^1350^33
;;^UTILITY(U,$J,358.3,32745,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32745,1,3,0)
;;=3^Jaundice, unspec
;;^UTILITY(U,$J,358.3,32745,1,4,0)
;;=4^R17.
;;^UTILITY(U,$J,358.3,32745,2)
;;=^5019251
;;^UTILITY(U,$J,358.3,32746,0)
;;=R53.81^^99^1350^34
;;^UTILITY(U,$J,358.3,32746,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32746,1,3,0)
;;=3^Malaise, other
;;^UTILITY(U,$J,358.3,32746,1,4,0)
;;=4^R53.81
;;^UTILITY(U,$J,358.3,32746,2)
;;=^5019518
;;^UTILITY(U,$J,358.3,32747,0)
;;=R35.0^^99^1350^35
;;^UTILITY(U,$J,358.3,32747,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32747,1,3,0)
;;=3^Micturition frequency
;;^UTILITY(U,$J,358.3,32747,1,4,0)
;;=4^R35.0
;;^UTILITY(U,$J,358.3,32747,2)
;;=^5019334
;;^UTILITY(U,$J,358.3,32748,0)
;;=R11.2^^99^1350^36
;;^UTILITY(U,$J,358.3,32748,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32748,1,3,0)
;;=3^Nausea w/ vomiting, unspecified
;;^UTILITY(U,$J,358.3,32748,1,4,0)
;;=4^R11.2
;;^UTILITY(U,$J,358.3,32748,2)
;;=^5019237
;;^UTILITY(U,$J,358.3,32749,0)
;;=Z51.5^^99^1350^37
;;^UTILITY(U,$J,358.3,32749,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32749,1,3,0)
;;=3^Palliative care encounter
;;^UTILITY(U,$J,358.3,32749,1,4,0)
;;=4^Z51.5
;;^UTILITY(U,$J,358.3,32749,2)
;;=^5063063
;;^UTILITY(U,$J,358.3,32750,0)
;;=R10.2^^99^1350^39
;;^UTILITY(U,$J,358.3,32750,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32750,1,3,0)
;;=3^Pelvic & perineal pain
;;^UTILITY(U,$J,358.3,32750,1,4,0)
;;=4^R10.2
;;^UTILITY(U,$J,358.3,32750,2)
;;=^5019209
;;^UTILITY(U,$J,358.3,32751,0)
;;=R09.1^^99^1350^40
;;^UTILITY(U,$J,358.3,32751,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32751,1,3,0)
;;=3^Pleurisy
;;^UTILITY(U,$J,358.3,32751,1,4,0)
;;=4^R09.1
;;^UTILITY(U,$J,358.3,32751,2)
;;=^95428
;;^UTILITY(U,$J,358.3,32752,0)
;;=Z95.1^^99^1350^44
;;^UTILITY(U,$J,358.3,32752,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32752,1,3,0)
;;=3^Presence of aortocoronary bypass graft
;;^UTILITY(U,$J,358.3,32752,1,4,0)
;;=4^Z95.1
;;^UTILITY(U,$J,358.3,32752,2)
;;=^5063669
;;^UTILITY(U,$J,358.3,32753,0)
;;=Z95.3^^99^1350^45
;;^UTILITY(U,$J,358.3,32753,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32753,1,3,0)
;;=3^Presence of xenogenic heart valve
;;^UTILITY(U,$J,358.3,32753,1,4,0)
;;=4^Z95.3
;;^UTILITY(U,$J,358.3,32753,2)
;;=^5063671
;;^UTILITY(U,$J,358.3,32754,0)
;;=R21.^^99^1350^47
;;^UTILITY(U,$J,358.3,32754,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32754,1,3,0)
;;=3^Rash & oth nonspecific skin eruption
;;^UTILITY(U,$J,358.3,32754,1,4,0)
;;=4^R21.
;;^UTILITY(U,$J,358.3,32754,2)
;;=^5019283
;;^UTILITY(U,$J,358.3,32755,0)
;;=Z12.9^^99^1350^48
;;^UTILITY(U,$J,358.3,32755,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32755,1,3,0)
;;=3^Screening malig neop site unspec
;;^UTILITY(U,$J,358.3,32755,1,4,0)
;;=4^Z12.9
;;^UTILITY(U,$J,358.3,32755,2)
;;=^5062698
;;^UTILITY(U,$J,358.3,32756,0)
;;=R06.02^^99^1350^49
;;^UTILITY(U,$J,358.3,32756,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32756,1,3,0)
;;=3^Shortness of breath
;;^UTILITY(U,$J,358.3,32756,1,4,0)
;;=4^R06.02
;;^UTILITY(U,$J,358.3,32756,2)
;;=^5019181
;;^UTILITY(U,$J,358.3,32757,0)
;;=R00.0^^99^1350^55
;;^UTILITY(U,$J,358.3,32757,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32757,1,3,0)
;;=3^Tachycardia, unspecified
;;^UTILITY(U,$J,358.3,32757,1,4,0)
;;=4^R00.0
;;^UTILITY(U,$J,358.3,32757,2)
;;=^5019163
;;^UTILITY(U,$J,358.3,32758,0)
;;=R32.^^99^1350^57
;;^UTILITY(U,$J,358.3,32758,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32758,1,3,0)
;;=3^Urinary incontinence, unspec
;;^UTILITY(U,$J,358.3,32758,1,4,0)
;;=4^R32.
;;^UTILITY(U,$J,358.3,32758,2)
;;=^5019329
;;^UTILITY(U,$J,358.3,32759,0)
;;=R33.9^^99^1350^58
;;^UTILITY(U,$J,358.3,32759,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32759,1,3,0)
;;=3^Urine retention, unspec
;;^UTILITY(U,$J,358.3,32759,1,4,0)
;;=4^R33.9
;;^UTILITY(U,$J,358.3,32759,2)
;;=^5019332
;;^UTILITY(U,$J,358.3,32760,0)
;;=R53.1^^99^1350^59
;;^UTILITY(U,$J,358.3,32760,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32760,1,3,0)
;;=3^Weakness
;;^UTILITY(U,$J,358.3,32760,1,4,0)
;;=4^R53.1
;;^UTILITY(U,$J,358.3,32760,2)
;;=^5019516
;;^UTILITY(U,$J,358.3,32761,0)
;;=R63.4^^99^1350^60
;;^UTILITY(U,$J,358.3,32761,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32761,1,3,0)
;;=3^Weight loss, abnormal
;;^UTILITY(U,$J,358.3,32761,1,4,0)
;;=4^R63.4
;;^UTILITY(U,$J,358.3,32761,2)
;;=^5019542
;;^UTILITY(U,$J,358.3,32762,0)
;;=B18.2^^99^1350^29
;;^UTILITY(U,$J,358.3,32762,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32762,1,3,0)
;;=3^Hepatitis C Carrier,Viral
;;^UTILITY(U,$J,358.3,32762,1,4,0)
;;=4^B18.2
;;^UTILITY(U,$J,358.3,32762,2)
;;=^5000548
;;^UTILITY(U,$J,358.3,32763,0)
;;=Z98.890^^99^1350^43
;;^UTILITY(U,$J,358.3,32763,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32763,1,3,0)
;;=3^Postprocedural States,Other Specified
;;^UTILITY(U,$J,358.3,32763,1,4,0)
;;=4^Z98.890
;;^UTILITY(U,$J,358.3,32763,2)
;;=^5063754
;;^UTILITY(U,$J,358.3,32764,0)
;;=T81.41XA^^99^1350^32
;;^UTILITY(U,$J,358.3,32764,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32764,1,3,0)
;;=3^Infection Following Proced,Superfic Incis Surg Site,Init
;;^UTILITY(U,$J,358.3,32764,1,4,0)
;;=4^T81.41XA
;;^UTILITY(U,$J,358.3,32764,2)
;;=^5157587
;;^UTILITY(U,$J,358.3,32765,0)
;;=T81.42XA^^99^1350^30
;;^UTILITY(U,$J,358.3,32765,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32765,1,3,0)
;;=3^Infection Following Proced,Deep Incis Surg Site,Init
;;^UTILITY(U,$J,358.3,32765,1,4,0)
;;=4^T81.42XA
;;^UTILITY(U,$J,358.3,32765,2)
;;=^5157590
;;^UTILITY(U,$J,358.3,32766,0)
;;=T81.43XA^^99^1350^31
;;^UTILITY(U,$J,358.3,32766,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32766,1,3,0)
;;=3^Infection Following Proced,Organ/Space Surg Site,Init
;;^UTILITY(U,$J,358.3,32766,1,4,0)
;;=4^T81.43XA
;;^UTILITY(U,$J,358.3,32766,2)
;;=^5157593
;;^UTILITY(U,$J,358.3,32767,0)
;;=R47.01^^99^1350^8
;;^UTILITY(U,$J,358.3,32767,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32767,1,3,0)
;;=3^Aphasia
;;^UTILITY(U,$J,358.3,32767,1,4,0)
;;=4^R47.01
;;^UTILITY(U,$J,358.3,32767,2)
;;=^5019488
;;^UTILITY(U,$J,358.3,32768,0)
;;=R27.0^^99^1350^9
;;^UTILITY(U,$J,358.3,32768,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32768,1,3,0)
;;=3^Ataxia,Unspec
;;^UTILITY(U,$J,358.3,32768,1,4,0)
;;=4^R27.0
;;^UTILITY(U,$J,358.3,32768,2)
;;=^5019310
;;^UTILITY(U,$J,358.3,32769,0)
;;=H53.2^^99^1350^16
;;^UTILITY(U,$J,358.3,32769,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32769,1,3,0)
;;=3^Diplopia
;;^UTILITY(U,$J,358.3,32769,1,4,0)
;;=4^H53.2
;;^UTILITY(U,$J,358.3,32769,2)
;;=^35208
;;^UTILITY(U,$J,358.3,32770,0)
;;=R10.84^^99^1350^1
;;^UTILITY(U,$J,358.3,32770,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32770,1,3,0)
;;=3^Abdominal Pain,Generalized
;;^UTILITY(U,$J,358.3,32770,1,4,0)
;;=4^R10.84
;;^UTILITY(U,$J,358.3,32770,2)
;;=^5019229
;;^UTILITY(U,$J,358.3,32771,0)
;;=R68.89^^99^1350^3
;;^UTILITY(U,$J,358.3,32771,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32771,1,3,0)
;;=3^Abnormal Clinical Findings
;;^UTILITY(U,$J,358.3,32771,1,4,0)
;;=4^R68.89
;;^UTILITY(U,$J,358.3,32771,2)
;;=^5019557
;;^UTILITY(U,$J,358.3,32772,0)
;;=D53.9^^99^1350^7
;;^UTILITY(U,$J,358.3,32772,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,32772,1,3,0)
;;=3^Anemia
;;^UTILITY(U,$J,358.3,32772,1,4,0)
;;=4^D53.9
;;^UTILITY(U,$J,358.3,32772,2)
;;=^5002298
;;^UTILITY(U,$J,358.3,32773,0)
;;=R53.82^^99^1350^12
;;^UTILITY(U,$J,358.3,32773,1,0)
;;=^358.31IA^4^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0D1 19745 printed Nov 22, 2024@16:56:29 Page 2
IBDEI0D1 ; ; 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,32703,0)
+2 ;;=M54.50^^99^1348^10
+3 ;;^UTILITY(U,$J,358.3,32703,1,0)
+4 ;;=^358.31IA^4^2
+5 ;;^UTILITY(U,$J,358.3,32703,1,3,0)
+6 ;;=3^Low Back Pain,Unspec
+7 ;;^UTILITY(U,$J,358.3,32703,1,4,0)
+8 ;;=4^M54.50
+9 ;;^UTILITY(U,$J,358.3,32703,2)
+10 ;;=^5161215
+11 ;;^UTILITY(U,$J,358.3,32704,0)
+12 ;;=M54.59^^99^1348^9
+13 ;;^UTILITY(U,$J,358.3,32704,1,0)
+14 ;;=^358.31IA^4^2
+15 ;;^UTILITY(U,$J,358.3,32704,1,3,0)
+16 ;;=3^Low Back Pain,Other
+17 ;;^UTILITY(U,$J,358.3,32704,1,4,0)
+18 ;;=4^M54.59
+19 ;;^UTILITY(U,$J,358.3,32704,2)
+20 ;;=^5161217
+21 ;;^UTILITY(U,$J,358.3,32705,0)
+22 ;;=J06.9^^99^1349^18
+23 ;;^UTILITY(U,$J,358.3,32705,1,0)
+24 ;;=^358.31IA^4^2
+25 ;;^UTILITY(U,$J,358.3,32705,1,3,0)
+26 ;;=3^Upper respiratory infection, acute
+27 ;;^UTILITY(U,$J,358.3,32705,1,4,0)
+28 ;;=4^J06.9
+29 ;;^UTILITY(U,$J,358.3,32705,2)
+30 ;;=^5008143
+31 ;;^UTILITY(U,$J,358.3,32706,0)
+32 ;;=J10.1^^99^1349^8
+33 ;;^UTILITY(U,$J,358.3,32706,1,0)
+34 ;;=^358.31IA^4^2
+35 ;;^UTILITY(U,$J,358.3,32706,1,3,0)
+36 ;;=3^Flu d/t indent influ virus w/ oth resp manifest
+37 ;;^UTILITY(U,$J,358.3,32706,1,4,0)
+38 ;;=4^J10.1
+39 ;;^UTILITY(U,$J,358.3,32706,2)
+40 ;;=^5008151
+41 ;;^UTILITY(U,$J,358.3,32707,0)
+42 ;;=J11.1^^99^1349^9
+43 ;;^UTILITY(U,$J,358.3,32707,1,0)
+44 ;;=^358.31IA^4^2
+45 ;;^UTILITY(U,$J,358.3,32707,1,3,0)
+46 ;;=3^Flu d/t unident influ virus w/ oth resp manifest
+47 ;;^UTILITY(U,$J,358.3,32707,1,4,0)
+48 ;;=4^J11.1
+49 ;;^UTILITY(U,$J,358.3,32707,2)
+50 ;;=^5008158
+51 ;;^UTILITY(U,$J,358.3,32708,0)
+52 ;;=J43.9^^99^1349^7
+53 ;;^UTILITY(U,$J,358.3,32708,1,0)
+54 ;;=^358.31IA^4^2
+55 ;;^UTILITY(U,$J,358.3,32708,1,3,0)
+56 ;;=3^Emphysema, unspecified
+57 ;;^UTILITY(U,$J,358.3,32708,1,4,0)
+58 ;;=4^J43.9
+59 ;;^UTILITY(U,$J,358.3,32708,2)
+60 ;;=^5008238
+61 ;;^UTILITY(U,$J,358.3,32709,0)
+62 ;;=J44.9^^99^1349^4
+63 ;;^UTILITY(U,$J,358.3,32709,1,0)
+64 ;;=^358.31IA^4^2
+65 ;;^UTILITY(U,$J,358.3,32709,1,3,0)
+66 ;;=3^COPD, unspec
+67 ;;^UTILITY(U,$J,358.3,32709,1,4,0)
+68 ;;=4^J44.9
+69 ;;^UTILITY(U,$J,358.3,32709,2)
+70 ;;=^5008241
+71 ;;^UTILITY(U,$J,358.3,32710,0)
+72 ;;=J45.909^^99^1349^1
+73 ;;^UTILITY(U,$J,358.3,32710,1,0)
+74 ;;=^358.31IA^4^2
+75 ;;^UTILITY(U,$J,358.3,32710,1,3,0)
+76 ;;=3^Asthma, uncomplicated, unspec
+77 ;;^UTILITY(U,$J,358.3,32710,1,4,0)
+78 ;;=4^J45.909
+79 ;;^UTILITY(U,$J,358.3,32710,2)
+80 ;;=^5008256
+81 ;;^UTILITY(U,$J,358.3,32711,0)
+82 ;;=J91.8^^99^1349^10
+83 ;;^UTILITY(U,$J,358.3,32711,1,0)
+84 ;;=^358.31IA^4^2
+85 ;;^UTILITY(U,$J,358.3,32711,1,3,0)
+86 ;;=3^Pleural effusion in other conditions classified elsewhere
+87 ;;^UTILITY(U,$J,358.3,32711,1,4,0)
+88 ;;=4^J91.8
+89 ;;^UTILITY(U,$J,358.3,32711,2)
+90 ;;=^5008311
+91 ;;^UTILITY(U,$J,358.3,32712,0)
+92 ;;=J20.9^^99^1349^2
+93 ;;^UTILITY(U,$J,358.3,32712,1,0)
+94 ;;=^358.31IA^4^2
+95 ;;^UTILITY(U,$J,358.3,32712,1,3,0)
+96 ;;=3^Bronchitis,Acute,Unspec
+97 ;;^UTILITY(U,$J,358.3,32712,1,4,0)
+98 ;;=4^J20.9
+99 ;;^UTILITY(U,$J,358.3,32712,2)
+100 ;;=^5008195
+101 ;;^UTILITY(U,$J,358.3,32713,0)
+102 ;;=J98.01^^99^1349^3
+103 ;;^UTILITY(U,$J,358.3,32713,1,0)
+104 ;;=^358.31IA^4^2
+105 ;;^UTILITY(U,$J,358.3,32713,1,3,0)
+106 ;;=3^Bronchospasm,Acute
+107 ;;^UTILITY(U,$J,358.3,32713,1,4,0)
+108 ;;=4^J98.01
+109 ;;^UTILITY(U,$J,358.3,32713,2)
+110 ;;=^334092
+111 ;;^UTILITY(U,$J,358.3,32714,0)
+112 ;;=R06.00^^99^1349^6
+113 ;;^UTILITY(U,$J,358.3,32714,1,0)
+114 ;;=^358.31IA^4^2
+115 ;;^UTILITY(U,$J,358.3,32714,1,3,0)
+116 ;;=3^Dyspnea
+117 ;;^UTILITY(U,$J,358.3,32714,1,4,0)
+118 ;;=4^R06.00
+119 ;;^UTILITY(U,$J,358.3,32714,2)
+120 ;;=^5019180
+121 ;;^UTILITY(U,$J,358.3,32715,0)
+122 ;;=J18.9^^99^1349^11
+123 ;;^UTILITY(U,$J,358.3,32715,1,0)
+124 ;;=^358.31IA^4^2
+125 ;;^UTILITY(U,$J,358.3,32715,1,3,0)
+126 ;;=3^Pneumonia,Unspec
+127 ;;^UTILITY(U,$J,358.3,32715,1,4,0)
+128 ;;=4^J18.9
+129 ;;^UTILITY(U,$J,358.3,32715,2)
+130 ;;=^95632
+131 ;;^UTILITY(U,$J,358.3,32716,0)
+132 ;;=J12.9^^99^1349^12
+133 ;;^UTILITY(U,$J,358.3,32716,1,0)
+134 ;;=^358.31IA^4^2
+135 ;;^UTILITY(U,$J,358.3,32716,1,3,0)
+136 ;;=3^Pneumonia,Viral
+137 ;;^UTILITY(U,$J,358.3,32716,1,4,0)
+138 ;;=4^J12.9
+139 ;;^UTILITY(U,$J,358.3,32716,2)
+140 ;;=^5008169
+141 ;;^UTILITY(U,$J,358.3,32717,0)
+142 ;;=G47.33^^99^1349^14
+143 ;;^UTILITY(U,$J,358.3,32717,1,0)
+144 ;;=^358.31IA^4^2
+145 ;;^UTILITY(U,$J,358.3,32717,1,3,0)
+146 ;;=3^Sleep Apnea,Obstructive
+147 ;;^UTILITY(U,$J,358.3,32717,1,4,0)
+148 ;;=4^G47.33
+149 ;;^UTILITY(U,$J,358.3,32717,2)
+150 ;;=^332763
+151 ;;^UTILITY(U,$J,358.3,32718,0)
+152 ;;=R06.1^^99^1349^15
+153 ;;^UTILITY(U,$J,358.3,32718,1,0)
+154 ;;=^358.31IA^4^2
+155 ;;^UTILITY(U,$J,358.3,32718,1,3,0)
+156 ;;=3^Stridor
+157 ;;^UTILITY(U,$J,358.3,32718,1,4,0)
+158 ;;=4^R06.1
+159 ;;^UTILITY(U,$J,358.3,32718,2)
+160 ;;=^5019183
+161 ;;^UTILITY(U,$J,358.3,32719,0)
+162 ;;=R06.82^^99^1349^17
+163 ;;^UTILITY(U,$J,358.3,32719,1,0)
+164 ;;=^358.31IA^4^2
+165 ;;^UTILITY(U,$J,358.3,32719,1,3,0)
+166 ;;=3^Tachypnea
+167 ;;^UTILITY(U,$J,358.3,32719,1,4,0)
+168 ;;=4^R06.82
+169 ;;^UTILITY(U,$J,358.3,32719,2)
+170 ;;=^5019191
+171 ;;^UTILITY(U,$J,358.3,32720,0)
+172 ;;=R55.^^99^1349^16
+173 ;;^UTILITY(U,$J,358.3,32720,1,0)
+174 ;;=^358.31IA^4^2
+175 ;;^UTILITY(U,$J,358.3,32720,1,3,0)
+176 ;;=3^Syncope/Collapse
+177 ;;^UTILITY(U,$J,358.3,32720,1,4,0)
+178 ;;=4^R55.
+179 ;;^UTILITY(U,$J,358.3,32720,2)
+180 ;;=^116707
+181 ;;^UTILITY(U,$J,358.3,32721,0)
+182 ;;=R06.2^^99^1349^19
+183 ;;^UTILITY(U,$J,358.3,32721,1,0)
+184 ;;=^358.31IA^4^2
+185 ;;^UTILITY(U,$J,358.3,32721,1,3,0)
+186 ;;=3^Wheezing
+187 ;;^UTILITY(U,$J,358.3,32721,1,4,0)
+188 ;;=4^R06.2
+189 ;;^UTILITY(U,$J,358.3,32721,2)
+190 ;;=^5019184
+191 ;;^UTILITY(U,$J,358.3,32722,0)
+192 ;;=R05.9^^99^1349^5
+193 ;;^UTILITY(U,$J,358.3,32722,1,0)
+194 ;;=^358.31IA^4^2
+195 ;;^UTILITY(U,$J,358.3,32722,1,3,0)
+196 ;;=3^Cough,Unspec
+197 ;;^UTILITY(U,$J,358.3,32722,1,4,0)
+198 ;;=4^R05.9
+199 ;;^UTILITY(U,$J,358.3,32722,2)
+200 ;;=^5161232
+201 ;;^UTILITY(U,$J,358.3,32723,0)
+202 ;;=R06.02^^99^1349^13
+203 ;;^UTILITY(U,$J,358.3,32723,1,0)
+204 ;;=^358.31IA^4^2
+205 ;;^UTILITY(U,$J,358.3,32723,1,3,0)
+206 ;;=3^Shortness of Breath
+207 ;;^UTILITY(U,$J,358.3,32723,1,4,0)
+208 ;;=4^R06.02
+209 ;;^UTILITY(U,$J,358.3,32723,2)
+210 ;;=^5019181
+211 ;;^UTILITY(U,$J,358.3,32724,0)
+212 ;;=S23.9XXA^^99^1350^52
+213 ;;^UTILITY(U,$J,358.3,32724,1,0)
+214 ;;=^358.31IA^4^2
+215 ;;^UTILITY(U,$J,358.3,32724,1,3,0)
+216 ;;=3^Sprain Thorax,Unspec Part,Initial Encounter
+217 ;;^UTILITY(U,$J,358.3,32724,1,4,0)
+218 ;;=4^S23.9XXA
+219 ;;^UTILITY(U,$J,358.3,32724,2)
+220 ;;=^5023267
+221 ;;^UTILITY(U,$J,358.3,32725,0)
+222 ;;=S13.4XXA^^99^1350^51
+223 ;;^UTILITY(U,$J,358.3,32725,1,0)
+224 ;;=^358.31IA^4^2
+225 ;;^UTILITY(U,$J,358.3,32725,1,3,0)
+226 ;;=3^Sprain Ligaments Cervical Spine,Initial Encounter
+227 ;;^UTILITY(U,$J,358.3,32725,1,4,0)
+228 ;;=4^S13.4XXA
+229 ;;^UTILITY(U,$J,358.3,32725,2)
+230 ;;=^5022028
+231 ;;^UTILITY(U,$J,358.3,32726,0)
+232 ;;=R22.2^^99^1350^53
+233 ;;^UTILITY(U,$J,358.3,32726,1,0)
+234 ;;=^358.31IA^4^2
+235 ;;^UTILITY(U,$J,358.3,32726,1,3,0)
+236 ;;=3^Swelling,Mass & Lump,Trunk
+237 ;;^UTILITY(U,$J,358.3,32726,1,4,0)
+238 ;;=4^R22.2
+239 ;;^UTILITY(U,$J,358.3,32726,2)
+240 ;;=^5019286
+241 ;;^UTILITY(U,$J,358.3,32727,0)
+242 ;;=R55.^^99^1350^54
+243 ;;^UTILITY(U,$J,358.3,32727,1,0)
+244 ;;=^358.31IA^4^2
+245 ;;^UTILITY(U,$J,358.3,32727,1,3,0)
+246 ;;=3^Syncope and Collapse
+247 ;;^UTILITY(U,$J,358.3,32727,1,4,0)
+248 ;;=4^R55.
+249 ;;^UTILITY(U,$J,358.3,32727,2)
+250 ;;=^116707
+251 ;;^UTILITY(U,$J,358.3,32728,0)
+252 ;;=R10.9^^99^1350^2
+253 ;;^UTILITY(U,$J,358.3,32728,1,0)
+254 ;;=^358.31IA^4^2
+255 ;;^UTILITY(U,$J,358.3,32728,1,3,0)
+256 ;;=3^Abdominal pain, unspec
+257 ;;^UTILITY(U,$J,358.3,32728,1,4,0)
+258 ;;=4^R10.9
+259 ;;^UTILITY(U,$J,358.3,32728,2)
+260 ;;=^5019230
+261 ;;^UTILITY(U,$J,358.3,32729,0)
+262 ;;=Z89.512^^99^1350^4
+263 ;;^UTILITY(U,$J,358.3,32729,1,0)
+264 ;;=^358.31IA^4^2
+265 ;;^UTILITY(U,$J,358.3,32729,1,3,0)
+266 ;;=3^Acquired absence of left leg below knee
+267 ;;^UTILITY(U,$J,358.3,32729,1,4,0)
+268 ;;=4^Z89.512
+269 ;;^UTILITY(U,$J,358.3,32729,2)
+270 ;;=^5063567
+271 ;;^UTILITY(U,$J,358.3,32730,0)
+272 ;;=Z89.511^^99^1350^5
+273 ;;^UTILITY(U,$J,358.3,32730,1,0)
+274 ;;=^358.31IA^4^2
+275 ;;^UTILITY(U,$J,358.3,32730,1,3,0)
+276 ;;=3^Acquired absence of right leg below knee
+277 ;;^UTILITY(U,$J,358.3,32730,1,4,0)
+278 ;;=4^Z89.511
+279 ;;^UTILITY(U,$J,358.3,32730,2)
+280 ;;=^5063566
+281 ;;^UTILITY(U,$J,358.3,32731,0)
+282 ;;=T78.40XA^^99^1350^6
+283 ;;^UTILITY(U,$J,358.3,32731,1,0)
+284 ;;=^358.31IA^4^2
+285 ;;^UTILITY(U,$J,358.3,32731,1,3,0)
+286 ;;=3^Allergy, unspecified, initial encounter
+287 ;;^UTILITY(U,$J,358.3,32731,1,4,0)
+288 ;;=4^T78.40XA
+289 ;;^UTILITY(U,$J,358.3,32731,2)
+290 ;;=^5054284
+291 ;;^UTILITY(U,$J,358.3,32732,0)
+292 ;;=R00.1^^99^1350^10
+293 ;;^UTILITY(U,$J,358.3,32732,1,0)
+294 ;;=^358.31IA^4^2
+295 ;;^UTILITY(U,$J,358.3,32732,1,3,0)
+296 ;;=3^Bradycardia, unspecified
+297 ;;^UTILITY(U,$J,358.3,32732,1,4,0)
+298 ;;=4^R00.1
+299 ;;^UTILITY(U,$J,358.3,32732,2)
+300 ;;=^5019164
+301 ;;^UTILITY(U,$J,358.3,32733,0)
+302 ;;=R07.9^^99^1350^11
+303 ;;^UTILITY(U,$J,358.3,32733,1,0)
+304 ;;=^358.31IA^4^2
+305 ;;^UTILITY(U,$J,358.3,32733,1,3,0)
+306 ;;=3^Chest pain, unspecified
+307 ;;^UTILITY(U,$J,358.3,32733,1,4,0)
+308 ;;=4^R07.9
+309 ;;^UTILITY(U,$J,358.3,32733,2)
+310 ;;=^5019201
+311 ;;^UTILITY(U,$J,358.3,32734,0)
+312 ;;=R25.2^^99^1350^14
+313 ;;^UTILITY(U,$J,358.3,32734,1,0)
+314 ;;=^358.31IA^4^2
+315 ;;^UTILITY(U,$J,358.3,32734,1,3,0)
+316 ;;=3^Cramp and spasm
+317 ;;^UTILITY(U,$J,358.3,32734,1,4,0)
+318 ;;=4^R25.2
+319 ;;^UTILITY(U,$J,358.3,32734,2)
+320 ;;=^5019301
+321 ;;^UTILITY(U,$J,358.3,32735,0)
+322 ;;=R19.7^^99^1350^15
+323 ;;^UTILITY(U,$J,358.3,32735,1,0)
+324 ;;=^358.31IA^4^2
+325 ;;^UTILITY(U,$J,358.3,32735,1,3,0)
+326 ;;=3^Diarrhea, unspecified
+327 ;;^UTILITY(U,$J,358.3,32735,1,4,0)
+328 ;;=4^R19.7
+329 ;;^UTILITY(U,$J,358.3,32735,2)
+330 ;;=^5019276
+331 ;;^UTILITY(U,$J,358.3,32736,0)
+332 ;;=R42.^^99^1350^17
+333 ;;^UTILITY(U,$J,358.3,32736,1,0)
+334 ;;=^358.31IA^4^2
+335 ;;^UTILITY(U,$J,358.3,32736,1,3,0)
+336 ;;=3^Dizziness and giddiness
+337 ;;^UTILITY(U,$J,358.3,32736,1,4,0)
+338 ;;=4^R42.
+339 ;;^UTILITY(U,$J,358.3,32736,2)
+340 ;;=^5019450
+341 ;;^UTILITY(U,$J,358.3,32737,0)
+342 ;;=R13.10^^99^1350^18
+343 ;;^UTILITY(U,$J,358.3,32737,1,0)
+344 ;;=^358.31IA^4^2
+345 ;;^UTILITY(U,$J,358.3,32737,1,3,0)
+346 ;;=3^Dysphagia, unspecified
+347 ;;^UTILITY(U,$J,358.3,32737,1,4,0)
+348 ;;=4^R13.10
+349 ;;^UTILITY(U,$J,358.3,32737,2)
+350 ;;=^335307
+351 ;;^UTILITY(U,$J,358.3,32738,0)
+352 ;;=R06.00^^99^1350^19
+353 ;;^UTILITY(U,$J,358.3,32738,1,0)
+354 ;;=^358.31IA^4^2
+355 ;;^UTILITY(U,$J,358.3,32738,1,3,0)
+356 ;;=3^Dyspnea, unspecified
+357 ;;^UTILITY(U,$J,358.3,32738,1,4,0)
+358 ;;=4^R06.00
+359 ;;^UTILITY(U,$J,358.3,32738,2)
+360 ;;=^5019180
+361 ;;^UTILITY(U,$J,358.3,32739,0)
+362 ;;=R60.9^^99^1350^20
+363 ;;^UTILITY(U,$J,358.3,32739,1,0)
+364 ;;=^358.31IA^4^2
+365 ;;^UTILITY(U,$J,358.3,32739,1,3,0)
+366 ;;=3^Edema, unspecified
+367 ;;^UTILITY(U,$J,358.3,32739,1,4,0)
+368 ;;=4^R60.9
+369 ;;^UTILITY(U,$J,358.3,32739,2)
+370 ;;=^5019534
+371 ;;^UTILITY(U,$J,358.3,32740,0)
+372 ;;=R04.0^^99^1350^22
+373 ;;^UTILITY(U,$J,358.3,32740,1,0)
+374 ;;=^358.31IA^4^2
+375 ;;^UTILITY(U,$J,358.3,32740,1,3,0)
+376 ;;=3^Epistaxis
+377 ;;^UTILITY(U,$J,358.3,32740,1,4,0)
+378 ;;=4^R04.0
+379 ;;^UTILITY(U,$J,358.3,32740,2)
+380 ;;=^5019173
+381 ;;^UTILITY(U,$J,358.3,32741,0)
+382 ;;=R53.83^^99^1350^23
+383 ;;^UTILITY(U,$J,358.3,32741,1,0)
+384 ;;=^358.31IA^4^2
+385 ;;^UTILITY(U,$J,358.3,32741,1,3,0)
+386 ;;=3^Fatigue, other
+387 ;;^UTILITY(U,$J,358.3,32741,1,4,0)
+388 ;;=4^R53.83
+389 ;;^UTILITY(U,$J,358.3,32741,2)
+390 ;;=^5019520
+391 ;;^UTILITY(U,$J,358.3,32742,0)
+392 ;;=R50.9^^99^1350^24
+393 ;;^UTILITY(U,$J,358.3,32742,1,0)
+394 ;;=^358.31IA^4^2
+395 ;;^UTILITY(U,$J,358.3,32742,1,3,0)
+396 ;;=3^Fever, unspecified
+397 ;;^UTILITY(U,$J,358.3,32742,1,4,0)
+398 ;;=4^R50.9
+399 ;;^UTILITY(U,$J,358.3,32742,2)
+400 ;;=^5019512
+401 ;;^UTILITY(U,$J,358.3,32743,0)
+402 ;;=R31.9^^99^1350^28
+403 ;;^UTILITY(U,$J,358.3,32743,1,0)
+404 ;;=^358.31IA^4^2
+405 ;;^UTILITY(U,$J,358.3,32743,1,3,0)
+406 ;;=3^Hematuria, unspecified
+407 ;;^UTILITY(U,$J,358.3,32743,1,4,0)
+408 ;;=4^R31.9
+409 ;;^UTILITY(U,$J,358.3,32743,2)
+410 ;;=^5019328
+411 ;;^UTILITY(U,$J,358.3,32744,0)
+412 ;;=Z21.^^99^1350^25
+413 ;;^UTILITY(U,$J,358.3,32744,1,0)
+414 ;;=^358.31IA^4^2
+415 ;;^UTILITY(U,$J,358.3,32744,1,3,0)
+416 ;;=3^HIV status, asymptomatic
+417 ;;^UTILITY(U,$J,358.3,32744,1,4,0)
+418 ;;=4^Z21.
+419 ;;^UTILITY(U,$J,358.3,32744,2)
+420 ;;=^5062777
+421 ;;^UTILITY(U,$J,358.3,32745,0)
+422 ;;=R17.^^99^1350^33
+423 ;;^UTILITY(U,$J,358.3,32745,1,0)
+424 ;;=^358.31IA^4^2
+425 ;;^UTILITY(U,$J,358.3,32745,1,3,0)
+426 ;;=3^Jaundice, unspec
+427 ;;^UTILITY(U,$J,358.3,32745,1,4,0)
+428 ;;=4^R17.
+429 ;;^UTILITY(U,$J,358.3,32745,2)
+430 ;;=^5019251
+431 ;;^UTILITY(U,$J,358.3,32746,0)
+432 ;;=R53.81^^99^1350^34
+433 ;;^UTILITY(U,$J,358.3,32746,1,0)
+434 ;;=^358.31IA^4^2
+435 ;;^UTILITY(U,$J,358.3,32746,1,3,0)
+436 ;;=3^Malaise, other
+437 ;;^UTILITY(U,$J,358.3,32746,1,4,0)
+438 ;;=4^R53.81
+439 ;;^UTILITY(U,$J,358.3,32746,2)
+440 ;;=^5019518
+441 ;;^UTILITY(U,$J,358.3,32747,0)
+442 ;;=R35.0^^99^1350^35
+443 ;;^UTILITY(U,$J,358.3,32747,1,0)
+444 ;;=^358.31IA^4^2
+445 ;;^UTILITY(U,$J,358.3,32747,1,3,0)
+446 ;;=3^Micturition frequency
+447 ;;^UTILITY(U,$J,358.3,32747,1,4,0)
+448 ;;=4^R35.0
+449 ;;^UTILITY(U,$J,358.3,32747,2)
+450 ;;=^5019334
+451 ;;^UTILITY(U,$J,358.3,32748,0)
+452 ;;=R11.2^^99^1350^36
+453 ;;^UTILITY(U,$J,358.3,32748,1,0)
+454 ;;=^358.31IA^4^2
+455 ;;^UTILITY(U,$J,358.3,32748,1,3,0)
+456 ;;=3^Nausea w/ vomiting, unspecified
+457 ;;^UTILITY(U,$J,358.3,32748,1,4,0)
+458 ;;=4^R11.2
+459 ;;^UTILITY(U,$J,358.3,32748,2)
+460 ;;=^5019237
+461 ;;^UTILITY(U,$J,358.3,32749,0)
+462 ;;=Z51.5^^99^1350^37
+463 ;;^UTILITY(U,$J,358.3,32749,1,0)
+464 ;;=^358.31IA^4^2
+465 ;;^UTILITY(U,$J,358.3,32749,1,3,0)
+466 ;;=3^Palliative care encounter
+467 ;;^UTILITY(U,$J,358.3,32749,1,4,0)
+468 ;;=4^Z51.5
+469 ;;^UTILITY(U,$J,358.3,32749,2)
+470 ;;=^5063063
+471 ;;^UTILITY(U,$J,358.3,32750,0)
+472 ;;=R10.2^^99^1350^39
+473 ;;^UTILITY(U,$J,358.3,32750,1,0)
+474 ;;=^358.31IA^4^2
+475 ;;^UTILITY(U,$J,358.3,32750,1,3,0)
+476 ;;=3^Pelvic & perineal pain
+477 ;;^UTILITY(U,$J,358.3,32750,1,4,0)
+478 ;;=4^R10.2
+479 ;;^UTILITY(U,$J,358.3,32750,2)
+480 ;;=^5019209
+481 ;;^UTILITY(U,$J,358.3,32751,0)
+482 ;;=R09.1^^99^1350^40
+483 ;;^UTILITY(U,$J,358.3,32751,1,0)
+484 ;;=^358.31IA^4^2
+485 ;;^UTILITY(U,$J,358.3,32751,1,3,0)
+486 ;;=3^Pleurisy
+487 ;;^UTILITY(U,$J,358.3,32751,1,4,0)
+488 ;;=4^R09.1
+489 ;;^UTILITY(U,$J,358.3,32751,2)
+490 ;;=^95428
+491 ;;^UTILITY(U,$J,358.3,32752,0)
+492 ;;=Z95.1^^99^1350^44
+493 ;;^UTILITY(U,$J,358.3,32752,1,0)
+494 ;;=^358.31IA^4^2
+495 ;;^UTILITY(U,$J,358.3,32752,1,3,0)
+496 ;;=3^Presence of aortocoronary bypass graft
+497 ;;^UTILITY(U,$J,358.3,32752,1,4,0)
+498 ;;=4^Z95.1
+499 ;;^UTILITY(U,$J,358.3,32752,2)
+500 ;;=^5063669
+501 ;;^UTILITY(U,$J,358.3,32753,0)
+502 ;;=Z95.3^^99^1350^45
+503 ;;^UTILITY(U,$J,358.3,32753,1,0)
+504 ;;=^358.31IA^4^2
+505 ;;^UTILITY(U,$J,358.3,32753,1,3,0)
+506 ;;=3^Presence of xenogenic heart valve
+507 ;;^UTILITY(U,$J,358.3,32753,1,4,0)
+508 ;;=4^Z95.3
+509 ;;^UTILITY(U,$J,358.3,32753,2)
+510 ;;=^5063671
+511 ;;^UTILITY(U,$J,358.3,32754,0)
+512 ;;=R21.^^99^1350^47
+513 ;;^UTILITY(U,$J,358.3,32754,1,0)
+514 ;;=^358.31IA^4^2
+515 ;;^UTILITY(U,$J,358.3,32754,1,3,0)
+516 ;;=3^Rash & oth nonspecific skin eruption
+517 ;;^UTILITY(U,$J,358.3,32754,1,4,0)
+518 ;;=4^R21.
+519 ;;^UTILITY(U,$J,358.3,32754,2)
+520 ;;=^5019283
+521 ;;^UTILITY(U,$J,358.3,32755,0)
+522 ;;=Z12.9^^99^1350^48
+523 ;;^UTILITY(U,$J,358.3,32755,1,0)
+524 ;;=^358.31IA^4^2
+525 ;;^UTILITY(U,$J,358.3,32755,1,3,0)
+526 ;;=3^Screening malig neop site unspec
+527 ;;^UTILITY(U,$J,358.3,32755,1,4,0)
+528 ;;=4^Z12.9
+529 ;;^UTILITY(U,$J,358.3,32755,2)
+530 ;;=^5062698
+531 ;;^UTILITY(U,$J,358.3,32756,0)
+532 ;;=R06.02^^99^1350^49
+533 ;;^UTILITY(U,$J,358.3,32756,1,0)
+534 ;;=^358.31IA^4^2
+535 ;;^UTILITY(U,$J,358.3,32756,1,3,0)
+536 ;;=3^Shortness of breath
+537 ;;^UTILITY(U,$J,358.3,32756,1,4,0)
+538 ;;=4^R06.02
+539 ;;^UTILITY(U,$J,358.3,32756,2)
+540 ;;=^5019181
+541 ;;^UTILITY(U,$J,358.3,32757,0)
+542 ;;=R00.0^^99^1350^55
+543 ;;^UTILITY(U,$J,358.3,32757,1,0)
+544 ;;=^358.31IA^4^2
+545 ;;^UTILITY(U,$J,358.3,32757,1,3,0)
+546 ;;=3^Tachycardia, unspecified
+547 ;;^UTILITY(U,$J,358.3,32757,1,4,0)
+548 ;;=4^R00.0
+549 ;;^UTILITY(U,$J,358.3,32757,2)
+550 ;;=^5019163
+551 ;;^UTILITY(U,$J,358.3,32758,0)
+552 ;;=R32.^^99^1350^57
+553 ;;^UTILITY(U,$J,358.3,32758,1,0)
+554 ;;=^358.31IA^4^2
+555 ;;^UTILITY(U,$J,358.3,32758,1,3,0)
+556 ;;=3^Urinary incontinence, unspec
+557 ;;^UTILITY(U,$J,358.3,32758,1,4,0)
+558 ;;=4^R32.
+559 ;;^UTILITY(U,$J,358.3,32758,2)
+560 ;;=^5019329
+561 ;;^UTILITY(U,$J,358.3,32759,0)
+562 ;;=R33.9^^99^1350^58
+563 ;;^UTILITY(U,$J,358.3,32759,1,0)
+564 ;;=^358.31IA^4^2
+565 ;;^UTILITY(U,$J,358.3,32759,1,3,0)
+566 ;;=3^Urine retention, unspec
+567 ;;^UTILITY(U,$J,358.3,32759,1,4,0)
+568 ;;=4^R33.9
+569 ;;^UTILITY(U,$J,358.3,32759,2)
+570 ;;=^5019332
+571 ;;^UTILITY(U,$J,358.3,32760,0)
+572 ;;=R53.1^^99^1350^59
+573 ;;^UTILITY(U,$J,358.3,32760,1,0)
+574 ;;=^358.31IA^4^2
+575 ;;^UTILITY(U,$J,358.3,32760,1,3,0)
+576 ;;=3^Weakness
+577 ;;^UTILITY(U,$J,358.3,32760,1,4,0)
+578 ;;=4^R53.1
+579 ;;^UTILITY(U,$J,358.3,32760,2)
+580 ;;=^5019516
+581 ;;^UTILITY(U,$J,358.3,32761,0)
+582 ;;=R63.4^^99^1350^60
+583 ;;^UTILITY(U,$J,358.3,32761,1,0)
+584 ;;=^358.31IA^4^2
+585 ;;^UTILITY(U,$J,358.3,32761,1,3,0)
+586 ;;=3^Weight loss, abnormal
+587 ;;^UTILITY(U,$J,358.3,32761,1,4,0)
+588 ;;=4^R63.4
+589 ;;^UTILITY(U,$J,358.3,32761,2)
+590 ;;=^5019542
+591 ;;^UTILITY(U,$J,358.3,32762,0)
+592 ;;=B18.2^^99^1350^29
+593 ;;^UTILITY(U,$J,358.3,32762,1,0)
+594 ;;=^358.31IA^4^2
+595 ;;^UTILITY(U,$J,358.3,32762,1,3,0)
+596 ;;=3^Hepatitis C Carrier,Viral
+597 ;;^UTILITY(U,$J,358.3,32762,1,4,0)
+598 ;;=4^B18.2
+599 ;;^UTILITY(U,$J,358.3,32762,2)
+600 ;;=^5000548
+601 ;;^UTILITY(U,$J,358.3,32763,0)
+602 ;;=Z98.890^^99^1350^43
+603 ;;^UTILITY(U,$J,358.3,32763,1,0)
+604 ;;=^358.31IA^4^2
+605 ;;^UTILITY(U,$J,358.3,32763,1,3,0)
+606 ;;=3^Postprocedural States,Other Specified
+607 ;;^UTILITY(U,$J,358.3,32763,1,4,0)
+608 ;;=4^Z98.890
+609 ;;^UTILITY(U,$J,358.3,32763,2)
+610 ;;=^5063754
+611 ;;^UTILITY(U,$J,358.3,32764,0)
+612 ;;=T81.41XA^^99^1350^32
+613 ;;^UTILITY(U,$J,358.3,32764,1,0)
+614 ;;=^358.31IA^4^2
+615 ;;^UTILITY(U,$J,358.3,32764,1,3,0)
+616 ;;=3^Infection Following Proced,Superfic Incis Surg Site,Init
+617 ;;^UTILITY(U,$J,358.3,32764,1,4,0)
+618 ;;=4^T81.41XA
+619 ;;^UTILITY(U,$J,358.3,32764,2)
+620 ;;=^5157587
+621 ;;^UTILITY(U,$J,358.3,32765,0)
+622 ;;=T81.42XA^^99^1350^30
+623 ;;^UTILITY(U,$J,358.3,32765,1,0)
+624 ;;=^358.31IA^4^2
+625 ;;^UTILITY(U,$J,358.3,32765,1,3,0)
+626 ;;=3^Infection Following Proced,Deep Incis Surg Site,Init
+627 ;;^UTILITY(U,$J,358.3,32765,1,4,0)
+628 ;;=4^T81.42XA
+629 ;;^UTILITY(U,$J,358.3,32765,2)
+630 ;;=^5157590
+631 ;;^UTILITY(U,$J,358.3,32766,0)
+632 ;;=T81.43XA^^99^1350^31
+633 ;;^UTILITY(U,$J,358.3,32766,1,0)
+634 ;;=^358.31IA^4^2
+635 ;;^UTILITY(U,$J,358.3,32766,1,3,0)
+636 ;;=3^Infection Following Proced,Organ/Space Surg Site,Init
+637 ;;^UTILITY(U,$J,358.3,32766,1,4,0)
+638 ;;=4^T81.43XA
+639 ;;^UTILITY(U,$J,358.3,32766,2)
+640 ;;=^5157593
+641 ;;^UTILITY(U,$J,358.3,32767,0)
+642 ;;=R47.01^^99^1350^8
+643 ;;^UTILITY(U,$J,358.3,32767,1,0)
+644 ;;=^358.31IA^4^2
+645 ;;^UTILITY(U,$J,358.3,32767,1,3,0)
+646 ;;=3^Aphasia
+647 ;;^UTILITY(U,$J,358.3,32767,1,4,0)
+648 ;;=4^R47.01
+649 ;;^UTILITY(U,$J,358.3,32767,2)
+650 ;;=^5019488
+651 ;;^UTILITY(U,$J,358.3,32768,0)
+652 ;;=R27.0^^99^1350^9
+653 ;;^UTILITY(U,$J,358.3,32768,1,0)
+654 ;;=^358.31IA^4^2
+655 ;;^UTILITY(U,$J,358.3,32768,1,3,0)
+656 ;;=3^Ataxia,Unspec
+657 ;;^UTILITY(U,$J,358.3,32768,1,4,0)
+658 ;;=4^R27.0
+659 ;;^UTILITY(U,$J,358.3,32768,2)
+660 ;;=^5019310
+661 ;;^UTILITY(U,$J,358.3,32769,0)
+662 ;;=H53.2^^99^1350^16
+663 ;;^UTILITY(U,$J,358.3,32769,1,0)
+664 ;;=^358.31IA^4^2
+665 ;;^UTILITY(U,$J,358.3,32769,1,3,0)
+666 ;;=3^Diplopia
+667 ;;^UTILITY(U,$J,358.3,32769,1,4,0)
+668 ;;=4^H53.2
+669 ;;^UTILITY(U,$J,358.3,32769,2)
+670 ;;=^35208
+671 ;;^UTILITY(U,$J,358.3,32770,0)
+672 ;;=R10.84^^99^1350^1
+673 ;;^UTILITY(U,$J,358.3,32770,1,0)
+674 ;;=^358.31IA^4^2
+675 ;;^UTILITY(U,$J,358.3,32770,1,3,0)
+676 ;;=3^Abdominal Pain,Generalized
+677 ;;^UTILITY(U,$J,358.3,32770,1,4,0)
+678 ;;=4^R10.84
+679 ;;^UTILITY(U,$J,358.3,32770,2)
+680 ;;=^5019229
+681 ;;^UTILITY(U,$J,358.3,32771,0)
+682 ;;=R68.89^^99^1350^3
+683 ;;^UTILITY(U,$J,358.3,32771,1,0)
+684 ;;=^358.31IA^4^2
+685 ;;^UTILITY(U,$J,358.3,32771,1,3,0)
+686 ;;=3^Abnormal Clinical Findings
+687 ;;^UTILITY(U,$J,358.3,32771,1,4,0)
+688 ;;=4^R68.89
+689 ;;^UTILITY(U,$J,358.3,32771,2)
+690 ;;=^5019557
+691 ;;^UTILITY(U,$J,358.3,32772,0)
+692 ;;=D53.9^^99^1350^7
+693 ;;^UTILITY(U,$J,358.3,32772,1,0)
+694 ;;=^358.31IA^4^2
+695 ;;^UTILITY(U,$J,358.3,32772,1,3,0)
+696 ;;=3^Anemia
+697 ;;^UTILITY(U,$J,358.3,32772,1,4,0)
+698 ;;=4^D53.9
+699 ;;^UTILITY(U,$J,358.3,32772,2)
+700 ;;=^5002298
+701 ;;^UTILITY(U,$J,358.3,32773,0)
+702 ;;=R53.82^^99^1350^12
+703 ;;^UTILITY(U,$J,358.3,32773,1,0)
+704 ;;=^358.31IA^4^2