IBDEI0AF ; ; 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,25529,1,3,0)
;;=3^PTSD,Chronic
;;^UTILITY(U,$J,358.3,25529,1,4,0)
;;=4^F43.12
;;^UTILITY(U,$J,358.3,25529,2)
;;=^5003572
;;^UTILITY(U,$J,358.3,25530,0)
;;=I25.119^^77^1020^7
;;^UTILITY(U,$J,358.3,25530,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25530,1,3,0)
;;=3^Athscl Hrt Dis of Native Cor Art w/ Ang Pctrs,Unspec
;;^UTILITY(U,$J,358.3,25530,1,4,0)
;;=4^I25.119
;;^UTILITY(U,$J,358.3,25530,2)
;;=^5007111
;;^UTILITY(U,$J,358.3,25531,0)
;;=I25.10^^77^1020^10
;;^UTILITY(U,$J,358.3,25531,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25531,1,3,0)
;;=3^Athscl Hrt Dis of Native Cor Art w/o Ang Pctrs
;;^UTILITY(U,$J,358.3,25531,1,4,0)
;;=4^I25.10
;;^UTILITY(U,$J,358.3,25531,2)
;;=^5007107
;;^UTILITY(U,$J,358.3,25532,0)
;;=I25.110^^77^1020^9
;;^UTILITY(U,$J,358.3,25532,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25532,1,3,0)
;;=3^Athscl Hrt Dis of Native Cor Art w/ Unstable Ang Pctrs
;;^UTILITY(U,$J,358.3,25532,1,4,0)
;;=4^I25.110
;;^UTILITY(U,$J,358.3,25532,2)
;;=^5007108
;;^UTILITY(U,$J,358.3,25533,0)
;;=F17.219^^77^1020^77
;;^UTILITY(U,$J,358.3,25533,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25533,1,3,0)
;;=3^Nicotine Dependence,Cigarettes
;;^UTILITY(U,$J,358.3,25533,1,4,0)
;;=4^F17.219
;;^UTILITY(U,$J,358.3,25533,2)
;;=^5003369
;;^UTILITY(U,$J,358.3,25534,0)
;;=F17.299^^77^1020^78
;;^UTILITY(U,$J,358.3,25534,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25534,1,3,0)
;;=3^Nicotine Dependence,E-Cigarettes
;;^UTILITY(U,$J,358.3,25534,1,4,0)
;;=4^F17.299
;;^UTILITY(U,$J,358.3,25534,2)
;;=^5003379
;;^UTILITY(U,$J,358.3,25535,0)
;;=Z51.5^^77^1020^86
;;^UTILITY(U,$J,358.3,25535,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25535,1,3,0)
;;=3^Palliative Care Encounter
;;^UTILITY(U,$J,358.3,25535,1,4,0)
;;=4^Z51.5
;;^UTILITY(U,$J,358.3,25535,2)
;;=^5063063
;;^UTILITY(U,$J,358.3,25536,0)
;;=Z23.^^77^1020^40
;;^UTILITY(U,$J,358.3,25536,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25536,1,3,0)
;;=3^Encounter for Immunization(s)
;;^UTILITY(U,$J,358.3,25536,1,4,0)
;;=4^Z23.
;;^UTILITY(U,$J,358.3,25536,2)
;;=^5062795
;;^UTILITY(U,$J,358.3,25537,0)
;;=E11.65^^77^1020^24
;;^UTILITY(U,$J,358.3,25537,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25537,1,3,0)
;;=3^DM Type 2 Uncontrolled w/ Hyperglycemia
;;^UTILITY(U,$J,358.3,25537,1,4,0)
;;=4^E11.65
;;^UTILITY(U,$J,358.3,25537,2)
;;=^5002663
;;^UTILITY(U,$J,358.3,25538,0)
;;=E11.649^^77^1020^25
;;^UTILITY(U,$J,358.3,25538,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25538,1,3,0)
;;=3^DM Type 2 Uncontrolled w/ Hypoglycemia w/o Coma
;;^UTILITY(U,$J,358.3,25538,1,4,0)
;;=4^E11.649
;;^UTILITY(U,$J,358.3,25538,2)
;;=^5002662
;;^UTILITY(U,$J,358.3,25539,0)
;;=I16.1^^77^1020^66
;;^UTILITY(U,$J,358.3,25539,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25539,1,3,0)
;;=3^Hypertensive Emergency
;;^UTILITY(U,$J,358.3,25539,1,4,0)
;;=4^I16.1
;;^UTILITY(U,$J,358.3,25539,2)
;;=^8204721
;;^UTILITY(U,$J,358.3,25540,0)
;;=I16.9^^77^1020^65
;;^UTILITY(U,$J,358.3,25540,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25540,1,3,0)
;;=3^Hypertensive Crisis,Unspec
;;^UTILITY(U,$J,358.3,25540,1,4,0)
;;=4^I16.9
;;^UTILITY(U,$J,358.3,25540,2)
;;=^5138600
;;^UTILITY(U,$J,358.3,25541,0)
;;=I16.0^^77^1020^67
;;^UTILITY(U,$J,358.3,25541,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25541,1,3,0)
;;=3^Hypertensive Urgency
;;^UTILITY(U,$J,358.3,25541,1,4,0)
;;=4^I16.0
;;^UTILITY(U,$J,358.3,25541,2)
;;=^8133013
;;^UTILITY(U,$J,358.3,25542,0)
;;=R97.20^^77^1020^39
;;^UTILITY(U,$J,358.3,25542,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25542,1,3,0)
;;=3^Elevated PSA
;;^UTILITY(U,$J,358.3,25542,1,4,0)
;;=4^R97.20
;;^UTILITY(U,$J,358.3,25542,2)
;;=^334262
;;^UTILITY(U,$J,358.3,25543,0)
;;=R82.79^^77^1020^1
;;^UTILITY(U,$J,358.3,25543,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25543,1,3,0)
;;=3^Abnormal Findings Microbiological Urine Exam,Other
;;^UTILITY(U,$J,358.3,25543,1,4,0)
;;=4^R82.79
;;^UTILITY(U,$J,358.3,25543,2)
;;=^5139222
;;^UTILITY(U,$J,358.3,25544,0)
;;=R73.03^^77^1020^88
;;^UTILITY(U,$J,358.3,25544,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25544,1,3,0)
;;=3^Pre-Diabetes
;;^UTILITY(U,$J,358.3,25544,1,4,0)
;;=4^R73.03
;;^UTILITY(U,$J,358.3,25544,2)
;;=^8295662
;;^UTILITY(U,$J,358.3,25545,0)
;;=R97.21^^77^1020^90
;;^UTILITY(U,$J,358.3,25545,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25545,1,3,0)
;;=3^Rising PSA After Tx for Prostate CA
;;^UTILITY(U,$J,358.3,25545,1,4,0)
;;=4^R97.21
;;^UTILITY(U,$J,358.3,25545,2)
;;=^5139228
;;^UTILITY(U,$J,358.3,25546,0)
;;=R82.81^^77^1020^89
;;^UTILITY(U,$J,358.3,25546,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25546,1,3,0)
;;=3^Pyuria
;;^UTILITY(U,$J,358.3,25546,1,4,0)
;;=4^R82.81
;;^UTILITY(U,$J,358.3,25546,2)
;;=^101879
;;^UTILITY(U,$J,358.3,25547,0)
;;=I25.118^^77^1020^8
;;^UTILITY(U,$J,358.3,25547,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25547,1,3,0)
;;=3^Athscl Hrt Dis of Native Cor Art w/ Oth Angina
;;^UTILITY(U,$J,358.3,25547,1,4,0)
;;=4^I25.118
;;^UTILITY(U,$J,358.3,25547,2)
;;=^5007110
;;^UTILITY(U,$J,358.3,25548,0)
;;=J44.0^^77^1020^17
;;^UTILITY(U,$J,358.3,25548,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25548,1,3,0)
;;=3^COPD w/ Lower Respiratory Infection
;;^UTILITY(U,$J,358.3,25548,1,4,0)
;;=4^J44.0
;;^UTILITY(U,$J,358.3,25548,2)
;;=^5008239
;;^UTILITY(U,$J,358.3,25549,0)
;;=J44.1^^77^1020^16
;;^UTILITY(U,$J,358.3,25549,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25549,1,3,0)
;;=3^COPD w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,25549,1,4,0)
;;=4^J44.1
;;^UTILITY(U,$J,358.3,25549,2)
;;=^5008240
;;^UTILITY(U,$J,358.3,25550,0)
;;=I50.22^^77^1020^15
;;^UTILITY(U,$J,358.3,25550,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25550,1,3,0)
;;=3^CHF-Systolic (HFrEF),Chronic
;;^UTILITY(U,$J,358.3,25550,1,4,0)
;;=4^I50.22
;;^UTILITY(U,$J,358.3,25550,2)
;;=^5007241
;;^UTILITY(U,$J,358.3,25551,0)
;;=I50.32^^77^1020^13
;;^UTILITY(U,$J,358.3,25551,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25551,1,3,0)
;;=3^CHF-Diastolic (HFpEF),Chronic
;;^UTILITY(U,$J,358.3,25551,1,4,0)
;;=4^I50.32
;;^UTILITY(U,$J,358.3,25551,2)
;;=^5007245
;;^UTILITY(U,$J,358.3,25552,0)
;;=I50.42^^77^1020^12
;;^UTILITY(U,$J,358.3,25552,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25552,1,3,0)
;;=3^CHF-Combined Systolic & Diastolic,Chronic
;;^UTILITY(U,$J,358.3,25552,1,4,0)
;;=4^I50.42
;;^UTILITY(U,$J,358.3,25552,2)
;;=^5007249
;;^UTILITY(U,$J,358.3,25553,0)
;;=I50.84^^77^1020^14
;;^UTILITY(U,$J,358.3,25553,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25553,1,3,0)
;;=3^CHF-End Stage
;;^UTILITY(U,$J,358.3,25553,1,4,0)
;;=4^I50.84
;;^UTILITY(U,$J,358.3,25553,2)
;;=^5151391
;;^UTILITY(U,$J,358.3,25554,0)
;;=E11.22^^77^1020^28
;;^UTILITY(U,$J,358.3,25554,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25554,1,3,0)
;;=3^DM Type 2 w/ Chronic Kidney Disease
;;^UTILITY(U,$J,358.3,25554,1,4,0)
;;=4^E11.22
;;^UTILITY(U,$J,358.3,25554,2)
;;=^5002630
;;^UTILITY(U,$J,358.3,25555,0)
;;=E11.21^^77^1020^31
;;^UTILITY(U,$J,358.3,25555,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25555,1,3,0)
;;=3^DM Type 2 w/ Nephropathy,Unspec
;;^UTILITY(U,$J,358.3,25555,1,4,0)
;;=4^E11.21
;;^UTILITY(U,$J,358.3,25555,2)
;;=^5002629
;;^UTILITY(U,$J,358.3,25556,0)
;;=E11.42^^77^1020^36
;;^UTILITY(U,$J,358.3,25556,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25556,1,3,0)
;;=3^DM Type 2 w/ Peripheral Neuropathy
;;^UTILITY(U,$J,358.3,25556,1,4,0)
;;=4^E11.42
;;^UTILITY(U,$J,358.3,25556,2)
;;=^5002646
;;^UTILITY(U,$J,358.3,25557,0)
;;=E11.43^^77^1020^26
;;^UTILITY(U,$J,358.3,25557,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25557,1,3,0)
;;=3^DM Type 2 w/ Autonomic Neuropathy
;;^UTILITY(U,$J,358.3,25557,1,4,0)
;;=4^E11.43
;;^UTILITY(U,$J,358.3,25557,2)
;;=^5002647
;;^UTILITY(U,$J,358.3,25558,0)
;;=E11.51^^77^1020^35
;;^UTILITY(U,$J,358.3,25558,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25558,1,3,0)
;;=3^DM Type 2 w/ PVD/PAD w/o Gangrene
;;^UTILITY(U,$J,358.3,25558,1,4,0)
;;=4^E11.51
;;^UTILITY(U,$J,358.3,25558,2)
;;=^5002650
;;^UTILITY(U,$J,358.3,25559,0)
;;=E11.52^^77^1020^34
;;^UTILITY(U,$J,358.3,25559,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25559,1,3,0)
;;=3^DM Type 2 w/ PVD/PAD w/ Gangrene
;;^UTILITY(U,$J,358.3,25559,1,4,0)
;;=4^E11.52
;;^UTILITY(U,$J,358.3,25559,2)
;;=^5002651
;;^UTILITY(U,$J,358.3,25560,0)
;;=H90.0^^77^1020^49
;;^UTILITY(U,$J,358.3,25560,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25560,1,3,0)
;;=3^Hearing Loss,Conductive,Bilateral
;;^UTILITY(U,$J,358.3,25560,1,4,0)
;;=4^H90.0
;;^UTILITY(U,$J,358.3,25560,2)
;;=^335257
;;^UTILITY(U,$J,358.3,25561,0)
;;=H90.11^^77^1020^51
;;^UTILITY(U,$J,358.3,25561,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25561,1,3,0)
;;=3^Hearing Loss,Conductive,Right Ear
;;^UTILITY(U,$J,358.3,25561,1,4,0)
;;=4^H90.11
;;^UTILITY(U,$J,358.3,25561,2)
;;=^5006918
;;^UTILITY(U,$J,358.3,25562,0)
;;=H90.12^^77^1020^50
;;^UTILITY(U,$J,358.3,25562,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25562,1,3,0)
;;=3^Hearing Loss,Conductive,Left Ear
;;^UTILITY(U,$J,358.3,25562,1,4,0)
;;=4^H90.12
;;^UTILITY(U,$J,358.3,25562,2)
;;=^5006919
;;^UTILITY(U,$J,358.3,25563,0)
;;=H90.2^^77^1020^52
;;^UTILITY(U,$J,358.3,25563,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25563,1,3,0)
;;=3^Hearing Loss,Conductive,Unspec
;;^UTILITY(U,$J,358.3,25563,1,4,0)
;;=4^H90.2
;;^UTILITY(U,$J,358.3,25563,2)
;;=^5006920
;;^UTILITY(U,$J,358.3,25564,0)
;;=H90.3^^77^1020^53
;;^UTILITY(U,$J,358.3,25564,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25564,1,3,0)
;;=3^Hearing Loss,Sensorineural,Bilateral
;;^UTILITY(U,$J,358.3,25564,1,4,0)
;;=4^H90.3
;;^UTILITY(U,$J,358.3,25564,2)
;;=^335328
;;^UTILITY(U,$J,358.3,25565,0)
;;=H90.41^^77^1020^55
;;^UTILITY(U,$J,358.3,25565,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25565,1,3,0)
;;=3^Hearing Loss,Sensorineural,Right Ear
;;^UTILITY(U,$J,358.3,25565,1,4,0)
;;=4^H90.41
;;^UTILITY(U,$J,358.3,25565,2)
;;=^5006921
;;^UTILITY(U,$J,358.3,25566,0)
;;=H90.42^^77^1020^54
;;^UTILITY(U,$J,358.3,25566,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25566,1,3,0)
;;=3^Hearing Loss,Sensorineural,Left Ear
;;^UTILITY(U,$J,358.3,25566,1,4,0)
;;=4^H90.42
;;^UTILITY(U,$J,358.3,25566,2)
;;=^5006922
;;^UTILITY(U,$J,358.3,25567,0)
;;=H90.5^^77^1020^56
;;^UTILITY(U,$J,358.3,25567,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25567,1,3,0)
;;=3^Hearing Loss,Sensorineural,Unspec
;;^UTILITY(U,$J,358.3,25567,1,4,0)
;;=4^H90.5
;;^UTILITY(U,$J,358.3,25567,2)
;;=^5006923
;;^UTILITY(U,$J,358.3,25568,0)
;;=D63.1^^77^1020^4
;;^UTILITY(U,$J,358.3,25568,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25568,1,3,0)
;;=3^Anemia,CKD
;;^UTILITY(U,$J,358.3,25568,1,4,0)
;;=4^D63.1
;;^UTILITY(U,$J,358.3,25568,2)
;;=^332908
;;^UTILITY(U,$J,358.3,25569,0)
;;=I11.0^^77^1020^44
;;^UTILITY(U,$J,358.3,25569,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25569,1,3,0)
;;=3^HTN/CHF
;;^UTILITY(U,$J,358.3,25569,1,4,0)
;;=4^I11.0
;;^UTILITY(U,$J,358.3,25569,2)
;;=^5007063
;;^UTILITY(U,$J,358.3,25570,0)
;;=I12.0^^77^1020^48
;;^UTILITY(U,$J,358.3,25570,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25570,1,3,0)
;;=3^HTN/CKD 5 or ESRD
;;^UTILITY(U,$J,358.3,25570,1,4,0)
;;=4^I12.0
;;^UTILITY(U,$J,358.3,25570,2)
;;=^5007065
;;^UTILITY(U,$J,358.3,25571,0)
;;=I12.9^^77^1020^47
;;^UTILITY(U,$J,358.3,25571,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25571,1,3,0)
;;=3^HTN/CKD 1-4
;;^UTILITY(U,$J,358.3,25571,1,4,0)
;;=4^I12.9
;;^UTILITY(U,$J,358.3,25571,2)
;;=^5007066
;;^UTILITY(U,$J,358.3,25572,0)
;;=I13.0^^77^1020^46
;;^UTILITY(U,$J,358.3,25572,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25572,1,3,0)
;;=3^HTN/CHF/CKD 1-4
;;^UTILITY(U,$J,358.3,25572,1,4,0)
;;=4^I13.0
;;^UTILITY(U,$J,358.3,25572,2)
;;=^5007067
;;^UTILITY(U,$J,358.3,25573,0)
;;=I13.2^^77^1020^45
;;^UTILITY(U,$J,358.3,25573,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25573,1,3,0)
;;=3^HTN/CHF/CDK 5 or ESRD
;;^UTILITY(U,$J,358.3,25573,1,4,0)
;;=4^I13.2
;;^UTILITY(U,$J,358.3,25573,2)
;;=^5007070
;;^UTILITY(U,$J,358.3,25574,0)
;;=E11.43^^77^1020^27
;;^UTILITY(U,$J,358.3,25574,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25574,1,3,0)
;;=3^DM Type 2 w/ Autonomic Neuropathy
;;^UTILITY(U,$J,358.3,25574,1,4,0)
;;=4^E11.43
;;^UTILITY(U,$J,358.3,25574,2)
;;=^5002647
;;^UTILITY(U,$J,358.3,25575,0)
;;=E11.610^^77^1020^32
;;^UTILITY(U,$J,358.3,25575,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25575,1,3,0)
;;=3^DM Type 2 w/ Neuropathic Arthropathy
;;^UTILITY(U,$J,358.3,25575,1,4,0)
;;=4^E11.610
;;^UTILITY(U,$J,358.3,25575,2)
;;=^5002653
;;^UTILITY(U,$J,358.3,25576,0)
;;=E11.621^^77^1020^29
;;^UTILITY(U,$J,358.3,25576,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25576,1,3,0)
;;=3^DM Type 2 w/ Foot Ulcer
;;^UTILITY(U,$J,358.3,25576,1,4,0)
;;=4^E11.621
;;^UTILITY(U,$J,358.3,25576,2)
;;=^5002656
;;^UTILITY(U,$J,358.3,25577,0)
;;=E11.65^^77^1020^30
;;^UTILITY(U,$J,358.3,25577,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25577,1,3,0)
;;=3^DM Type 2 w/ Hyperglycemia
;;^UTILITY(U,$J,358.3,25577,1,4,0)
;;=4^E11.65
;;^UTILITY(U,$J,358.3,25577,2)
;;=^5002663
;;^UTILITY(U,$J,358.3,25578,0)
;;=R45.851^^77^1021^3
;;^UTILITY(U,$J,358.3,25578,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25578,1,3,0)
;;=3^Suicidal Ideation
;;^UTILITY(U,$J,358.3,25578,1,4,0)
;;=4^R45.851
;;^UTILITY(U,$J,358.3,25578,2)
;;=^5019474
;;^UTILITY(U,$J,358.3,25579,0)
;;=T14.91XA^^77^1021^4
;;^UTILITY(U,$J,358.3,25579,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25579,1,3,0)
;;=3^Suicide Attempt,Initial Encntr
;;^UTILITY(U,$J,358.3,25579,1,4,0)
;;=4^T14.91XA
;;^UTILITY(U,$J,358.3,25579,2)
;;=^5151779
;;^UTILITY(U,$J,358.3,25580,0)
;;=T14.91XD^^77^1021^6
;;^UTILITY(U,$J,358.3,25580,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25580,1,3,0)
;;=3^Suicide Attempt,Subsequent Encntr
;;^UTILITY(U,$J,358.3,25580,1,4,0)
;;=4^T14.91XD
;;^UTILITY(U,$J,358.3,25580,2)
;;=^5151780
;;^UTILITY(U,$J,358.3,25581,0)
;;=T14.91XS^^77^1021^5
;;^UTILITY(U,$J,358.3,25581,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25581,1,3,0)
;;=3^Suicide Attempt,Sequela
;;^UTILITY(U,$J,358.3,25581,1,4,0)
;;=4^T14.91XS
;;^UTILITY(U,$J,358.3,25581,2)
;;=^5151781
;;^UTILITY(U,$J,358.3,25582,0)
;;=Z91.51^^77^1021^2
;;^UTILITY(U,$J,358.3,25582,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25582,1,3,0)
;;=3^Personal Hx of Suicidal Behavior
;;^UTILITY(U,$J,358.3,25582,1,4,0)
;;=4^Z91.51
;;^UTILITY(U,$J,358.3,25582,2)
;;=^5161317
;;^UTILITY(U,$J,358.3,25583,0)
;;=Z91.52^^77^1021^1
;;^UTILITY(U,$J,358.3,25583,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25583,1,3,0)
;;=3^Personal Hx of Non-Suicidal Self-Harm
;;^UTILITY(U,$J,358.3,25583,1,4,0)
;;=4^Z91.52
;;^UTILITY(U,$J,358.3,25583,2)
;;=^5161318
;;^UTILITY(U,$J,358.3,25584,0)
;;=Z02.5^^77^1022^1
;;^UTILITY(U,$J,358.3,25584,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25584,1,3,0)
;;=3^Exam for Sports Participation (Primary)
;;^UTILITY(U,$J,358.3,25584,1,4,0)
;;=4^Z02.5
;;^UTILITY(U,$J,358.3,25584,2)
;;=^5062638
;;^UTILITY(U,$J,358.3,25585,0)
;;=G35.^^77^1023^9
;;^UTILITY(U,$J,358.3,25585,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25585,1,3,0)
;;=3^Multiple Sclerosis
;;^UTILITY(U,$J,358.3,25585,1,4,0)
;;=4^G35.
;;^UTILITY(U,$J,358.3,25585,2)
;;=^79761
;;^UTILITY(U,$J,358.3,25586,0)
;;=S14.101S^^77^1023^4
;;^UTILITY(U,$J,358.3,25586,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25586,1,3,0)
;;=3^Injury at C1 Level of Cervical Spinal Cord,Unspec,Sequela
;;^UTILITY(U,$J,358.3,25586,1,4,0)
;;=4^S14.101S
;;^UTILITY(U,$J,358.3,25586,2)
;;=^5022045
;;^UTILITY(U,$J,358.3,25587,0)
;;=S14.159S^^77^1023^2
;;^UTILITY(U,$J,358.3,25587,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25587,1,3,0)
;;=3^Incmpl Lesion at Unspec Level of Cervical Spinal Cord,Other,Sequela
;;^UTILITY(U,$J,358.3,25587,1,4,0)
;;=4^S14.159S
;;^UTILITY(U,$J,358.3,25587,2)
;;=^5022201
;;^UTILITY(U,$J,358.3,25588,0)
;;=S24.101S^^77^1023^5
;;^UTILITY(U,$J,358.3,25588,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25588,1,3,0)
;;=3^Injury at T1 Level of Thoracic Spinal Cord,Unspec,Sequela
;;^UTILITY(U,$J,358.3,25588,1,4,0)
;;=4^S24.101S
;;^UTILITY(U,$J,358.3,25588,2)
;;=^5023275
;;^UTILITY(U,$J,358.3,25589,0)
;;=S24.159S^^77^1023^3
;;^UTILITY(U,$J,358.3,25589,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25589,1,3,0)
;;=3^Incmpl Lesion at Unspec Level of Thoracic Spinal Cord,Other,Sequela
;;^UTILITY(U,$J,358.3,25589,1,4,0)
;;=4^S24.159S
;;^UTILITY(U,$J,358.3,25589,2)
;;=^5023344
;;^UTILITY(U,$J,358.3,25590,0)
;;=S34.101S^^77^1023^6
;;^UTILITY(U,$J,358.3,25590,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25590,1,3,0)
;;=3^Injury to L1 Level of Lumbar Spinal Cord,Unspec,Sequela
;;^UTILITY(U,$J,358.3,25590,1,4,0)
;;=4^S34.101S
;;^UTILITY(U,$J,358.3,25590,2)
;;=^5025192
;;^UTILITY(U,$J,358.3,25591,0)
;;=S34.139S^^77^1023^7
;;^UTILITY(U,$J,358.3,25591,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25591,1,3,0)
;;=3^Injury to Sacral Spinal Cord,Unspec,Sequela
;;^UTILITY(U,$J,358.3,25591,1,4,0)
;;=4^S34.139S
;;^UTILITY(U,$J,358.3,25591,2)
;;=^5025249
;;^UTILITY(U,$J,358.3,25592,0)
;;=S06.0X0S^^77^1023^1
;;^UTILITY(U,$J,358.3,25592,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25592,1,3,0)
;;=3^Concussion w/o Loss of Consciousness,Sequela
;;^UTILITY(U,$J,358.3,25592,1,4,0)
;;=4^S06.0X0S
;;^UTILITY(U,$J,358.3,25592,2)
;;=^5020668
;;^UTILITY(U,$J,358.3,25593,0)
;;=S06.9X9S^^77^1023^8
;;^UTILITY(U,$J,358.3,25593,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25593,1,3,0)
;;=3^Intracranial Injury,Unspec,w/ LOC of Unspec Duration,Sequela
;;^UTILITY(U,$J,358.3,25593,1,4,0)
;;=4^S06.9X9S
;;^UTILITY(U,$J,358.3,25593,2)
;;=^5021235
;;^UTILITY(U,$J,358.3,25594,0)
;;=99441^^78^1024^1^^^^1
;;^UTILITY(U,$J,358.3,25594,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,25594,1,1,0)
;;=1^99441
;;^UTILITY(U,$J,358.3,25594,1,2,0)
;;=2^PHONE E/M 5-10 MIN
;;^UTILITY(U,$J,358.3,25595,0)
;;=99443^^78^1024^3^^^^1
;;^UTILITY(U,$J,358.3,25595,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,25595,1,1,0)
;;=1^99443
;;^UTILITY(U,$J,358.3,25595,1,2,0)
;;=2^PHONE E/M 21-30 MIN
;;^UTILITY(U,$J,358.3,25596,0)
;;=99442^^78^1024^2^^^^1
;;^UTILITY(U,$J,358.3,25596,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,25596,1,1,0)
;;=1^99442
;;^UTILITY(U,$J,358.3,25596,1,2,0)
;;=2^PHONE E/M 11-20 MIN
;;^UTILITY(U,$J,358.3,25597,0)
;;=98966^^78^1025^1^^^^1
;;^UTILITY(U,$J,358.3,25597,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,25597,1,1,0)
;;=1^98966
;;^UTILITY(U,$J,358.3,25597,1,2,0)
;;=2^PHONE CALL BY HC PROF 5-10 MIN
;;^UTILITY(U,$J,358.3,25598,0)
;;=98967^^78^1025^2^^^^1
;;^UTILITY(U,$J,358.3,25598,1,0)
;;=^358.31IA^2^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0AF 19794 printed Dec 13, 2024@01:44:48 Page 2
IBDEI0AF ; ; 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,25529,1,3,0)
+2 ;;=3^PTSD,Chronic
+3 ;;^UTILITY(U,$J,358.3,25529,1,4,0)
+4 ;;=4^F43.12
+5 ;;^UTILITY(U,$J,358.3,25529,2)
+6 ;;=^5003572
+7 ;;^UTILITY(U,$J,358.3,25530,0)
+8 ;;=I25.119^^77^1020^7
+9 ;;^UTILITY(U,$J,358.3,25530,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,25530,1,3,0)
+12 ;;=3^Athscl Hrt Dis of Native Cor Art w/ Ang Pctrs,Unspec
+13 ;;^UTILITY(U,$J,358.3,25530,1,4,0)
+14 ;;=4^I25.119
+15 ;;^UTILITY(U,$J,358.3,25530,2)
+16 ;;=^5007111
+17 ;;^UTILITY(U,$J,358.3,25531,0)
+18 ;;=I25.10^^77^1020^10
+19 ;;^UTILITY(U,$J,358.3,25531,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,25531,1,3,0)
+22 ;;=3^Athscl Hrt Dis of Native Cor Art w/o Ang Pctrs
+23 ;;^UTILITY(U,$J,358.3,25531,1,4,0)
+24 ;;=4^I25.10
+25 ;;^UTILITY(U,$J,358.3,25531,2)
+26 ;;=^5007107
+27 ;;^UTILITY(U,$J,358.3,25532,0)
+28 ;;=I25.110^^77^1020^9
+29 ;;^UTILITY(U,$J,358.3,25532,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,25532,1,3,0)
+32 ;;=3^Athscl Hrt Dis of Native Cor Art w/ Unstable Ang Pctrs
+33 ;;^UTILITY(U,$J,358.3,25532,1,4,0)
+34 ;;=4^I25.110
+35 ;;^UTILITY(U,$J,358.3,25532,2)
+36 ;;=^5007108
+37 ;;^UTILITY(U,$J,358.3,25533,0)
+38 ;;=F17.219^^77^1020^77
+39 ;;^UTILITY(U,$J,358.3,25533,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,25533,1,3,0)
+42 ;;=3^Nicotine Dependence,Cigarettes
+43 ;;^UTILITY(U,$J,358.3,25533,1,4,0)
+44 ;;=4^F17.219
+45 ;;^UTILITY(U,$J,358.3,25533,2)
+46 ;;=^5003369
+47 ;;^UTILITY(U,$J,358.3,25534,0)
+48 ;;=F17.299^^77^1020^78
+49 ;;^UTILITY(U,$J,358.3,25534,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,25534,1,3,0)
+52 ;;=3^Nicotine Dependence,E-Cigarettes
+53 ;;^UTILITY(U,$J,358.3,25534,1,4,0)
+54 ;;=4^F17.299
+55 ;;^UTILITY(U,$J,358.3,25534,2)
+56 ;;=^5003379
+57 ;;^UTILITY(U,$J,358.3,25535,0)
+58 ;;=Z51.5^^77^1020^86
+59 ;;^UTILITY(U,$J,358.3,25535,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,25535,1,3,0)
+62 ;;=3^Palliative Care Encounter
+63 ;;^UTILITY(U,$J,358.3,25535,1,4,0)
+64 ;;=4^Z51.5
+65 ;;^UTILITY(U,$J,358.3,25535,2)
+66 ;;=^5063063
+67 ;;^UTILITY(U,$J,358.3,25536,0)
+68 ;;=Z23.^^77^1020^40
+69 ;;^UTILITY(U,$J,358.3,25536,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,25536,1,3,0)
+72 ;;=3^Encounter for Immunization(s)
+73 ;;^UTILITY(U,$J,358.3,25536,1,4,0)
+74 ;;=4^Z23.
+75 ;;^UTILITY(U,$J,358.3,25536,2)
+76 ;;=^5062795
+77 ;;^UTILITY(U,$J,358.3,25537,0)
+78 ;;=E11.65^^77^1020^24
+79 ;;^UTILITY(U,$J,358.3,25537,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,25537,1,3,0)
+82 ;;=3^DM Type 2 Uncontrolled w/ Hyperglycemia
+83 ;;^UTILITY(U,$J,358.3,25537,1,4,0)
+84 ;;=4^E11.65
+85 ;;^UTILITY(U,$J,358.3,25537,2)
+86 ;;=^5002663
+87 ;;^UTILITY(U,$J,358.3,25538,0)
+88 ;;=E11.649^^77^1020^25
+89 ;;^UTILITY(U,$J,358.3,25538,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,25538,1,3,0)
+92 ;;=3^DM Type 2 Uncontrolled w/ Hypoglycemia w/o Coma
+93 ;;^UTILITY(U,$J,358.3,25538,1,4,0)
+94 ;;=4^E11.649
+95 ;;^UTILITY(U,$J,358.3,25538,2)
+96 ;;=^5002662
+97 ;;^UTILITY(U,$J,358.3,25539,0)
+98 ;;=I16.1^^77^1020^66
+99 ;;^UTILITY(U,$J,358.3,25539,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,25539,1,3,0)
+102 ;;=3^Hypertensive Emergency
+103 ;;^UTILITY(U,$J,358.3,25539,1,4,0)
+104 ;;=4^I16.1
+105 ;;^UTILITY(U,$J,358.3,25539,2)
+106 ;;=^8204721
+107 ;;^UTILITY(U,$J,358.3,25540,0)
+108 ;;=I16.9^^77^1020^65
+109 ;;^UTILITY(U,$J,358.3,25540,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,25540,1,3,0)
+112 ;;=3^Hypertensive Crisis,Unspec
+113 ;;^UTILITY(U,$J,358.3,25540,1,4,0)
+114 ;;=4^I16.9
+115 ;;^UTILITY(U,$J,358.3,25540,2)
+116 ;;=^5138600
+117 ;;^UTILITY(U,$J,358.3,25541,0)
+118 ;;=I16.0^^77^1020^67
+119 ;;^UTILITY(U,$J,358.3,25541,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,25541,1,3,0)
+122 ;;=3^Hypertensive Urgency
+123 ;;^UTILITY(U,$J,358.3,25541,1,4,0)
+124 ;;=4^I16.0
+125 ;;^UTILITY(U,$J,358.3,25541,2)
+126 ;;=^8133013
+127 ;;^UTILITY(U,$J,358.3,25542,0)
+128 ;;=R97.20^^77^1020^39
+129 ;;^UTILITY(U,$J,358.3,25542,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,25542,1,3,0)
+132 ;;=3^Elevated PSA
+133 ;;^UTILITY(U,$J,358.3,25542,1,4,0)
+134 ;;=4^R97.20
+135 ;;^UTILITY(U,$J,358.3,25542,2)
+136 ;;=^334262
+137 ;;^UTILITY(U,$J,358.3,25543,0)
+138 ;;=R82.79^^77^1020^1
+139 ;;^UTILITY(U,$J,358.3,25543,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,25543,1,3,0)
+142 ;;=3^Abnormal Findings Microbiological Urine Exam,Other
+143 ;;^UTILITY(U,$J,358.3,25543,1,4,0)
+144 ;;=4^R82.79
+145 ;;^UTILITY(U,$J,358.3,25543,2)
+146 ;;=^5139222
+147 ;;^UTILITY(U,$J,358.3,25544,0)
+148 ;;=R73.03^^77^1020^88
+149 ;;^UTILITY(U,$J,358.3,25544,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,25544,1,3,0)
+152 ;;=3^Pre-Diabetes
+153 ;;^UTILITY(U,$J,358.3,25544,1,4,0)
+154 ;;=4^R73.03
+155 ;;^UTILITY(U,$J,358.3,25544,2)
+156 ;;=^8295662
+157 ;;^UTILITY(U,$J,358.3,25545,0)
+158 ;;=R97.21^^77^1020^90
+159 ;;^UTILITY(U,$J,358.3,25545,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,25545,1,3,0)
+162 ;;=3^Rising PSA After Tx for Prostate CA
+163 ;;^UTILITY(U,$J,358.3,25545,1,4,0)
+164 ;;=4^R97.21
+165 ;;^UTILITY(U,$J,358.3,25545,2)
+166 ;;=^5139228
+167 ;;^UTILITY(U,$J,358.3,25546,0)
+168 ;;=R82.81^^77^1020^89
+169 ;;^UTILITY(U,$J,358.3,25546,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,25546,1,3,0)
+172 ;;=3^Pyuria
+173 ;;^UTILITY(U,$J,358.3,25546,1,4,0)
+174 ;;=4^R82.81
+175 ;;^UTILITY(U,$J,358.3,25546,2)
+176 ;;=^101879
+177 ;;^UTILITY(U,$J,358.3,25547,0)
+178 ;;=I25.118^^77^1020^8
+179 ;;^UTILITY(U,$J,358.3,25547,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,25547,1,3,0)
+182 ;;=3^Athscl Hrt Dis of Native Cor Art w/ Oth Angina
+183 ;;^UTILITY(U,$J,358.3,25547,1,4,0)
+184 ;;=4^I25.118
+185 ;;^UTILITY(U,$J,358.3,25547,2)
+186 ;;=^5007110
+187 ;;^UTILITY(U,$J,358.3,25548,0)
+188 ;;=J44.0^^77^1020^17
+189 ;;^UTILITY(U,$J,358.3,25548,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,25548,1,3,0)
+192 ;;=3^COPD w/ Lower Respiratory Infection
+193 ;;^UTILITY(U,$J,358.3,25548,1,4,0)
+194 ;;=4^J44.0
+195 ;;^UTILITY(U,$J,358.3,25548,2)
+196 ;;=^5008239
+197 ;;^UTILITY(U,$J,358.3,25549,0)
+198 ;;=J44.1^^77^1020^16
+199 ;;^UTILITY(U,$J,358.3,25549,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,25549,1,3,0)
+202 ;;=3^COPD w/ Acute Exacerbation
+203 ;;^UTILITY(U,$J,358.3,25549,1,4,0)
+204 ;;=4^J44.1
+205 ;;^UTILITY(U,$J,358.3,25549,2)
+206 ;;=^5008240
+207 ;;^UTILITY(U,$J,358.3,25550,0)
+208 ;;=I50.22^^77^1020^15
+209 ;;^UTILITY(U,$J,358.3,25550,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,25550,1,3,0)
+212 ;;=3^CHF-Systolic (HFrEF),Chronic
+213 ;;^UTILITY(U,$J,358.3,25550,1,4,0)
+214 ;;=4^I50.22
+215 ;;^UTILITY(U,$J,358.3,25550,2)
+216 ;;=^5007241
+217 ;;^UTILITY(U,$J,358.3,25551,0)
+218 ;;=I50.32^^77^1020^13
+219 ;;^UTILITY(U,$J,358.3,25551,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,25551,1,3,0)
+222 ;;=3^CHF-Diastolic (HFpEF),Chronic
+223 ;;^UTILITY(U,$J,358.3,25551,1,4,0)
+224 ;;=4^I50.32
+225 ;;^UTILITY(U,$J,358.3,25551,2)
+226 ;;=^5007245
+227 ;;^UTILITY(U,$J,358.3,25552,0)
+228 ;;=I50.42^^77^1020^12
+229 ;;^UTILITY(U,$J,358.3,25552,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,25552,1,3,0)
+232 ;;=3^CHF-Combined Systolic & Diastolic,Chronic
+233 ;;^UTILITY(U,$J,358.3,25552,1,4,0)
+234 ;;=4^I50.42
+235 ;;^UTILITY(U,$J,358.3,25552,2)
+236 ;;=^5007249
+237 ;;^UTILITY(U,$J,358.3,25553,0)
+238 ;;=I50.84^^77^1020^14
+239 ;;^UTILITY(U,$J,358.3,25553,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,25553,1,3,0)
+242 ;;=3^CHF-End Stage
+243 ;;^UTILITY(U,$J,358.3,25553,1,4,0)
+244 ;;=4^I50.84
+245 ;;^UTILITY(U,$J,358.3,25553,2)
+246 ;;=^5151391
+247 ;;^UTILITY(U,$J,358.3,25554,0)
+248 ;;=E11.22^^77^1020^28
+249 ;;^UTILITY(U,$J,358.3,25554,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,25554,1,3,0)
+252 ;;=3^DM Type 2 w/ Chronic Kidney Disease
+253 ;;^UTILITY(U,$J,358.3,25554,1,4,0)
+254 ;;=4^E11.22
+255 ;;^UTILITY(U,$J,358.3,25554,2)
+256 ;;=^5002630
+257 ;;^UTILITY(U,$J,358.3,25555,0)
+258 ;;=E11.21^^77^1020^31
+259 ;;^UTILITY(U,$J,358.3,25555,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,25555,1,3,0)
+262 ;;=3^DM Type 2 w/ Nephropathy,Unspec
+263 ;;^UTILITY(U,$J,358.3,25555,1,4,0)
+264 ;;=4^E11.21
+265 ;;^UTILITY(U,$J,358.3,25555,2)
+266 ;;=^5002629
+267 ;;^UTILITY(U,$J,358.3,25556,0)
+268 ;;=E11.42^^77^1020^36
+269 ;;^UTILITY(U,$J,358.3,25556,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,25556,1,3,0)
+272 ;;=3^DM Type 2 w/ Peripheral Neuropathy
+273 ;;^UTILITY(U,$J,358.3,25556,1,4,0)
+274 ;;=4^E11.42
+275 ;;^UTILITY(U,$J,358.3,25556,2)
+276 ;;=^5002646
+277 ;;^UTILITY(U,$J,358.3,25557,0)
+278 ;;=E11.43^^77^1020^26
+279 ;;^UTILITY(U,$J,358.3,25557,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,25557,1,3,0)
+282 ;;=3^DM Type 2 w/ Autonomic Neuropathy
+283 ;;^UTILITY(U,$J,358.3,25557,1,4,0)
+284 ;;=4^E11.43
+285 ;;^UTILITY(U,$J,358.3,25557,2)
+286 ;;=^5002647
+287 ;;^UTILITY(U,$J,358.3,25558,0)
+288 ;;=E11.51^^77^1020^35
+289 ;;^UTILITY(U,$J,358.3,25558,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,25558,1,3,0)
+292 ;;=3^DM Type 2 w/ PVD/PAD w/o Gangrene
+293 ;;^UTILITY(U,$J,358.3,25558,1,4,0)
+294 ;;=4^E11.51
+295 ;;^UTILITY(U,$J,358.3,25558,2)
+296 ;;=^5002650
+297 ;;^UTILITY(U,$J,358.3,25559,0)
+298 ;;=E11.52^^77^1020^34
+299 ;;^UTILITY(U,$J,358.3,25559,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,25559,1,3,0)
+302 ;;=3^DM Type 2 w/ PVD/PAD w/ Gangrene
+303 ;;^UTILITY(U,$J,358.3,25559,1,4,0)
+304 ;;=4^E11.52
+305 ;;^UTILITY(U,$J,358.3,25559,2)
+306 ;;=^5002651
+307 ;;^UTILITY(U,$J,358.3,25560,0)
+308 ;;=H90.0^^77^1020^49
+309 ;;^UTILITY(U,$J,358.3,25560,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,25560,1,3,0)
+312 ;;=3^Hearing Loss,Conductive,Bilateral
+313 ;;^UTILITY(U,$J,358.3,25560,1,4,0)
+314 ;;=4^H90.0
+315 ;;^UTILITY(U,$J,358.3,25560,2)
+316 ;;=^335257
+317 ;;^UTILITY(U,$J,358.3,25561,0)
+318 ;;=H90.11^^77^1020^51
+319 ;;^UTILITY(U,$J,358.3,25561,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,25561,1,3,0)
+322 ;;=3^Hearing Loss,Conductive,Right Ear
+323 ;;^UTILITY(U,$J,358.3,25561,1,4,0)
+324 ;;=4^H90.11
+325 ;;^UTILITY(U,$J,358.3,25561,2)
+326 ;;=^5006918
+327 ;;^UTILITY(U,$J,358.3,25562,0)
+328 ;;=H90.12^^77^1020^50
+329 ;;^UTILITY(U,$J,358.3,25562,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,25562,1,3,0)
+332 ;;=3^Hearing Loss,Conductive,Left Ear
+333 ;;^UTILITY(U,$J,358.3,25562,1,4,0)
+334 ;;=4^H90.12
+335 ;;^UTILITY(U,$J,358.3,25562,2)
+336 ;;=^5006919
+337 ;;^UTILITY(U,$J,358.3,25563,0)
+338 ;;=H90.2^^77^1020^52
+339 ;;^UTILITY(U,$J,358.3,25563,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,25563,1,3,0)
+342 ;;=3^Hearing Loss,Conductive,Unspec
+343 ;;^UTILITY(U,$J,358.3,25563,1,4,0)
+344 ;;=4^H90.2
+345 ;;^UTILITY(U,$J,358.3,25563,2)
+346 ;;=^5006920
+347 ;;^UTILITY(U,$J,358.3,25564,0)
+348 ;;=H90.3^^77^1020^53
+349 ;;^UTILITY(U,$J,358.3,25564,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,25564,1,3,0)
+352 ;;=3^Hearing Loss,Sensorineural,Bilateral
+353 ;;^UTILITY(U,$J,358.3,25564,1,4,0)
+354 ;;=4^H90.3
+355 ;;^UTILITY(U,$J,358.3,25564,2)
+356 ;;=^335328
+357 ;;^UTILITY(U,$J,358.3,25565,0)
+358 ;;=H90.41^^77^1020^55
+359 ;;^UTILITY(U,$J,358.3,25565,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,25565,1,3,0)
+362 ;;=3^Hearing Loss,Sensorineural,Right Ear
+363 ;;^UTILITY(U,$J,358.3,25565,1,4,0)
+364 ;;=4^H90.41
+365 ;;^UTILITY(U,$J,358.3,25565,2)
+366 ;;=^5006921
+367 ;;^UTILITY(U,$J,358.3,25566,0)
+368 ;;=H90.42^^77^1020^54
+369 ;;^UTILITY(U,$J,358.3,25566,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,25566,1,3,0)
+372 ;;=3^Hearing Loss,Sensorineural,Left Ear
+373 ;;^UTILITY(U,$J,358.3,25566,1,4,0)
+374 ;;=4^H90.42
+375 ;;^UTILITY(U,$J,358.3,25566,2)
+376 ;;=^5006922
+377 ;;^UTILITY(U,$J,358.3,25567,0)
+378 ;;=H90.5^^77^1020^56
+379 ;;^UTILITY(U,$J,358.3,25567,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,25567,1,3,0)
+382 ;;=3^Hearing Loss,Sensorineural,Unspec
+383 ;;^UTILITY(U,$J,358.3,25567,1,4,0)
+384 ;;=4^H90.5
+385 ;;^UTILITY(U,$J,358.3,25567,2)
+386 ;;=^5006923
+387 ;;^UTILITY(U,$J,358.3,25568,0)
+388 ;;=D63.1^^77^1020^4
+389 ;;^UTILITY(U,$J,358.3,25568,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,25568,1,3,0)
+392 ;;=3^Anemia,CKD
+393 ;;^UTILITY(U,$J,358.3,25568,1,4,0)
+394 ;;=4^D63.1
+395 ;;^UTILITY(U,$J,358.3,25568,2)
+396 ;;=^332908
+397 ;;^UTILITY(U,$J,358.3,25569,0)
+398 ;;=I11.0^^77^1020^44
+399 ;;^UTILITY(U,$J,358.3,25569,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,25569,1,3,0)
+402 ;;=3^HTN/CHF
+403 ;;^UTILITY(U,$J,358.3,25569,1,4,0)
+404 ;;=4^I11.0
+405 ;;^UTILITY(U,$J,358.3,25569,2)
+406 ;;=^5007063
+407 ;;^UTILITY(U,$J,358.3,25570,0)
+408 ;;=I12.0^^77^1020^48
+409 ;;^UTILITY(U,$J,358.3,25570,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,25570,1,3,0)
+412 ;;=3^HTN/CKD 5 or ESRD
+413 ;;^UTILITY(U,$J,358.3,25570,1,4,0)
+414 ;;=4^I12.0
+415 ;;^UTILITY(U,$J,358.3,25570,2)
+416 ;;=^5007065
+417 ;;^UTILITY(U,$J,358.3,25571,0)
+418 ;;=I12.9^^77^1020^47
+419 ;;^UTILITY(U,$J,358.3,25571,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,25571,1,3,0)
+422 ;;=3^HTN/CKD 1-4
+423 ;;^UTILITY(U,$J,358.3,25571,1,4,0)
+424 ;;=4^I12.9
+425 ;;^UTILITY(U,$J,358.3,25571,2)
+426 ;;=^5007066
+427 ;;^UTILITY(U,$J,358.3,25572,0)
+428 ;;=I13.0^^77^1020^46
+429 ;;^UTILITY(U,$J,358.3,25572,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,25572,1,3,0)
+432 ;;=3^HTN/CHF/CKD 1-4
+433 ;;^UTILITY(U,$J,358.3,25572,1,4,0)
+434 ;;=4^I13.0
+435 ;;^UTILITY(U,$J,358.3,25572,2)
+436 ;;=^5007067
+437 ;;^UTILITY(U,$J,358.3,25573,0)
+438 ;;=I13.2^^77^1020^45
+439 ;;^UTILITY(U,$J,358.3,25573,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,25573,1,3,0)
+442 ;;=3^HTN/CHF/CDK 5 or ESRD
+443 ;;^UTILITY(U,$J,358.3,25573,1,4,0)
+444 ;;=4^I13.2
+445 ;;^UTILITY(U,$J,358.3,25573,2)
+446 ;;=^5007070
+447 ;;^UTILITY(U,$J,358.3,25574,0)
+448 ;;=E11.43^^77^1020^27
+449 ;;^UTILITY(U,$J,358.3,25574,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,25574,1,3,0)
+452 ;;=3^DM Type 2 w/ Autonomic Neuropathy
+453 ;;^UTILITY(U,$J,358.3,25574,1,4,0)
+454 ;;=4^E11.43
+455 ;;^UTILITY(U,$J,358.3,25574,2)
+456 ;;=^5002647
+457 ;;^UTILITY(U,$J,358.3,25575,0)
+458 ;;=E11.610^^77^1020^32
+459 ;;^UTILITY(U,$J,358.3,25575,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,25575,1,3,0)
+462 ;;=3^DM Type 2 w/ Neuropathic Arthropathy
+463 ;;^UTILITY(U,$J,358.3,25575,1,4,0)
+464 ;;=4^E11.610
+465 ;;^UTILITY(U,$J,358.3,25575,2)
+466 ;;=^5002653
+467 ;;^UTILITY(U,$J,358.3,25576,0)
+468 ;;=E11.621^^77^1020^29
+469 ;;^UTILITY(U,$J,358.3,25576,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,25576,1,3,0)
+472 ;;=3^DM Type 2 w/ Foot Ulcer
+473 ;;^UTILITY(U,$J,358.3,25576,1,4,0)
+474 ;;=4^E11.621
+475 ;;^UTILITY(U,$J,358.3,25576,2)
+476 ;;=^5002656
+477 ;;^UTILITY(U,$J,358.3,25577,0)
+478 ;;=E11.65^^77^1020^30
+479 ;;^UTILITY(U,$J,358.3,25577,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,25577,1,3,0)
+482 ;;=3^DM Type 2 w/ Hyperglycemia
+483 ;;^UTILITY(U,$J,358.3,25577,1,4,0)
+484 ;;=4^E11.65
+485 ;;^UTILITY(U,$J,358.3,25577,2)
+486 ;;=^5002663
+487 ;;^UTILITY(U,$J,358.3,25578,0)
+488 ;;=R45.851^^77^1021^3
+489 ;;^UTILITY(U,$J,358.3,25578,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,25578,1,3,0)
+492 ;;=3^Suicidal Ideation
+493 ;;^UTILITY(U,$J,358.3,25578,1,4,0)
+494 ;;=4^R45.851
+495 ;;^UTILITY(U,$J,358.3,25578,2)
+496 ;;=^5019474
+497 ;;^UTILITY(U,$J,358.3,25579,0)
+498 ;;=T14.91XA^^77^1021^4
+499 ;;^UTILITY(U,$J,358.3,25579,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,25579,1,3,0)
+502 ;;=3^Suicide Attempt,Initial Encntr
+503 ;;^UTILITY(U,$J,358.3,25579,1,4,0)
+504 ;;=4^T14.91XA
+505 ;;^UTILITY(U,$J,358.3,25579,2)
+506 ;;=^5151779
+507 ;;^UTILITY(U,$J,358.3,25580,0)
+508 ;;=T14.91XD^^77^1021^6
+509 ;;^UTILITY(U,$J,358.3,25580,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,25580,1,3,0)
+512 ;;=3^Suicide Attempt,Subsequent Encntr
+513 ;;^UTILITY(U,$J,358.3,25580,1,4,0)
+514 ;;=4^T14.91XD
+515 ;;^UTILITY(U,$J,358.3,25580,2)
+516 ;;=^5151780
+517 ;;^UTILITY(U,$J,358.3,25581,0)
+518 ;;=T14.91XS^^77^1021^5
+519 ;;^UTILITY(U,$J,358.3,25581,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,25581,1,3,0)
+522 ;;=3^Suicide Attempt,Sequela
+523 ;;^UTILITY(U,$J,358.3,25581,1,4,0)
+524 ;;=4^T14.91XS
+525 ;;^UTILITY(U,$J,358.3,25581,2)
+526 ;;=^5151781
+527 ;;^UTILITY(U,$J,358.3,25582,0)
+528 ;;=Z91.51^^77^1021^2
+529 ;;^UTILITY(U,$J,358.3,25582,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,25582,1,3,0)
+532 ;;=3^Personal Hx of Suicidal Behavior
+533 ;;^UTILITY(U,$J,358.3,25582,1,4,0)
+534 ;;=4^Z91.51
+535 ;;^UTILITY(U,$J,358.3,25582,2)
+536 ;;=^5161317
+537 ;;^UTILITY(U,$J,358.3,25583,0)
+538 ;;=Z91.52^^77^1021^1
+539 ;;^UTILITY(U,$J,358.3,25583,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,25583,1,3,0)
+542 ;;=3^Personal Hx of Non-Suicidal Self-Harm
+543 ;;^UTILITY(U,$J,358.3,25583,1,4,0)
+544 ;;=4^Z91.52
+545 ;;^UTILITY(U,$J,358.3,25583,2)
+546 ;;=^5161318
+547 ;;^UTILITY(U,$J,358.3,25584,0)
+548 ;;=Z02.5^^77^1022^1
+549 ;;^UTILITY(U,$J,358.3,25584,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,25584,1,3,0)
+552 ;;=3^Exam for Sports Participation (Primary)
+553 ;;^UTILITY(U,$J,358.3,25584,1,4,0)
+554 ;;=4^Z02.5
+555 ;;^UTILITY(U,$J,358.3,25584,2)
+556 ;;=^5062638
+557 ;;^UTILITY(U,$J,358.3,25585,0)
+558 ;;=G35.^^77^1023^9
+559 ;;^UTILITY(U,$J,358.3,25585,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,25585,1,3,0)
+562 ;;=3^Multiple Sclerosis
+563 ;;^UTILITY(U,$J,358.3,25585,1,4,0)
+564 ;;=4^G35.
+565 ;;^UTILITY(U,$J,358.3,25585,2)
+566 ;;=^79761
+567 ;;^UTILITY(U,$J,358.3,25586,0)
+568 ;;=S14.101S^^77^1023^4
+569 ;;^UTILITY(U,$J,358.3,25586,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,25586,1,3,0)
+572 ;;=3^Injury at C1 Level of Cervical Spinal Cord,Unspec,Sequela
+573 ;;^UTILITY(U,$J,358.3,25586,1,4,0)
+574 ;;=4^S14.101S
+575 ;;^UTILITY(U,$J,358.3,25586,2)
+576 ;;=^5022045
+577 ;;^UTILITY(U,$J,358.3,25587,0)
+578 ;;=S14.159S^^77^1023^2
+579 ;;^UTILITY(U,$J,358.3,25587,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,25587,1,3,0)
+582 ;;=3^Incmpl Lesion at Unspec Level of Cervical Spinal Cord,Other,Sequela
+583 ;;^UTILITY(U,$J,358.3,25587,1,4,0)
+584 ;;=4^S14.159S
+585 ;;^UTILITY(U,$J,358.3,25587,2)
+586 ;;=^5022201
+587 ;;^UTILITY(U,$J,358.3,25588,0)
+588 ;;=S24.101S^^77^1023^5
+589 ;;^UTILITY(U,$J,358.3,25588,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,25588,1,3,0)
+592 ;;=3^Injury at T1 Level of Thoracic Spinal Cord,Unspec,Sequela
+593 ;;^UTILITY(U,$J,358.3,25588,1,4,0)
+594 ;;=4^S24.101S
+595 ;;^UTILITY(U,$J,358.3,25588,2)
+596 ;;=^5023275
+597 ;;^UTILITY(U,$J,358.3,25589,0)
+598 ;;=S24.159S^^77^1023^3
+599 ;;^UTILITY(U,$J,358.3,25589,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,25589,1,3,0)
+602 ;;=3^Incmpl Lesion at Unspec Level of Thoracic Spinal Cord,Other,Sequela
+603 ;;^UTILITY(U,$J,358.3,25589,1,4,0)
+604 ;;=4^S24.159S
+605 ;;^UTILITY(U,$J,358.3,25589,2)
+606 ;;=^5023344
+607 ;;^UTILITY(U,$J,358.3,25590,0)
+608 ;;=S34.101S^^77^1023^6
+609 ;;^UTILITY(U,$J,358.3,25590,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,25590,1,3,0)
+612 ;;=3^Injury to L1 Level of Lumbar Spinal Cord,Unspec,Sequela
+613 ;;^UTILITY(U,$J,358.3,25590,1,4,0)
+614 ;;=4^S34.101S
+615 ;;^UTILITY(U,$J,358.3,25590,2)
+616 ;;=^5025192
+617 ;;^UTILITY(U,$J,358.3,25591,0)
+618 ;;=S34.139S^^77^1023^7
+619 ;;^UTILITY(U,$J,358.3,25591,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,25591,1,3,0)
+622 ;;=3^Injury to Sacral Spinal Cord,Unspec,Sequela
+623 ;;^UTILITY(U,$J,358.3,25591,1,4,0)
+624 ;;=4^S34.139S
+625 ;;^UTILITY(U,$J,358.3,25591,2)
+626 ;;=^5025249
+627 ;;^UTILITY(U,$J,358.3,25592,0)
+628 ;;=S06.0X0S^^77^1023^1
+629 ;;^UTILITY(U,$J,358.3,25592,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,25592,1,3,0)
+632 ;;=3^Concussion w/o Loss of Consciousness,Sequela
+633 ;;^UTILITY(U,$J,358.3,25592,1,4,0)
+634 ;;=4^S06.0X0S
+635 ;;^UTILITY(U,$J,358.3,25592,2)
+636 ;;=^5020668
+637 ;;^UTILITY(U,$J,358.3,25593,0)
+638 ;;=S06.9X9S^^77^1023^8
+639 ;;^UTILITY(U,$J,358.3,25593,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,25593,1,3,0)
+642 ;;=3^Intracranial Injury,Unspec,w/ LOC of Unspec Duration,Sequela
+643 ;;^UTILITY(U,$J,358.3,25593,1,4,0)
+644 ;;=4^S06.9X9S
+645 ;;^UTILITY(U,$J,358.3,25593,2)
+646 ;;=^5021235
+647 ;;^UTILITY(U,$J,358.3,25594,0)
+648 ;;=99441^^78^1024^1^^^^1
+649 ;;^UTILITY(U,$J,358.3,25594,1,0)
+650 ;;=^358.31IA^2^2
+651 ;;^UTILITY(U,$J,358.3,25594,1,1,0)
+652 ;;=1^99441
+653 ;;^UTILITY(U,$J,358.3,25594,1,2,0)
+654 ;;=2^PHONE E/M 5-10 MIN
+655 ;;^UTILITY(U,$J,358.3,25595,0)
+656 ;;=99443^^78^1024^3^^^^1
+657 ;;^UTILITY(U,$J,358.3,25595,1,0)
+658 ;;=^358.31IA^2^2
+659 ;;^UTILITY(U,$J,358.3,25595,1,1,0)
+660 ;;=1^99443
+661 ;;^UTILITY(U,$J,358.3,25595,1,2,0)
+662 ;;=2^PHONE E/M 21-30 MIN
+663 ;;^UTILITY(U,$J,358.3,25596,0)
+664 ;;=99442^^78^1024^2^^^^1
+665 ;;^UTILITY(U,$J,358.3,25596,1,0)
+666 ;;=^358.31IA^2^2
+667 ;;^UTILITY(U,$J,358.3,25596,1,1,0)
+668 ;;=1^99442
+669 ;;^UTILITY(U,$J,358.3,25596,1,2,0)
+670 ;;=2^PHONE E/M 11-20 MIN
+671 ;;^UTILITY(U,$J,358.3,25597,0)
+672 ;;=98966^^78^1025^1^^^^1
+673 ;;^UTILITY(U,$J,358.3,25597,1,0)
+674 ;;=^358.31IA^2^2
+675 ;;^UTILITY(U,$J,358.3,25597,1,1,0)
+676 ;;=1^98966
+677 ;;^UTILITY(U,$J,358.3,25597,1,2,0)
+678 ;;=2^PHONE CALL BY HC PROF 5-10 MIN
+679 ;;^UTILITY(U,$J,358.3,25598,0)
+680 ;;=98967^^78^1025^2^^^^1
+681 ;;^UTILITY(U,$J,358.3,25598,1,0)
+682 ;;=^358.31IA^2^2