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

IBDEI0F4.m

Go to the documentation of this file.
IBDEI0F4 ; ; 03-MAY-2022
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 2022
 Q:'DIFQR(358.3)  F I=1:2 S X=$T(Q+I) Q:X=""  S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E  S @X=Y
Q Q
 ;;^UTILITY(U,$J,358.3,37808,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37808,1,3,0)
 ;;=3^Meralgia Paresthetica,Left Lower Limb
 ;;^UTILITY(U,$J,358.3,37808,1,4,0)
 ;;=4^G57.12
 ;;^UTILITY(U,$J,358.3,37808,2)
 ;;=^5004043
 ;;^UTILITY(U,$J,358.3,37809,0)
 ;;=G57.11^^107^1494^25
 ;;^UTILITY(U,$J,358.3,37809,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37809,1,3,0)
 ;;=3^Meralgia Paresthetica,Right Lower Limb
 ;;^UTILITY(U,$J,358.3,37809,1,4,0)
 ;;=4^G57.11
 ;;^UTILITY(U,$J,358.3,37809,2)
 ;;=^5004042
 ;;^UTILITY(U,$J,358.3,37810,0)
 ;;=G60.8^^107^1494^33
 ;;^UTILITY(U,$J,358.3,37810,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37810,1,3,0)
 ;;=3^Neuropathies,Oth Hereditary and Idiopathic
 ;;^UTILITY(U,$J,358.3,37810,1,4,0)
 ;;=4^G60.8
 ;;^UTILITY(U,$J,358.3,37810,2)
 ;;=^5004070
 ;;^UTILITY(U,$J,358.3,37811,0)
 ;;=G60.9^^107^1494^34
 ;;^UTILITY(U,$J,358.3,37811,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37811,1,3,0)
 ;;=3^Neuropathy,Hereditary and Idiopathic Unspec
 ;;^UTILITY(U,$J,358.3,37811,1,4,0)
 ;;=4^G60.9
 ;;^UTILITY(U,$J,358.3,37811,2)
 ;;=^5004071
 ;;^UTILITY(U,$J,358.3,37812,0)
 ;;=I69.959^^107^1494^19
 ;;^UTILITY(U,$J,358.3,37812,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37812,1,3,0)
 ;;=3^Hemplg/Hemprs d/t Cerebvasc Diz Aff Unspec Side
 ;;^UTILITY(U,$J,358.3,37812,1,4,0)
 ;;=4^I69.959
 ;;^UTILITY(U,$J,358.3,37812,2)
 ;;=^5007563
 ;;^UTILITY(U,$J,358.3,37813,0)
 ;;=I69.359^^107^1494^20
 ;;^UTILITY(U,$J,358.3,37813,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37813,1,3,0)
 ;;=3^Hemplg/Hemprs d/t Cerebvasc Infrc Aff Unspec Side
 ;;^UTILITY(U,$J,358.3,37813,1,4,0)
 ;;=4^I69.359
 ;;^UTILITY(U,$J,358.3,37813,2)
 ;;=^5007508
 ;;^UTILITY(U,$J,358.3,37814,0)
 ;;=S14.109S^^107^1494^40
 ;;^UTILITY(U,$J,358.3,37814,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37814,1,3,0)
 ;;=3^Sequela of Unspec Injury to Cervical Spinal Cord
 ;;^UTILITY(U,$J,358.3,37814,1,4,0)
 ;;=4^S14.109S
 ;;^UTILITY(U,$J,358.3,37814,2)
 ;;=^5134243
 ;;^UTILITY(U,$J,358.3,37815,0)
 ;;=S34.109S^^107^1494^41
 ;;^UTILITY(U,$J,358.3,37815,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37815,1,3,0)
 ;;=3^Sequela of Unspec Injury to Lumbar Spinal Cord
 ;;^UTILITY(U,$J,358.3,37815,1,4,0)
 ;;=4^S34.109S
 ;;^UTILITY(U,$J,358.3,37815,2)
 ;;=^5134570
 ;;^UTILITY(U,$J,358.3,37816,0)
 ;;=S24.109S^^107^1494^42
 ;;^UTILITY(U,$J,358.3,37816,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37816,1,3,0)
 ;;=3^Sequela of Unspec Injury to Thoracic Spinal Cord
 ;;^UTILITY(U,$J,358.3,37816,1,4,0)
 ;;=4^S24.109S
 ;;^UTILITY(U,$J,358.3,37816,2)
 ;;=^5134384
 ;;^UTILITY(U,$J,358.3,37817,0)
 ;;=I69.393^^107^1494^5
 ;;^UTILITY(U,$J,358.3,37817,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37817,1,3,0)
 ;;=3^Ataxia following Cerebral Infarction
 ;;^UTILITY(U,$J,358.3,37817,1,4,0)
 ;;=4^I69.393
 ;;^UTILITY(U,$J,358.3,37817,2)
 ;;=^5007518
 ;;^UTILITY(U,$J,358.3,37818,0)
 ;;=G89.0^^107^1495^1
 ;;^UTILITY(U,$J,358.3,37818,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37818,1,3,0)
 ;;=3^Central Pain Syndrome
 ;;^UTILITY(U,$J,358.3,37818,1,4,0)
 ;;=4^G89.0
 ;;^UTILITY(U,$J,358.3,37818,2)
 ;;=^334189
 ;;^UTILITY(U,$J,358.3,37819,0)
 ;;=G89.11^^107^1495^11
 ;;^UTILITY(U,$J,358.3,37819,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37819,1,3,0)
 ;;=3^Pain d/t Trauma,Acute
 ;;^UTILITY(U,$J,358.3,37819,1,4,0)
 ;;=4^G89.11
 ;;^UTILITY(U,$J,358.3,37819,2)
 ;;=^5004152
 ;;^UTILITY(U,$J,358.3,37820,0)
 ;;=G89.12^^107^1495^15
 ;;^UTILITY(U,$J,358.3,37820,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37820,1,3,0)
 ;;=3^Post-Thoracotomy Pain,Acute
 ;;^UTILITY(U,$J,358.3,37820,1,4,0)
 ;;=4^G89.12
 ;;^UTILITY(U,$J,358.3,37820,2)
 ;;=^5004153
 ;;^UTILITY(U,$J,358.3,37821,0)
 ;;=G89.18^^107^1495^17
 ;;^UTILITY(U,$J,358.3,37821,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37821,1,3,0)
 ;;=3^Postprocedural Pain,Oth Acute
 ;;^UTILITY(U,$J,358.3,37821,1,4,0)
 ;;=4^G89.18
 ;;^UTILITY(U,$J,358.3,37821,2)
 ;;=^5004154
 ;;^UTILITY(U,$J,358.3,37822,0)
 ;;=R52.^^107^1495^13
 ;;^UTILITY(U,$J,358.3,37822,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37822,1,3,0)
 ;;=3^Pain,Unspec
 ;;^UTILITY(U,$J,358.3,37822,1,4,0)
 ;;=4^R52.
 ;;^UTILITY(U,$J,358.3,37822,2)
 ;;=^5019514
 ;;^UTILITY(U,$J,358.3,37823,0)
 ;;=G89.21^^107^1495^12
 ;;^UTILITY(U,$J,358.3,37823,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37823,1,3,0)
 ;;=3^Pain d/t Trauma,Chronic
 ;;^UTILITY(U,$J,358.3,37823,1,4,0)
 ;;=4^G89.21
 ;;^UTILITY(U,$J,358.3,37823,2)
 ;;=^5004155
 ;;^UTILITY(U,$J,358.3,37824,0)
 ;;=G89.22^^107^1495^16
 ;;^UTILITY(U,$J,358.3,37824,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37824,1,3,0)
 ;;=3^Post-Thoracotomy Pain,Chronic
 ;;^UTILITY(U,$J,358.3,37824,1,4,0)
 ;;=4^G89.22
 ;;^UTILITY(U,$J,358.3,37824,2)
 ;;=^5004156
 ;;^UTILITY(U,$J,358.3,37825,0)
 ;;=G89.28^^107^1495^18
 ;;^UTILITY(U,$J,358.3,37825,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37825,1,3,0)
 ;;=3^Postprocedural Pain,Oth Chronic
 ;;^UTILITY(U,$J,358.3,37825,1,4,0)
 ;;=4^G89.28
 ;;^UTILITY(U,$J,358.3,37825,2)
 ;;=^5004157
 ;;^UTILITY(U,$J,358.3,37826,0)
 ;;=G89.3^^107^1495^10
 ;;^UTILITY(U,$J,358.3,37826,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37826,1,3,0)
 ;;=3^Neoplasm Related Pain,Acute/Chronic
 ;;^UTILITY(U,$J,358.3,37826,1,4,0)
 ;;=4^G89.3
 ;;^UTILITY(U,$J,358.3,37826,2)
 ;;=^5004159
 ;;^UTILITY(U,$J,358.3,37827,0)
 ;;=G89.4^^107^1495^2
 ;;^UTILITY(U,$J,358.3,37827,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37827,1,3,0)
 ;;=3^Chronic Pain Syndrome
 ;;^UTILITY(U,$J,358.3,37827,1,4,0)
 ;;=4^G89.4
 ;;^UTILITY(U,$J,358.3,37827,2)
 ;;=^334079
 ;;^UTILITY(U,$J,358.3,37828,0)
 ;;=M27.0^^107^1495^3
 ;;^UTILITY(U,$J,358.3,37828,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37828,1,3,0)
 ;;=3^Developmental Disorder of Jaws
 ;;^UTILITY(U,$J,358.3,37828,1,4,0)
 ;;=4^M27.0
 ;;^UTILITY(U,$J,358.3,37828,2)
 ;;=^5011722
 ;;^UTILITY(U,$J,358.3,37829,0)
 ;;=M27.9^^107^1495^4
 ;;^UTILITY(U,$J,358.3,37829,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37829,1,3,0)
 ;;=3^Disease of Jaws,Unspec
 ;;^UTILITY(U,$J,358.3,37829,1,4,0)
 ;;=4^M27.9
 ;;^UTILITY(U,$J,358.3,37829,2)
 ;;=^5011737
 ;;^UTILITY(U,$J,358.3,37830,0)
 ;;=R68.84^^107^1495^8
 ;;^UTILITY(U,$J,358.3,37830,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37830,1,3,0)
 ;;=3^Jaw Pain
 ;;^UTILITY(U,$J,358.3,37830,1,4,0)
 ;;=4^R68.84
 ;;^UTILITY(U,$J,358.3,37830,2)
 ;;=^5019556
 ;;^UTILITY(U,$J,358.3,37831,0)
 ;;=N48.9^^107^1495^6
 ;;^UTILITY(U,$J,358.3,37831,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37831,1,3,0)
 ;;=3^Disorder of Penis,Unspec
 ;;^UTILITY(U,$J,358.3,37831,1,4,0)
 ;;=4^N48.9
 ;;^UTILITY(U,$J,358.3,37831,2)
 ;;=^5015743
 ;;^UTILITY(U,$J,358.3,37832,0)
 ;;=N50.9^^107^1495^5
 ;;^UTILITY(U,$J,358.3,37832,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37832,1,3,0)
 ;;=3^Disorder of Male Genital Organs,Unspec
 ;;^UTILITY(U,$J,358.3,37832,1,4,0)
 ;;=4^N50.9
 ;;^UTILITY(U,$J,358.3,37832,2)
 ;;=^5015751
 ;;^UTILITY(U,$J,358.3,37833,0)
 ;;=R10.2^^107^1495^14
 ;;^UTILITY(U,$J,358.3,37833,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37833,1,3,0)
 ;;=3^Pelvic/Perineal Pain
 ;;^UTILITY(U,$J,358.3,37833,1,4,0)
 ;;=4^R10.2
 ;;^UTILITY(U,$J,358.3,37833,2)
 ;;=^5019209
 ;;^UTILITY(U,$J,358.3,37834,0)
 ;;=N94.89^^107^1495^7
 ;;^UTILITY(U,$J,358.3,37834,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37834,1,3,0)
 ;;=3^Female Genital Organs/Menstrual Cycle,Oth Cond
 ;;^UTILITY(U,$J,358.3,37834,1,4,0)
 ;;=4^N94.89
 ;;^UTILITY(U,$J,358.3,37834,2)
 ;;=^5015925
 ;;^UTILITY(U,$J,358.3,37835,0)
 ;;=N23.^^107^1495^19
 ;;^UTILITY(U,$J,358.3,37835,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37835,1,3,0)
 ;;=3^Renal Colic,Unspec
 ;;^UTILITY(U,$J,358.3,37835,1,4,0)
 ;;=4^N23.
 ;;^UTILITY(U,$J,358.3,37835,2)
 ;;=^5015615
 ;;^UTILITY(U,$J,358.3,37836,0)
 ;;=Z79.891^^107^1495^9
 ;;^UTILITY(U,$J,358.3,37836,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37836,1,3,0)
 ;;=3^Long Term Opiate/Opioid Analgesic Use
 ;;^UTILITY(U,$J,358.3,37836,1,4,0)
 ;;=4^Z79.891
 ;;^UTILITY(U,$J,358.3,37836,2)
 ;;=^5063342
 ;;^UTILITY(U,$J,358.3,37837,0)
 ;;=Z71.89^^107^1496^1
 ;;^UTILITY(U,$J,358.3,37837,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37837,1,3,0)
 ;;=3^Activity/Exercise Counseling
 ;;^UTILITY(U,$J,358.3,37837,1,4,0)
 ;;=4^Z71.89
 ;;^UTILITY(U,$J,358.3,37837,2)
 ;;=^5063253
 ;;^UTILITY(U,$J,358.3,37838,0)
 ;;=Z13.89^^107^1496^2
 ;;^UTILITY(U,$J,358.3,37838,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37838,1,3,0)
 ;;=3^Alcohol Use Screen
 ;;^UTILITY(U,$J,358.3,37838,1,4,0)
 ;;=4^Z13.89
 ;;^UTILITY(U,$J,358.3,37838,2)
 ;;=^5062720
 ;;^UTILITY(U,$J,358.3,37839,0)
 ;;=Z12.39^^107^1496^3
 ;;^UTILITY(U,$J,358.3,37839,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37839,1,3,0)
 ;;=3^Breast Malignant Neoplasm Screen
 ;;^UTILITY(U,$J,358.3,37839,1,4,0)
 ;;=4^Z12.39
 ;;^UTILITY(U,$J,358.3,37839,2)
 ;;=^5062686
 ;;^UTILITY(U,$J,358.3,37840,0)
 ;;=Z12.4^^107^1496^5
 ;;^UTILITY(U,$J,358.3,37840,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37840,1,3,0)
 ;;=3^Cervix Malignant Neoplasm Screen
 ;;^UTILITY(U,$J,358.3,37840,1,4,0)
 ;;=4^Z12.4
 ;;^UTILITY(U,$J,358.3,37840,2)
 ;;=^5062687
 ;;^UTILITY(U,$J,358.3,37841,0)
 ;;=Z13.5^^107^1496^8
 ;;^UTILITY(U,$J,358.3,37841,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37841,1,3,0)
 ;;=3^Eye and Ear Disorder Screen
 ;;^UTILITY(U,$J,358.3,37841,1,4,0)
 ;;=4^Z13.5
 ;;^UTILITY(U,$J,358.3,37841,2)
 ;;=^5062706
 ;;^UTILITY(U,$J,358.3,37842,0)
 ;;=Z01.89^^107^1496^6
 ;;^UTILITY(U,$J,358.3,37842,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37842,1,3,0)
 ;;=3^Diabetic Foot Exam
 ;;^UTILITY(U,$J,358.3,37842,1,4,0)
 ;;=4^Z01.89
 ;;^UTILITY(U,$J,358.3,37842,2)
 ;;=^5062632
 ;;^UTILITY(U,$J,358.3,37843,0)
 ;;=Z11.59^^107^1496^17
 ;;^UTILITY(U,$J,358.3,37843,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37843,1,3,0)
 ;;=3^Viral Diseases Screen
 ;;^UTILITY(U,$J,358.3,37843,1,4,0)
 ;;=4^Z11.59
 ;;^UTILITY(U,$J,358.3,37843,2)
 ;;=^5062675
 ;;^UTILITY(U,$J,358.3,37844,0)
 ;;=Z13.6^^107^1496^4
 ;;^UTILITY(U,$J,358.3,37844,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37844,1,3,0)
 ;;=3^Cardiovascular Disorder Screen
 ;;^UTILITY(U,$J,358.3,37844,1,4,0)
 ;;=4^Z13.6
 ;;^UTILITY(U,$J,358.3,37844,2)
 ;;=^5062707
 ;;^UTILITY(U,$J,358.3,37845,0)
 ;;=Z12.12^^107^1496^15
 ;;^UTILITY(U,$J,358.3,37845,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37845,1,3,0)
 ;;=3^Rectum Malignant Neoplasm Screen
 ;;^UTILITY(U,$J,358.3,37845,1,4,0)
 ;;=4^Z12.12
 ;;^UTILITY(U,$J,358.3,37845,2)
 ;;=^5062682
 ;;^UTILITY(U,$J,358.3,37846,0)
 ;;=Z71.89^^107^1496^13
 ;;^UTILITY(U,$J,358.3,37846,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37846,1,3,0)
 ;;=3^Other Specified Counseling
 ;;^UTILITY(U,$J,358.3,37846,1,4,0)
 ;;=4^Z71.89
 ;;^UTILITY(U,$J,358.3,37846,2)
 ;;=^5063253
 ;;^UTILITY(U,$J,358.3,37847,0)
 ;;=Z12.5^^107^1496^14
 ;;^UTILITY(U,$J,358.3,37847,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37847,1,3,0)
 ;;=3^Prostate Malignant Neoplasm Screen
 ;;^UTILITY(U,$J,358.3,37847,1,4,0)
 ;;=4^Z12.5
 ;;^UTILITY(U,$J,358.3,37847,2)
 ;;=^5062688
 ;;^UTILITY(U,$J,358.3,37848,0)
 ;;=Z00.00^^107^1496^10
 ;;^UTILITY(U,$J,358.3,37848,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37848,1,3,0)
 ;;=3^General Adult Medical Exam w/o Abnormal Findings
 ;;^UTILITY(U,$J,358.3,37848,1,4,0)
 ;;=4^Z00.00
 ;;^UTILITY(U,$J,358.3,37848,2)
 ;;=^5062599
 ;;^UTILITY(U,$J,358.3,37849,0)
 ;;=Z02.79^^107^1496^12
 ;;^UTILITY(U,$J,358.3,37849,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37849,1,3,0)
 ;;=3^Medical Certificate Encounter
 ;;^UTILITY(U,$J,358.3,37849,1,4,0)
 ;;=4^Z02.79
 ;;^UTILITY(U,$J,358.3,37849,2)
 ;;=^5062641
 ;;^UTILITY(U,$J,358.3,37850,0)
 ;;=Z71.3^^107^1496^7
 ;;^UTILITY(U,$J,358.3,37850,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37850,1,3,0)
 ;;=3^Dietary Counseling
 ;;^UTILITY(U,$J,358.3,37850,1,4,0)
 ;;=4^Z71.3
 ;;^UTILITY(U,$J,358.3,37850,2)
 ;;=^5063245
 ;;^UTILITY(U,$J,358.3,37851,0)
 ;;=Z71.7^^107^1496^11
 ;;^UTILITY(U,$J,358.3,37851,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37851,1,3,0)
 ;;=3^HIV Counseling
 ;;^UTILITY(U,$J,358.3,37851,1,4,0)
 ;;=4^Z71.7
 ;;^UTILITY(U,$J,358.3,37851,2)
 ;;=^5063251
 ;;^UTILITY(U,$J,358.3,37852,0)
 ;;=Z71.6^^107^1496^16
 ;;^UTILITY(U,$J,358.3,37852,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37852,1,3,0)
 ;;=3^Tobacco Abuse Counseling
 ;;^UTILITY(U,$J,358.3,37852,1,4,0)
 ;;=4^Z71.6
 ;;^UTILITY(U,$J,358.3,37852,2)
 ;;=^5063250
 ;;^UTILITY(U,$J,358.3,37853,0)
 ;;=Z00.01^^107^1496^9
 ;;^UTILITY(U,$J,358.3,37853,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37853,1,3,0)
 ;;=3^General Adult Medical Exam w/ Abnormal Findings
 ;;^UTILITY(U,$J,358.3,37853,1,4,0)
 ;;=4^Z00.01
 ;;^UTILITY(U,$J,358.3,37853,2)
 ;;=^5062600
 ;;^UTILITY(U,$J,358.3,37854,0)
 ;;=D86.0^^107^1497^49
 ;;^UTILITY(U,$J,358.3,37854,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37854,1,3,0)
 ;;=3^Sarcoidosis of Lung
 ;;^UTILITY(U,$J,358.3,37854,1,4,0)
 ;;=4^D86.0
 ;;^UTILITY(U,$J,358.3,37854,2)
 ;;=^5002442
 ;;^UTILITY(U,$J,358.3,37855,0)
 ;;=D86.1^^107^1497^51
 ;;^UTILITY(U,$J,358.3,37855,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37855,1,3,0)
 ;;=3^Sarcoidosis of Lymph nodes
 ;;^UTILITY(U,$J,358.3,37855,1,4,0)
 ;;=4^D86.1
 ;;^UTILITY(U,$J,358.3,37855,2)
 ;;=^5002443
 ;;^UTILITY(U,$J,358.3,37856,0)
 ;;=D86.2^^107^1497^50
 ;;^UTILITY(U,$J,358.3,37856,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37856,1,3,0)
 ;;=3^Sarcoidosis of Lung w/ Sarcoidosis of Lymph Nodes
 ;;^UTILITY(U,$J,358.3,37856,1,4,0)
 ;;=4^D86.2
 ;;^UTILITY(U,$J,358.3,37856,2)
 ;;=^5002444
 ;;^UTILITY(U,$J,358.3,37857,0)
 ;;=D86.89^^107^1497^52
 ;;^UTILITY(U,$J,358.3,37857,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37857,1,3,0)
 ;;=3^Sarcoidosis of Other Sites
 ;;^UTILITY(U,$J,358.3,37857,1,4,0)
 ;;=4^D86.89
 ;;^UTILITY(U,$J,358.3,37857,2)
 ;;=^5002453
 ;;^UTILITY(U,$J,358.3,37858,0)
 ;;=D86.9^^107^1497^55
 ;;^UTILITY(U,$J,358.3,37858,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37858,1,3,0)
 ;;=3^Sarcoidosis,Unspec
 ;;^UTILITY(U,$J,358.3,37858,1,4,0)
 ;;=4^D86.9
 ;;^UTILITY(U,$J,358.3,37858,2)
 ;;=^5002454
 ;;^UTILITY(U,$J,358.3,37859,0)
 ;;=D86.86^^107^1497^43
 ;;^UTILITY(U,$J,358.3,37859,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37859,1,3,0)
 ;;=3^Sarcoid Arthropathy
 ;;^UTILITY(U,$J,358.3,37859,1,4,0)
 ;;=4^D86.86
 ;;^UTILITY(U,$J,358.3,37859,2)
 ;;=^5002451
 ;;^UTILITY(U,$J,358.3,37860,0)
 ;;=D86.87^^107^1497^47
 ;;^UTILITY(U,$J,358.3,37860,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37860,1,3,0)
 ;;=3^Sarcoid Myositis
 ;;^UTILITY(U,$J,358.3,37860,1,4,0)
 ;;=4^D86.87
 ;;^UTILITY(U,$J,358.3,37860,2)
 ;;=^5002452
 ;;^UTILITY(U,$J,358.3,37861,0)
 ;;=D86.3^^107^1497^53
 ;;^UTILITY(U,$J,358.3,37861,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37861,1,3,0)
 ;;=3^Sarcoidosis of Skin
 ;;^UTILITY(U,$J,358.3,37861,1,4,0)
 ;;=4^D86.3
 ;;^UTILITY(U,$J,358.3,37861,2)
 ;;=^5002445
 ;;^UTILITY(U,$J,358.3,37862,0)
 ;;=D86.81^^107^1497^45
 ;;^UTILITY(U,$J,358.3,37862,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37862,1,3,0)
 ;;=3^Sarcoid Meningitis
 ;;^UTILITY(U,$J,358.3,37862,1,4,0)
 ;;=4^D86.81
 ;;^UTILITY(U,$J,358.3,37862,2)
 ;;=^5002446
 ;;^UTILITY(U,$J,358.3,37863,0)
 ;;=D86.82^^107^1497^54
 ;;^UTILITY(U,$J,358.3,37863,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37863,1,3,0)
 ;;=3^Sarcoidosis,Multiple Cranial Nerve Palsies
 ;;^UTILITY(U,$J,358.3,37863,1,4,0)
 ;;=4^D86.82
 ;;^UTILITY(U,$J,358.3,37863,2)
 ;;=^5002447
 ;;^UTILITY(U,$J,358.3,37864,0)
 ;;=D86.84^^107^1497^48
 ;;^UTILITY(U,$J,358.3,37864,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37864,1,3,0)
 ;;=3^Sarcoid Pyelonephritis
 ;;^UTILITY(U,$J,358.3,37864,1,4,0)
 ;;=4^D86.84
 ;;^UTILITY(U,$J,358.3,37864,2)
 ;;=^5002449
 ;;^UTILITY(U,$J,358.3,37865,0)
 ;;=D86.85^^107^1497^46
 ;;^UTILITY(U,$J,358.3,37865,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37865,1,3,0)
 ;;=3^Sarcoid Myocarditis
 ;;^UTILITY(U,$J,358.3,37865,1,4,0)
 ;;=4^D86.85
 ;;^UTILITY(U,$J,358.3,37865,2)
 ;;=^5002450
 ;;^UTILITY(U,$J,358.3,37866,0)
 ;;=D86.83^^107^1497^44
 ;;^UTILITY(U,$J,358.3,37866,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37866,1,3,0)
 ;;=3^Sarcoid Iridocyclitis
 ;;^UTILITY(U,$J,358.3,37866,1,4,0)
 ;;=4^D86.83
 ;;^UTILITY(U,$J,358.3,37866,2)
 ;;=^5002448
 ;;^UTILITY(U,$J,358.3,37867,0)
 ;;=D84.1^^107^1497^20
 ;;^UTILITY(U,$J,358.3,37867,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37867,1,3,0)
 ;;=3^Defects in Complement System
 ;;^UTILITY(U,$J,358.3,37867,1,4,0)
 ;;=4^D84.1
 ;;^UTILITY(U,$J,358.3,37867,2)
 ;;=^5002439
 ;;^UTILITY(U,$J,358.3,37868,0)
 ;;=D81.810^^107^1497^5
 ;;^UTILITY(U,$J,358.3,37868,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37868,1,3,0)
 ;;=3^Biotinidase Deficiency
 ;;^UTILITY(U,$J,358.3,37868,1,4,0)
 ;;=4^D81.810
 ;;^UTILITY(U,$J,358.3,37868,2)
 ;;=^5002422
 ;;^UTILITY(U,$J,358.3,37869,0)
 ;;=E88.01^^107^1497^2
 ;;^UTILITY(U,$J,358.3,37869,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37869,1,3,0)
 ;;=3^Apha-1 Antitrypsin Deficiency
 ;;^UTILITY(U,$J,358.3,37869,1,4,0)
 ;;=4^E88.01
 ;;^UTILITY(U,$J,358.3,37869,2)
 ;;=^331442
 ;;^UTILITY(U,$J,358.3,37870,0)
 ;;=J09.X1^^107^1497^29
 ;;^UTILITY(U,$J,358.3,37870,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37870,1,3,0)
 ;;=3^Influenza d/t Indent Novel Influenza A Virus w/ Pneumonia
 ;;^UTILITY(U,$J,358.3,37870,1,4,0)
 ;;=4^J09.X1
 ;;^UTILITY(U,$J,358.3,37870,2)
 ;;=^5008144
 ;;^UTILITY(U,$J,358.3,37871,0)
 ;;=J09.X2^^107^1497^30
 ;;^UTILITY(U,$J,358.3,37871,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37871,1,3,0)
 ;;=3^Influenza d/t Indent Novel Influenza A Virus w/ Resp Manifest
 ;;^UTILITY(U,$J,358.3,37871,1,4,0)
 ;;=4^J09.X2
 ;;^UTILITY(U,$J,358.3,37871,2)
 ;;=^5008145
 ;;^UTILITY(U,$J,358.3,37872,0)
 ;;=J09.X3^^107^1497^31
 ;;^UTILITY(U,$J,358.3,37872,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37872,1,3,0)
 ;;=3^Influenza d/t Indent Novel Influenza A Virus w/ GI Manifest
 ;;^UTILITY(U,$J,358.3,37872,1,4,0)
 ;;=4^J09.X3
 ;;^UTILITY(U,$J,358.3,37872,2)
 ;;=^5008146
 ;;^UTILITY(U,$J,358.3,37873,0)
 ;;=J09.X9^^107^1497^32
 ;;^UTILITY(U,$J,358.3,37873,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37873,1,3,0)
 ;;=3^Influenza d/t Indent Novel Influenza A Virus w/ Oth Manifest
 ;;^UTILITY(U,$J,358.3,37873,1,4,0)
 ;;=4^J09.X9
 ;;^UTILITY(U,$J,358.3,37873,2)
 ;;=^5008147
 ;;^UTILITY(U,$J,358.3,37874,0)
 ;;=J44.9^^107^1497^14
 ;;^UTILITY(U,$J,358.3,37874,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37874,1,3,0)
 ;;=3^COPD,Unspec
 ;;^UTILITY(U,$J,358.3,37874,1,4,0)
 ;;=4^J44.9
 ;;^UTILITY(U,$J,358.3,37874,2)
 ;;=^5008241
 ;;^UTILITY(U,$J,358.3,37875,0)
 ;;=J44.1^^107^1497^13
 ;;^UTILITY(U,$J,358.3,37875,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37875,1,3,0)
 ;;=3^COPD w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,37875,1,4,0)
 ;;=4^J44.1
 ;;^UTILITY(U,$J,358.3,37875,2)
 ;;=^5008240
 ;;^UTILITY(U,$J,358.3,37876,0)
 ;;=J42.^^107^1497^10
 ;;^UTILITY(U,$J,358.3,37876,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,37876,1,3,0)
 ;;=3^Bronchitis,Unspec Chronic
 ;;^UTILITY(U,$J,358.3,37876,1,4,0)
 ;;=4^J42.