IBDEI078 ; ; 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,17574,2)
;;=^5019230
;;^UTILITY(U,$J,358.3,17575,0)
;;=R10.11^^59^699^4
;;^UTILITY(U,$J,358.3,17575,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17575,1,3,0)
;;=3^Abdominal Pain,RUQ
;;^UTILITY(U,$J,358.3,17575,1,4,0)
;;=4^R10.11
;;^UTILITY(U,$J,358.3,17575,2)
;;=^5019206
;;^UTILITY(U,$J,358.3,17576,0)
;;=R10.12^^59^699^2
;;^UTILITY(U,$J,358.3,17576,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17576,1,3,0)
;;=3^Abdominal Pain,LUQ
;;^UTILITY(U,$J,358.3,17576,1,4,0)
;;=4^R10.12
;;^UTILITY(U,$J,358.3,17576,2)
;;=^5019207
;;^UTILITY(U,$J,358.3,17577,0)
;;=R10.13^^59^699^25
;;^UTILITY(U,$J,358.3,17577,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17577,1,3,0)
;;=3^Epigastric Pain
;;^UTILITY(U,$J,358.3,17577,1,4,0)
;;=4^R10.13
;;^UTILITY(U,$J,358.3,17577,2)
;;=^5019208
;;^UTILITY(U,$J,358.3,17578,0)
;;=R10.2^^59^699^35
;;^UTILITY(U,$J,358.3,17578,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17578,1,3,0)
;;=3^Pelvic and Perineal Pain
;;^UTILITY(U,$J,358.3,17578,1,4,0)
;;=4^R10.2
;;^UTILITY(U,$J,358.3,17578,2)
;;=^5019209
;;^UTILITY(U,$J,358.3,17579,0)
;;=R10.31^^59^699^3
;;^UTILITY(U,$J,358.3,17579,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17579,1,3,0)
;;=3^Abdominal Pain,RLQ
;;^UTILITY(U,$J,358.3,17579,1,4,0)
;;=4^R10.31
;;^UTILITY(U,$J,358.3,17579,2)
;;=^5019211
;;^UTILITY(U,$J,358.3,17580,0)
;;=R10.32^^59^699^1
;;^UTILITY(U,$J,358.3,17580,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17580,1,3,0)
;;=3^Abdominal Pain,LLQ
;;^UTILITY(U,$J,358.3,17580,1,4,0)
;;=4^R10.32
;;^UTILITY(U,$J,358.3,17580,2)
;;=^5019212
;;^UTILITY(U,$J,358.3,17581,0)
;;=R10.33^^59^699^36
;;^UTILITY(U,$J,358.3,17581,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17581,1,3,0)
;;=3^Periumbilical Pain
;;^UTILITY(U,$J,358.3,17581,1,4,0)
;;=4^R10.33
;;^UTILITY(U,$J,358.3,17581,2)
;;=^5019213
;;^UTILITY(U,$J,358.3,17582,0)
;;=R11.0^^59^699^33
;;^UTILITY(U,$J,358.3,17582,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17582,1,3,0)
;;=3^Nausea
;;^UTILITY(U,$J,358.3,17582,1,4,0)
;;=4^R11.0
;;^UTILITY(U,$J,358.3,17582,2)
;;=^5019231
;;^UTILITY(U,$J,358.3,17583,0)
;;=R11.11^^59^699^50
;;^UTILITY(U,$J,358.3,17583,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17583,1,3,0)
;;=3^Vomiting w/o Nausea
;;^UTILITY(U,$J,358.3,17583,1,4,0)
;;=4^R11.11
;;^UTILITY(U,$J,358.3,17583,2)
;;=^5019233
;;^UTILITY(U,$J,358.3,17584,0)
;;=R11.12^^59^699^40
;;^UTILITY(U,$J,358.3,17584,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17584,1,3,0)
;;=3^Projectile Vomiting
;;^UTILITY(U,$J,358.3,17584,1,4,0)
;;=4^R11.12
;;^UTILITY(U,$J,358.3,17584,2)
;;=^5019234
;;^UTILITY(U,$J,358.3,17585,0)
;;=R11.13^^59^699^49
;;^UTILITY(U,$J,358.3,17585,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17585,1,3,0)
;;=3^Vomiting of Fecal Matter
;;^UTILITY(U,$J,358.3,17585,1,4,0)
;;=4^R11.13
;;^UTILITY(U,$J,358.3,17585,2)
;;=^5019235
;;^UTILITY(U,$J,358.3,17586,0)
;;=R11.14^^59^699^9
;;^UTILITY(U,$J,358.3,17586,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17586,1,3,0)
;;=3^Bilious Vomiting
;;^UTILITY(U,$J,358.3,17586,1,4,0)
;;=4^R11.14
;;^UTILITY(U,$J,358.3,17586,2)
;;=^5019236
;;^UTILITY(U,$J,358.3,17587,0)
;;=R11.2^^59^699^34
;;^UTILITY(U,$J,358.3,17587,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17587,1,3,0)
;;=3^Nausea w/ Vomiting,Unspec
;;^UTILITY(U,$J,358.3,17587,1,4,0)
;;=4^R11.2
;;^UTILITY(U,$J,358.3,17587,2)
;;=^5019237
;;^UTILITY(U,$J,358.3,17588,0)
;;=R54.^^59^699^7
;;^UTILITY(U,$J,358.3,17588,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17588,1,3,0)
;;=3^Age-Related Physical Debility
;;^UTILITY(U,$J,358.3,17588,1,4,0)
;;=4^R54.
;;^UTILITY(U,$J,358.3,17588,2)
;;=^5019521
;;^UTILITY(U,$J,358.3,17589,0)
;;=R55.^^59^699^45
;;^UTILITY(U,$J,358.3,17589,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17589,1,3,0)
;;=3^Syncope and Collapse
;;^UTILITY(U,$J,358.3,17589,1,4,0)
;;=4^R55.
;;^UTILITY(U,$J,358.3,17589,2)
;;=^116707
;;^UTILITY(U,$J,358.3,17590,0)
;;=R56.9^^59^699^42
;;^UTILITY(U,$J,358.3,17590,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17590,1,3,0)
;;=3^Seizures
;;^UTILITY(U,$J,358.3,17590,1,4,0)
;;=4^R56.9
;;^UTILITY(U,$J,358.3,17590,2)
;;=^5019524
;;^UTILITY(U,$J,358.3,17591,0)
;;=N50.82^^59^699^41
;;^UTILITY(U,$J,358.3,17591,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17591,1,3,0)
;;=3^Scrotal Pain
;;^UTILITY(U,$J,358.3,17591,1,4,0)
;;=4^N50.82
;;^UTILITY(U,$J,358.3,17591,2)
;;=^5138930
;;^UTILITY(U,$J,358.3,17592,0)
;;=N50.812^^59^699^46
;;^UTILITY(U,$J,358.3,17592,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17592,1,3,0)
;;=3^Testicular Pain,Left Side
;;^UTILITY(U,$J,358.3,17592,1,4,0)
;;=4^N50.812
;;^UTILITY(U,$J,358.3,17592,2)
;;=^5138928
;;^UTILITY(U,$J,358.3,17593,0)
;;=N50.811^^59^699^47
;;^UTILITY(U,$J,358.3,17593,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17593,1,3,0)
;;=3^Testicular Pain,Right Side
;;^UTILITY(U,$J,358.3,17593,1,4,0)
;;=4^N50.811
;;^UTILITY(U,$J,358.3,17593,2)
;;=^5138927
;;^UTILITY(U,$J,358.3,17594,0)
;;=D63.1^^59^699^8
;;^UTILITY(U,$J,358.3,17594,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17594,1,3,0)
;;=3^Anemia in Chronic Kidney Disease
;;^UTILITY(U,$J,358.3,17594,1,4,0)
;;=4^D63.1
;;^UTILITY(U,$J,358.3,17594,2)
;;=^332908
;;^UTILITY(U,$J,358.3,17595,0)
;;=R11.15^^59^699^20
;;^UTILITY(U,$J,358.3,17595,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17595,1,3,0)
;;=3^Cyclical Vomiting Syndrome Unrelated to Migraine
;;^UTILITY(U,$J,358.3,17595,1,4,0)
;;=4^R11.15
;;^UTILITY(U,$J,358.3,17595,2)
;;=^5158141
;;^UTILITY(U,$J,358.3,17596,0)
;;=U07.1^^59^699^12
;;^UTILITY(U,$J,358.3,17596,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17596,1,3,0)
;;=3^Confirmed COVID-19
;;^UTILITY(U,$J,358.3,17596,1,4,0)
;;=4^U07.1
;;^UTILITY(U,$J,358.3,17596,2)
;;=^5159070
;;^UTILITY(U,$J,358.3,17597,0)
;;=R06.02^^59^699^43
;;^UTILITY(U,$J,358.3,17597,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17597,1,3,0)
;;=3^Shortness of Breath
;;^UTILITY(U,$J,358.3,17597,1,4,0)
;;=4^R06.02
;;^UTILITY(U,$J,358.3,17597,2)
;;=^5019181
;;^UTILITY(U,$J,358.3,17598,0)
;;=R51.0^^59^699^28
;;^UTILITY(U,$J,358.3,17598,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17598,1,3,0)
;;=3^Headache w/ Orthostatic Component,NEC
;;^UTILITY(U,$J,358.3,17598,1,4,0)
;;=4^R51.0
;;^UTILITY(U,$J,358.3,17598,2)
;;=^5159305
;;^UTILITY(U,$J,358.3,17599,0)
;;=R51.9^^59^699^29
;;^UTILITY(U,$J,358.3,17599,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17599,1,3,0)
;;=3^Headache,Unspecified
;;^UTILITY(U,$J,358.3,17599,1,4,0)
;;=4^R51.9
;;^UTILITY(U,$J,358.3,17599,2)
;;=^5159306
;;^UTILITY(U,$J,358.3,17600,0)
;;=Z20.822^^59^699^14
;;^UTILITY(U,$J,358.3,17600,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17600,1,3,0)
;;=3^Contact w/ & Exposure to COVID-19
;;^UTILITY(U,$J,358.3,17600,1,4,0)
;;=4^Z20.822
;;^UTILITY(U,$J,358.3,17600,2)
;;=^5160187
;;^UTILITY(U,$J,358.3,17601,0)
;;=R05.9^^59^699^19
;;^UTILITY(U,$J,358.3,17601,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17601,1,3,0)
;;=3^Cough,Unspec
;;^UTILITY(U,$J,358.3,17601,1,4,0)
;;=4^R05.9
;;^UTILITY(U,$J,358.3,17601,2)
;;=^5161232
;;^UTILITY(U,$J,358.3,17602,0)
;;=R05.1^^59^699^16
;;^UTILITY(U,$J,358.3,17602,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17602,1,3,0)
;;=3^Cough,Acute
;;^UTILITY(U,$J,358.3,17602,1,4,0)
;;=4^R05.1
;;^UTILITY(U,$J,358.3,17602,2)
;;=^5161227
;;^UTILITY(U,$J,358.3,17603,0)
;;=R05.2^^59^699^18
;;^UTILITY(U,$J,358.3,17603,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17603,1,3,0)
;;=3^Cough,Subacute
;;^UTILITY(U,$J,358.3,17603,1,4,0)
;;=4^R05.2
;;^UTILITY(U,$J,358.3,17603,2)
;;=^5161228
;;^UTILITY(U,$J,358.3,17604,0)
;;=R05.3^^59^699^17
;;^UTILITY(U,$J,358.3,17604,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17604,1,3,0)
;;=3^Cough,Chronic
;;^UTILITY(U,$J,358.3,17604,1,4,0)
;;=4^R05.3
;;^UTILITY(U,$J,358.3,17604,2)
;;=^5161229
;;^UTILITY(U,$J,358.3,17605,0)
;;=R05.4^^59^699^15
;;^UTILITY(U,$J,358.3,17605,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17605,1,3,0)
;;=3^Cough Syncope
;;^UTILITY(U,$J,358.3,17605,1,4,0)
;;=4^R05.4
;;^UTILITY(U,$J,358.3,17605,2)
;;=^5161230
;;^UTILITY(U,$J,358.3,17606,0)
;;=I05.0^^59^700^37
;;^UTILITY(U,$J,358.3,17606,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17606,1,3,0)
;;=3^Rheumatic Mitral Stenosis
;;^UTILITY(U,$J,358.3,17606,1,4,0)
;;=4^I05.0
;;^UTILITY(U,$J,358.3,17606,2)
;;=^5007041
;;^UTILITY(U,$J,358.3,17607,0)
;;=I05.8^^59^700^38
;;^UTILITY(U,$J,358.3,17607,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17607,1,3,0)
;;=3^Rheumatic Mitral Valve Diseases,Other
;;^UTILITY(U,$J,358.3,17607,1,4,0)
;;=4^I05.8
;;^UTILITY(U,$J,358.3,17607,2)
;;=^5007043
;;^UTILITY(U,$J,358.3,17608,0)
;;=I10.^^59^700^25
;;^UTILITY(U,$J,358.3,17608,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17608,1,3,0)
;;=3^Hypertension
;;^UTILITY(U,$J,358.3,17608,1,4,0)
;;=4^I10.
;;^UTILITY(U,$J,358.3,17608,2)
;;=^5007062
;;^UTILITY(U,$J,358.3,17609,0)
;;=I20.0^^59^700^40
;;^UTILITY(U,$J,358.3,17609,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17609,1,3,0)
;;=3^Unstable Angina w/o Athscl Hrt Disease
;;^UTILITY(U,$J,358.3,17609,1,4,0)
;;=4^I20.0
;;^UTILITY(U,$J,358.3,17609,2)
;;=^5007076
;;^UTILITY(U,$J,358.3,17610,0)
;;=I20.9^^59^700^1
;;^UTILITY(U,$J,358.3,17610,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17610,1,3,0)
;;=3^Angina Pectoris,Unspec
;;^UTILITY(U,$J,358.3,17610,1,4,0)
;;=4^I20.9
;;^UTILITY(U,$J,358.3,17610,2)
;;=^5007079
;;^UTILITY(U,$J,358.3,17611,0)
;;=I25.10^^59^700^2
;;^UTILITY(U,$J,358.3,17611,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17611,1,3,0)
;;=3^Athscl Hrt Disease,Native Coronary Artery w/o Ang Pctrs
;;^UTILITY(U,$J,358.3,17611,1,4,0)
;;=4^I25.10
;;^UTILITY(U,$J,358.3,17611,2)
;;=^5007107
;;^UTILITY(U,$J,358.3,17612,0)
;;=I25.9^^59^700^13
;;^UTILITY(U,$J,358.3,17612,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17612,1,3,0)
;;=3^Chronic Ischemic Heart Disease,Unspec
;;^UTILITY(U,$J,358.3,17612,1,4,0)
;;=4^I25.9
;;^UTILITY(U,$J,358.3,17612,2)
;;=^5007144
;;^UTILITY(U,$J,358.3,17613,0)
;;=I35.0^^59^700^32
;;^UTILITY(U,$J,358.3,17613,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17613,1,3,0)
;;=3^Nonrheumatic Aortic Valve Stenosis
;;^UTILITY(U,$J,358.3,17613,1,4,0)
;;=4^I35.0
;;^UTILITY(U,$J,358.3,17613,2)
;;=^5007174
;;^UTILITY(U,$J,358.3,17614,0)
;;=I35.1^^59^700^31
;;^UTILITY(U,$J,358.3,17614,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17614,1,3,0)
;;=3^Nonrheumatic Aortic Valve Insufficiency
;;^UTILITY(U,$J,358.3,17614,1,4,0)
;;=4^I35.1
;;^UTILITY(U,$J,358.3,17614,2)
;;=^5007175
;;^UTILITY(U,$J,358.3,17615,0)
;;=I35.2^^59^700^33
;;^UTILITY(U,$J,358.3,17615,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17615,1,3,0)
;;=3^Nonrheumatic Aortic Valve Stenosis w/ Insufficiency
;;^UTILITY(U,$J,358.3,17615,1,4,0)
;;=4^I35.2
;;^UTILITY(U,$J,358.3,17615,2)
;;=^5007176
;;^UTILITY(U,$J,358.3,17616,0)
;;=I35.8^^59^700^29
;;^UTILITY(U,$J,358.3,17616,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17616,1,3,0)
;;=3^Nonrheumatic Aortic Valve Disorders,Other
;;^UTILITY(U,$J,358.3,17616,1,4,0)
;;=4^I35.8
;;^UTILITY(U,$J,358.3,17616,2)
;;=^5007177
;;^UTILITY(U,$J,358.3,17617,0)
;;=I35.9^^59^700^30
;;^UTILITY(U,$J,358.3,17617,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17617,1,3,0)
;;=3^Nonrheumatic Aortic Valve Disorders,Unspec
;;^UTILITY(U,$J,358.3,17617,1,4,0)
;;=4^I35.9
;;^UTILITY(U,$J,358.3,17617,2)
;;=^5007178
;;^UTILITY(U,$J,358.3,17618,0)
;;=I48.91^^59^700^9
;;^UTILITY(U,$J,358.3,17618,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17618,1,3,0)
;;=3^Atrial Fibrillation,Unspec
;;^UTILITY(U,$J,358.3,17618,1,4,0)
;;=4^I48.91
;;^UTILITY(U,$J,358.3,17618,2)
;;=^5007229
;;^UTILITY(U,$J,358.3,17619,0)
;;=I49.9^^59^700^12
;;^UTILITY(U,$J,358.3,17619,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17619,1,3,0)
;;=3^Cardiac Arrhythmia,Unspec
;;^UTILITY(U,$J,358.3,17619,1,4,0)
;;=4^I49.9
;;^UTILITY(U,$J,358.3,17619,2)
;;=^5007237
;;^UTILITY(U,$J,358.3,17620,0)
;;=I50.9^^59^700^24
;;^UTILITY(U,$J,358.3,17620,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17620,1,3,0)
;;=3^Heart Failure,Unspec
;;^UTILITY(U,$J,358.3,17620,1,4,0)
;;=4^I50.9
;;^UTILITY(U,$J,358.3,17620,2)
;;=^5007251
;;^UTILITY(U,$J,358.3,17621,0)
;;=I73.9^^59^700^36
;;^UTILITY(U,$J,358.3,17621,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17621,1,3,0)
;;=3^Periph Vascular Disease,Unspec
;;^UTILITY(U,$J,358.3,17621,1,4,0)
;;=4^I73.9
;;^UTILITY(U,$J,358.3,17621,2)
;;=^184182
;;^UTILITY(U,$J,358.3,17622,0)
;;=I87.2^^59^700^41
;;^UTILITY(U,$J,358.3,17622,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17622,1,3,0)
;;=3^Venous Insufficiency
;;^UTILITY(U,$J,358.3,17622,1,4,0)
;;=4^I87.2
;;^UTILITY(U,$J,358.3,17622,2)
;;=^5008047
;;^UTILITY(U,$J,358.3,17623,0)
;;=R03.0^^59^700^14
;;^UTILITY(U,$J,358.3,17623,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17623,1,3,0)
;;=3^Elevated B/P Reading w/o HTN Dx
;;^UTILITY(U,$J,358.3,17623,1,4,0)
;;=4^R03.0
;;^UTILITY(U,$J,358.3,17623,2)
;;=^5019171
;;^UTILITY(U,$J,358.3,17624,0)
;;=I25.110^^59^700^3
;;^UTILITY(U,$J,358.3,17624,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17624,1,3,0)
;;=3^Athscl Hrt Disease,Native Coronary Artery w/ Unstable Angina
;;^UTILITY(U,$J,358.3,17624,1,4,0)
;;=4^I25.110
;;^UTILITY(U,$J,358.3,17624,2)
;;=^5007108
;;^UTILITY(U,$J,358.3,17625,0)
;;=I25.119^^59^700^4
;;^UTILITY(U,$J,358.3,17625,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17625,1,3,0)
;;=3^Athscl Hrt Disease,Native Coronary Artery w/ Unspec Angina
;;^UTILITY(U,$J,358.3,17625,1,4,0)
;;=4^I25.119
;;^UTILITY(U,$J,358.3,17625,2)
;;=^5007111
;;^UTILITY(U,$J,358.3,17626,0)
;;=I48.0^^59^700^34
;;^UTILITY(U,$J,358.3,17626,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17626,1,3,0)
;;=3^Paroxysmal Atrial Fibrillation
;;^UTILITY(U,$J,358.3,17626,1,4,0)
;;=4^I48.0
;;^UTILITY(U,$J,358.3,17626,2)
;;=^90473
;;^UTILITY(U,$J,358.3,17627,0)
;;=I48.92^^59^700^10
;;^UTILITY(U,$J,358.3,17627,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17627,1,3,0)
;;=3^Atrial Flutter,Unspec
;;^UTILITY(U,$J,358.3,17627,1,4,0)
;;=4^I48.92
;;^UTILITY(U,$J,358.3,17627,2)
;;=^5007230
;;^UTILITY(U,$J,358.3,17628,0)
;;=I48.3^^59^700^39
;;^UTILITY(U,$J,358.3,17628,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17628,1,3,0)
;;=3^Typical Atrial Flutter
;;^UTILITY(U,$J,358.3,17628,1,4,0)
;;=4^I48.3
;;^UTILITY(U,$J,358.3,17628,2)
;;=^5007227
;;^UTILITY(U,$J,358.3,17629,0)
;;=I48.4^^59^700^11
;;^UTILITY(U,$J,358.3,17629,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17629,1,3,0)
;;=3^Atypical Atrial Flutter
;;^UTILITY(U,$J,358.3,17629,1,4,0)
;;=4^I48.4
;;^UTILITY(U,$J,358.3,17629,2)
;;=^5007228
;;^UTILITY(U,$J,358.3,17630,0)
;;=I16.9^^59^700^26
;;^UTILITY(U,$J,358.3,17630,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17630,1,3,0)
;;=3^Hypertensive Crisis,Unspec
;;^UTILITY(U,$J,358.3,17630,1,4,0)
;;=4^I16.9
;;^UTILITY(U,$J,358.3,17630,2)
;;=^5138600
;;^UTILITY(U,$J,358.3,17631,0)
;;=I16.1^^59^700^27
;;^UTILITY(U,$J,358.3,17631,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17631,1,3,0)
;;=3^Hypertensive Emergency
;;^UTILITY(U,$J,358.3,17631,1,4,0)
;;=4^I16.1
;;^UTILITY(U,$J,358.3,17631,2)
;;=^8204721
;;^UTILITY(U,$J,358.3,17632,0)
;;=I16.0^^59^700^28
;;^UTILITY(U,$J,358.3,17632,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17632,1,3,0)
;;=3^Hypertensive Urgency
;;^UTILITY(U,$J,358.3,17632,1,4,0)
;;=4^I16.0
;;^UTILITY(U,$J,358.3,17632,2)
;;=^8133013
;;^UTILITY(U,$J,358.3,17633,0)
;;=I12.9^^59^700^15
;;^UTILITY(U,$J,358.3,17633,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17633,1,3,0)
;;=3^HTN CKD w/ Stage 1-4 CKD or Unspec
;;^UTILITY(U,$J,358.3,17633,1,4,0)
;;=4^I12.9
;;^UTILITY(U,$J,358.3,17633,2)
;;=^5007066
;;^UTILITY(U,$J,358.3,17634,0)
;;=I12.0^^59^700^16
;;^UTILITY(U,$J,358.3,17634,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17634,1,3,0)
;;=3^HTN CKD w/ Stage 5 CKD or ESRD
;;^UTILITY(U,$J,358.3,17634,1,4,0)
;;=4^I12.0
;;^UTILITY(U,$J,358.3,17634,2)
;;=^5007065
;;^UTILITY(U,$J,358.3,17635,0)
;;=I13.10^^59^700^19
;;^UTILITY(U,$J,358.3,17635,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17635,1,3,0)
;;=3^HTN Heart & CKD w/o Heart Fail w/ 1-4 CKD or Unspec
;;^UTILITY(U,$J,358.3,17635,1,4,0)
;;=4^I13.10
;;^UTILITY(U,$J,358.3,17635,2)
;;=^5007068
;;^UTILITY(U,$J,358.3,17636,0)
;;=I13.11^^59^700^20
;;^UTILITY(U,$J,358.3,17636,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17636,1,3,0)
;;=3^HTN Heart & CKD w/o Heart Fail w/ 5 CKD or ESRD
;;^UTILITY(U,$J,358.3,17636,1,4,0)
;;=4^I13.11
;;^UTILITY(U,$J,358.3,17636,2)
;;=^5007069
;;^UTILITY(U,$J,358.3,17637,0)
;;=I13.0^^59^700^17
;;^UTILITY(U,$J,358.3,17637,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17637,1,3,0)
;;=3^HTN Heart & CKD w/ Heart Fail w/ 1-4 CKD or Unspec
;;^UTILITY(U,$J,358.3,17637,1,4,0)
;;=4^I13.0
;;^UTILITY(U,$J,358.3,17637,2)
;;=^5007067
;;^UTILITY(U,$J,358.3,17638,0)
;;=I13.2^^59^700^18
;;^UTILITY(U,$J,358.3,17638,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17638,1,3,0)
;;=3^HTN Heart & CKD w/ Heart Fail w/ 5 CKD or ESRD
;;^UTILITY(U,$J,358.3,17638,1,4,0)
;;=4^I13.2
;;^UTILITY(U,$J,358.3,17638,2)
;;=^5007070
;;^UTILITY(U,$J,358.3,17639,0)
;;=I31.9^^59^700^35
;;^UTILITY(U,$J,358.3,17639,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17639,1,3,0)
;;=3^Pericardial Disease NOS
;;^UTILITY(U,$J,358.3,17639,1,4,0)
;;=4^I31.9
;;^UTILITY(U,$J,358.3,17639,2)
;;=^5007165
;;^UTILITY(U,$J,358.3,17640,0)
;;=I48.20^^59^700^5
;;^UTILITY(U,$J,358.3,17640,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17640,1,3,0)
;;=3^Atrial Fibrillation,Chronic,Unspec
;;^UTILITY(U,$J,358.3,17640,1,4,0)
;;=4^I48.20
;;^UTILITY(U,$J,358.3,17640,2)
;;=^5158048
;;^UTILITY(U,$J,358.3,17641,0)
;;=I48.21^^59^700^8
;;^UTILITY(U,$J,358.3,17641,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17641,1,3,0)
;;=3^Atrial Fibrillation,Permanent
;;^UTILITY(U,$J,358.3,17641,1,4,0)
;;=4^I48.21
;;^UTILITY(U,$J,358.3,17641,2)
;;=^304710
;;^UTILITY(U,$J,358.3,17642,0)
;;=I48.11^^59^700^6
;;^UTILITY(U,$J,358.3,17642,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17642,1,3,0)
;;=3^Atrial Fibrillation,Longstanding Persistent
;;^UTILITY(U,$J,358.3,17642,1,4,0)
;;=4^I48.11
;;^UTILITY(U,$J,358.3,17642,2)
;;=^5158046
;;^UTILITY(U,$J,358.3,17643,0)
;;=I48.19^^59^700^7
;;^UTILITY(U,$J,358.3,17643,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17643,1,3,0)
;;=3^Atrial Fibrillation,Oth Persistent
;;^UTILITY(U,$J,358.3,17643,1,4,0)
;;=4^I48.19
;;^UTILITY(U,$J,358.3,17643,2)
;;=^5158047
;;^UTILITY(U,$J,358.3,17644,0)
;;=I50.20^^59^700^23
;;^UTILITY(U,$J,358.3,17644,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,17644,1,3,0)
;;=3^Heart Failure,Systolic,Unspec
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI078 19758 printed Dec 13, 2024@01:43 Page 2
IBDEI078 ; ; 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,17574,2)
+2 ;;=^5019230
+3 ;;^UTILITY(U,$J,358.3,17575,0)
+4 ;;=R10.11^^59^699^4
+5 ;;^UTILITY(U,$J,358.3,17575,1,0)
+6 ;;=^358.31IA^4^2
+7 ;;^UTILITY(U,$J,358.3,17575,1,3,0)
+8 ;;=3^Abdominal Pain,RUQ
+9 ;;^UTILITY(U,$J,358.3,17575,1,4,0)
+10 ;;=4^R10.11
+11 ;;^UTILITY(U,$J,358.3,17575,2)
+12 ;;=^5019206
+13 ;;^UTILITY(U,$J,358.3,17576,0)
+14 ;;=R10.12^^59^699^2
+15 ;;^UTILITY(U,$J,358.3,17576,1,0)
+16 ;;=^358.31IA^4^2
+17 ;;^UTILITY(U,$J,358.3,17576,1,3,0)
+18 ;;=3^Abdominal Pain,LUQ
+19 ;;^UTILITY(U,$J,358.3,17576,1,4,0)
+20 ;;=4^R10.12
+21 ;;^UTILITY(U,$J,358.3,17576,2)
+22 ;;=^5019207
+23 ;;^UTILITY(U,$J,358.3,17577,0)
+24 ;;=R10.13^^59^699^25
+25 ;;^UTILITY(U,$J,358.3,17577,1,0)
+26 ;;=^358.31IA^4^2
+27 ;;^UTILITY(U,$J,358.3,17577,1,3,0)
+28 ;;=3^Epigastric Pain
+29 ;;^UTILITY(U,$J,358.3,17577,1,4,0)
+30 ;;=4^R10.13
+31 ;;^UTILITY(U,$J,358.3,17577,2)
+32 ;;=^5019208
+33 ;;^UTILITY(U,$J,358.3,17578,0)
+34 ;;=R10.2^^59^699^35
+35 ;;^UTILITY(U,$J,358.3,17578,1,0)
+36 ;;=^358.31IA^4^2
+37 ;;^UTILITY(U,$J,358.3,17578,1,3,0)
+38 ;;=3^Pelvic and Perineal Pain
+39 ;;^UTILITY(U,$J,358.3,17578,1,4,0)
+40 ;;=4^R10.2
+41 ;;^UTILITY(U,$J,358.3,17578,2)
+42 ;;=^5019209
+43 ;;^UTILITY(U,$J,358.3,17579,0)
+44 ;;=R10.31^^59^699^3
+45 ;;^UTILITY(U,$J,358.3,17579,1,0)
+46 ;;=^358.31IA^4^2
+47 ;;^UTILITY(U,$J,358.3,17579,1,3,0)
+48 ;;=3^Abdominal Pain,RLQ
+49 ;;^UTILITY(U,$J,358.3,17579,1,4,0)
+50 ;;=4^R10.31
+51 ;;^UTILITY(U,$J,358.3,17579,2)
+52 ;;=^5019211
+53 ;;^UTILITY(U,$J,358.3,17580,0)
+54 ;;=R10.32^^59^699^1
+55 ;;^UTILITY(U,$J,358.3,17580,1,0)
+56 ;;=^358.31IA^4^2
+57 ;;^UTILITY(U,$J,358.3,17580,1,3,0)
+58 ;;=3^Abdominal Pain,LLQ
+59 ;;^UTILITY(U,$J,358.3,17580,1,4,0)
+60 ;;=4^R10.32
+61 ;;^UTILITY(U,$J,358.3,17580,2)
+62 ;;=^5019212
+63 ;;^UTILITY(U,$J,358.3,17581,0)
+64 ;;=R10.33^^59^699^36
+65 ;;^UTILITY(U,$J,358.3,17581,1,0)
+66 ;;=^358.31IA^4^2
+67 ;;^UTILITY(U,$J,358.3,17581,1,3,0)
+68 ;;=3^Periumbilical Pain
+69 ;;^UTILITY(U,$J,358.3,17581,1,4,0)
+70 ;;=4^R10.33
+71 ;;^UTILITY(U,$J,358.3,17581,2)
+72 ;;=^5019213
+73 ;;^UTILITY(U,$J,358.3,17582,0)
+74 ;;=R11.0^^59^699^33
+75 ;;^UTILITY(U,$J,358.3,17582,1,0)
+76 ;;=^358.31IA^4^2
+77 ;;^UTILITY(U,$J,358.3,17582,1,3,0)
+78 ;;=3^Nausea
+79 ;;^UTILITY(U,$J,358.3,17582,1,4,0)
+80 ;;=4^R11.0
+81 ;;^UTILITY(U,$J,358.3,17582,2)
+82 ;;=^5019231
+83 ;;^UTILITY(U,$J,358.3,17583,0)
+84 ;;=R11.11^^59^699^50
+85 ;;^UTILITY(U,$J,358.3,17583,1,0)
+86 ;;=^358.31IA^4^2
+87 ;;^UTILITY(U,$J,358.3,17583,1,3,0)
+88 ;;=3^Vomiting w/o Nausea
+89 ;;^UTILITY(U,$J,358.3,17583,1,4,0)
+90 ;;=4^R11.11
+91 ;;^UTILITY(U,$J,358.3,17583,2)
+92 ;;=^5019233
+93 ;;^UTILITY(U,$J,358.3,17584,0)
+94 ;;=R11.12^^59^699^40
+95 ;;^UTILITY(U,$J,358.3,17584,1,0)
+96 ;;=^358.31IA^4^2
+97 ;;^UTILITY(U,$J,358.3,17584,1,3,0)
+98 ;;=3^Projectile Vomiting
+99 ;;^UTILITY(U,$J,358.3,17584,1,4,0)
+100 ;;=4^R11.12
+101 ;;^UTILITY(U,$J,358.3,17584,2)
+102 ;;=^5019234
+103 ;;^UTILITY(U,$J,358.3,17585,0)
+104 ;;=R11.13^^59^699^49
+105 ;;^UTILITY(U,$J,358.3,17585,1,0)
+106 ;;=^358.31IA^4^2
+107 ;;^UTILITY(U,$J,358.3,17585,1,3,0)
+108 ;;=3^Vomiting of Fecal Matter
+109 ;;^UTILITY(U,$J,358.3,17585,1,4,0)
+110 ;;=4^R11.13
+111 ;;^UTILITY(U,$J,358.3,17585,2)
+112 ;;=^5019235
+113 ;;^UTILITY(U,$J,358.3,17586,0)
+114 ;;=R11.14^^59^699^9
+115 ;;^UTILITY(U,$J,358.3,17586,1,0)
+116 ;;=^358.31IA^4^2
+117 ;;^UTILITY(U,$J,358.3,17586,1,3,0)
+118 ;;=3^Bilious Vomiting
+119 ;;^UTILITY(U,$J,358.3,17586,1,4,0)
+120 ;;=4^R11.14
+121 ;;^UTILITY(U,$J,358.3,17586,2)
+122 ;;=^5019236
+123 ;;^UTILITY(U,$J,358.3,17587,0)
+124 ;;=R11.2^^59^699^34
+125 ;;^UTILITY(U,$J,358.3,17587,1,0)
+126 ;;=^358.31IA^4^2
+127 ;;^UTILITY(U,$J,358.3,17587,1,3,0)
+128 ;;=3^Nausea w/ Vomiting,Unspec
+129 ;;^UTILITY(U,$J,358.3,17587,1,4,0)
+130 ;;=4^R11.2
+131 ;;^UTILITY(U,$J,358.3,17587,2)
+132 ;;=^5019237
+133 ;;^UTILITY(U,$J,358.3,17588,0)
+134 ;;=R54.^^59^699^7
+135 ;;^UTILITY(U,$J,358.3,17588,1,0)
+136 ;;=^358.31IA^4^2
+137 ;;^UTILITY(U,$J,358.3,17588,1,3,0)
+138 ;;=3^Age-Related Physical Debility
+139 ;;^UTILITY(U,$J,358.3,17588,1,4,0)
+140 ;;=4^R54.
+141 ;;^UTILITY(U,$J,358.3,17588,2)
+142 ;;=^5019521
+143 ;;^UTILITY(U,$J,358.3,17589,0)
+144 ;;=R55.^^59^699^45
+145 ;;^UTILITY(U,$J,358.3,17589,1,0)
+146 ;;=^358.31IA^4^2
+147 ;;^UTILITY(U,$J,358.3,17589,1,3,0)
+148 ;;=3^Syncope and Collapse
+149 ;;^UTILITY(U,$J,358.3,17589,1,4,0)
+150 ;;=4^R55.
+151 ;;^UTILITY(U,$J,358.3,17589,2)
+152 ;;=^116707
+153 ;;^UTILITY(U,$J,358.3,17590,0)
+154 ;;=R56.9^^59^699^42
+155 ;;^UTILITY(U,$J,358.3,17590,1,0)
+156 ;;=^358.31IA^4^2
+157 ;;^UTILITY(U,$J,358.3,17590,1,3,0)
+158 ;;=3^Seizures
+159 ;;^UTILITY(U,$J,358.3,17590,1,4,0)
+160 ;;=4^R56.9
+161 ;;^UTILITY(U,$J,358.3,17590,2)
+162 ;;=^5019524
+163 ;;^UTILITY(U,$J,358.3,17591,0)
+164 ;;=N50.82^^59^699^41
+165 ;;^UTILITY(U,$J,358.3,17591,1,0)
+166 ;;=^358.31IA^4^2
+167 ;;^UTILITY(U,$J,358.3,17591,1,3,0)
+168 ;;=3^Scrotal Pain
+169 ;;^UTILITY(U,$J,358.3,17591,1,4,0)
+170 ;;=4^N50.82
+171 ;;^UTILITY(U,$J,358.3,17591,2)
+172 ;;=^5138930
+173 ;;^UTILITY(U,$J,358.3,17592,0)
+174 ;;=N50.812^^59^699^46
+175 ;;^UTILITY(U,$J,358.3,17592,1,0)
+176 ;;=^358.31IA^4^2
+177 ;;^UTILITY(U,$J,358.3,17592,1,3,0)
+178 ;;=3^Testicular Pain,Left Side
+179 ;;^UTILITY(U,$J,358.3,17592,1,4,0)
+180 ;;=4^N50.812
+181 ;;^UTILITY(U,$J,358.3,17592,2)
+182 ;;=^5138928
+183 ;;^UTILITY(U,$J,358.3,17593,0)
+184 ;;=N50.811^^59^699^47
+185 ;;^UTILITY(U,$J,358.3,17593,1,0)
+186 ;;=^358.31IA^4^2
+187 ;;^UTILITY(U,$J,358.3,17593,1,3,0)
+188 ;;=3^Testicular Pain,Right Side
+189 ;;^UTILITY(U,$J,358.3,17593,1,4,0)
+190 ;;=4^N50.811
+191 ;;^UTILITY(U,$J,358.3,17593,2)
+192 ;;=^5138927
+193 ;;^UTILITY(U,$J,358.3,17594,0)
+194 ;;=D63.1^^59^699^8
+195 ;;^UTILITY(U,$J,358.3,17594,1,0)
+196 ;;=^358.31IA^4^2
+197 ;;^UTILITY(U,$J,358.3,17594,1,3,0)
+198 ;;=3^Anemia in Chronic Kidney Disease
+199 ;;^UTILITY(U,$J,358.3,17594,1,4,0)
+200 ;;=4^D63.1
+201 ;;^UTILITY(U,$J,358.3,17594,2)
+202 ;;=^332908
+203 ;;^UTILITY(U,$J,358.3,17595,0)
+204 ;;=R11.15^^59^699^20
+205 ;;^UTILITY(U,$J,358.3,17595,1,0)
+206 ;;=^358.31IA^4^2
+207 ;;^UTILITY(U,$J,358.3,17595,1,3,0)
+208 ;;=3^Cyclical Vomiting Syndrome Unrelated to Migraine
+209 ;;^UTILITY(U,$J,358.3,17595,1,4,0)
+210 ;;=4^R11.15
+211 ;;^UTILITY(U,$J,358.3,17595,2)
+212 ;;=^5158141
+213 ;;^UTILITY(U,$J,358.3,17596,0)
+214 ;;=U07.1^^59^699^12
+215 ;;^UTILITY(U,$J,358.3,17596,1,0)
+216 ;;=^358.31IA^4^2
+217 ;;^UTILITY(U,$J,358.3,17596,1,3,0)
+218 ;;=3^Confirmed COVID-19
+219 ;;^UTILITY(U,$J,358.3,17596,1,4,0)
+220 ;;=4^U07.1
+221 ;;^UTILITY(U,$J,358.3,17596,2)
+222 ;;=^5159070
+223 ;;^UTILITY(U,$J,358.3,17597,0)
+224 ;;=R06.02^^59^699^43
+225 ;;^UTILITY(U,$J,358.3,17597,1,0)
+226 ;;=^358.31IA^4^2
+227 ;;^UTILITY(U,$J,358.3,17597,1,3,0)
+228 ;;=3^Shortness of Breath
+229 ;;^UTILITY(U,$J,358.3,17597,1,4,0)
+230 ;;=4^R06.02
+231 ;;^UTILITY(U,$J,358.3,17597,2)
+232 ;;=^5019181
+233 ;;^UTILITY(U,$J,358.3,17598,0)
+234 ;;=R51.0^^59^699^28
+235 ;;^UTILITY(U,$J,358.3,17598,1,0)
+236 ;;=^358.31IA^4^2
+237 ;;^UTILITY(U,$J,358.3,17598,1,3,0)
+238 ;;=3^Headache w/ Orthostatic Component,NEC
+239 ;;^UTILITY(U,$J,358.3,17598,1,4,0)
+240 ;;=4^R51.0
+241 ;;^UTILITY(U,$J,358.3,17598,2)
+242 ;;=^5159305
+243 ;;^UTILITY(U,$J,358.3,17599,0)
+244 ;;=R51.9^^59^699^29
+245 ;;^UTILITY(U,$J,358.3,17599,1,0)
+246 ;;=^358.31IA^4^2
+247 ;;^UTILITY(U,$J,358.3,17599,1,3,0)
+248 ;;=3^Headache,Unspecified
+249 ;;^UTILITY(U,$J,358.3,17599,1,4,0)
+250 ;;=4^R51.9
+251 ;;^UTILITY(U,$J,358.3,17599,2)
+252 ;;=^5159306
+253 ;;^UTILITY(U,$J,358.3,17600,0)
+254 ;;=Z20.822^^59^699^14
+255 ;;^UTILITY(U,$J,358.3,17600,1,0)
+256 ;;=^358.31IA^4^2
+257 ;;^UTILITY(U,$J,358.3,17600,1,3,0)
+258 ;;=3^Contact w/ & Exposure to COVID-19
+259 ;;^UTILITY(U,$J,358.3,17600,1,4,0)
+260 ;;=4^Z20.822
+261 ;;^UTILITY(U,$J,358.3,17600,2)
+262 ;;=^5160187
+263 ;;^UTILITY(U,$J,358.3,17601,0)
+264 ;;=R05.9^^59^699^19
+265 ;;^UTILITY(U,$J,358.3,17601,1,0)
+266 ;;=^358.31IA^4^2
+267 ;;^UTILITY(U,$J,358.3,17601,1,3,0)
+268 ;;=3^Cough,Unspec
+269 ;;^UTILITY(U,$J,358.3,17601,1,4,0)
+270 ;;=4^R05.9
+271 ;;^UTILITY(U,$J,358.3,17601,2)
+272 ;;=^5161232
+273 ;;^UTILITY(U,$J,358.3,17602,0)
+274 ;;=R05.1^^59^699^16
+275 ;;^UTILITY(U,$J,358.3,17602,1,0)
+276 ;;=^358.31IA^4^2
+277 ;;^UTILITY(U,$J,358.3,17602,1,3,0)
+278 ;;=3^Cough,Acute
+279 ;;^UTILITY(U,$J,358.3,17602,1,4,0)
+280 ;;=4^R05.1
+281 ;;^UTILITY(U,$J,358.3,17602,2)
+282 ;;=^5161227
+283 ;;^UTILITY(U,$J,358.3,17603,0)
+284 ;;=R05.2^^59^699^18
+285 ;;^UTILITY(U,$J,358.3,17603,1,0)
+286 ;;=^358.31IA^4^2
+287 ;;^UTILITY(U,$J,358.3,17603,1,3,0)
+288 ;;=3^Cough,Subacute
+289 ;;^UTILITY(U,$J,358.3,17603,1,4,0)
+290 ;;=4^R05.2
+291 ;;^UTILITY(U,$J,358.3,17603,2)
+292 ;;=^5161228
+293 ;;^UTILITY(U,$J,358.3,17604,0)
+294 ;;=R05.3^^59^699^17
+295 ;;^UTILITY(U,$J,358.3,17604,1,0)
+296 ;;=^358.31IA^4^2
+297 ;;^UTILITY(U,$J,358.3,17604,1,3,0)
+298 ;;=3^Cough,Chronic
+299 ;;^UTILITY(U,$J,358.3,17604,1,4,0)
+300 ;;=4^R05.3
+301 ;;^UTILITY(U,$J,358.3,17604,2)
+302 ;;=^5161229
+303 ;;^UTILITY(U,$J,358.3,17605,0)
+304 ;;=R05.4^^59^699^15
+305 ;;^UTILITY(U,$J,358.3,17605,1,0)
+306 ;;=^358.31IA^4^2
+307 ;;^UTILITY(U,$J,358.3,17605,1,3,0)
+308 ;;=3^Cough Syncope
+309 ;;^UTILITY(U,$J,358.3,17605,1,4,0)
+310 ;;=4^R05.4
+311 ;;^UTILITY(U,$J,358.3,17605,2)
+312 ;;=^5161230
+313 ;;^UTILITY(U,$J,358.3,17606,0)
+314 ;;=I05.0^^59^700^37
+315 ;;^UTILITY(U,$J,358.3,17606,1,0)
+316 ;;=^358.31IA^4^2
+317 ;;^UTILITY(U,$J,358.3,17606,1,3,0)
+318 ;;=3^Rheumatic Mitral Stenosis
+319 ;;^UTILITY(U,$J,358.3,17606,1,4,0)
+320 ;;=4^I05.0
+321 ;;^UTILITY(U,$J,358.3,17606,2)
+322 ;;=^5007041
+323 ;;^UTILITY(U,$J,358.3,17607,0)
+324 ;;=I05.8^^59^700^38
+325 ;;^UTILITY(U,$J,358.3,17607,1,0)
+326 ;;=^358.31IA^4^2
+327 ;;^UTILITY(U,$J,358.3,17607,1,3,0)
+328 ;;=3^Rheumatic Mitral Valve Diseases,Other
+329 ;;^UTILITY(U,$J,358.3,17607,1,4,0)
+330 ;;=4^I05.8
+331 ;;^UTILITY(U,$J,358.3,17607,2)
+332 ;;=^5007043
+333 ;;^UTILITY(U,$J,358.3,17608,0)
+334 ;;=I10.^^59^700^25
+335 ;;^UTILITY(U,$J,358.3,17608,1,0)
+336 ;;=^358.31IA^4^2
+337 ;;^UTILITY(U,$J,358.3,17608,1,3,0)
+338 ;;=3^Hypertension
+339 ;;^UTILITY(U,$J,358.3,17608,1,4,0)
+340 ;;=4^I10.
+341 ;;^UTILITY(U,$J,358.3,17608,2)
+342 ;;=^5007062
+343 ;;^UTILITY(U,$J,358.3,17609,0)
+344 ;;=I20.0^^59^700^40
+345 ;;^UTILITY(U,$J,358.3,17609,1,0)
+346 ;;=^358.31IA^4^2
+347 ;;^UTILITY(U,$J,358.3,17609,1,3,0)
+348 ;;=3^Unstable Angina w/o Athscl Hrt Disease
+349 ;;^UTILITY(U,$J,358.3,17609,1,4,0)
+350 ;;=4^I20.0
+351 ;;^UTILITY(U,$J,358.3,17609,2)
+352 ;;=^5007076
+353 ;;^UTILITY(U,$J,358.3,17610,0)
+354 ;;=I20.9^^59^700^1
+355 ;;^UTILITY(U,$J,358.3,17610,1,0)
+356 ;;=^358.31IA^4^2
+357 ;;^UTILITY(U,$J,358.3,17610,1,3,0)
+358 ;;=3^Angina Pectoris,Unspec
+359 ;;^UTILITY(U,$J,358.3,17610,1,4,0)
+360 ;;=4^I20.9
+361 ;;^UTILITY(U,$J,358.3,17610,2)
+362 ;;=^5007079
+363 ;;^UTILITY(U,$J,358.3,17611,0)
+364 ;;=I25.10^^59^700^2
+365 ;;^UTILITY(U,$J,358.3,17611,1,0)
+366 ;;=^358.31IA^4^2
+367 ;;^UTILITY(U,$J,358.3,17611,1,3,0)
+368 ;;=3^Athscl Hrt Disease,Native Coronary Artery w/o Ang Pctrs
+369 ;;^UTILITY(U,$J,358.3,17611,1,4,0)
+370 ;;=4^I25.10
+371 ;;^UTILITY(U,$J,358.3,17611,2)
+372 ;;=^5007107
+373 ;;^UTILITY(U,$J,358.3,17612,0)
+374 ;;=I25.9^^59^700^13
+375 ;;^UTILITY(U,$J,358.3,17612,1,0)
+376 ;;=^358.31IA^4^2
+377 ;;^UTILITY(U,$J,358.3,17612,1,3,0)
+378 ;;=3^Chronic Ischemic Heart Disease,Unspec
+379 ;;^UTILITY(U,$J,358.3,17612,1,4,0)
+380 ;;=4^I25.9
+381 ;;^UTILITY(U,$J,358.3,17612,2)
+382 ;;=^5007144
+383 ;;^UTILITY(U,$J,358.3,17613,0)
+384 ;;=I35.0^^59^700^32
+385 ;;^UTILITY(U,$J,358.3,17613,1,0)
+386 ;;=^358.31IA^4^2
+387 ;;^UTILITY(U,$J,358.3,17613,1,3,0)
+388 ;;=3^Nonrheumatic Aortic Valve Stenosis
+389 ;;^UTILITY(U,$J,358.3,17613,1,4,0)
+390 ;;=4^I35.0
+391 ;;^UTILITY(U,$J,358.3,17613,2)
+392 ;;=^5007174
+393 ;;^UTILITY(U,$J,358.3,17614,0)
+394 ;;=I35.1^^59^700^31
+395 ;;^UTILITY(U,$J,358.3,17614,1,0)
+396 ;;=^358.31IA^4^2
+397 ;;^UTILITY(U,$J,358.3,17614,1,3,0)
+398 ;;=3^Nonrheumatic Aortic Valve Insufficiency
+399 ;;^UTILITY(U,$J,358.3,17614,1,4,0)
+400 ;;=4^I35.1
+401 ;;^UTILITY(U,$J,358.3,17614,2)
+402 ;;=^5007175
+403 ;;^UTILITY(U,$J,358.3,17615,0)
+404 ;;=I35.2^^59^700^33
+405 ;;^UTILITY(U,$J,358.3,17615,1,0)
+406 ;;=^358.31IA^4^2
+407 ;;^UTILITY(U,$J,358.3,17615,1,3,0)
+408 ;;=3^Nonrheumatic Aortic Valve Stenosis w/ Insufficiency
+409 ;;^UTILITY(U,$J,358.3,17615,1,4,0)
+410 ;;=4^I35.2
+411 ;;^UTILITY(U,$J,358.3,17615,2)
+412 ;;=^5007176
+413 ;;^UTILITY(U,$J,358.3,17616,0)
+414 ;;=I35.8^^59^700^29
+415 ;;^UTILITY(U,$J,358.3,17616,1,0)
+416 ;;=^358.31IA^4^2
+417 ;;^UTILITY(U,$J,358.3,17616,1,3,0)
+418 ;;=3^Nonrheumatic Aortic Valve Disorders,Other
+419 ;;^UTILITY(U,$J,358.3,17616,1,4,0)
+420 ;;=4^I35.8
+421 ;;^UTILITY(U,$J,358.3,17616,2)
+422 ;;=^5007177
+423 ;;^UTILITY(U,$J,358.3,17617,0)
+424 ;;=I35.9^^59^700^30
+425 ;;^UTILITY(U,$J,358.3,17617,1,0)
+426 ;;=^358.31IA^4^2
+427 ;;^UTILITY(U,$J,358.3,17617,1,3,0)
+428 ;;=3^Nonrheumatic Aortic Valve Disorders,Unspec
+429 ;;^UTILITY(U,$J,358.3,17617,1,4,0)
+430 ;;=4^I35.9
+431 ;;^UTILITY(U,$J,358.3,17617,2)
+432 ;;=^5007178
+433 ;;^UTILITY(U,$J,358.3,17618,0)
+434 ;;=I48.91^^59^700^9
+435 ;;^UTILITY(U,$J,358.3,17618,1,0)
+436 ;;=^358.31IA^4^2
+437 ;;^UTILITY(U,$J,358.3,17618,1,3,0)
+438 ;;=3^Atrial Fibrillation,Unspec
+439 ;;^UTILITY(U,$J,358.3,17618,1,4,0)
+440 ;;=4^I48.91
+441 ;;^UTILITY(U,$J,358.3,17618,2)
+442 ;;=^5007229
+443 ;;^UTILITY(U,$J,358.3,17619,0)
+444 ;;=I49.9^^59^700^12
+445 ;;^UTILITY(U,$J,358.3,17619,1,0)
+446 ;;=^358.31IA^4^2
+447 ;;^UTILITY(U,$J,358.3,17619,1,3,0)
+448 ;;=3^Cardiac Arrhythmia,Unspec
+449 ;;^UTILITY(U,$J,358.3,17619,1,4,0)
+450 ;;=4^I49.9
+451 ;;^UTILITY(U,$J,358.3,17619,2)
+452 ;;=^5007237
+453 ;;^UTILITY(U,$J,358.3,17620,0)
+454 ;;=I50.9^^59^700^24
+455 ;;^UTILITY(U,$J,358.3,17620,1,0)
+456 ;;=^358.31IA^4^2
+457 ;;^UTILITY(U,$J,358.3,17620,1,3,0)
+458 ;;=3^Heart Failure,Unspec
+459 ;;^UTILITY(U,$J,358.3,17620,1,4,0)
+460 ;;=4^I50.9
+461 ;;^UTILITY(U,$J,358.3,17620,2)
+462 ;;=^5007251
+463 ;;^UTILITY(U,$J,358.3,17621,0)
+464 ;;=I73.9^^59^700^36
+465 ;;^UTILITY(U,$J,358.3,17621,1,0)
+466 ;;=^358.31IA^4^2
+467 ;;^UTILITY(U,$J,358.3,17621,1,3,0)
+468 ;;=3^Periph Vascular Disease,Unspec
+469 ;;^UTILITY(U,$J,358.3,17621,1,4,0)
+470 ;;=4^I73.9
+471 ;;^UTILITY(U,$J,358.3,17621,2)
+472 ;;=^184182
+473 ;;^UTILITY(U,$J,358.3,17622,0)
+474 ;;=I87.2^^59^700^41
+475 ;;^UTILITY(U,$J,358.3,17622,1,0)
+476 ;;=^358.31IA^4^2
+477 ;;^UTILITY(U,$J,358.3,17622,1,3,0)
+478 ;;=3^Venous Insufficiency
+479 ;;^UTILITY(U,$J,358.3,17622,1,4,0)
+480 ;;=4^I87.2
+481 ;;^UTILITY(U,$J,358.3,17622,2)
+482 ;;=^5008047
+483 ;;^UTILITY(U,$J,358.3,17623,0)
+484 ;;=R03.0^^59^700^14
+485 ;;^UTILITY(U,$J,358.3,17623,1,0)
+486 ;;=^358.31IA^4^2
+487 ;;^UTILITY(U,$J,358.3,17623,1,3,0)
+488 ;;=3^Elevated B/P Reading w/o HTN Dx
+489 ;;^UTILITY(U,$J,358.3,17623,1,4,0)
+490 ;;=4^R03.0
+491 ;;^UTILITY(U,$J,358.3,17623,2)
+492 ;;=^5019171
+493 ;;^UTILITY(U,$J,358.3,17624,0)
+494 ;;=I25.110^^59^700^3
+495 ;;^UTILITY(U,$J,358.3,17624,1,0)
+496 ;;=^358.31IA^4^2
+497 ;;^UTILITY(U,$J,358.3,17624,1,3,0)
+498 ;;=3^Athscl Hrt Disease,Native Coronary Artery w/ Unstable Angina
+499 ;;^UTILITY(U,$J,358.3,17624,1,4,0)
+500 ;;=4^I25.110
+501 ;;^UTILITY(U,$J,358.3,17624,2)
+502 ;;=^5007108
+503 ;;^UTILITY(U,$J,358.3,17625,0)
+504 ;;=I25.119^^59^700^4
+505 ;;^UTILITY(U,$J,358.3,17625,1,0)
+506 ;;=^358.31IA^4^2
+507 ;;^UTILITY(U,$J,358.3,17625,1,3,0)
+508 ;;=3^Athscl Hrt Disease,Native Coronary Artery w/ Unspec Angina
+509 ;;^UTILITY(U,$J,358.3,17625,1,4,0)
+510 ;;=4^I25.119
+511 ;;^UTILITY(U,$J,358.3,17625,2)
+512 ;;=^5007111
+513 ;;^UTILITY(U,$J,358.3,17626,0)
+514 ;;=I48.0^^59^700^34
+515 ;;^UTILITY(U,$J,358.3,17626,1,0)
+516 ;;=^358.31IA^4^2
+517 ;;^UTILITY(U,$J,358.3,17626,1,3,0)
+518 ;;=3^Paroxysmal Atrial Fibrillation
+519 ;;^UTILITY(U,$J,358.3,17626,1,4,0)
+520 ;;=4^I48.0
+521 ;;^UTILITY(U,$J,358.3,17626,2)
+522 ;;=^90473
+523 ;;^UTILITY(U,$J,358.3,17627,0)
+524 ;;=I48.92^^59^700^10
+525 ;;^UTILITY(U,$J,358.3,17627,1,0)
+526 ;;=^358.31IA^4^2
+527 ;;^UTILITY(U,$J,358.3,17627,1,3,0)
+528 ;;=3^Atrial Flutter,Unspec
+529 ;;^UTILITY(U,$J,358.3,17627,1,4,0)
+530 ;;=4^I48.92
+531 ;;^UTILITY(U,$J,358.3,17627,2)
+532 ;;=^5007230
+533 ;;^UTILITY(U,$J,358.3,17628,0)
+534 ;;=I48.3^^59^700^39
+535 ;;^UTILITY(U,$J,358.3,17628,1,0)
+536 ;;=^358.31IA^4^2
+537 ;;^UTILITY(U,$J,358.3,17628,1,3,0)
+538 ;;=3^Typical Atrial Flutter
+539 ;;^UTILITY(U,$J,358.3,17628,1,4,0)
+540 ;;=4^I48.3
+541 ;;^UTILITY(U,$J,358.3,17628,2)
+542 ;;=^5007227
+543 ;;^UTILITY(U,$J,358.3,17629,0)
+544 ;;=I48.4^^59^700^11
+545 ;;^UTILITY(U,$J,358.3,17629,1,0)
+546 ;;=^358.31IA^4^2
+547 ;;^UTILITY(U,$J,358.3,17629,1,3,0)
+548 ;;=3^Atypical Atrial Flutter
+549 ;;^UTILITY(U,$J,358.3,17629,1,4,0)
+550 ;;=4^I48.4
+551 ;;^UTILITY(U,$J,358.3,17629,2)
+552 ;;=^5007228
+553 ;;^UTILITY(U,$J,358.3,17630,0)
+554 ;;=I16.9^^59^700^26
+555 ;;^UTILITY(U,$J,358.3,17630,1,0)
+556 ;;=^358.31IA^4^2
+557 ;;^UTILITY(U,$J,358.3,17630,1,3,0)
+558 ;;=3^Hypertensive Crisis,Unspec
+559 ;;^UTILITY(U,$J,358.3,17630,1,4,0)
+560 ;;=4^I16.9
+561 ;;^UTILITY(U,$J,358.3,17630,2)
+562 ;;=^5138600
+563 ;;^UTILITY(U,$J,358.3,17631,0)
+564 ;;=I16.1^^59^700^27
+565 ;;^UTILITY(U,$J,358.3,17631,1,0)
+566 ;;=^358.31IA^4^2
+567 ;;^UTILITY(U,$J,358.3,17631,1,3,0)
+568 ;;=3^Hypertensive Emergency
+569 ;;^UTILITY(U,$J,358.3,17631,1,4,0)
+570 ;;=4^I16.1
+571 ;;^UTILITY(U,$J,358.3,17631,2)
+572 ;;=^8204721
+573 ;;^UTILITY(U,$J,358.3,17632,0)
+574 ;;=I16.0^^59^700^28
+575 ;;^UTILITY(U,$J,358.3,17632,1,0)
+576 ;;=^358.31IA^4^2
+577 ;;^UTILITY(U,$J,358.3,17632,1,3,0)
+578 ;;=3^Hypertensive Urgency
+579 ;;^UTILITY(U,$J,358.3,17632,1,4,0)
+580 ;;=4^I16.0
+581 ;;^UTILITY(U,$J,358.3,17632,2)
+582 ;;=^8133013
+583 ;;^UTILITY(U,$J,358.3,17633,0)
+584 ;;=I12.9^^59^700^15
+585 ;;^UTILITY(U,$J,358.3,17633,1,0)
+586 ;;=^358.31IA^4^2
+587 ;;^UTILITY(U,$J,358.3,17633,1,3,0)
+588 ;;=3^HTN CKD w/ Stage 1-4 CKD or Unspec
+589 ;;^UTILITY(U,$J,358.3,17633,1,4,0)
+590 ;;=4^I12.9
+591 ;;^UTILITY(U,$J,358.3,17633,2)
+592 ;;=^5007066
+593 ;;^UTILITY(U,$J,358.3,17634,0)
+594 ;;=I12.0^^59^700^16
+595 ;;^UTILITY(U,$J,358.3,17634,1,0)
+596 ;;=^358.31IA^4^2
+597 ;;^UTILITY(U,$J,358.3,17634,1,3,0)
+598 ;;=3^HTN CKD w/ Stage 5 CKD or ESRD
+599 ;;^UTILITY(U,$J,358.3,17634,1,4,0)
+600 ;;=4^I12.0
+601 ;;^UTILITY(U,$J,358.3,17634,2)
+602 ;;=^5007065
+603 ;;^UTILITY(U,$J,358.3,17635,0)
+604 ;;=I13.10^^59^700^19
+605 ;;^UTILITY(U,$J,358.3,17635,1,0)
+606 ;;=^358.31IA^4^2
+607 ;;^UTILITY(U,$J,358.3,17635,1,3,0)
+608 ;;=3^HTN Heart & CKD w/o Heart Fail w/ 1-4 CKD or Unspec
+609 ;;^UTILITY(U,$J,358.3,17635,1,4,0)
+610 ;;=4^I13.10
+611 ;;^UTILITY(U,$J,358.3,17635,2)
+612 ;;=^5007068
+613 ;;^UTILITY(U,$J,358.3,17636,0)
+614 ;;=I13.11^^59^700^20
+615 ;;^UTILITY(U,$J,358.3,17636,1,0)
+616 ;;=^358.31IA^4^2
+617 ;;^UTILITY(U,$J,358.3,17636,1,3,0)
+618 ;;=3^HTN Heart & CKD w/o Heart Fail w/ 5 CKD or ESRD
+619 ;;^UTILITY(U,$J,358.3,17636,1,4,0)
+620 ;;=4^I13.11
+621 ;;^UTILITY(U,$J,358.3,17636,2)
+622 ;;=^5007069
+623 ;;^UTILITY(U,$J,358.3,17637,0)
+624 ;;=I13.0^^59^700^17
+625 ;;^UTILITY(U,$J,358.3,17637,1,0)
+626 ;;=^358.31IA^4^2
+627 ;;^UTILITY(U,$J,358.3,17637,1,3,0)
+628 ;;=3^HTN Heart & CKD w/ Heart Fail w/ 1-4 CKD or Unspec
+629 ;;^UTILITY(U,$J,358.3,17637,1,4,0)
+630 ;;=4^I13.0
+631 ;;^UTILITY(U,$J,358.3,17637,2)
+632 ;;=^5007067
+633 ;;^UTILITY(U,$J,358.3,17638,0)
+634 ;;=I13.2^^59^700^18
+635 ;;^UTILITY(U,$J,358.3,17638,1,0)
+636 ;;=^358.31IA^4^2
+637 ;;^UTILITY(U,$J,358.3,17638,1,3,0)
+638 ;;=3^HTN Heart & CKD w/ Heart Fail w/ 5 CKD or ESRD
+639 ;;^UTILITY(U,$J,358.3,17638,1,4,0)
+640 ;;=4^I13.2
+641 ;;^UTILITY(U,$J,358.3,17638,2)
+642 ;;=^5007070
+643 ;;^UTILITY(U,$J,358.3,17639,0)
+644 ;;=I31.9^^59^700^35
+645 ;;^UTILITY(U,$J,358.3,17639,1,0)
+646 ;;=^358.31IA^4^2
+647 ;;^UTILITY(U,$J,358.3,17639,1,3,0)
+648 ;;=3^Pericardial Disease NOS
+649 ;;^UTILITY(U,$J,358.3,17639,1,4,0)
+650 ;;=4^I31.9
+651 ;;^UTILITY(U,$J,358.3,17639,2)
+652 ;;=^5007165
+653 ;;^UTILITY(U,$J,358.3,17640,0)
+654 ;;=I48.20^^59^700^5
+655 ;;^UTILITY(U,$J,358.3,17640,1,0)
+656 ;;=^358.31IA^4^2
+657 ;;^UTILITY(U,$J,358.3,17640,1,3,0)
+658 ;;=3^Atrial Fibrillation,Chronic,Unspec
+659 ;;^UTILITY(U,$J,358.3,17640,1,4,0)
+660 ;;=4^I48.20
+661 ;;^UTILITY(U,$J,358.3,17640,2)
+662 ;;=^5158048
+663 ;;^UTILITY(U,$J,358.3,17641,0)
+664 ;;=I48.21^^59^700^8
+665 ;;^UTILITY(U,$J,358.3,17641,1,0)
+666 ;;=^358.31IA^4^2
+667 ;;^UTILITY(U,$J,358.3,17641,1,3,0)
+668 ;;=3^Atrial Fibrillation,Permanent
+669 ;;^UTILITY(U,$J,358.3,17641,1,4,0)
+670 ;;=4^I48.21
+671 ;;^UTILITY(U,$J,358.3,17641,2)
+672 ;;=^304710
+673 ;;^UTILITY(U,$J,358.3,17642,0)
+674 ;;=I48.11^^59^700^6
+675 ;;^UTILITY(U,$J,358.3,17642,1,0)
+676 ;;=^358.31IA^4^2
+677 ;;^UTILITY(U,$J,358.3,17642,1,3,0)
+678 ;;=3^Atrial Fibrillation,Longstanding Persistent
+679 ;;^UTILITY(U,$J,358.3,17642,1,4,0)
+680 ;;=4^I48.11
+681 ;;^UTILITY(U,$J,358.3,17642,2)
+682 ;;=^5158046
+683 ;;^UTILITY(U,$J,358.3,17643,0)
+684 ;;=I48.19^^59^700^7
+685 ;;^UTILITY(U,$J,358.3,17643,1,0)
+686 ;;=^358.31IA^4^2
+687 ;;^UTILITY(U,$J,358.3,17643,1,3,0)
+688 ;;=3^Atrial Fibrillation,Oth Persistent
+689 ;;^UTILITY(U,$J,358.3,17643,1,4,0)
+690 ;;=4^I48.19
+691 ;;^UTILITY(U,$J,358.3,17643,2)
+692 ;;=^5158047
+693 ;;^UTILITY(U,$J,358.3,17644,0)
+694 ;;=I50.20^^59^700^23
+695 ;;^UTILITY(U,$J,358.3,17644,1,0)
+696 ;;=^358.31IA^4^2
+697 ;;^UTILITY(U,$J,358.3,17644,1,3,0)
+698 ;;=3^Heart Failure,Systolic,Unspec