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

IBDEI04Q.m

Go to the documentation of this file.
IBDEI04Q ; ; 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,11433,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11433,1,3,0)
 ;;=3^Chr Kidney Disease,Stage 3a
 ;;^UTILITY(U,$J,358.3,11433,1,4,0)
 ;;=4^N18.31
 ;;^UTILITY(U,$J,358.3,11433,2)
 ;;=^5159287
 ;;^UTILITY(U,$J,358.3,11434,0)
 ;;=N18.32^^48^514^11
 ;;^UTILITY(U,$J,358.3,11434,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11434,1,3,0)
 ;;=3^Chr Kidney Disease,Stage 3b
 ;;^UTILITY(U,$J,358.3,11434,1,4,0)
 ;;=4^N18.32
 ;;^UTILITY(U,$J,358.3,11434,2)
 ;;=^5159288
 ;;^UTILITY(U,$J,358.3,11435,0)
 ;;=B15.9^^48^515^2
 ;;^UTILITY(U,$J,358.3,11435,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11435,1,3,0)
 ;;=3^Acute Hepatitis A w/o Hepatic Coma
 ;;^UTILITY(U,$J,358.3,11435,1,4,0)
 ;;=4^B15.9
 ;;^UTILITY(U,$J,358.3,11435,2)
 ;;=^5000536
 ;;^UTILITY(U,$J,358.3,11436,0)
 ;;=B18.2^^48^515^5
 ;;^UTILITY(U,$J,358.3,11436,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11436,1,3,0)
 ;;=3^Chronic Viral Hepatitis C
 ;;^UTILITY(U,$J,358.3,11436,1,4,0)
 ;;=4^B18.2
 ;;^UTILITY(U,$J,358.3,11436,2)
 ;;=^5000548
 ;;^UTILITY(U,$J,358.3,11437,0)
 ;;=B17.10^^48^515^4
 ;;^UTILITY(U,$J,358.3,11437,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11437,1,3,0)
 ;;=3^Acute Viral Hepatitis C w/o Hepatic Coma
 ;;^UTILITY(U,$J,358.3,11437,1,4,0)
 ;;=4^B17.10
 ;;^UTILITY(U,$J,358.3,11437,2)
 ;;=^5000542
 ;;^UTILITY(U,$J,358.3,11438,0)
 ;;=B17.11^^48^515^3
 ;;^UTILITY(U,$J,358.3,11438,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11438,1,3,0)
 ;;=3^Acute Viral Hepatitis C w/ Hepatic Coma
 ;;^UTILITY(U,$J,358.3,11438,1,4,0)
 ;;=4^B17.11
 ;;^UTILITY(U,$J,358.3,11438,2)
 ;;=^331777
 ;;^UTILITY(U,$J,358.3,11439,0)
 ;;=B15.0^^48^515^1
 ;;^UTILITY(U,$J,358.3,11439,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11439,1,3,0)
 ;;=3^Acute Hepatitis A w/ Hepatic Coma
 ;;^UTILITY(U,$J,358.3,11439,1,4,0)
 ;;=4^B15.0
 ;;^UTILITY(U,$J,358.3,11439,2)
 ;;=^5000535
 ;;^UTILITY(U,$J,358.3,11440,0)
 ;;=Z23.^^48^516^1
 ;;^UTILITY(U,$J,358.3,11440,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11440,1,3,0)
 ;;=3^Encounter for Immunization
 ;;^UTILITY(U,$J,358.3,11440,1,4,0)
 ;;=4^Z23.
 ;;^UTILITY(U,$J,358.3,11440,2)
 ;;=^5062795
 ;;^UTILITY(U,$J,358.3,11441,0)
 ;;=M10.9^^48^517^2
 ;;^UTILITY(U,$J,358.3,11441,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11441,1,3,0)
 ;;=3^Gout,Unspec
 ;;^UTILITY(U,$J,358.3,11441,1,4,0)
 ;;=4^M10.9
 ;;^UTILITY(U,$J,358.3,11441,2)
 ;;=^5010404
 ;;^UTILITY(U,$J,358.3,11442,0)
 ;;=M19.90^^48^517^5
 ;;^UTILITY(U,$J,358.3,11442,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11442,1,3,0)
 ;;=3^Osteoarthritis,Unspec
 ;;^UTILITY(U,$J,358.3,11442,1,4,0)
 ;;=4^M19.90
 ;;^UTILITY(U,$J,358.3,11442,2)
 ;;=^5010853
 ;;^UTILITY(U,$J,358.3,11443,0)
 ;;=M71.50^^48^517^1
 ;;^UTILITY(U,$J,358.3,11443,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11443,1,3,0)
 ;;=3^Bursitis NEC,Unspec Site
 ;;^UTILITY(U,$J,358.3,11443,1,4,0)
 ;;=4^M71.50
 ;;^UTILITY(U,$J,358.3,11443,2)
 ;;=^5013190
 ;;^UTILITY(U,$J,358.3,11444,0)
 ;;=M25.50^^48^517^3
 ;;^UTILITY(U,$J,358.3,11444,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11444,1,3,0)
 ;;=3^Joint Pain,Unspec Joint
 ;;^UTILITY(U,$J,358.3,11444,1,4,0)
 ;;=4^M25.50
 ;;^UTILITY(U,$J,358.3,11444,2)
 ;;=^5011601
 ;;^UTILITY(U,$J,358.3,11445,0)
 ;;=M16.0^^48^517^12
 ;;^UTILITY(U,$J,358.3,11445,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11445,1,3,0)
 ;;=3^Primary OA of Hip,Bilateral
 ;;^UTILITY(U,$J,358.3,11445,1,4,0)
 ;;=4^M16.0
 ;;^UTILITY(U,$J,358.3,11445,2)
 ;;=^5010769
 ;;^UTILITY(U,$J,358.3,11446,0)
 ;;=M16.11^^48^517^16
 ;;^UTILITY(U,$J,358.3,11446,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11446,1,3,0)
 ;;=3^Primary OA of Right Hip
 ;;^UTILITY(U,$J,358.3,11446,1,4,0)
 ;;=4^M16.11
 ;;^UTILITY(U,$J,358.3,11446,2)
 ;;=^5010771
 ;;^UTILITY(U,$J,358.3,11447,0)
 ;;=M16.12^^48^517^14
 ;;^UTILITY(U,$J,358.3,11447,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11447,1,3,0)
 ;;=3^Primary OA of Left Hip
 ;;^UTILITY(U,$J,358.3,11447,1,4,0)
 ;;=4^M16.12
 ;;^UTILITY(U,$J,358.3,11447,2)
 ;;=^5010772
 ;;^UTILITY(U,$J,358.3,11448,0)
 ;;=M16.4^^48^517^6
 ;;^UTILITY(U,$J,358.3,11448,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11448,1,3,0)
 ;;=3^Post-Traumatic OA of Hip,Bilateral
 ;;^UTILITY(U,$J,358.3,11448,1,4,0)
 ;;=4^M16.4
 ;;^UTILITY(U,$J,358.3,11448,2)
 ;;=^5010777
 ;;^UTILITY(U,$J,358.3,11449,0)
 ;;=M16.51^^48^517^10
 ;;^UTILITY(U,$J,358.3,11449,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11449,1,3,0)
 ;;=3^Post-Traumatic OA of Right Hip
 ;;^UTILITY(U,$J,358.3,11449,1,4,0)
 ;;=4^M16.51
 ;;^UTILITY(U,$J,358.3,11449,2)
 ;;=^5010779
 ;;^UTILITY(U,$J,358.3,11450,0)
 ;;=M16.52^^48^517^8
 ;;^UTILITY(U,$J,358.3,11450,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11450,1,3,0)
 ;;=3^Post-Traumatic OA of Left Hip
 ;;^UTILITY(U,$J,358.3,11450,1,4,0)
 ;;=4^M16.52
 ;;^UTILITY(U,$J,358.3,11450,2)
 ;;=^5010780
 ;;^UTILITY(U,$J,358.3,11451,0)
 ;;=M17.0^^48^517^13
 ;;^UTILITY(U,$J,358.3,11451,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11451,1,3,0)
 ;;=3^Primary OA of Knee,Bilateral
 ;;^UTILITY(U,$J,358.3,11451,1,4,0)
 ;;=4^M17.0
 ;;^UTILITY(U,$J,358.3,11451,2)
 ;;=^5010784
 ;;^UTILITY(U,$J,358.3,11452,0)
 ;;=M17.11^^48^517^17
 ;;^UTILITY(U,$J,358.3,11452,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11452,1,3,0)
 ;;=3^Primary OA of Right Knee
 ;;^UTILITY(U,$J,358.3,11452,1,4,0)
 ;;=4^M17.11
 ;;^UTILITY(U,$J,358.3,11452,2)
 ;;=^5010786
 ;;^UTILITY(U,$J,358.3,11453,0)
 ;;=M17.12^^48^517^15
 ;;^UTILITY(U,$J,358.3,11453,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11453,1,3,0)
 ;;=3^Primary OA of Left Knee
 ;;^UTILITY(U,$J,358.3,11453,1,4,0)
 ;;=4^M17.12
 ;;^UTILITY(U,$J,358.3,11453,2)
 ;;=^5010787
 ;;^UTILITY(U,$J,358.3,11454,0)
 ;;=M17.2^^48^517^7
 ;;^UTILITY(U,$J,358.3,11454,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11454,1,3,0)
 ;;=3^Post-Traumatic OA of Knee,Bilateral
 ;;^UTILITY(U,$J,358.3,11454,1,4,0)
 ;;=4^M17.2
 ;;^UTILITY(U,$J,358.3,11454,2)
 ;;=^5010788
 ;;^UTILITY(U,$J,358.3,11455,0)
 ;;=M17.31^^48^517^11
 ;;^UTILITY(U,$J,358.3,11455,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11455,1,3,0)
 ;;=3^Post-Traumatic OA of Right Knee
 ;;^UTILITY(U,$J,358.3,11455,1,4,0)
 ;;=4^M17.31
 ;;^UTILITY(U,$J,358.3,11455,2)
 ;;=^5010790
 ;;^UTILITY(U,$J,358.3,11456,0)
 ;;=M17.32^^48^517^9
 ;;^UTILITY(U,$J,358.3,11456,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11456,1,3,0)
 ;;=3^Post-Traumatic OA of Left Knee
 ;;^UTILITY(U,$J,358.3,11456,1,4,0)
 ;;=4^M17.32
 ;;^UTILITY(U,$J,358.3,11456,2)
 ;;=^5010791
 ;;^UTILITY(U,$J,358.3,11457,0)
 ;;=M54.50^^48^517^4
 ;;^UTILITY(U,$J,358.3,11457,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11457,1,3,0)
 ;;=3^Low Back Pain,Unspec
 ;;^UTILITY(U,$J,358.3,11457,1,4,0)
 ;;=4^M54.50
 ;;^UTILITY(U,$J,358.3,11457,2)
 ;;=^5161215
 ;;^UTILITY(U,$J,358.3,11458,0)
 ;;=G30.9^^48^518^1
 ;;^UTILITY(U,$J,358.3,11458,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11458,1,3,0)
 ;;=3^Alzheimer's Disease,Unspec
 ;;^UTILITY(U,$J,358.3,11458,1,4,0)
 ;;=4^G30.9
 ;;^UTILITY(U,$J,358.3,11458,2)
 ;;=^5003808
 ;;^UTILITY(U,$J,358.3,11459,0)
 ;;=G20.^^48^518^8
 ;;^UTILITY(U,$J,358.3,11459,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11459,1,3,0)
 ;;=3^Parkinson's Disease
 ;;^UTILITY(U,$J,358.3,11459,1,4,0)
 ;;=4^G20.
 ;;^UTILITY(U,$J,358.3,11459,2)
 ;;=^5003770
 ;;^UTILITY(U,$J,358.3,11460,0)
 ;;=G35.^^48^518^7
 ;;^UTILITY(U,$J,358.3,11460,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11460,1,3,0)
 ;;=3^Multiple Sclerosis
 ;;^UTILITY(U,$J,358.3,11460,1,4,0)
 ;;=4^G35.
 ;;^UTILITY(U,$J,358.3,11460,2)
 ;;=^79761
 ;;^UTILITY(U,$J,358.3,11461,0)
 ;;=G60.9^^48^518^5
 ;;^UTILITY(U,$J,358.3,11461,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11461,1,3,0)
 ;;=3^Hereditary/Idiopathic Neuropathy,Unspec
 ;;^UTILITY(U,$J,358.3,11461,1,4,0)
 ;;=4^G60.9
 ;;^UTILITY(U,$J,358.3,11461,2)
 ;;=^5004071
 ;;^UTILITY(U,$J,358.3,11462,0)
 ;;=I69.90^^48^518^2
 ;;^UTILITY(U,$J,358.3,11462,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11462,1,3,0)
 ;;=3^Cerebrovascular Disease,Unspec
 ;;^UTILITY(U,$J,358.3,11462,1,4,0)
 ;;=4^I69.90
 ;;^UTILITY(U,$J,358.3,11462,2)
 ;;=^5007551
 ;;^UTILITY(U,$J,358.3,11463,0)
 ;;=R56.9^^48^518^4
 ;;^UTILITY(U,$J,358.3,11463,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11463,1,3,0)
 ;;=3^Convulsions,Unspec
 ;;^UTILITY(U,$J,358.3,11463,1,4,0)
 ;;=4^R56.9
 ;;^UTILITY(U,$J,358.3,11463,2)
 ;;=^5019524
 ;;^UTILITY(U,$J,358.3,11464,0)
 ;;=S14.109S^^48^518^3
 ;;^UTILITY(U,$J,358.3,11464,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11464,1,3,0)
 ;;=3^Cervical Spinal Cord Injury,Unspec,Sequela
 ;;^UTILITY(U,$J,358.3,11464,1,4,0)
 ;;=4^S14.109S
 ;;^UTILITY(U,$J,358.3,11464,2)
 ;;=^5134243
 ;;^UTILITY(U,$J,358.3,11465,0)
 ;;=S24.109S^^48^518^10
 ;;^UTILITY(U,$J,358.3,11465,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11465,1,3,0)
 ;;=3^Thoracic Spinal Cord Injury,Unspec,Sequela
 ;;^UTILITY(U,$J,358.3,11465,1,4,0)
 ;;=4^S24.109S
 ;;^UTILITY(U,$J,358.3,11465,2)
 ;;=^5134384
 ;;^UTILITY(U,$J,358.3,11466,0)
 ;;=S34.109S^^48^518^6
 ;;^UTILITY(U,$J,358.3,11466,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11466,1,3,0)
 ;;=3^Lumbar Spinal Cord Injury,Unspec,Sequela
 ;;^UTILITY(U,$J,358.3,11466,1,4,0)
 ;;=4^S34.109S
 ;;^UTILITY(U,$J,358.3,11466,2)
 ;;=^5134570
 ;;^UTILITY(U,$J,358.3,11467,0)
 ;;=S34.139S^^48^518^9
 ;;^UTILITY(U,$J,358.3,11467,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11467,1,3,0)
 ;;=3^Sacral Spinal Cord Injury,Unspec,Sequela
 ;;^UTILITY(U,$J,358.3,11467,1,4,0)
 ;;=4^S34.139S
 ;;^UTILITY(U,$J,358.3,11467,2)
 ;;=^5025249
 ;;^UTILITY(U,$J,358.3,11468,0)
 ;;=Z48.00^^48^519^5
 ;;^UTILITY(U,$J,358.3,11468,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11468,1,3,0)
 ;;=3^Change or Removal of Nonsurg Wound Dressing
 ;;^UTILITY(U,$J,358.3,11468,1,4,0)
 ;;=4^Z48.00
 ;;^UTILITY(U,$J,358.3,11468,2)
 ;;=^5063033
 ;;^UTILITY(U,$J,358.3,11469,0)
 ;;=Z48.01^^48^519^6
 ;;^UTILITY(U,$J,358.3,11469,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11469,1,3,0)
 ;;=3^Change or Removal of Surg Wound Dressing
 ;;^UTILITY(U,$J,358.3,11469,1,4,0)
 ;;=4^Z48.01
 ;;^UTILITY(U,$J,358.3,11469,2)
 ;;=^5063034
 ;;^UTILITY(U,$J,358.3,11470,0)
 ;;=Z48.02^^48^519^18
 ;;^UTILITY(U,$J,358.3,11470,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11470,1,3,0)
 ;;=3^Suture Removal
 ;;^UTILITY(U,$J,358.3,11470,1,4,0)
 ;;=4^Z48.02
 ;;^UTILITY(U,$J,358.3,11470,2)
 ;;=^5063035
 ;;^UTILITY(U,$J,358.3,11471,0)
 ;;=Z48.03^^48^519^4
 ;;^UTILITY(U,$J,358.3,11471,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11471,1,3,0)
 ;;=3^Change or Removal of Drains
 ;;^UTILITY(U,$J,358.3,11471,1,4,0)
 ;;=4^Z48.03
 ;;^UTILITY(U,$J,358.3,11471,2)
 ;;=^5063036
 ;;^UTILITY(U,$J,358.3,11472,0)
 ;;=Z48.89^^48^519^17
 ;;^UTILITY(U,$J,358.3,11472,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11472,1,3,0)
 ;;=3^Surgical Aftercare NEC
 ;;^UTILITY(U,$J,358.3,11472,1,4,0)
 ;;=4^Z48.89
 ;;^UTILITY(U,$J,358.3,11472,2)
 ;;=^5063055
 ;;^UTILITY(U,$J,358.3,11473,0)
 ;;=Z45.2^^48^519^1
 ;;^UTILITY(U,$J,358.3,11473,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11473,1,3,0)
 ;;=3^Adjustment/Management of VAD
 ;;^UTILITY(U,$J,358.3,11473,1,4,0)
 ;;=4^Z45.2
 ;;^UTILITY(U,$J,358.3,11473,2)
 ;;=^5062999
 ;;^UTILITY(U,$J,358.3,11474,0)
 ;;=Z46.82^^48^519^10
 ;;^UTILITY(U,$J,358.3,11474,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11474,1,3,0)
 ;;=3^Fitting/Adjustment of Non-Vascular Catheter
 ;;^UTILITY(U,$J,358.3,11474,1,4,0)
 ;;=4^Z46.82
 ;;^UTILITY(U,$J,358.3,11474,2)
 ;;=^5063022
 ;;^UTILITY(U,$J,358.3,11475,0)
 ;;=Z51.11^^48^519^3
 ;;^UTILITY(U,$J,358.3,11475,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11475,1,3,0)
 ;;=3^Antineoplastic Chemotherapy
 ;;^UTILITY(U,$J,358.3,11475,1,4,0)
 ;;=4^Z51.11
 ;;^UTILITY(U,$J,358.3,11475,2)
 ;;=^5063061
 ;;^UTILITY(U,$J,358.3,11476,0)
 ;;=Z71.9^^48^519^7
 ;;^UTILITY(U,$J,358.3,11476,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11476,1,3,0)
 ;;=3^Counseling,Unspec
 ;;^UTILITY(U,$J,358.3,11476,1,4,0)
 ;;=4^Z71.9
 ;;^UTILITY(U,$J,358.3,11476,2)
 ;;=^5063254
 ;;^UTILITY(U,$J,358.3,11477,0)
 ;;=Z76.0^^48^519^14
 ;;^UTILITY(U,$J,358.3,11477,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11477,1,3,0)
 ;;=3^Issue of Repeat Prescription
 ;;^UTILITY(U,$J,358.3,11477,1,4,0)
 ;;=4^Z76.0
 ;;^UTILITY(U,$J,358.3,11477,2)
 ;;=^5063297
 ;;^UTILITY(U,$J,358.3,11478,0)
 ;;=Z02.9^^48^519^2
 ;;^UTILITY(U,$J,358.3,11478,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11478,1,3,0)
 ;;=3^Administrative Exam,Unspec
 ;;^UTILITY(U,$J,358.3,11478,1,4,0)
 ;;=4^Z02.9
 ;;^UTILITY(U,$J,358.3,11478,2)
 ;;=^5062646
 ;;^UTILITY(U,$J,358.3,11479,0)
 ;;=Z71.0^^48^519^15
 ;;^UTILITY(U,$J,358.3,11479,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11479,1,3,0)
 ;;=3^Persons Consulting on Behalf of Another Person
 ;;^UTILITY(U,$J,358.3,11479,1,4,0)
 ;;=4^Z71.0
 ;;^UTILITY(U,$J,358.3,11479,2)
 ;;=^5063242
 ;;^UTILITY(U,$J,358.3,11480,0)
 ;;=Z01.818^^48^519^16
 ;;^UTILITY(U,$J,358.3,11480,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11480,1,3,0)
 ;;=3^Preprocedural Exam NEC
 ;;^UTILITY(U,$J,358.3,11480,1,4,0)
 ;;=4^Z01.818
 ;;^UTILITY(U,$J,358.3,11480,2)
 ;;=^5062628
 ;;^UTILITY(U,$J,358.3,11481,0)
 ;;=Z04.9^^48^519^8
 ;;^UTILITY(U,$J,358.3,11481,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11481,1,3,0)
 ;;=3^Exam/Observation for Unspec Reason
 ;;^UTILITY(U,$J,358.3,11481,1,4,0)
 ;;=4^Z04.9
 ;;^UTILITY(U,$J,358.3,11481,2)
 ;;=^5062666
 ;;^UTILITY(U,$J,358.3,11482,0)
 ;;=Z49.01^^48^519^9
 ;;^UTILITY(U,$J,358.3,11482,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11482,1,3,0)
 ;;=3^Fitting/Adjustment of Extracorpeal Dialysis Catheter
 ;;^UTILITY(U,$J,358.3,11482,1,4,0)
 ;;=4^Z49.01
 ;;^UTILITY(U,$J,358.3,11482,2)
 ;;=^5063056
 ;;^UTILITY(U,$J,358.3,11483,0)
 ;;=Z59.00^^48^519^13
 ;;^UTILITY(U,$J,358.3,11483,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11483,1,3,0)
 ;;=3^Homelessness,Unspec
 ;;^UTILITY(U,$J,358.3,11483,1,4,0)
 ;;=4^Z59.00
 ;;^UTILITY(U,$J,358.3,11483,2)
 ;;=^5161304
 ;;^UTILITY(U,$J,358.3,11484,0)
 ;;=Z59.01^^48^519^11
 ;;^UTILITY(U,$J,358.3,11484,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11484,1,3,0)
 ;;=3^Homelessness,Sheltered
 ;;^UTILITY(U,$J,358.3,11484,1,4,0)
 ;;=4^Z59.01
 ;;^UTILITY(U,$J,358.3,11484,2)
 ;;=^5161305
 ;;^UTILITY(U,$J,358.3,11485,0)
 ;;=Z59.02^^48^519^12
 ;;^UTILITY(U,$J,358.3,11485,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11485,1,3,0)
 ;;=3^Homelessness,Unsheltered
 ;;^UTILITY(U,$J,358.3,11485,1,4,0)
 ;;=4^Z59.02
 ;;^UTILITY(U,$J,358.3,11485,2)
 ;;=^5161306
 ;;^UTILITY(U,$J,358.3,11486,0)
 ;;=Z71.3^^48^520^1
 ;;^UTILITY(U,$J,358.3,11486,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11486,1,3,0)
 ;;=3^Dietary Counseling/Surveillance
 ;;^UTILITY(U,$J,358.3,11486,1,4,0)
 ;;=4^Z71.3
 ;;^UTILITY(U,$J,358.3,11486,2)
 ;;=^5063245
 ;;^UTILITY(U,$J,358.3,11487,0)
 ;;=Z00.00^^48^520^4
 ;;^UTILITY(U,$J,358.3,11487,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11487,1,3,0)
 ;;=3^General Adult Medical Exam w/o Abnormal Findings
 ;;^UTILITY(U,$J,358.3,11487,1,4,0)
 ;;=4^Z00.00
 ;;^UTILITY(U,$J,358.3,11487,2)
 ;;=^5062599
 ;;^UTILITY(U,$J,358.3,11488,0)
 ;;=Z01.89^^48^520^5
 ;;^UTILITY(U,$J,358.3,11488,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11488,1,3,0)
 ;;=3^Special Exam NEC
 ;;^UTILITY(U,$J,358.3,11488,1,4,0)
 ;;=4^Z01.89
 ;;^UTILITY(U,$J,358.3,11488,2)
 ;;=^5062632
 ;;^UTILITY(U,$J,358.3,11489,0)
 ;;=Z13.5^^48^520^2
 ;;^UTILITY(U,$J,358.3,11489,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11489,1,3,0)
 ;;=3^Eye and Ear Disorder Screening
 ;;^UTILITY(U,$J,358.3,11489,1,4,0)
 ;;=4^Z13.5
 ;;^UTILITY(U,$J,358.3,11489,2)
 ;;=^5062706
 ;;^UTILITY(U,$J,358.3,11490,0)
 ;;=Z00.01^^48^520^3
 ;;^UTILITY(U,$J,358.3,11490,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11490,1,3,0)
 ;;=3^General Adult Medical Exam w/ Abnormal Findings
 ;;^UTILITY(U,$J,358.3,11490,1,4,0)
 ;;=4^Z00.01
 ;;^UTILITY(U,$J,358.3,11490,2)
 ;;=^5062600
 ;;^UTILITY(U,$J,358.3,11491,0)
 ;;=C34.91^^48^521^13
 ;;^UTILITY(U,$J,358.3,11491,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11491,1,3,0)
 ;;=3^Malig Neop of Right Bronchus/Lung,Unspec Part
 ;;^UTILITY(U,$J,358.3,11491,1,4,0)
 ;;=4^C34.91
 ;;^UTILITY(U,$J,358.3,11491,2)
 ;;=^5000967
 ;;^UTILITY(U,$J,358.3,11492,0)
 ;;=C34.92^^48^521^12
 ;;^UTILITY(U,$J,358.3,11492,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11492,1,3,0)
 ;;=3^Malig Neop of Left Bronchus/Lung,Unspec Part
 ;;^UTILITY(U,$J,358.3,11492,1,4,0)
 ;;=4^C34.92
 ;;^UTILITY(U,$J,358.3,11492,2)
 ;;=^5000968
 ;;^UTILITY(U,$J,358.3,11493,0)
 ;;=G47.33^^48^521^14
 ;;^UTILITY(U,$J,358.3,11493,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11493,1,3,0)
 ;;=3^Obstructive Sleep Apnea
 ;;^UTILITY(U,$J,358.3,11493,1,4,0)
 ;;=4^G47.33
 ;;^UTILITY(U,$J,358.3,11493,2)
 ;;=^332763
 ;;^UTILITY(U,$J,358.3,11494,0)
 ;;=J01.90^^48^521^6
 ;;^UTILITY(U,$J,358.3,11494,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11494,1,3,0)
 ;;=3^Acute Sinusitis,Unspec
 ;;^UTILITY(U,$J,358.3,11494,1,4,0)
 ;;=4^J01.90
 ;;^UTILITY(U,$J,358.3,11494,2)
 ;;=^5008127
 ;;^UTILITY(U,$J,358.3,11495,0)
 ;;=J02.9^^48^521^4
 ;;^UTILITY(U,$J,358.3,11495,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11495,1,3,0)
 ;;=3^Acute Pharyngitis,Unspec
 ;;^UTILITY(U,$J,358.3,11495,1,4,0)
 ;;=4^J02.9
 ;;^UTILITY(U,$J,358.3,11495,2)
 ;;=^5008130
 ;;^UTILITY(U,$J,358.3,11496,0)
 ;;=J06.9^^48^521^7
 ;;^UTILITY(U,$J,358.3,11496,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11496,1,3,0)
 ;;=3^Acute URI,Unspec
 ;;^UTILITY(U,$J,358.3,11496,1,4,0)
 ;;=4^J06.9
 ;;^UTILITY(U,$J,358.3,11496,2)
 ;;=^5008143
 ;;^UTILITY(U,$J,358.3,11497,0)
 ;;=J20.9^^48^521^2
 ;;^UTILITY(U,$J,358.3,11497,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11497,1,3,0)
 ;;=3^Acute Bronchitis,Unspec
 ;;^UTILITY(U,$J,358.3,11497,1,4,0)
 ;;=4^J20.9
 ;;^UTILITY(U,$J,358.3,11497,2)
 ;;=^5008195
 ;;^UTILITY(U,$J,358.3,11498,0)
 ;;=J32.9^^48^521^11
 ;;^UTILITY(U,$J,358.3,11498,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11498,1,3,0)
 ;;=3^Chr Sinusitis,Unspec
 ;;^UTILITY(U,$J,358.3,11498,1,4,0)
 ;;=4^J32.9
 ;;^UTILITY(U,$J,358.3,11498,2)
 ;;=^5008207
 ;;^UTILITY(U,$J,358.3,11499,0)
 ;;=J41.0^^48^521^9
 ;;^UTILITY(U,$J,358.3,11499,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11499,1,3,0)
 ;;=3^Bronchitis,Simple Chr
 ;;^UTILITY(U,$J,358.3,11499,1,4,0)
 ;;=4^J41.0
 ;;^UTILITY(U,$J,358.3,11499,2)
 ;;=^269946
 ;;^UTILITY(U,$J,358.3,11500,0)
 ;;=J45.909^^48^521^8
 ;;^UTILITY(U,$J,358.3,11500,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11500,1,3,0)
 ;;=3^Asthma,Uncomplicated,Unspec
 ;;^UTILITY(U,$J,358.3,11500,1,4,0)
 ;;=4^J45.909
 ;;^UTILITY(U,$J,358.3,11500,2)
 ;;=^5008256
 ;;^UTILITY(U,$J,358.3,11501,0)
 ;;=J44.9^^48^521^10
 ;;^UTILITY(U,$J,358.3,11501,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11501,1,3,0)
 ;;=3^COPD,Unspec
 ;;^UTILITY(U,$J,358.3,11501,1,4,0)
 ;;=4^J44.9
 ;;^UTILITY(U,$J,358.3,11501,2)
 ;;=^5008241
 ;;^UTILITY(U,$J,358.3,11502,0)
 ;;=J91.8^^48^521^15
 ;;^UTILITY(U,$J,358.3,11502,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,11502,1,3,0)
 ;;=3^Pleural Effusion,Classified Elsewhere
 ;;^UTILITY(U,$J,358.3,11502,1,4,0)
 ;;=4^J91.8