IBDEI03T ; ; 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,9149,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9149,1,3,0)
;;=3^Personal Hx of Malig Neop of Bladder
;;^UTILITY(U,$J,358.3,9149,1,4,0)
;;=4^Z85.51
;;^UTILITY(U,$J,358.3,9149,2)
;;=^5063428
;;^UTILITY(U,$J,358.3,9150,0)
;;=Z85.528^^45^432^83
;;^UTILITY(U,$J,358.3,9150,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9150,1,3,0)
;;=3^Personal Hx of Malig Neop of Kidney
;;^UTILITY(U,$J,358.3,9150,1,4,0)
;;=4^Z85.528
;;^UTILITY(U,$J,358.3,9150,2)
;;=^5063430
;;^UTILITY(U,$J,358.3,9151,0)
;;=Z85.6^^45^432^74
;;^UTILITY(U,$J,358.3,9151,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9151,1,3,0)
;;=3^Personal Hx of Leukemia
;;^UTILITY(U,$J,358.3,9151,1,4,0)
;;=4^Z85.6
;;^UTILITY(U,$J,358.3,9151,2)
;;=^5063434
;;^UTILITY(U,$J,358.3,9152,0)
;;=Z85.72^^45^432^98
;;^UTILITY(U,$J,358.3,9152,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9152,1,3,0)
;;=3^Personal Hx of Non-Hodgkin Lymphomas
;;^UTILITY(U,$J,358.3,9152,1,4,0)
;;=4^Z85.72
;;^UTILITY(U,$J,358.3,9152,2)
;;=^5063436
;;^UTILITY(U,$J,358.3,9153,0)
;;=Z85.79^^45^432^88
;;^UTILITY(U,$J,358.3,9153,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9153,1,3,0)
;;=3^Personal Hx of Malig Neop of Lymphoid,Hematpoetc & Rel Tissue
;;^UTILITY(U,$J,358.3,9153,1,4,0)
;;=4^Z85.79
;;^UTILITY(U,$J,358.3,9153,2)
;;=^5063437
;;^UTILITY(U,$J,358.3,9154,0)
;;=Z85.820^^45^432^77
;;^UTILITY(U,$J,358.3,9154,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9154,1,3,0)
;;=3^Personal Hx of Malig Melanoma of Skin
;;^UTILITY(U,$J,358.3,9154,1,4,0)
;;=4^Z85.820
;;^UTILITY(U,$J,358.3,9154,2)
;;=^5063441
;;^UTILITY(U,$J,358.3,9155,0)
;;=Z85.828^^45^432^92
;;^UTILITY(U,$J,358.3,9155,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9155,1,3,0)
;;=3^Personal Hx of Malig Neop of Skin
;;^UTILITY(U,$J,358.3,9155,1,4,0)
;;=4^Z85.828
;;^UTILITY(U,$J,358.3,9155,2)
;;=^5063443
;;^UTILITY(U,$J,358.3,9156,0)
;;=Z85.71^^45^432^72
;;^UTILITY(U,$J,358.3,9156,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9156,1,3,0)
;;=3^Personal Hx of Hodgkin Lymphoma
;;^UTILITY(U,$J,358.3,9156,1,4,0)
;;=4^Z85.71
;;^UTILITY(U,$J,358.3,9156,2)
;;=^5063435
;;^UTILITY(U,$J,358.3,9157,0)
;;=Z65.8^^45^432^144
;;^UTILITY(U,$J,358.3,9157,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9157,1,3,0)
;;=3^Psychosocial Circumstance Related Problems
;;^UTILITY(U,$J,358.3,9157,1,4,0)
;;=4^Z65.8
;;^UTILITY(U,$J,358.3,9157,2)
;;=^5063185
;;^UTILITY(U,$J,358.3,9158,0)
;;=Z86.11^^45^432^109
;;^UTILITY(U,$J,358.3,9158,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9158,1,3,0)
;;=3^Personal Hx of Tuberculosis
;;^UTILITY(U,$J,358.3,9158,1,4,0)
;;=4^Z86.11
;;^UTILITY(U,$J,358.3,9158,2)
;;=^5063461
;;^UTILITY(U,$J,358.3,9159,0)
;;=Z86.13^^45^432^76
;;^UTILITY(U,$J,358.3,9159,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9159,1,3,0)
;;=3^Personal Hx of Malaria
;;^UTILITY(U,$J,358.3,9159,1,4,0)
;;=4^Z86.13
;;^UTILITY(U,$J,358.3,9159,2)
;;=^5063463
;;^UTILITY(U,$J,358.3,9160,0)
;;=Z86.73^^45^432^106
;;^UTILITY(U,$J,358.3,9160,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9160,1,3,0)
;;=3^Personal Hx of TIA & Cereb Infrc w/o Residual Deficits
;;^UTILITY(U,$J,358.3,9160,1,4,0)
;;=4^Z86.73
;;^UTILITY(U,$J,358.3,9160,2)
;;=^5063477
;;^UTILITY(U,$J,358.3,9161,0)
;;=Z86.79^^45^432^69
;;^UTILITY(U,$J,358.3,9161,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9161,1,3,0)
;;=3^Personal Hx of Circulatory System Diseases
;;^UTILITY(U,$J,358.3,9161,1,4,0)
;;=4^Z86.79
;;^UTILITY(U,$J,358.3,9161,2)
;;=^5063479
;;^UTILITY(U,$J,358.3,9162,0)
;;=Z91.040^^45^432^57
;;^UTILITY(U,$J,358.3,9162,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9162,1,3,0)
;;=3^Latex Allergy Status
;;^UTILITY(U,$J,358.3,9162,1,4,0)
;;=4^Z91.040
;;^UTILITY(U,$J,358.3,9162,2)
;;=^5063607
;;^UTILITY(U,$J,358.3,9163,0)
;;=Z92.3^^45^432^73
;;^UTILITY(U,$J,358.3,9163,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9163,1,3,0)
;;=3^Personal Hx of Irradiation
;;^UTILITY(U,$J,358.3,9163,1,4,0)
;;=4^Z92.3
;;^UTILITY(U,$J,358.3,9163,2)
;;=^5063637
;;^UTILITY(U,$J,358.3,9164,0)
;;=Z91.120^^45^432^53
;;^UTILITY(U,$J,358.3,9164,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9164,1,3,0)
;;=3^Intentional Underdose of Meds d/t Financial Hardship
;;^UTILITY(U,$J,358.3,9164,1,4,0)
;;=4^Z91.120
;;^UTILITY(U,$J,358.3,9164,2)
;;=^5063612
;;^UTILITY(U,$J,358.3,9165,0)
;;=Z91.11^^45^432^62
;;^UTILITY(U,$J,358.3,9165,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9165,1,3,0)
;;=3^Noncompliance w/ Dietary Regimen
;;^UTILITY(U,$J,358.3,9165,1,4,0)
;;=4^Z91.11
;;^UTILITY(U,$J,358.3,9165,2)
;;=^5063611
;;^UTILITY(U,$J,358.3,9166,0)
;;=Z87.891^^45^432^97
;;^UTILITY(U,$J,358.3,9166,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9166,1,3,0)
;;=3^Personal Hx of Nicotine Dependence
;;^UTILITY(U,$J,358.3,9166,1,4,0)
;;=4^Z87.891
;;^UTILITY(U,$J,358.3,9166,2)
;;=^5063518
;;^UTILITY(U,$J,358.3,9167,0)
;;=Z77.090^^45^432^3
;;^UTILITY(U,$J,358.3,9167,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9167,1,3,0)
;;=3^Asbestos Contact/Exposure
;;^UTILITY(U,$J,358.3,9167,1,4,0)
;;=4^Z77.090
;;^UTILITY(U,$J,358.3,9167,2)
;;=^5063312
;;^UTILITY(U,$J,358.3,9168,0)
;;=Z57.8^^45^432^65
;;^UTILITY(U,$J,358.3,9168,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9168,1,3,0)
;;=3^Occupational Exposure to Other Risk Factors
;;^UTILITY(U,$J,358.3,9168,1,4,0)
;;=4^Z57.8
;;^UTILITY(U,$J,358.3,9168,2)
;;=^5063127
;;^UTILITY(U,$J,358.3,9169,0)
;;=Z77.21^^45^432^46
;;^UTILITY(U,$J,358.3,9169,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9169,1,3,0)
;;=3^Hazardous Body Fluid Contact/Exposure
;;^UTILITY(U,$J,358.3,9169,1,4,0)
;;=4^Z77.21
;;^UTILITY(U,$J,358.3,9169,2)
;;=^5063323
;;^UTILITY(U,$J,358.3,9170,0)
;;=Z91.81^^45^432^50
;;^UTILITY(U,$J,358.3,9170,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9170,1,3,0)
;;=3^History of Falling
;;^UTILITY(U,$J,358.3,9170,1,4,0)
;;=4^Z91.81
;;^UTILITY(U,$J,358.3,9170,2)
;;=^5063625
;;^UTILITY(U,$J,358.3,9171,0)
;;=Z91.89^^45^432^112
;;^UTILITY(U,$J,358.3,9171,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9171,1,3,0)
;;=3^Personal Risk Factors NEC
;;^UTILITY(U,$J,358.3,9171,1,4,0)
;;=4^Z91.89
;;^UTILITY(U,$J,358.3,9171,2)
;;=^5063628
;;^UTILITY(U,$J,358.3,9172,0)
;;=Z92.89^^45^432^100
;;^UTILITY(U,$J,358.3,9172,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9172,1,3,0)
;;=3^Personal Hx of Other Medical Treatment
;;^UTILITY(U,$J,358.3,9172,1,4,0)
;;=4^Z92.89
;;^UTILITY(U,$J,358.3,9172,2)
;;=^5063641
;;^UTILITY(U,$J,358.3,9173,0)
;;=Z77.110^^45^432^1
;;^UTILITY(U,$J,358.3,9173,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9173,1,3,0)
;;=3^Air Pollution Contact/Exposure
;;^UTILITY(U,$J,358.3,9173,1,4,0)
;;=4^Z77.110
;;^UTILITY(U,$J,358.3,9173,2)
;;=^5063314
;;^UTILITY(U,$J,358.3,9174,0)
;;=Z77.112^^45^432^148
;;^UTILITY(U,$J,358.3,9174,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9174,1,3,0)
;;=3^Soil Pollution Contact/Exposure
;;^UTILITY(U,$J,358.3,9174,1,4,0)
;;=4^Z77.112
;;^UTILITY(U,$J,358.3,9174,2)
;;=^5063316
;;^UTILITY(U,$J,358.3,9175,0)
;;=Z77.111^^45^432^155
;;^UTILITY(U,$J,358.3,9175,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9175,1,3,0)
;;=3^Water Pollution Contact/Exposure
;;^UTILITY(U,$J,358.3,9175,1,4,0)
;;=4^Z77.111
;;^UTILITY(U,$J,358.3,9175,2)
;;=^5063315
;;^UTILITY(U,$J,358.3,9176,0)
;;=Z77.128^^45^432^113
;;^UTILITY(U,$J,358.3,9176,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9176,1,3,0)
;;=3^Physical Environment Hazards Contact/Exposure
;;^UTILITY(U,$J,358.3,9176,1,4,0)
;;=4^Z77.128
;;^UTILITY(U,$J,358.3,9176,2)
;;=^5063322
;;^UTILITY(U,$J,358.3,9177,0)
;;=Z77.123^^45^432^146
;;^UTILITY(U,$J,358.3,9177,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9177,1,3,0)
;;=3^Radon/Radiation Contact/Exposure
;;^UTILITY(U,$J,358.3,9177,1,4,0)
;;=4^Z77.123
;;^UTILITY(U,$J,358.3,9177,2)
;;=^5063321
;;^UTILITY(U,$J,358.3,9178,0)
;;=Z77.122^^45^432^61
;;^UTILITY(U,$J,358.3,9178,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9178,1,3,0)
;;=3^Noise Contact/Exposure
;;^UTILITY(U,$J,358.3,9178,1,4,0)
;;=4^Z77.122
;;^UTILITY(U,$J,358.3,9178,2)
;;=^5063320
;;^UTILITY(U,$J,358.3,9179,0)
;;=Z77.118^^45^432^11
;;^UTILITY(U,$J,358.3,9179,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9179,1,3,0)
;;=3^Environmental Pollution Contact/Exposure
;;^UTILITY(U,$J,358.3,9179,1,4,0)
;;=4^Z77.118
;;^UTILITY(U,$J,358.3,9179,2)
;;=^5063317
;;^UTILITY(U,$J,358.3,9180,0)
;;=Z77.9^^45^432^47
;;^UTILITY(U,$J,358.3,9180,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9180,1,3,0)
;;=3^Health Hazard Contact/Exposure
;;^UTILITY(U,$J,358.3,9180,1,4,0)
;;=4^Z77.9
;;^UTILITY(U,$J,358.3,9180,2)
;;=^5063326
;;^UTILITY(U,$J,358.3,9181,0)
;;=Z77.22^^45^432^10
;;^UTILITY(U,$J,358.3,9181,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9181,1,3,0)
;;=3^Environmental Exposure Tobacco Smoke/Second-Hand Smoke
;;^UTILITY(U,$J,358.3,9181,1,4,0)
;;=4^Z77.22
;;^UTILITY(U,$J,358.3,9181,2)
;;=^5063324
;;^UTILITY(U,$J,358.3,9182,0)
;;=Z80.0^^45^432^28
;;^UTILITY(U,$J,358.3,9182,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9182,1,3,0)
;;=3^Family Hx of Malig Neop of Digestive Organs
;;^UTILITY(U,$J,358.3,9182,1,4,0)
;;=4^Z80.0
;;^UTILITY(U,$J,358.3,9182,2)
;;=^5063344
;;^UTILITY(U,$J,358.3,9183,0)
;;=Z80.1^^45^432^34
;;^UTILITY(U,$J,358.3,9183,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9183,1,3,0)
;;=3^Family Hx of Malig Neop of Trachea,Bronc & Lung
;;^UTILITY(U,$J,358.3,9183,1,4,0)
;;=4^Z80.1
;;^UTILITY(U,$J,358.3,9183,2)
;;=^5063345
;;^UTILITY(U,$J,358.3,9184,0)
;;=Z80.3^^45^432^27
;;^UTILITY(U,$J,358.3,9184,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9184,1,3,0)
;;=3^Family Hx of Malig Neop of Breast
;;^UTILITY(U,$J,358.3,9184,1,4,0)
;;=4^Z80.3
;;^UTILITY(U,$J,358.3,9184,2)
;;=^5063347
;;^UTILITY(U,$J,358.3,9185,0)
;;=Z80.41^^45^432^31
;;^UTILITY(U,$J,358.3,9185,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9185,1,3,0)
;;=3^Family Hx of Malig Neop of Ovary
;;^UTILITY(U,$J,358.3,9185,1,4,0)
;;=4^Z80.41
;;^UTILITY(U,$J,358.3,9185,2)
;;=^5063348
;;^UTILITY(U,$J,358.3,9186,0)
;;=Z80.42^^45^432^32
;;^UTILITY(U,$J,358.3,9186,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9186,1,3,0)
;;=3^Family Hx of Malig Neop of Prostate
;;^UTILITY(U,$J,358.3,9186,1,4,0)
;;=4^Z80.42
;;^UTILITY(U,$J,358.3,9186,2)
;;=^5063349
;;^UTILITY(U,$J,358.3,9187,0)
;;=Z80.43^^45^432^33
;;^UTILITY(U,$J,358.3,9187,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9187,1,3,0)
;;=3^Family Hx of Malig Neop of Testis
;;^UTILITY(U,$J,358.3,9187,1,4,0)
;;=4^Z80.43
;;^UTILITY(U,$J,358.3,9187,2)
;;=^5063350
;;^UTILITY(U,$J,358.3,9188,0)
;;=Z80.6^^45^432^25
;;^UTILITY(U,$J,358.3,9188,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9188,1,3,0)
;;=3^Family Hx of Leukemia
;;^UTILITY(U,$J,358.3,9188,1,4,0)
;;=4^Z80.6
;;^UTILITY(U,$J,358.3,9188,2)
;;=^5063354
;;^UTILITY(U,$J,358.3,9189,0)
;;=Z80.8^^45^432^30
;;^UTILITY(U,$J,358.3,9189,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9189,1,3,0)
;;=3^Family Hx of Malig Neop of Organs/Systems
;;^UTILITY(U,$J,358.3,9189,1,4,0)
;;=4^Z80.8
;;^UTILITY(U,$J,358.3,9189,2)
;;=^5063356
;;^UTILITY(U,$J,358.3,9190,0)
;;=Z81.8^^45^432^35
;;^UTILITY(U,$J,358.3,9190,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9190,1,3,0)
;;=3^Family Hx of Mental/Behavioral Disorders
;;^UTILITY(U,$J,358.3,9190,1,4,0)
;;=4^Z81.8
;;^UTILITY(U,$J,358.3,9190,2)
;;=^5063363
;;^UTILITY(U,$J,358.3,9191,0)
;;=Z82.3^^45^432^42
;;^UTILITY(U,$J,358.3,9191,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9191,1,3,0)
;;=3^Family Hx of Stroke
;;^UTILITY(U,$J,358.3,9191,1,4,0)
;;=4^Z82.3
;;^UTILITY(U,$J,358.3,9191,2)
;;=^5063367
;;^UTILITY(U,$J,358.3,9192,0)
;;=Z82.49^^45^432^24
;;^UTILITY(U,$J,358.3,9192,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9192,1,3,0)
;;=3^Family Hx of Ischemic Heart Disease/Circulatory System
;;^UTILITY(U,$J,358.3,9192,1,4,0)
;;=4^Z82.49
;;^UTILITY(U,$J,358.3,9192,2)
;;=^5063369
;;^UTILITY(U,$J,358.3,9193,0)
;;=Z82.5^^45^432^14
;;^UTILITY(U,$J,358.3,9193,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9193,1,3,0)
;;=3^Family Hx of Asthma/Chronic Lower Respiratory Diseases
;;^UTILITY(U,$J,358.3,9193,1,4,0)
;;=4^Z82.5
;;^UTILITY(U,$J,358.3,9193,2)
;;=^5063370
;;^UTILITY(U,$J,358.3,9194,0)
;;=Z82.61^^45^432^13
;;^UTILITY(U,$J,358.3,9194,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9194,1,3,0)
;;=3^Family Hx of Arthritis
;;^UTILITY(U,$J,358.3,9194,1,4,0)
;;=4^Z82.61
;;^UTILITY(U,$J,358.3,9194,2)
;;=^5063371
;;^UTILITY(U,$J,358.3,9195,0)
;;=Z82.69^^45^432^37
;;^UTILITY(U,$J,358.3,9195,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9195,1,3,0)
;;=3^Family Hx of Musculoskeletal System/Connective Tissue
;;^UTILITY(U,$J,358.3,9195,1,4,0)
;;=4^Z82.69
;;^UTILITY(U,$J,358.3,9195,2)
;;=^5063373
;;^UTILITY(U,$J,358.3,9196,0)
;;=Z83.3^^45^432^20
;;^UTILITY(U,$J,358.3,9196,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9196,1,3,0)
;;=3^Family Hx of Diabetes Mellitus
;;^UTILITY(U,$J,358.3,9196,1,4,0)
;;=4^Z83.3
;;^UTILITY(U,$J,358.3,9196,2)
;;=^5063379
;;^UTILITY(U,$J,358.3,9197,0)
;;=Z83.2^^45^432^16
;;^UTILITY(U,$J,358.3,9197,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9197,1,3,0)
;;=3^Family Hx of Blood/Immune Mechanism Diseases
;;^UTILITY(U,$J,358.3,9197,1,4,0)
;;=4^Z83.2
;;^UTILITY(U,$J,358.3,9197,2)
;;=^5063378
;;^UTILITY(U,$J,358.3,9198,0)
;;=Z82.71^^45^432^40
;;^UTILITY(U,$J,358.3,9198,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9198,1,3,0)
;;=3^Family Hx of Polycystic Kidney
;;^UTILITY(U,$J,358.3,9198,1,4,0)
;;=4^Z82.71
;;^UTILITY(U,$J,358.3,9198,2)
;;=^321531
;;^UTILITY(U,$J,358.3,9199,0)
;;=Z82.1^^45^432^15
;;^UTILITY(U,$J,358.3,9199,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9199,1,3,0)
;;=3^Family Hx of Blindness/Visual Loss
;;^UTILITY(U,$J,358.3,9199,1,4,0)
;;=4^Z82.1
;;^UTILITY(U,$J,358.3,9199,2)
;;=^5063365
;;^UTILITY(U,$J,358.3,9200,0)
;;=Z82.2^^45^432^19
;;^UTILITY(U,$J,358.3,9200,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9200,1,3,0)
;;=3^Family Hx of Deafness/Hearing Loss
;;^UTILITY(U,$J,358.3,9200,1,4,0)
;;=4^Z82.2
;;^UTILITY(U,$J,358.3,9200,2)
;;=^5063366
;;^UTILITY(U,$J,358.3,9201,0)
;;=Z84.0^^45^432^41
;;^UTILITY(U,$J,358.3,9201,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9201,1,3,0)
;;=3^Family Hx of Skin Diseases
;;^UTILITY(U,$J,358.3,9201,1,4,0)
;;=4^Z84.0
;;^UTILITY(U,$J,358.3,9201,2)
;;=^5063388
;;^UTILITY(U,$J,358.3,9202,0)
;;=Z82.79^^45^432^18
;;^UTILITY(U,$J,358.3,9202,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9202,1,3,0)
;;=3^Family Hx of Congen Malform,Deformations & Chromsoml Abnlt
;;^UTILITY(U,$J,358.3,9202,1,4,0)
;;=4^Z82.79
;;^UTILITY(U,$J,358.3,9202,2)
;;=^5063374
;;^UTILITY(U,$J,358.3,9203,0)
;;=Z84.89^^45^432^39
;;^UTILITY(U,$J,358.3,9203,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9203,1,3,0)
;;=3^Family Hx of Other Spec Conditions
;;^UTILITY(U,$J,358.3,9203,1,4,0)
;;=4^Z84.89
;;^UTILITY(U,$J,358.3,9203,2)
;;=^5063393
;;^UTILITY(U,$J,358.3,9204,0)
;;=Z81.1^^45^432^12
;;^UTILITY(U,$J,358.3,9204,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9204,1,3,0)
;;=3^Family Hx of Alcohol Abuse/Dependence
;;^UTILITY(U,$J,358.3,9204,1,4,0)
;;=4^Z81.1
;;^UTILITY(U,$J,358.3,9204,2)
;;=^5063359
;;^UTILITY(U,$J,358.3,9205,0)
;;=Z82.62^^45^432^38
;;^UTILITY(U,$J,358.3,9205,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9205,1,3,0)
;;=3^Family Hx of Osteoporosis
;;^UTILITY(U,$J,358.3,9205,1,4,0)
;;=4^Z82.62
;;^UTILITY(U,$J,358.3,9205,2)
;;=^5063372
;;^UTILITY(U,$J,358.3,9206,0)
;;=Z83.71^^45^432^17
;;^UTILITY(U,$J,358.3,9206,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9206,1,3,0)
;;=3^Family Hx of Colonic Polyps
;;^UTILITY(U,$J,358.3,9206,1,4,0)
;;=4^Z83.71
;;^UTILITY(U,$J,358.3,9206,2)
;;=^5063386
;;^UTILITY(U,$J,358.3,9207,0)
;;=Z84.81^^45^432^22
;;^UTILITY(U,$J,358.3,9207,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9207,1,3,0)
;;=3^Family Hx of Genetic Disease
;;^UTILITY(U,$J,358.3,9207,1,4,0)
;;=4^Z84.81
;;^UTILITY(U,$J,358.3,9207,2)
;;=^5063392
;;^UTILITY(U,$J,358.3,9208,0)
;;=Z86.010^^45^432^70
;;^UTILITY(U,$J,358.3,9208,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9208,1,3,0)
;;=3^Personal Hx of Colonic Polyps
;;^UTILITY(U,$J,358.3,9208,1,4,0)
;;=4^Z86.010
;;^UTILITY(U,$J,358.3,9208,2)
;;=^5063456
;;^UTILITY(U,$J,358.3,9209,0)
;;=Z86.14^^45^432^75
;;^UTILITY(U,$J,358.3,9209,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9209,1,3,0)
;;=3^Personal Hx of MRSA Infection
;;^UTILITY(U,$J,358.3,9209,1,4,0)
;;=4^Z86.14
;;^UTILITY(U,$J,358.3,9209,2)
;;=^5063464
;;^UTILITY(U,$J,358.3,9210,0)
;;=Z86.31^^45^432^71
;;^UTILITY(U,$J,358.3,9210,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9210,1,3,0)
;;=3^Personal Hx of Diabetic Foot Ulcer
;;^UTILITY(U,$J,358.3,9210,1,4,0)
;;=4^Z86.31
;;^UTILITY(U,$J,358.3,9210,2)
;;=^5063467
;;^UTILITY(U,$J,358.3,9211,0)
;;=Z86.711^^45^432^101
;;^UTILITY(U,$J,358.3,9211,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9211,1,3,0)
;;=3^Personal Hx of Pulmonary Embolism
;;^UTILITY(U,$J,358.3,9211,1,4,0)
;;=4^Z86.711
;;^UTILITY(U,$J,358.3,9211,2)
;;=^5063474
;;^UTILITY(U,$J,358.3,9212,0)
;;=Z86.72^^45^432^107
;;^UTILITY(U,$J,358.3,9212,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9212,1,3,0)
;;=3^Personal Hx of Thrombophlebitis
;;^UTILITY(U,$J,358.3,9212,1,4,0)
;;=4^Z86.72
;;^UTILITY(U,$J,358.3,9212,2)
;;=^5063476
;;^UTILITY(U,$J,358.3,9213,0)
;;=Z87.310^^45^432^99
;;^UTILITY(U,$J,358.3,9213,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9213,1,3,0)
;;=3^Personal Hx of Osteoporosis Fx
;;^UTILITY(U,$J,358.3,9213,1,4,0)
;;=4^Z87.310
;;^UTILITY(U,$J,358.3,9213,2)
;;=^5063485
;;^UTILITY(U,$J,358.3,9214,0)
;;=Z87.442^^45^432^110
;;^UTILITY(U,$J,358.3,9214,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9214,1,3,0)
;;=3^Personal Hx of Urinary Calculi
;;^UTILITY(U,$J,358.3,9214,1,4,0)
;;=4^Z87.442
;;^UTILITY(U,$J,358.3,9214,2)
;;=^5063497
;;^UTILITY(U,$J,358.3,9215,0)
;;=Z87.81^^45^432^108
;;^UTILITY(U,$J,358.3,9215,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9215,1,3,0)
;;=3^Personal Hx of Traumatic Fx (Healed)
;;^UTILITY(U,$J,358.3,9215,1,4,0)
;;=4^Z87.81
;;^UTILITY(U,$J,358.3,9215,2)
;;=^5063513
;;^UTILITY(U,$J,358.3,9216,0)
;;=Z87.890^^45^432^102
;;^UTILITY(U,$J,358.3,9216,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9216,1,3,0)
;;=3^Personal Hx of Sex Reassignment
;;^UTILITY(U,$J,358.3,9216,1,4,0)
;;=4^Z87.890
;;^UTILITY(U,$J,358.3,9216,2)
;;=^5063517
;;^UTILITY(U,$J,358.3,9217,0)
;;=Z87.892^^45^432^68
;;^UTILITY(U,$J,358.3,9217,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,9217,1,3,0)
;;=3^Personal Hx of Anaphylaxis
;;^UTILITY(U,$J,358.3,9217,1,4,0)
;;=4^Z87.892
;;^UTILITY(U,$J,358.3,9217,2)
;;=^5063519
;;^UTILITY(U,$J,358.3,9218,0)
;;=Z87.39^^45^432^96
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI03T 19769 printed Dec 13, 2024@01:41:04 Page 2
IBDEI03T ; ; 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,9149,1,0)
+2 ;;=^358.31IA^4^2
+3 ;;^UTILITY(U,$J,358.3,9149,1,3,0)
+4 ;;=3^Personal Hx of Malig Neop of Bladder
+5 ;;^UTILITY(U,$J,358.3,9149,1,4,0)
+6 ;;=4^Z85.51
+7 ;;^UTILITY(U,$J,358.3,9149,2)
+8 ;;=^5063428
+9 ;;^UTILITY(U,$J,358.3,9150,0)
+10 ;;=Z85.528^^45^432^83
+11 ;;^UTILITY(U,$J,358.3,9150,1,0)
+12 ;;=^358.31IA^4^2
+13 ;;^UTILITY(U,$J,358.3,9150,1,3,0)
+14 ;;=3^Personal Hx of Malig Neop of Kidney
+15 ;;^UTILITY(U,$J,358.3,9150,1,4,0)
+16 ;;=4^Z85.528
+17 ;;^UTILITY(U,$J,358.3,9150,2)
+18 ;;=^5063430
+19 ;;^UTILITY(U,$J,358.3,9151,0)
+20 ;;=Z85.6^^45^432^74
+21 ;;^UTILITY(U,$J,358.3,9151,1,0)
+22 ;;=^358.31IA^4^2
+23 ;;^UTILITY(U,$J,358.3,9151,1,3,0)
+24 ;;=3^Personal Hx of Leukemia
+25 ;;^UTILITY(U,$J,358.3,9151,1,4,0)
+26 ;;=4^Z85.6
+27 ;;^UTILITY(U,$J,358.3,9151,2)
+28 ;;=^5063434
+29 ;;^UTILITY(U,$J,358.3,9152,0)
+30 ;;=Z85.72^^45^432^98
+31 ;;^UTILITY(U,$J,358.3,9152,1,0)
+32 ;;=^358.31IA^4^2
+33 ;;^UTILITY(U,$J,358.3,9152,1,3,0)
+34 ;;=3^Personal Hx of Non-Hodgkin Lymphomas
+35 ;;^UTILITY(U,$J,358.3,9152,1,4,0)
+36 ;;=4^Z85.72
+37 ;;^UTILITY(U,$J,358.3,9152,2)
+38 ;;=^5063436
+39 ;;^UTILITY(U,$J,358.3,9153,0)
+40 ;;=Z85.79^^45^432^88
+41 ;;^UTILITY(U,$J,358.3,9153,1,0)
+42 ;;=^358.31IA^4^2
+43 ;;^UTILITY(U,$J,358.3,9153,1,3,0)
+44 ;;=3^Personal Hx of Malig Neop of Lymphoid,Hematpoetc & Rel Tissue
+45 ;;^UTILITY(U,$J,358.3,9153,1,4,0)
+46 ;;=4^Z85.79
+47 ;;^UTILITY(U,$J,358.3,9153,2)
+48 ;;=^5063437
+49 ;;^UTILITY(U,$J,358.3,9154,0)
+50 ;;=Z85.820^^45^432^77
+51 ;;^UTILITY(U,$J,358.3,9154,1,0)
+52 ;;=^358.31IA^4^2
+53 ;;^UTILITY(U,$J,358.3,9154,1,3,0)
+54 ;;=3^Personal Hx of Malig Melanoma of Skin
+55 ;;^UTILITY(U,$J,358.3,9154,1,4,0)
+56 ;;=4^Z85.820
+57 ;;^UTILITY(U,$J,358.3,9154,2)
+58 ;;=^5063441
+59 ;;^UTILITY(U,$J,358.3,9155,0)
+60 ;;=Z85.828^^45^432^92
+61 ;;^UTILITY(U,$J,358.3,9155,1,0)
+62 ;;=^358.31IA^4^2
+63 ;;^UTILITY(U,$J,358.3,9155,1,3,0)
+64 ;;=3^Personal Hx of Malig Neop of Skin
+65 ;;^UTILITY(U,$J,358.3,9155,1,4,0)
+66 ;;=4^Z85.828
+67 ;;^UTILITY(U,$J,358.3,9155,2)
+68 ;;=^5063443
+69 ;;^UTILITY(U,$J,358.3,9156,0)
+70 ;;=Z85.71^^45^432^72
+71 ;;^UTILITY(U,$J,358.3,9156,1,0)
+72 ;;=^358.31IA^4^2
+73 ;;^UTILITY(U,$J,358.3,9156,1,3,0)
+74 ;;=3^Personal Hx of Hodgkin Lymphoma
+75 ;;^UTILITY(U,$J,358.3,9156,1,4,0)
+76 ;;=4^Z85.71
+77 ;;^UTILITY(U,$J,358.3,9156,2)
+78 ;;=^5063435
+79 ;;^UTILITY(U,$J,358.3,9157,0)
+80 ;;=Z65.8^^45^432^144
+81 ;;^UTILITY(U,$J,358.3,9157,1,0)
+82 ;;=^358.31IA^4^2
+83 ;;^UTILITY(U,$J,358.3,9157,1,3,0)
+84 ;;=3^Psychosocial Circumstance Related Problems
+85 ;;^UTILITY(U,$J,358.3,9157,1,4,0)
+86 ;;=4^Z65.8
+87 ;;^UTILITY(U,$J,358.3,9157,2)
+88 ;;=^5063185
+89 ;;^UTILITY(U,$J,358.3,9158,0)
+90 ;;=Z86.11^^45^432^109
+91 ;;^UTILITY(U,$J,358.3,9158,1,0)
+92 ;;=^358.31IA^4^2
+93 ;;^UTILITY(U,$J,358.3,9158,1,3,0)
+94 ;;=3^Personal Hx of Tuberculosis
+95 ;;^UTILITY(U,$J,358.3,9158,1,4,0)
+96 ;;=4^Z86.11
+97 ;;^UTILITY(U,$J,358.3,9158,2)
+98 ;;=^5063461
+99 ;;^UTILITY(U,$J,358.3,9159,0)
+100 ;;=Z86.13^^45^432^76
+101 ;;^UTILITY(U,$J,358.3,9159,1,0)
+102 ;;=^358.31IA^4^2
+103 ;;^UTILITY(U,$J,358.3,9159,1,3,0)
+104 ;;=3^Personal Hx of Malaria
+105 ;;^UTILITY(U,$J,358.3,9159,1,4,0)
+106 ;;=4^Z86.13
+107 ;;^UTILITY(U,$J,358.3,9159,2)
+108 ;;=^5063463
+109 ;;^UTILITY(U,$J,358.3,9160,0)
+110 ;;=Z86.73^^45^432^106
+111 ;;^UTILITY(U,$J,358.3,9160,1,0)
+112 ;;=^358.31IA^4^2
+113 ;;^UTILITY(U,$J,358.3,9160,1,3,0)
+114 ;;=3^Personal Hx of TIA & Cereb Infrc w/o Residual Deficits
+115 ;;^UTILITY(U,$J,358.3,9160,1,4,0)
+116 ;;=4^Z86.73
+117 ;;^UTILITY(U,$J,358.3,9160,2)
+118 ;;=^5063477
+119 ;;^UTILITY(U,$J,358.3,9161,0)
+120 ;;=Z86.79^^45^432^69
+121 ;;^UTILITY(U,$J,358.3,9161,1,0)
+122 ;;=^358.31IA^4^2
+123 ;;^UTILITY(U,$J,358.3,9161,1,3,0)
+124 ;;=3^Personal Hx of Circulatory System Diseases
+125 ;;^UTILITY(U,$J,358.3,9161,1,4,0)
+126 ;;=4^Z86.79
+127 ;;^UTILITY(U,$J,358.3,9161,2)
+128 ;;=^5063479
+129 ;;^UTILITY(U,$J,358.3,9162,0)
+130 ;;=Z91.040^^45^432^57
+131 ;;^UTILITY(U,$J,358.3,9162,1,0)
+132 ;;=^358.31IA^4^2
+133 ;;^UTILITY(U,$J,358.3,9162,1,3,0)
+134 ;;=3^Latex Allergy Status
+135 ;;^UTILITY(U,$J,358.3,9162,1,4,0)
+136 ;;=4^Z91.040
+137 ;;^UTILITY(U,$J,358.3,9162,2)
+138 ;;=^5063607
+139 ;;^UTILITY(U,$J,358.3,9163,0)
+140 ;;=Z92.3^^45^432^73
+141 ;;^UTILITY(U,$J,358.3,9163,1,0)
+142 ;;=^358.31IA^4^2
+143 ;;^UTILITY(U,$J,358.3,9163,1,3,0)
+144 ;;=3^Personal Hx of Irradiation
+145 ;;^UTILITY(U,$J,358.3,9163,1,4,0)
+146 ;;=4^Z92.3
+147 ;;^UTILITY(U,$J,358.3,9163,2)
+148 ;;=^5063637
+149 ;;^UTILITY(U,$J,358.3,9164,0)
+150 ;;=Z91.120^^45^432^53
+151 ;;^UTILITY(U,$J,358.3,9164,1,0)
+152 ;;=^358.31IA^4^2
+153 ;;^UTILITY(U,$J,358.3,9164,1,3,0)
+154 ;;=3^Intentional Underdose of Meds d/t Financial Hardship
+155 ;;^UTILITY(U,$J,358.3,9164,1,4,0)
+156 ;;=4^Z91.120
+157 ;;^UTILITY(U,$J,358.3,9164,2)
+158 ;;=^5063612
+159 ;;^UTILITY(U,$J,358.3,9165,0)
+160 ;;=Z91.11^^45^432^62
+161 ;;^UTILITY(U,$J,358.3,9165,1,0)
+162 ;;=^358.31IA^4^2
+163 ;;^UTILITY(U,$J,358.3,9165,1,3,0)
+164 ;;=3^Noncompliance w/ Dietary Regimen
+165 ;;^UTILITY(U,$J,358.3,9165,1,4,0)
+166 ;;=4^Z91.11
+167 ;;^UTILITY(U,$J,358.3,9165,2)
+168 ;;=^5063611
+169 ;;^UTILITY(U,$J,358.3,9166,0)
+170 ;;=Z87.891^^45^432^97
+171 ;;^UTILITY(U,$J,358.3,9166,1,0)
+172 ;;=^358.31IA^4^2
+173 ;;^UTILITY(U,$J,358.3,9166,1,3,0)
+174 ;;=3^Personal Hx of Nicotine Dependence
+175 ;;^UTILITY(U,$J,358.3,9166,1,4,0)
+176 ;;=4^Z87.891
+177 ;;^UTILITY(U,$J,358.3,9166,2)
+178 ;;=^5063518
+179 ;;^UTILITY(U,$J,358.3,9167,0)
+180 ;;=Z77.090^^45^432^3
+181 ;;^UTILITY(U,$J,358.3,9167,1,0)
+182 ;;=^358.31IA^4^2
+183 ;;^UTILITY(U,$J,358.3,9167,1,3,0)
+184 ;;=3^Asbestos Contact/Exposure
+185 ;;^UTILITY(U,$J,358.3,9167,1,4,0)
+186 ;;=4^Z77.090
+187 ;;^UTILITY(U,$J,358.3,9167,2)
+188 ;;=^5063312
+189 ;;^UTILITY(U,$J,358.3,9168,0)
+190 ;;=Z57.8^^45^432^65
+191 ;;^UTILITY(U,$J,358.3,9168,1,0)
+192 ;;=^358.31IA^4^2
+193 ;;^UTILITY(U,$J,358.3,9168,1,3,0)
+194 ;;=3^Occupational Exposure to Other Risk Factors
+195 ;;^UTILITY(U,$J,358.3,9168,1,4,0)
+196 ;;=4^Z57.8
+197 ;;^UTILITY(U,$J,358.3,9168,2)
+198 ;;=^5063127
+199 ;;^UTILITY(U,$J,358.3,9169,0)
+200 ;;=Z77.21^^45^432^46
+201 ;;^UTILITY(U,$J,358.3,9169,1,0)
+202 ;;=^358.31IA^4^2
+203 ;;^UTILITY(U,$J,358.3,9169,1,3,0)
+204 ;;=3^Hazardous Body Fluid Contact/Exposure
+205 ;;^UTILITY(U,$J,358.3,9169,1,4,0)
+206 ;;=4^Z77.21
+207 ;;^UTILITY(U,$J,358.3,9169,2)
+208 ;;=^5063323
+209 ;;^UTILITY(U,$J,358.3,9170,0)
+210 ;;=Z91.81^^45^432^50
+211 ;;^UTILITY(U,$J,358.3,9170,1,0)
+212 ;;=^358.31IA^4^2
+213 ;;^UTILITY(U,$J,358.3,9170,1,3,0)
+214 ;;=3^History of Falling
+215 ;;^UTILITY(U,$J,358.3,9170,1,4,0)
+216 ;;=4^Z91.81
+217 ;;^UTILITY(U,$J,358.3,9170,2)
+218 ;;=^5063625
+219 ;;^UTILITY(U,$J,358.3,9171,0)
+220 ;;=Z91.89^^45^432^112
+221 ;;^UTILITY(U,$J,358.3,9171,1,0)
+222 ;;=^358.31IA^4^2
+223 ;;^UTILITY(U,$J,358.3,9171,1,3,0)
+224 ;;=3^Personal Risk Factors NEC
+225 ;;^UTILITY(U,$J,358.3,9171,1,4,0)
+226 ;;=4^Z91.89
+227 ;;^UTILITY(U,$J,358.3,9171,2)
+228 ;;=^5063628
+229 ;;^UTILITY(U,$J,358.3,9172,0)
+230 ;;=Z92.89^^45^432^100
+231 ;;^UTILITY(U,$J,358.3,9172,1,0)
+232 ;;=^358.31IA^4^2
+233 ;;^UTILITY(U,$J,358.3,9172,1,3,0)
+234 ;;=3^Personal Hx of Other Medical Treatment
+235 ;;^UTILITY(U,$J,358.3,9172,1,4,0)
+236 ;;=4^Z92.89
+237 ;;^UTILITY(U,$J,358.3,9172,2)
+238 ;;=^5063641
+239 ;;^UTILITY(U,$J,358.3,9173,0)
+240 ;;=Z77.110^^45^432^1
+241 ;;^UTILITY(U,$J,358.3,9173,1,0)
+242 ;;=^358.31IA^4^2
+243 ;;^UTILITY(U,$J,358.3,9173,1,3,0)
+244 ;;=3^Air Pollution Contact/Exposure
+245 ;;^UTILITY(U,$J,358.3,9173,1,4,0)
+246 ;;=4^Z77.110
+247 ;;^UTILITY(U,$J,358.3,9173,2)
+248 ;;=^5063314
+249 ;;^UTILITY(U,$J,358.3,9174,0)
+250 ;;=Z77.112^^45^432^148
+251 ;;^UTILITY(U,$J,358.3,9174,1,0)
+252 ;;=^358.31IA^4^2
+253 ;;^UTILITY(U,$J,358.3,9174,1,3,0)
+254 ;;=3^Soil Pollution Contact/Exposure
+255 ;;^UTILITY(U,$J,358.3,9174,1,4,0)
+256 ;;=4^Z77.112
+257 ;;^UTILITY(U,$J,358.3,9174,2)
+258 ;;=^5063316
+259 ;;^UTILITY(U,$J,358.3,9175,0)
+260 ;;=Z77.111^^45^432^155
+261 ;;^UTILITY(U,$J,358.3,9175,1,0)
+262 ;;=^358.31IA^4^2
+263 ;;^UTILITY(U,$J,358.3,9175,1,3,0)
+264 ;;=3^Water Pollution Contact/Exposure
+265 ;;^UTILITY(U,$J,358.3,9175,1,4,0)
+266 ;;=4^Z77.111
+267 ;;^UTILITY(U,$J,358.3,9175,2)
+268 ;;=^5063315
+269 ;;^UTILITY(U,$J,358.3,9176,0)
+270 ;;=Z77.128^^45^432^113
+271 ;;^UTILITY(U,$J,358.3,9176,1,0)
+272 ;;=^358.31IA^4^2
+273 ;;^UTILITY(U,$J,358.3,9176,1,3,0)
+274 ;;=3^Physical Environment Hazards Contact/Exposure
+275 ;;^UTILITY(U,$J,358.3,9176,1,4,0)
+276 ;;=4^Z77.128
+277 ;;^UTILITY(U,$J,358.3,9176,2)
+278 ;;=^5063322
+279 ;;^UTILITY(U,$J,358.3,9177,0)
+280 ;;=Z77.123^^45^432^146
+281 ;;^UTILITY(U,$J,358.3,9177,1,0)
+282 ;;=^358.31IA^4^2
+283 ;;^UTILITY(U,$J,358.3,9177,1,3,0)
+284 ;;=3^Radon/Radiation Contact/Exposure
+285 ;;^UTILITY(U,$J,358.3,9177,1,4,0)
+286 ;;=4^Z77.123
+287 ;;^UTILITY(U,$J,358.3,9177,2)
+288 ;;=^5063321
+289 ;;^UTILITY(U,$J,358.3,9178,0)
+290 ;;=Z77.122^^45^432^61
+291 ;;^UTILITY(U,$J,358.3,9178,1,0)
+292 ;;=^358.31IA^4^2
+293 ;;^UTILITY(U,$J,358.3,9178,1,3,0)
+294 ;;=3^Noise Contact/Exposure
+295 ;;^UTILITY(U,$J,358.3,9178,1,4,0)
+296 ;;=4^Z77.122
+297 ;;^UTILITY(U,$J,358.3,9178,2)
+298 ;;=^5063320
+299 ;;^UTILITY(U,$J,358.3,9179,0)
+300 ;;=Z77.118^^45^432^11
+301 ;;^UTILITY(U,$J,358.3,9179,1,0)
+302 ;;=^358.31IA^4^2
+303 ;;^UTILITY(U,$J,358.3,9179,1,3,0)
+304 ;;=3^Environmental Pollution Contact/Exposure
+305 ;;^UTILITY(U,$J,358.3,9179,1,4,0)
+306 ;;=4^Z77.118
+307 ;;^UTILITY(U,$J,358.3,9179,2)
+308 ;;=^5063317
+309 ;;^UTILITY(U,$J,358.3,9180,0)
+310 ;;=Z77.9^^45^432^47
+311 ;;^UTILITY(U,$J,358.3,9180,1,0)
+312 ;;=^358.31IA^4^2
+313 ;;^UTILITY(U,$J,358.3,9180,1,3,0)
+314 ;;=3^Health Hazard Contact/Exposure
+315 ;;^UTILITY(U,$J,358.3,9180,1,4,0)
+316 ;;=4^Z77.9
+317 ;;^UTILITY(U,$J,358.3,9180,2)
+318 ;;=^5063326
+319 ;;^UTILITY(U,$J,358.3,9181,0)
+320 ;;=Z77.22^^45^432^10
+321 ;;^UTILITY(U,$J,358.3,9181,1,0)
+322 ;;=^358.31IA^4^2
+323 ;;^UTILITY(U,$J,358.3,9181,1,3,0)
+324 ;;=3^Environmental Exposure Tobacco Smoke/Second-Hand Smoke
+325 ;;^UTILITY(U,$J,358.3,9181,1,4,0)
+326 ;;=4^Z77.22
+327 ;;^UTILITY(U,$J,358.3,9181,2)
+328 ;;=^5063324
+329 ;;^UTILITY(U,$J,358.3,9182,0)
+330 ;;=Z80.0^^45^432^28
+331 ;;^UTILITY(U,$J,358.3,9182,1,0)
+332 ;;=^358.31IA^4^2
+333 ;;^UTILITY(U,$J,358.3,9182,1,3,0)
+334 ;;=3^Family Hx of Malig Neop of Digestive Organs
+335 ;;^UTILITY(U,$J,358.3,9182,1,4,0)
+336 ;;=4^Z80.0
+337 ;;^UTILITY(U,$J,358.3,9182,2)
+338 ;;=^5063344
+339 ;;^UTILITY(U,$J,358.3,9183,0)
+340 ;;=Z80.1^^45^432^34
+341 ;;^UTILITY(U,$J,358.3,9183,1,0)
+342 ;;=^358.31IA^4^2
+343 ;;^UTILITY(U,$J,358.3,9183,1,3,0)
+344 ;;=3^Family Hx of Malig Neop of Trachea,Bronc & Lung
+345 ;;^UTILITY(U,$J,358.3,9183,1,4,0)
+346 ;;=4^Z80.1
+347 ;;^UTILITY(U,$J,358.3,9183,2)
+348 ;;=^5063345
+349 ;;^UTILITY(U,$J,358.3,9184,0)
+350 ;;=Z80.3^^45^432^27
+351 ;;^UTILITY(U,$J,358.3,9184,1,0)
+352 ;;=^358.31IA^4^2
+353 ;;^UTILITY(U,$J,358.3,9184,1,3,0)
+354 ;;=3^Family Hx of Malig Neop of Breast
+355 ;;^UTILITY(U,$J,358.3,9184,1,4,0)
+356 ;;=4^Z80.3
+357 ;;^UTILITY(U,$J,358.3,9184,2)
+358 ;;=^5063347
+359 ;;^UTILITY(U,$J,358.3,9185,0)
+360 ;;=Z80.41^^45^432^31
+361 ;;^UTILITY(U,$J,358.3,9185,1,0)
+362 ;;=^358.31IA^4^2
+363 ;;^UTILITY(U,$J,358.3,9185,1,3,0)
+364 ;;=3^Family Hx of Malig Neop of Ovary
+365 ;;^UTILITY(U,$J,358.3,9185,1,4,0)
+366 ;;=4^Z80.41
+367 ;;^UTILITY(U,$J,358.3,9185,2)
+368 ;;=^5063348
+369 ;;^UTILITY(U,$J,358.3,9186,0)
+370 ;;=Z80.42^^45^432^32
+371 ;;^UTILITY(U,$J,358.3,9186,1,0)
+372 ;;=^358.31IA^4^2
+373 ;;^UTILITY(U,$J,358.3,9186,1,3,0)
+374 ;;=3^Family Hx of Malig Neop of Prostate
+375 ;;^UTILITY(U,$J,358.3,9186,1,4,0)
+376 ;;=4^Z80.42
+377 ;;^UTILITY(U,$J,358.3,9186,2)
+378 ;;=^5063349
+379 ;;^UTILITY(U,$J,358.3,9187,0)
+380 ;;=Z80.43^^45^432^33
+381 ;;^UTILITY(U,$J,358.3,9187,1,0)
+382 ;;=^358.31IA^4^2
+383 ;;^UTILITY(U,$J,358.3,9187,1,3,0)
+384 ;;=3^Family Hx of Malig Neop of Testis
+385 ;;^UTILITY(U,$J,358.3,9187,1,4,0)
+386 ;;=4^Z80.43
+387 ;;^UTILITY(U,$J,358.3,9187,2)
+388 ;;=^5063350
+389 ;;^UTILITY(U,$J,358.3,9188,0)
+390 ;;=Z80.6^^45^432^25
+391 ;;^UTILITY(U,$J,358.3,9188,1,0)
+392 ;;=^358.31IA^4^2
+393 ;;^UTILITY(U,$J,358.3,9188,1,3,0)
+394 ;;=3^Family Hx of Leukemia
+395 ;;^UTILITY(U,$J,358.3,9188,1,4,0)
+396 ;;=4^Z80.6
+397 ;;^UTILITY(U,$J,358.3,9188,2)
+398 ;;=^5063354
+399 ;;^UTILITY(U,$J,358.3,9189,0)
+400 ;;=Z80.8^^45^432^30
+401 ;;^UTILITY(U,$J,358.3,9189,1,0)
+402 ;;=^358.31IA^4^2
+403 ;;^UTILITY(U,$J,358.3,9189,1,3,0)
+404 ;;=3^Family Hx of Malig Neop of Organs/Systems
+405 ;;^UTILITY(U,$J,358.3,9189,1,4,0)
+406 ;;=4^Z80.8
+407 ;;^UTILITY(U,$J,358.3,9189,2)
+408 ;;=^5063356
+409 ;;^UTILITY(U,$J,358.3,9190,0)
+410 ;;=Z81.8^^45^432^35
+411 ;;^UTILITY(U,$J,358.3,9190,1,0)
+412 ;;=^358.31IA^4^2
+413 ;;^UTILITY(U,$J,358.3,9190,1,3,0)
+414 ;;=3^Family Hx of Mental/Behavioral Disorders
+415 ;;^UTILITY(U,$J,358.3,9190,1,4,0)
+416 ;;=4^Z81.8
+417 ;;^UTILITY(U,$J,358.3,9190,2)
+418 ;;=^5063363
+419 ;;^UTILITY(U,$J,358.3,9191,0)
+420 ;;=Z82.3^^45^432^42
+421 ;;^UTILITY(U,$J,358.3,9191,1,0)
+422 ;;=^358.31IA^4^2
+423 ;;^UTILITY(U,$J,358.3,9191,1,3,0)
+424 ;;=3^Family Hx of Stroke
+425 ;;^UTILITY(U,$J,358.3,9191,1,4,0)
+426 ;;=4^Z82.3
+427 ;;^UTILITY(U,$J,358.3,9191,2)
+428 ;;=^5063367
+429 ;;^UTILITY(U,$J,358.3,9192,0)
+430 ;;=Z82.49^^45^432^24
+431 ;;^UTILITY(U,$J,358.3,9192,1,0)
+432 ;;=^358.31IA^4^2
+433 ;;^UTILITY(U,$J,358.3,9192,1,3,0)
+434 ;;=3^Family Hx of Ischemic Heart Disease/Circulatory System
+435 ;;^UTILITY(U,$J,358.3,9192,1,4,0)
+436 ;;=4^Z82.49
+437 ;;^UTILITY(U,$J,358.3,9192,2)
+438 ;;=^5063369
+439 ;;^UTILITY(U,$J,358.3,9193,0)
+440 ;;=Z82.5^^45^432^14
+441 ;;^UTILITY(U,$J,358.3,9193,1,0)
+442 ;;=^358.31IA^4^2
+443 ;;^UTILITY(U,$J,358.3,9193,1,3,0)
+444 ;;=3^Family Hx of Asthma/Chronic Lower Respiratory Diseases
+445 ;;^UTILITY(U,$J,358.3,9193,1,4,0)
+446 ;;=4^Z82.5
+447 ;;^UTILITY(U,$J,358.3,9193,2)
+448 ;;=^5063370
+449 ;;^UTILITY(U,$J,358.3,9194,0)
+450 ;;=Z82.61^^45^432^13
+451 ;;^UTILITY(U,$J,358.3,9194,1,0)
+452 ;;=^358.31IA^4^2
+453 ;;^UTILITY(U,$J,358.3,9194,1,3,0)
+454 ;;=3^Family Hx of Arthritis
+455 ;;^UTILITY(U,$J,358.3,9194,1,4,0)
+456 ;;=4^Z82.61
+457 ;;^UTILITY(U,$J,358.3,9194,2)
+458 ;;=^5063371
+459 ;;^UTILITY(U,$J,358.3,9195,0)
+460 ;;=Z82.69^^45^432^37
+461 ;;^UTILITY(U,$J,358.3,9195,1,0)
+462 ;;=^358.31IA^4^2
+463 ;;^UTILITY(U,$J,358.3,9195,1,3,0)
+464 ;;=3^Family Hx of Musculoskeletal System/Connective Tissue
+465 ;;^UTILITY(U,$J,358.3,9195,1,4,0)
+466 ;;=4^Z82.69
+467 ;;^UTILITY(U,$J,358.3,9195,2)
+468 ;;=^5063373
+469 ;;^UTILITY(U,$J,358.3,9196,0)
+470 ;;=Z83.3^^45^432^20
+471 ;;^UTILITY(U,$J,358.3,9196,1,0)
+472 ;;=^358.31IA^4^2
+473 ;;^UTILITY(U,$J,358.3,9196,1,3,0)
+474 ;;=3^Family Hx of Diabetes Mellitus
+475 ;;^UTILITY(U,$J,358.3,9196,1,4,0)
+476 ;;=4^Z83.3
+477 ;;^UTILITY(U,$J,358.3,9196,2)
+478 ;;=^5063379
+479 ;;^UTILITY(U,$J,358.3,9197,0)
+480 ;;=Z83.2^^45^432^16
+481 ;;^UTILITY(U,$J,358.3,9197,1,0)
+482 ;;=^358.31IA^4^2
+483 ;;^UTILITY(U,$J,358.3,9197,1,3,0)
+484 ;;=3^Family Hx of Blood/Immune Mechanism Diseases
+485 ;;^UTILITY(U,$J,358.3,9197,1,4,0)
+486 ;;=4^Z83.2
+487 ;;^UTILITY(U,$J,358.3,9197,2)
+488 ;;=^5063378
+489 ;;^UTILITY(U,$J,358.3,9198,0)
+490 ;;=Z82.71^^45^432^40
+491 ;;^UTILITY(U,$J,358.3,9198,1,0)
+492 ;;=^358.31IA^4^2
+493 ;;^UTILITY(U,$J,358.3,9198,1,3,0)
+494 ;;=3^Family Hx of Polycystic Kidney
+495 ;;^UTILITY(U,$J,358.3,9198,1,4,0)
+496 ;;=4^Z82.71
+497 ;;^UTILITY(U,$J,358.3,9198,2)
+498 ;;=^321531
+499 ;;^UTILITY(U,$J,358.3,9199,0)
+500 ;;=Z82.1^^45^432^15
+501 ;;^UTILITY(U,$J,358.3,9199,1,0)
+502 ;;=^358.31IA^4^2
+503 ;;^UTILITY(U,$J,358.3,9199,1,3,0)
+504 ;;=3^Family Hx of Blindness/Visual Loss
+505 ;;^UTILITY(U,$J,358.3,9199,1,4,0)
+506 ;;=4^Z82.1
+507 ;;^UTILITY(U,$J,358.3,9199,2)
+508 ;;=^5063365
+509 ;;^UTILITY(U,$J,358.3,9200,0)
+510 ;;=Z82.2^^45^432^19
+511 ;;^UTILITY(U,$J,358.3,9200,1,0)
+512 ;;=^358.31IA^4^2
+513 ;;^UTILITY(U,$J,358.3,9200,1,3,0)
+514 ;;=3^Family Hx of Deafness/Hearing Loss
+515 ;;^UTILITY(U,$J,358.3,9200,1,4,0)
+516 ;;=4^Z82.2
+517 ;;^UTILITY(U,$J,358.3,9200,2)
+518 ;;=^5063366
+519 ;;^UTILITY(U,$J,358.3,9201,0)
+520 ;;=Z84.0^^45^432^41
+521 ;;^UTILITY(U,$J,358.3,9201,1,0)
+522 ;;=^358.31IA^4^2
+523 ;;^UTILITY(U,$J,358.3,9201,1,3,0)
+524 ;;=3^Family Hx of Skin Diseases
+525 ;;^UTILITY(U,$J,358.3,9201,1,4,0)
+526 ;;=4^Z84.0
+527 ;;^UTILITY(U,$J,358.3,9201,2)
+528 ;;=^5063388
+529 ;;^UTILITY(U,$J,358.3,9202,0)
+530 ;;=Z82.79^^45^432^18
+531 ;;^UTILITY(U,$J,358.3,9202,1,0)
+532 ;;=^358.31IA^4^2
+533 ;;^UTILITY(U,$J,358.3,9202,1,3,0)
+534 ;;=3^Family Hx of Congen Malform,Deformations & Chromsoml Abnlt
+535 ;;^UTILITY(U,$J,358.3,9202,1,4,0)
+536 ;;=4^Z82.79
+537 ;;^UTILITY(U,$J,358.3,9202,2)
+538 ;;=^5063374
+539 ;;^UTILITY(U,$J,358.3,9203,0)
+540 ;;=Z84.89^^45^432^39
+541 ;;^UTILITY(U,$J,358.3,9203,1,0)
+542 ;;=^358.31IA^4^2
+543 ;;^UTILITY(U,$J,358.3,9203,1,3,0)
+544 ;;=3^Family Hx of Other Spec Conditions
+545 ;;^UTILITY(U,$J,358.3,9203,1,4,0)
+546 ;;=4^Z84.89
+547 ;;^UTILITY(U,$J,358.3,9203,2)
+548 ;;=^5063393
+549 ;;^UTILITY(U,$J,358.3,9204,0)
+550 ;;=Z81.1^^45^432^12
+551 ;;^UTILITY(U,$J,358.3,9204,1,0)
+552 ;;=^358.31IA^4^2
+553 ;;^UTILITY(U,$J,358.3,9204,1,3,0)
+554 ;;=3^Family Hx of Alcohol Abuse/Dependence
+555 ;;^UTILITY(U,$J,358.3,9204,1,4,0)
+556 ;;=4^Z81.1
+557 ;;^UTILITY(U,$J,358.3,9204,2)
+558 ;;=^5063359
+559 ;;^UTILITY(U,$J,358.3,9205,0)
+560 ;;=Z82.62^^45^432^38
+561 ;;^UTILITY(U,$J,358.3,9205,1,0)
+562 ;;=^358.31IA^4^2
+563 ;;^UTILITY(U,$J,358.3,9205,1,3,0)
+564 ;;=3^Family Hx of Osteoporosis
+565 ;;^UTILITY(U,$J,358.3,9205,1,4,0)
+566 ;;=4^Z82.62
+567 ;;^UTILITY(U,$J,358.3,9205,2)
+568 ;;=^5063372
+569 ;;^UTILITY(U,$J,358.3,9206,0)
+570 ;;=Z83.71^^45^432^17
+571 ;;^UTILITY(U,$J,358.3,9206,1,0)
+572 ;;=^358.31IA^4^2
+573 ;;^UTILITY(U,$J,358.3,9206,1,3,0)
+574 ;;=3^Family Hx of Colonic Polyps
+575 ;;^UTILITY(U,$J,358.3,9206,1,4,0)
+576 ;;=4^Z83.71
+577 ;;^UTILITY(U,$J,358.3,9206,2)
+578 ;;=^5063386
+579 ;;^UTILITY(U,$J,358.3,9207,0)
+580 ;;=Z84.81^^45^432^22
+581 ;;^UTILITY(U,$J,358.3,9207,1,0)
+582 ;;=^358.31IA^4^2
+583 ;;^UTILITY(U,$J,358.3,9207,1,3,0)
+584 ;;=3^Family Hx of Genetic Disease
+585 ;;^UTILITY(U,$J,358.3,9207,1,4,0)
+586 ;;=4^Z84.81
+587 ;;^UTILITY(U,$J,358.3,9207,2)
+588 ;;=^5063392
+589 ;;^UTILITY(U,$J,358.3,9208,0)
+590 ;;=Z86.010^^45^432^70
+591 ;;^UTILITY(U,$J,358.3,9208,1,0)
+592 ;;=^358.31IA^4^2
+593 ;;^UTILITY(U,$J,358.3,9208,1,3,0)
+594 ;;=3^Personal Hx of Colonic Polyps
+595 ;;^UTILITY(U,$J,358.3,9208,1,4,0)
+596 ;;=4^Z86.010
+597 ;;^UTILITY(U,$J,358.3,9208,2)
+598 ;;=^5063456
+599 ;;^UTILITY(U,$J,358.3,9209,0)
+600 ;;=Z86.14^^45^432^75
+601 ;;^UTILITY(U,$J,358.3,9209,1,0)
+602 ;;=^358.31IA^4^2
+603 ;;^UTILITY(U,$J,358.3,9209,1,3,0)
+604 ;;=3^Personal Hx of MRSA Infection
+605 ;;^UTILITY(U,$J,358.3,9209,1,4,0)
+606 ;;=4^Z86.14
+607 ;;^UTILITY(U,$J,358.3,9209,2)
+608 ;;=^5063464
+609 ;;^UTILITY(U,$J,358.3,9210,0)
+610 ;;=Z86.31^^45^432^71
+611 ;;^UTILITY(U,$J,358.3,9210,1,0)
+612 ;;=^358.31IA^4^2
+613 ;;^UTILITY(U,$J,358.3,9210,1,3,0)
+614 ;;=3^Personal Hx of Diabetic Foot Ulcer
+615 ;;^UTILITY(U,$J,358.3,9210,1,4,0)
+616 ;;=4^Z86.31
+617 ;;^UTILITY(U,$J,358.3,9210,2)
+618 ;;=^5063467
+619 ;;^UTILITY(U,$J,358.3,9211,0)
+620 ;;=Z86.711^^45^432^101
+621 ;;^UTILITY(U,$J,358.3,9211,1,0)
+622 ;;=^358.31IA^4^2
+623 ;;^UTILITY(U,$J,358.3,9211,1,3,0)
+624 ;;=3^Personal Hx of Pulmonary Embolism
+625 ;;^UTILITY(U,$J,358.3,9211,1,4,0)
+626 ;;=4^Z86.711
+627 ;;^UTILITY(U,$J,358.3,9211,2)
+628 ;;=^5063474
+629 ;;^UTILITY(U,$J,358.3,9212,0)
+630 ;;=Z86.72^^45^432^107
+631 ;;^UTILITY(U,$J,358.3,9212,1,0)
+632 ;;=^358.31IA^4^2
+633 ;;^UTILITY(U,$J,358.3,9212,1,3,0)
+634 ;;=3^Personal Hx of Thrombophlebitis
+635 ;;^UTILITY(U,$J,358.3,9212,1,4,0)
+636 ;;=4^Z86.72
+637 ;;^UTILITY(U,$J,358.3,9212,2)
+638 ;;=^5063476
+639 ;;^UTILITY(U,$J,358.3,9213,0)
+640 ;;=Z87.310^^45^432^99
+641 ;;^UTILITY(U,$J,358.3,9213,1,0)
+642 ;;=^358.31IA^4^2
+643 ;;^UTILITY(U,$J,358.3,9213,1,3,0)
+644 ;;=3^Personal Hx of Osteoporosis Fx
+645 ;;^UTILITY(U,$J,358.3,9213,1,4,0)
+646 ;;=4^Z87.310
+647 ;;^UTILITY(U,$J,358.3,9213,2)
+648 ;;=^5063485
+649 ;;^UTILITY(U,$J,358.3,9214,0)
+650 ;;=Z87.442^^45^432^110
+651 ;;^UTILITY(U,$J,358.3,9214,1,0)
+652 ;;=^358.31IA^4^2
+653 ;;^UTILITY(U,$J,358.3,9214,1,3,0)
+654 ;;=3^Personal Hx of Urinary Calculi
+655 ;;^UTILITY(U,$J,358.3,9214,1,4,0)
+656 ;;=4^Z87.442
+657 ;;^UTILITY(U,$J,358.3,9214,2)
+658 ;;=^5063497
+659 ;;^UTILITY(U,$J,358.3,9215,0)
+660 ;;=Z87.81^^45^432^108
+661 ;;^UTILITY(U,$J,358.3,9215,1,0)
+662 ;;=^358.31IA^4^2
+663 ;;^UTILITY(U,$J,358.3,9215,1,3,0)
+664 ;;=3^Personal Hx of Traumatic Fx (Healed)
+665 ;;^UTILITY(U,$J,358.3,9215,1,4,0)
+666 ;;=4^Z87.81
+667 ;;^UTILITY(U,$J,358.3,9215,2)
+668 ;;=^5063513
+669 ;;^UTILITY(U,$J,358.3,9216,0)
+670 ;;=Z87.890^^45^432^102
+671 ;;^UTILITY(U,$J,358.3,9216,1,0)
+672 ;;=^358.31IA^4^2
+673 ;;^UTILITY(U,$J,358.3,9216,1,3,0)
+674 ;;=3^Personal Hx of Sex Reassignment
+675 ;;^UTILITY(U,$J,358.3,9216,1,4,0)
+676 ;;=4^Z87.890
+677 ;;^UTILITY(U,$J,358.3,9216,2)
+678 ;;=^5063517
+679 ;;^UTILITY(U,$J,358.3,9217,0)
+680 ;;=Z87.892^^45^432^68
+681 ;;^UTILITY(U,$J,358.3,9217,1,0)
+682 ;;=^358.31IA^4^2
+683 ;;^UTILITY(U,$J,358.3,9217,1,3,0)
+684 ;;=3^Personal Hx of Anaphylaxis
+685 ;;^UTILITY(U,$J,358.3,9217,1,4,0)
+686 ;;=4^Z87.892
+687 ;;^UTILITY(U,$J,358.3,9217,2)
+688 ;;=^5063519
+689 ;;^UTILITY(U,$J,358.3,9218,0)
+690 ;;=Z87.39^^45^432^96
