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

IBDEI0CW.m

Go to the documentation of this file.
  1. IBDEI0CW ; ; 03-MAY-2022
  1. ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 2022
  1. 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
  1. Q Q
  1. ;;^UTILITY(U,$J,358.3,32356,1,4,0)
  1. ;;=4^L20.89
  1. ;;^UTILITY(U,$J,358.3,32356,2)
  1. ;;=^5009112
  1. ;;^UTILITY(U,$J,358.3,32357,0)
  1. ;;=L25.9^^97^1335^15
  1. ;;^UTILITY(U,$J,358.3,32357,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32357,1,3,0)
  1. ;;=3^Contact Dermatitis,Unspec
  1. ;;^UTILITY(U,$J,358.3,32357,1,4,0)
  1. ;;=4^L25.9
  1. ;;^UTILITY(U,$J,358.3,32357,2)
  1. ;;=^5133647
  1. ;;^UTILITY(U,$J,358.3,32358,0)
  1. ;;=L40.0^^97^1335^16
  1. ;;^UTILITY(U,$J,358.3,32358,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32358,1,3,0)
  1. ;;=3^Psoriasis
  1. ;;^UTILITY(U,$J,358.3,32358,1,4,0)
  1. ;;=4^L40.0
  1. ;;^UTILITY(U,$J,358.3,32358,2)
  1. ;;=^5009160
  1. ;;^UTILITY(U,$J,358.3,32359,0)
  1. ;;=L29.9^^97^1335^17
  1. ;;^UTILITY(U,$J,358.3,32359,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32359,1,3,0)
  1. ;;=3^Pruritus
  1. ;;^UTILITY(U,$J,358.3,32359,1,4,0)
  1. ;;=4^L29.9
  1. ;;^UTILITY(U,$J,358.3,32359,2)
  1. ;;=^5009153
  1. ;;^UTILITY(U,$J,358.3,32360,0)
  1. ;;=L85.3^^97^1335^18
  1. ;;^UTILITY(U,$J,358.3,32360,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32360,1,3,0)
  1. ;;=3^Xerosis
  1. ;;^UTILITY(U,$J,358.3,32360,1,4,0)
  1. ;;=4^L85.3
  1. ;;^UTILITY(U,$J,358.3,32360,2)
  1. ;;=^5009323
  1. ;;^UTILITY(U,$J,358.3,32361,0)
  1. ;;=L30.2^^97^1335^19
  1. ;;^UTILITY(U,$J,358.3,32361,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32361,1,3,0)
  1. ;;=3^Cutaneous Autosensitization/ld
  1. ;;^UTILITY(U,$J,358.3,32361,1,4,0)
  1. ;;=4^L30.2
  1. ;;^UTILITY(U,$J,358.3,32361,2)
  1. ;;=^5009155
  1. ;;^UTILITY(U,$J,358.3,32362,0)
  1. ;;=L72.0^^97^1335^20
  1. ;;^UTILITY(U,$J,358.3,32362,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32362,1,3,0)
  1. ;;=3^Epidermal Cyst
  1. ;;^UTILITY(U,$J,358.3,32362,1,4,0)
  1. ;;=4^L72.0
  1. ;;^UTILITY(U,$J,358.3,32362,2)
  1. ;;=^5009277
  1. ;;^UTILITY(U,$J,358.3,32363,0)
  1. ;;=L73.9^^97^1335^21
  1. ;;^UTILITY(U,$J,358.3,32363,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32363,1,3,0)
  1. ;;=3^Follicular Disorder/Folliculitis
  1. ;;^UTILITY(U,$J,358.3,32363,1,4,0)
  1. ;;=4^L73.9
  1. ;;^UTILITY(U,$J,358.3,32363,2)
  1. ;;=^5009286
  1. ;;^UTILITY(U,$J,358.3,32364,0)
  1. ;;=L70.0^^97^1335^22
  1. ;;^UTILITY(U,$J,358.3,32364,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32364,1,3,0)
  1. ;;=3^Acne
  1. ;;^UTILITY(U,$J,358.3,32364,1,4,0)
  1. ;;=4^L70.0
  1. ;;^UTILITY(U,$J,358.3,32364,2)
  1. ;;=^5009268
  1. ;;^UTILITY(U,$J,358.3,32365,0)
  1. ;;=L71.8^^97^1335^23
  1. ;;^UTILITY(U,$J,358.3,32365,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32365,1,3,0)
  1. ;;=3^Rosacea
  1. ;;^UTILITY(U,$J,358.3,32365,1,4,0)
  1. ;;=4^L71.8
  1. ;;^UTILITY(U,$J,358.3,32365,2)
  1. ;;=^5009275
  1. ;;^UTILITY(U,$J,358.3,32366,0)
  1. ;;=L91.0^^97^1335^24
  1. ;;^UTILITY(U,$J,358.3,32366,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32366,1,3,0)
  1. ;;=3^Hypertrophic Scar
  1. ;;^UTILITY(U,$J,358.3,32366,1,4,0)
  1. ;;=4^L91.0
  1. ;;^UTILITY(U,$J,358.3,32366,2)
  1. ;;=^5009459
  1. ;;^UTILITY(U,$J,358.3,32367,0)
  1. ;;=L91.8^^97^1335^25
  1. ;;^UTILITY(U,$J,358.3,32367,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32367,1,3,0)
  1. ;;=3^Skin Tag/Oth Hypertrophic Disorder of Skin
  1. ;;^UTILITY(U,$J,358.3,32367,1,4,0)
  1. ;;=4^L91.8
  1. ;;^UTILITY(U,$J,358.3,32367,2)
  1. ;;=^5009460
  1. ;;^UTILITY(U,$J,358.3,32368,0)
  1. ;;=I87.2^^97^1335^26
  1. ;;^UTILITY(U,$J,358.3,32368,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32368,1,3,0)
  1. ;;=3^Stasis Dermatitis/Venous Insufficiency
  1. ;;^UTILITY(U,$J,358.3,32368,1,4,0)
  1. ;;=4^I87.2
  1. ;;^UTILITY(U,$J,358.3,32368,2)
  1. ;;=^5008047
  1. ;;^UTILITY(U,$J,358.3,32369,0)
  1. ;;=D69.8^^97^1335^27
  1. ;;^UTILITY(U,$J,358.3,32369,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32369,1,3,0)
  1. ;;=3^Purpura,Hemorrhagic Condition
  1. ;;^UTILITY(U,$J,358.3,32369,1,4,0)
  1. ;;=4^D69.8
  1. ;;^UTILITY(U,$J,358.3,32369,2)
  1. ;;=^88074
  1. ;;^UTILITY(U,$J,358.3,32370,0)
  1. ;;=L08.9^^97^1335^28
  1. ;;^UTILITY(U,$J,358.3,32370,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32370,1,3,0)
  1. ;;=3^Pyoderma
  1. ;;^UTILITY(U,$J,358.3,32370,1,4,0)
  1. ;;=4^L08.9
  1. ;;^UTILITY(U,$J,358.3,32370,2)
  1. ;;=^5009082
  1. ;;^UTILITY(U,$J,358.3,32371,0)
  1. ;;=L01.00^^97^1335^29
  1. ;;^UTILITY(U,$J,358.3,32371,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32371,1,3,0)
  1. ;;=3^Impetigo
  1. ;;^UTILITY(U,$J,358.3,32371,1,4,0)
  1. ;;=4^L01.00
  1. ;;^UTILITY(U,$J,358.3,32371,2)
  1. ;;=^5008938
  1. ;;^UTILITY(U,$J,358.3,32372,0)
  1. ;;=L03.90^^97^1335^30
  1. ;;^UTILITY(U,$J,358.3,32372,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32372,1,3,0)
  1. ;;=3^Cellulitis
  1. ;;^UTILITY(U,$J,358.3,32372,1,4,0)
  1. ;;=4^L03.90
  1. ;;^UTILITY(U,$J,358.3,32372,2)
  1. ;;=^5009067
  1. ;;^UTILITY(U,$J,358.3,32373,0)
  1. ;;=Z79.1^^97^1335^31
  1. ;;^UTILITY(U,$J,358.3,32373,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32373,1,3,0)
  1. ;;=3^Long Term Use NSAID/Oth Health Status
  1. ;;^UTILITY(U,$J,358.3,32373,1,4,0)
  1. ;;=4^Z79.1
  1. ;;^UTILITY(U,$J,358.3,32373,2)
  1. ;;=^5063332
  1. ;;^UTILITY(U,$J,358.3,32374,0)
  1. ;;=Z79.899^^97^1335^32
  1. ;;^UTILITY(U,$J,358.3,32374,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32374,1,3,0)
  1. ;;=3^Long Term Use Oth Drug
  1. ;;^UTILITY(U,$J,358.3,32374,1,4,0)
  1. ;;=4^Z79.899
  1. ;;^UTILITY(U,$J,358.3,32374,2)
  1. ;;=^5063343
  1. ;;^UTILITY(U,$J,358.3,32375,0)
  1. ;;=Z80.8^^97^1335^33
  1. ;;^UTILITY(U,$J,358.3,32375,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32375,1,3,0)
  1. ;;=3^Family Hx of Melanoma
  1. ;;^UTILITY(U,$J,358.3,32375,1,4,0)
  1. ;;=4^Z80.8
  1. ;;^UTILITY(U,$J,358.3,32375,2)
  1. ;;=^5063356
  1. ;;^UTILITY(U,$J,358.3,32376,0)
  1. ;;=Z48.817^^97^1335^34
  1. ;;^UTILITY(U,$J,358.3,32376,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32376,1,3,0)
  1. ;;=3^Surgical Aftercare Skin/Subcutaneous Tissue
  1. ;;^UTILITY(U,$J,358.3,32376,1,4,0)
  1. ;;=4^Z48.817
  1. ;;^UTILITY(U,$J,358.3,32376,2)
  1. ;;=^5063054
  1. ;;^UTILITY(U,$J,358.3,32377,0)
  1. ;;=R99.^^97^1335^35
  1. ;;^UTILITY(U,$J,358.3,32377,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32377,1,3,0)
  1. ;;=3^Dead Unknown Mortality
  1. ;;^UTILITY(U,$J,358.3,32377,1,4,0)
  1. ;;=4^R99.
  1. ;;^UTILITY(U,$J,358.3,32377,2)
  1. ;;=^5019750
  1. ;;^UTILITY(U,$J,358.3,32378,0)
  1. ;;=Z85.9^^97^1335^36
  1. ;;^UTILITY(U,$J,358.3,32378,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32378,1,3,0)
  1. ;;=3^Personal Hx of Unspec Neoplasm/Cancer
  1. ;;^UTILITY(U,$J,358.3,32378,1,4,0)
  1. ;;=4^Z85.9
  1. ;;^UTILITY(U,$J,358.3,32378,2)
  1. ;;=^5063452
  1. ;;^UTILITY(U,$J,358.3,32379,0)
  1. ;;=C79.9^^97^1335^37
  1. ;;^UTILITY(U,$J,358.3,32379,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32379,1,3,0)
  1. ;;=3^Metastatic Cancer Unspec
  1. ;;^UTILITY(U,$J,358.3,32379,1,4,0)
  1. ;;=4^C79.9
  1. ;;^UTILITY(U,$J,358.3,32379,2)
  1. ;;=^5133344
  1. ;;^UTILITY(U,$J,358.3,32380,0)
  1. ;;=Q3014^^98^1336^1^^^^1
  1. ;;^UTILITY(U,$J,358.3,32380,1,0)
  1. ;;=^358.31IA^3^2
  1. ;;^UTILITY(U,$J,358.3,32380,1,2,0)
  1. ;;=2^Q3014
  1. ;;^UTILITY(U,$J,358.3,32380,1,3,0)
  1. ;;=3^Telehealth Fac Fee-Pt Site
  1. ;;^UTILITY(U,$J,358.3,32381,0)
  1. ;;=B19.10^^99^1337^1
  1. ;;^UTILITY(U,$J,358.3,32381,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32381,1,3,0)
  1. ;;=3^Hepatitis B w/o Hepatic Coma
  1. ;;^UTILITY(U,$J,358.3,32381,1,4,0)
  1. ;;=4^B19.10
  1. ;;^UTILITY(U,$J,358.3,32381,2)
  1. ;;=^5000552
  1. ;;^UTILITY(U,$J,358.3,32382,0)
  1. ;;=B17.10^^99^1337^2
  1. ;;^UTILITY(U,$J,358.3,32382,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32382,1,3,0)
  1. ;;=3^Hepatitis C w/o Hepatic Coma,Acute
  1. ;;^UTILITY(U,$J,358.3,32382,1,4,0)
  1. ;;=4^B17.10
  1. ;;^UTILITY(U,$J,358.3,32382,2)
  1. ;;=^5000542
  1. ;;^UTILITY(U,$J,358.3,32383,0)
  1. ;;=B18.2^^99^1337^3
  1. ;;^UTILITY(U,$J,358.3,32383,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32383,1,3,0)
  1. ;;=3^Hepatitis C,Chr
  1. ;;^UTILITY(U,$J,358.3,32383,1,4,0)
  1. ;;=4^B18.2
  1. ;;^UTILITY(U,$J,358.3,32383,2)
  1. ;;=^5000548
  1. ;;^UTILITY(U,$J,358.3,32384,0)
  1. ;;=B35.6^^99^1337^4
  1. ;;^UTILITY(U,$J,358.3,32384,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32384,1,3,0)
  1. ;;=3^Tinea Cruris
  1. ;;^UTILITY(U,$J,358.3,32384,1,4,0)
  1. ;;=4^B35.6
  1. ;;^UTILITY(U,$J,358.3,32384,2)
  1. ;;=^119711
  1. ;;^UTILITY(U,$J,358.3,32385,0)
  1. ;;=B35.3^^99^1337^5
  1. ;;^UTILITY(U,$J,358.3,32385,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32385,1,3,0)
  1. ;;=3^Tinea Pedis
  1. ;;^UTILITY(U,$J,358.3,32385,1,4,0)
  1. ;;=4^B35.3
  1. ;;^UTILITY(U,$J,358.3,32385,2)
  1. ;;=^119732
  1. ;;^UTILITY(U,$J,358.3,32386,0)
  1. ;;=B97.89^^99^1337^6
  1. ;;^UTILITY(U,$J,358.3,32386,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32386,1,3,0)
  1. ;;=3^Viral Agents as the Cause of Diseases Classified Elsewhere
  1. ;;^UTILITY(U,$J,358.3,32386,1,4,0)
  1. ;;=4^B97.89
  1. ;;^UTILITY(U,$J,358.3,32386,2)
  1. ;;=^5000879
  1. ;;^UTILITY(U,$J,358.3,32387,0)
  1. ;;=B02.9^^99^1337^7
  1. ;;^UTILITY(U,$J,358.3,32387,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32387,1,3,0)
  1. ;;=3^Zoster w/o Complications
  1. ;;^UTILITY(U,$J,358.3,32387,1,4,0)
  1. ;;=4^B02.9
  1. ;;^UTILITY(U,$J,358.3,32387,2)
  1. ;;=^5000501
  1. ;;^UTILITY(U,$J,358.3,32388,0)
  1. ;;=C44.91^^99^1338^1
  1. ;;^UTILITY(U,$J,358.3,32388,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32388,1,3,0)
  1. ;;=3^Basal cell carcinoma of skin, unspecified
  1. ;;^UTILITY(U,$J,358.3,32388,1,4,0)
  1. ;;=4^C44.91
  1. ;;^UTILITY(U,$J,358.3,32388,2)
  1. ;;=^5001092
  1. ;;^UTILITY(U,$J,358.3,32389,0)
  1. ;;=D17.9^^99^1338^2
  1. ;;^UTILITY(U,$J,358.3,32389,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32389,1,3,0)
  1. ;;=3^Benign lipomatous neoplasm, unspecified
  1. ;;^UTILITY(U,$J,358.3,32389,1,4,0)
  1. ;;=4^D17.9
  1. ;;^UTILITY(U,$J,358.3,32389,2)
  1. ;;=^5002020
  1. ;;^UTILITY(U,$J,358.3,32390,0)
  1. ;;=C67.9^^99^1338^3
  1. ;;^UTILITY(U,$J,358.3,32390,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32390,1,3,0)
  1. ;;=3^Malignant neoplasm of bladder, unspecified
  1. ;;^UTILITY(U,$J,358.3,32390,1,4,0)
  1. ;;=4^C67.9
  1. ;;^UTILITY(U,$J,358.3,32390,2)
  1. ;;=^5001263
  1. ;;^UTILITY(U,$J,358.3,32391,0)
  1. ;;=C18.9^^99^1338^4
  1. ;;^UTILITY(U,$J,358.3,32391,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32391,1,3,0)
  1. ;;=3^Malignant neoplasm of colon, unspecified
  1. ;;^UTILITY(U,$J,358.3,32391,1,4,0)
  1. ;;=4^C18.9
  1. ;;^UTILITY(U,$J,358.3,32391,2)
  1. ;;=^5000929
  1. ;;^UTILITY(U,$J,358.3,32392,0)
  1. ;;=C15.9^^99^1338^5
  1. ;;^UTILITY(U,$J,358.3,32392,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32392,1,3,0)
  1. ;;=3^Malignant neoplasm of esophagus, unspecified
  1. ;;^UTILITY(U,$J,358.3,32392,1,4,0)
  1. ;;=4^C15.9
  1. ;;^UTILITY(U,$J,358.3,32392,2)
  1. ;;=^5000919
  1. ;;^UTILITY(U,$J,358.3,32393,0)
  1. ;;=C32.9^^99^1338^6
  1. ;;^UTILITY(U,$J,358.3,32393,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32393,1,3,0)
  1. ;;=3^Malignant neoplasm of larynx, unspecified
  1. ;;^UTILITY(U,$J,358.3,32393,1,4,0)
  1. ;;=4^C32.9
  1. ;;^UTILITY(U,$J,358.3,32393,2)
  1. ;;=^5000956
  1. ;;^UTILITY(U,$J,358.3,32394,0)
  1. ;;=C34.92^^99^1338^7
  1. ;;^UTILITY(U,$J,358.3,32394,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32394,1,3,0)
  1. ;;=3^Malignant neoplasm of left bronchus/lung,unspec part
  1. ;;^UTILITY(U,$J,358.3,32394,1,4,0)
  1. ;;=4^C34.92
  1. ;;^UTILITY(U,$J,358.3,32394,2)
  1. ;;=^5000968
  1. ;;^UTILITY(U,$J,358.3,32395,0)
  1. ;;=C50.912^^99^1338^8
  1. ;;^UTILITY(U,$J,358.3,32395,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32395,1,3,0)
  1. ;;=3^Malignant neoplasm of left female breast,unspec site
  1. ;;^UTILITY(U,$J,358.3,32395,1,4,0)
  1. ;;=4^C50.912
  1. ;;^UTILITY(U,$J,358.3,32395,2)
  1. ;;=^5001196
  1. ;;^UTILITY(U,$J,358.3,32396,0)
  1. ;;=C64.2^^99^1338^9
  1. ;;^UTILITY(U,$J,358.3,32396,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32396,1,3,0)
  1. ;;=3^Malignant neoplasm of left kidney, except renal pelvis
  1. ;;^UTILITY(U,$J,358.3,32396,1,4,0)
  1. ;;=4^C64.2
  1. ;;^UTILITY(U,$J,358.3,32396,2)
  1. ;;=^5001249
  1. ;;^UTILITY(U,$J,358.3,32397,0)
  1. ;;=C61.^^99^1338^10
  1. ;;^UTILITY(U,$J,358.3,32397,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32397,1,3,0)
  1. ;;=3^Malignant neoplasm of prostate
  1. ;;^UTILITY(U,$J,358.3,32397,1,4,0)
  1. ;;=4^C61.
  1. ;;^UTILITY(U,$J,358.3,32397,2)
  1. ;;=^267239
  1. ;;^UTILITY(U,$J,358.3,32398,0)
  1. ;;=C34.91^^99^1338^11
  1. ;;^UTILITY(U,$J,358.3,32398,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32398,1,3,0)
  1. ;;=3^Malignant neoplasm of right bronchus/lung,unspec part
  1. ;;^UTILITY(U,$J,358.3,32398,1,4,0)
  1. ;;=4^C34.91
  1. ;;^UTILITY(U,$J,358.3,32398,2)
  1. ;;=^5000967
  1. ;;^UTILITY(U,$J,358.3,32399,0)
  1. ;;=C50.911^^99^1338^12
  1. ;;^UTILITY(U,$J,358.3,32399,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32399,1,3,0)
  1. ;;=3^Malignant neoplasm of right female breast,unspec site
  1. ;;^UTILITY(U,$J,358.3,32399,1,4,0)
  1. ;;=4^C50.911
  1. ;;^UTILITY(U,$J,358.3,32399,2)
  1. ;;=^5001195
  1. ;;^UTILITY(U,$J,358.3,32400,0)
  1. ;;=C64.1^^99^1338^13
  1. ;;^UTILITY(U,$J,358.3,32400,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32400,1,3,0)
  1. ;;=3^Malignant neoplasm of right kidney, except renal pelvis
  1. ;;^UTILITY(U,$J,358.3,32400,1,4,0)
  1. ;;=4^C64.1
  1. ;;^UTILITY(U,$J,358.3,32400,2)
  1. ;;=^5001248
  1. ;;^UTILITY(U,$J,358.3,32401,0)
  1. ;;=C44.99^^99^1338^14
  1. ;;^UTILITY(U,$J,358.3,32401,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32401,1,3,0)
  1. ;;=3^Malignant neoplasm of skin,Oth Spec
  1. ;;^UTILITY(U,$J,358.3,32401,1,4,0)
  1. ;;=4^C44.99
  1. ;;^UTILITY(U,$J,358.3,32401,2)
  1. ;;=^5001094
  1. ;;^UTILITY(U,$J,358.3,32402,0)
  1. ;;=C79.51^^99^1338^15
  1. ;;^UTILITY(U,$J,358.3,32402,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32402,1,3,0)
  1. ;;=3^Secondary malignant neoplasm of bone
  1. ;;^UTILITY(U,$J,358.3,32402,1,4,0)
  1. ;;=4^C79.51
  1. ;;^UTILITY(U,$J,358.3,32402,2)
  1. ;;=^5001350
  1. ;;^UTILITY(U,$J,358.3,32403,0)
  1. ;;=C79.52^^99^1338^16
  1. ;;^UTILITY(U,$J,358.3,32403,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32403,1,3,0)
  1. ;;=3^Secondary malignant neoplasm of bone marrow
  1. ;;^UTILITY(U,$J,358.3,32403,1,4,0)
  1. ;;=4^C79.52
  1. ;;^UTILITY(U,$J,358.3,32403,2)
  1. ;;=^5001351
  1. ;;^UTILITY(U,$J,358.3,32404,0)
  1. ;;=D47.4^^99^1339^29
  1. ;;^UTILITY(U,$J,358.3,32404,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32404,1,3,0)
  1. ;;=3^Osteomyelofibrosis
  1. ;;^UTILITY(U,$J,358.3,32404,1,4,0)
  1. ;;=4^D47.4
  1. ;;^UTILITY(U,$J,358.3,32404,2)
  1. ;;=^5002259
  1. ;;^UTILITY(U,$J,358.3,32405,0)
  1. ;;=D50.9^^99^1339^1
  1. ;;^UTILITY(U,$J,358.3,32405,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32405,1,3,0)
  1. ;;=3^Anemia, iron deficiency
  1. ;;^UTILITY(U,$J,358.3,32405,1,4,0)
  1. ;;=4^D50.9
  1. ;;^UTILITY(U,$J,358.3,32405,2)
  1. ;;=^5002283
  1. ;;^UTILITY(U,$J,358.3,32406,0)
  1. ;;=D64.9^^99^1339^2
  1. ;;^UTILITY(U,$J,358.3,32406,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32406,1,3,0)
  1. ;;=3^Anemia, unspecified
  1. ;;^UTILITY(U,$J,358.3,32406,1,4,0)
  1. ;;=4^D64.9
  1. ;;^UTILITY(U,$J,358.3,32406,2)
  1. ;;=^5002351
  1. ;;^UTILITY(U,$J,358.3,32407,0)
  1. ;;=D75.89^^99^1339^3
  1. ;;^UTILITY(U,$J,358.3,32407,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32407,1,3,0)
  1. ;;=3^Blood & blood forming organ disease, oth spec
  1. ;;^UTILITY(U,$J,358.3,32407,1,4,0)
  1. ;;=4^D75.89
  1. ;;^UTILITY(U,$J,358.3,32407,2)
  1. ;;=^5002392
  1. ;;^UTILITY(U,$J,358.3,32408,0)
  1. ;;=D89.2^^99^1339^16
  1. ;;^UTILITY(U,$J,358.3,32408,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32408,1,3,0)
  1. ;;=3^Hypergammaglobulinemia, unspecified
  1. ;;^UTILITY(U,$J,358.3,32408,1,4,0)
  1. ;;=4^D89.2
  1. ;;^UTILITY(U,$J,358.3,32408,2)
  1. ;;=^5002455
  1. ;;^UTILITY(U,$J,358.3,32409,0)
  1. ;;=E03.9^^99^1339^24
  1. ;;^UTILITY(U,$J,358.3,32409,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32409,1,3,0)
  1. ;;=3^Hypothyroidism, unspecified
  1. ;;^UTILITY(U,$J,358.3,32409,1,4,0)
  1. ;;=4^E03.9
  1. ;;^UTILITY(U,$J,358.3,32409,2)
  1. ;;=^5002476
  1. ;;^UTILITY(U,$J,358.3,32410,0)
  1. ;;=E05.90^^99^1339^30
  1. ;;^UTILITY(U,$J,358.3,32410,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32410,1,3,0)
  1. ;;=3^Thyrotoxicosis w/o thyrotoxic crisis/storm
  1. ;;^UTILITY(U,$J,358.3,32410,1,4,0)
  1. ;;=4^E05.90
  1. ;;^UTILITY(U,$J,358.3,32410,2)
  1. ;;=^5002492
  1. ;;^UTILITY(U,$J,358.3,32411,0)
  1. ;;=E08.42^^99^1339^10
  1. ;;^UTILITY(U,$J,358.3,32411,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32411,1,3,0)
  1. ;;=3^DM d/t underlying condition w/ diabetic polyneuropathy
  1. ;;^UTILITY(U,$J,358.3,32411,1,4,0)
  1. ;;=4^E08.42
  1. ;;^UTILITY(U,$J,358.3,32411,2)
  1. ;;=^5002524
  1. ;;^UTILITY(U,$J,358.3,32412,0)
  1. ;;=E09.42^^99^1339^11
  1. ;;^UTILITY(U,$J,358.3,32412,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32412,1,3,0)
  1. ;;=3^DM drug-induced w/ neurological compl w/ diabetic polyneuropathy
  1. ;;^UTILITY(U,$J,358.3,32412,1,4,0)
  1. ;;=4^E09.42
  1. ;;^UTILITY(U,$J,358.3,32412,2)
  1. ;;=^5002566
  1. ;;^UTILITY(U,$J,358.3,32413,0)
  1. ;;=E10.42^^99^1339^4
  1. ;;^UTILITY(U,$J,358.3,32413,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32413,1,3,0)
  1. ;;=3^DM Type 1 w/ diabetic polyneuropathy
  1. ;;^UTILITY(U,$J,358.3,32413,1,4,0)
  1. ;;=4^E10.42
  1. ;;^UTILITY(U,$J,358.3,32413,2)
  1. ;;=^5002606
  1. ;;^UTILITY(U,$J,358.3,32414,0)
  1. ;;=E10.65^^99^1339^5
  1. ;;^UTILITY(U,$J,358.3,32414,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32414,1,3,0)
  1. ;;=3^DM Type 1 w/ hyperglycemia
  1. ;;^UTILITY(U,$J,358.3,32414,1,4,0)
  1. ;;=4^E10.65
  1. ;;^UTILITY(U,$J,358.3,32414,2)
  1. ;;=^5002623
  1. ;;^UTILITY(U,$J,358.3,32415,0)
  1. ;;=E10.9^^99^1339^6
  1. ;;^UTILITY(U,$J,358.3,32415,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32415,1,3,0)
  1. ;;=3^DM Type 1 w/o complications
  1. ;;^UTILITY(U,$J,358.3,32415,1,4,0)
  1. ;;=4^E10.9
  1. ;;^UTILITY(U,$J,358.3,32415,2)
  1. ;;=^5002626
  1. ;;^UTILITY(U,$J,358.3,32416,0)
  1. ;;=E11.42^^99^1339^7
  1. ;;^UTILITY(U,$J,358.3,32416,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32416,1,3,0)
  1. ;;=3^DM Type 2 w/ diabetic polyneuropathy
  1. ;;^UTILITY(U,$J,358.3,32416,1,4,0)
  1. ;;=4^E11.42
  1. ;;^UTILITY(U,$J,358.3,32416,2)
  1. ;;=^5002646
  1. ;;^UTILITY(U,$J,358.3,32417,0)
  1. ;;=E11.65^^99^1339^8
  1. ;;^UTILITY(U,$J,358.3,32417,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32417,1,3,0)
  1. ;;=3^DM Type 2 w/ hyperglycemia
  1. ;;^UTILITY(U,$J,358.3,32417,1,4,0)
  1. ;;=4^E11.65
  1. ;;^UTILITY(U,$J,358.3,32417,2)
  1. ;;=^5002663
  1. ;;^UTILITY(U,$J,358.3,32418,0)
  1. ;;=E11.9^^99^1339^9
  1. ;;^UTILITY(U,$J,358.3,32418,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32418,1,3,0)
  1. ;;=3^DM Type 2 w/o complications
  1. ;;^UTILITY(U,$J,358.3,32418,1,4,0)
  1. ;;=4^E11.9
  1. ;;^UTILITY(U,$J,358.3,32418,2)
  1. ;;=^5002666
  1. ;;^UTILITY(U,$J,358.3,32419,0)
  1. ;;=E13.42^^99^1339^12
  1. ;;^UTILITY(U,$J,358.3,32419,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32419,1,3,0)
  1. ;;=3^DM oth w/ diabetic polyneuropathy
  1. ;;^UTILITY(U,$J,358.3,32419,1,4,0)
  1. ;;=4^E13.42
  1. ;;^UTILITY(U,$J,358.3,32419,2)
  1. ;;=^5002686
  1. ;;^UTILITY(U,$J,358.3,32420,0)
  1. ;;=E16.2^^99^1339^22
  1. ;;^UTILITY(U,$J,358.3,32420,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32420,1,3,0)
  1. ;;=3^Hypoglycemia, unspecified
  1. ;;^UTILITY(U,$J,358.3,32420,1,4,0)
  1. ;;=4^E16.2
  1. ;;^UTILITY(U,$J,358.3,32420,2)
  1. ;;=^5002708
  1. ;;^UTILITY(U,$J,358.3,32421,0)
  1. ;;=E46.^^99^1339^26
  1. ;;^UTILITY(U,$J,358.3,32421,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32421,1,3,0)
  1. ;;=3^Malnutrition, protein-calorie, unspec
  1. ;;^UTILITY(U,$J,358.3,32421,1,4,0)
  1. ;;=4^E46.
  1. ;;^UTILITY(U,$J,358.3,32421,2)
  1. ;;=^5002790
  1. ;;^UTILITY(U,$J,358.3,32422,0)
  1. ;;=E53.8^^99^1339^31
  1. ;;^UTILITY(U,$J,358.3,32422,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32422,1,3,0)
  1. ;;=3^Vitamin B group deficiency
  1. ;;^UTILITY(U,$J,358.3,32422,1,4,0)
  1. ;;=4^E53.8
  1. ;;^UTILITY(U,$J,358.3,32422,2)
  1. ;;=^5002797
  1. ;;^UTILITY(U,$J,358.3,32423,0)
  1. ;;=E66.01^^99^1339^27
  1. ;;^UTILITY(U,$J,358.3,32423,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32423,1,3,0)
  1. ;;=3^Obesity, morbid
  1. ;;^UTILITY(U,$J,358.3,32423,1,4,0)
  1. ;;=4^E66.01
  1. ;;^UTILITY(U,$J,358.3,32423,2)
  1. ;;=^5002826
  1. ;;^UTILITY(U,$J,358.3,32424,0)
  1. ;;=E66.9^^99^1339^28
  1. ;;^UTILITY(U,$J,358.3,32424,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32424,1,3,0)
  1. ;;=3^Obesity, unspecified
  1. ;;^UTILITY(U,$J,358.3,32424,1,4,0)
  1. ;;=4^E66.9
  1. ;;^UTILITY(U,$J,358.3,32424,2)
  1. ;;=^5002832
  1. ;;^UTILITY(U,$J,358.3,32425,0)
  1. ;;=E74.39^^99^1339^25
  1. ;;^UTILITY(U,$J,358.3,32425,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,32425,1,3,0)
  1. ;;=3^Intestinal carbohydrate absorption disorder, other