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

IBDEI03O.m

Go to the documentation of this file.
IBDEI03O ; ; 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,8802,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8802,1,3,0)
 ;;=3^Neuropathic Bladder,Reflex NEC
 ;;^UTILITY(U,$J,358.3,8802,1,4,0)
 ;;=4^N31.1
 ;;^UTILITY(U,$J,358.3,8802,2)
 ;;=^5015645
 ;;^UTILITY(U,$J,358.3,8803,0)
 ;;=N32.89^^45^428^7
 ;;^UTILITY(U,$J,358.3,8803,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8803,1,3,0)
 ;;=3^Bladder Disorders,Other Spec
 ;;^UTILITY(U,$J,358.3,8803,1,4,0)
 ;;=4^N32.89
 ;;^UTILITY(U,$J,358.3,8803,2)
 ;;=^87989
 ;;^UTILITY(U,$J,358.3,8804,0)
 ;;=N33.^^45^428^6
 ;;^UTILITY(U,$J,358.3,8804,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8804,1,3,0)
 ;;=3^Bladder Disorders,Diseases Classified Elsewhere
 ;;^UTILITY(U,$J,358.3,8804,1,4,0)
 ;;=4^N33.
 ;;^UTILITY(U,$J,358.3,8804,2)
 ;;=^5015654
 ;;^UTILITY(U,$J,358.3,8805,0)
 ;;=N34.2^^45^428^115
 ;;^UTILITY(U,$J,358.3,8805,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8805,1,3,0)
 ;;=3^Urethritis
 ;;^UTILITY(U,$J,358.3,8805,1,4,0)
 ;;=4^N34.2
 ;;^UTILITY(U,$J,358.3,8805,2)
 ;;=^88231
 ;;^UTILITY(U,$J,358.3,8806,0)
 ;;=N34.1^^45^428^116
 ;;^UTILITY(U,$J,358.3,8806,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8806,1,3,0)
 ;;=3^Urethritis,Nonspec
 ;;^UTILITY(U,$J,358.3,8806,1,4,0)
 ;;=4^N34.1
 ;;^UTILITY(U,$J,358.3,8806,2)
 ;;=^5015655
 ;;^UTILITY(U,$J,358.3,8807,0)
 ;;=N39.0^^45^428^120
 ;;^UTILITY(U,$J,358.3,8807,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8807,1,3,0)
 ;;=3^Urinary Tract Infection,Site Not Spec
 ;;^UTILITY(U,$J,358.3,8807,1,4,0)
 ;;=4^N39.0
 ;;^UTILITY(U,$J,358.3,8807,2)
 ;;=^124436
 ;;^UTILITY(U,$J,358.3,8808,0)
 ;;=N31.0^^45^428^81
 ;;^UTILITY(U,$J,358.3,8808,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8808,1,3,0)
 ;;=3^Neuropathic Bladder,Uninhibited NEC
 ;;^UTILITY(U,$J,358.3,8808,1,4,0)
 ;;=4^N31.0
 ;;^UTILITY(U,$J,358.3,8808,2)
 ;;=^5015644
 ;;^UTILITY(U,$J,358.3,8809,0)
 ;;=R31.9^^45^428^60
 ;;^UTILITY(U,$J,358.3,8809,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8809,1,3,0)
 ;;=3^Hematuria,Unspec
 ;;^UTILITY(U,$J,358.3,8809,1,4,0)
 ;;=4^R31.9
 ;;^UTILITY(U,$J,358.3,8809,2)
 ;;=^5019328
 ;;^UTILITY(U,$J,358.3,8810,0)
 ;;=R31.0^^45^428^57
 ;;^UTILITY(U,$J,358.3,8810,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8810,1,3,0)
 ;;=3^Hematuria,Gross
 ;;^UTILITY(U,$J,358.3,8810,1,4,0)
 ;;=4^R31.0
 ;;^UTILITY(U,$J,358.3,8810,2)
 ;;=^5019325
 ;;^UTILITY(U,$J,358.3,8811,0)
 ;;=R31.1^^45^428^56
 ;;^UTILITY(U,$J,358.3,8811,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8811,1,3,0)
 ;;=3^Hematuria,Benign Essential Microscopic
 ;;^UTILITY(U,$J,358.3,8811,1,4,0)
 ;;=4^R31.1
 ;;^UTILITY(U,$J,358.3,8811,2)
 ;;=^5019326
 ;;^UTILITY(U,$J,358.3,8812,0)
 ;;=N40.0^^45^428^3
 ;;^UTILITY(U,$J,358.3,8812,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8812,1,3,0)
 ;;=3^BPH w/o Lower Urinary Tract Symptoms
 ;;^UTILITY(U,$J,358.3,8812,1,4,0)
 ;;=4^N40.0
 ;;^UTILITY(U,$J,358.3,8812,2)
 ;;=^5015689
 ;;^UTILITY(U,$J,358.3,8813,0)
 ;;=N40.1^^45^428^2
 ;;^UTILITY(U,$J,358.3,8813,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8813,1,3,0)
 ;;=3^BPH w/ Lower Urinary Tract Symptoms
 ;;^UTILITY(U,$J,358.3,8813,1,4,0)
 ;;=4^N40.1
 ;;^UTILITY(U,$J,358.3,8813,2)
 ;;=^5015690
 ;;^UTILITY(U,$J,358.3,8814,0)
 ;;=N41.0^^45^428^91
 ;;^UTILITY(U,$J,358.3,8814,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8814,1,3,0)
 ;;=3^Prostatitis,Acute
 ;;^UTILITY(U,$J,358.3,8814,1,4,0)
 ;;=4^N41.0
 ;;^UTILITY(U,$J,358.3,8814,2)
 ;;=^259106
 ;;^UTILITY(U,$J,358.3,8815,0)
 ;;=N45.1^^45^428^33
 ;;^UTILITY(U,$J,358.3,8815,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8815,1,3,0)
 ;;=3^Epididymitis
 ;;^UTILITY(U,$J,358.3,8815,1,4,0)
 ;;=4^N45.1
 ;;^UTILITY(U,$J,358.3,8815,2)
 ;;=^41396
 ;;^UTILITY(U,$J,358.3,8816,0)
 ;;=N45.2^^45^428^83
 ;;^UTILITY(U,$J,358.3,8816,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8816,1,3,0)
 ;;=3^Orchitis
 ;;^UTILITY(U,$J,358.3,8816,1,4,0)
 ;;=4^N45.2
 ;;^UTILITY(U,$J,358.3,8816,2)
 ;;=^86174
 ;;^UTILITY(U,$J,358.3,8817,0)
 ;;=N45.3^^45^428^34
 ;;^UTILITY(U,$J,358.3,8817,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8817,1,3,0)
 ;;=3^Epididymo-orchitis
 ;;^UTILITY(U,$J,358.3,8817,1,4,0)
 ;;=4^N45.3
 ;;^UTILITY(U,$J,358.3,8817,2)
 ;;=^5015707
 ;;^UTILITY(U,$J,358.3,8818,0)
 ;;=N47.2^^45^428^85
 ;;^UTILITY(U,$J,358.3,8818,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8818,1,3,0)
 ;;=3^Paraphimosis
 ;;^UTILITY(U,$J,358.3,8818,1,4,0)
 ;;=4^N47.2
 ;;^UTILITY(U,$J,358.3,8818,2)
 ;;=^90023
 ;;^UTILITY(U,$J,358.3,8819,0)
 ;;=N47.1^^45^428^87
 ;;^UTILITY(U,$J,358.3,8819,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8819,1,3,0)
 ;;=3^Phimosis
 ;;^UTILITY(U,$J,358.3,8819,1,4,0)
 ;;=4^N47.1
 ;;^UTILITY(U,$J,358.3,8819,2)
 ;;=^93340
 ;;^UTILITY(U,$J,358.3,8820,0)
 ;;=N47.3^^45^428^28
 ;;^UTILITY(U,$J,358.3,8820,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8820,1,3,0)
 ;;=3^Deficient Foreskin
 ;;^UTILITY(U,$J,358.3,8820,1,4,0)
 ;;=4^N47.3
 ;;^UTILITY(U,$J,358.3,8820,2)
 ;;=^5015726
 ;;^UTILITY(U,$J,358.3,8821,0)
 ;;=N47.5^^45^428^1
 ;;^UTILITY(U,$J,358.3,8821,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8821,1,3,0)
 ;;=3^Adhesions Prepuce & Glans Penis
 ;;^UTILITY(U,$J,358.3,8821,1,4,0)
 ;;=4^N47.5
 ;;^UTILITY(U,$J,358.3,8821,2)
 ;;=^5015728
 ;;^UTILITY(U,$J,358.3,8822,0)
 ;;=N47.4^^45^428^23
 ;;^UTILITY(U,$J,358.3,8822,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8822,1,3,0)
 ;;=3^Cyst of Prepuce,Benign
 ;;^UTILITY(U,$J,358.3,8822,1,4,0)
 ;;=4^N47.4
 ;;^UTILITY(U,$J,358.3,8822,2)
 ;;=^5015727
 ;;^UTILITY(U,$J,358.3,8823,0)
 ;;=N47.8^^45^428^29
 ;;^UTILITY(U,$J,358.3,8823,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8823,1,3,0)
 ;;=3^Disorders of Prepuce
 ;;^UTILITY(U,$J,358.3,8823,1,4,0)
 ;;=4^N47.8
 ;;^UTILITY(U,$J,358.3,8823,2)
 ;;=^5015730
 ;;^UTILITY(U,$J,358.3,8824,0)
 ;;=N47.7^^45^428^64
 ;;^UTILITY(U,$J,358.3,8824,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8824,1,3,0)
 ;;=3^Inflammatory Diseases of Prepuce
 ;;^UTILITY(U,$J,358.3,8824,1,4,0)
 ;;=4^N47.7
 ;;^UTILITY(U,$J,358.3,8824,2)
 ;;=^5015729
 ;;^UTILITY(U,$J,358.3,8825,0)
 ;;=N47.6^^45^428^5
 ;;^UTILITY(U,$J,358.3,8825,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8825,1,3,0)
 ;;=3^Balanoposthitis
 ;;^UTILITY(U,$J,358.3,8825,1,4,0)
 ;;=4^N47.6
 ;;^UTILITY(U,$J,358.3,8825,2)
 ;;=^12530
 ;;^UTILITY(U,$J,358.3,8826,0)
 ;;=N48.1^^45^428^4
 ;;^UTILITY(U,$J,358.3,8826,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8826,1,3,0)
 ;;=3^Balanitis
 ;;^UTILITY(U,$J,358.3,8826,1,4,0)
 ;;=4^N48.1
 ;;^UTILITY(U,$J,358.3,8826,2)
 ;;=^12525
 ;;^UTILITY(U,$J,358.3,8827,0)
 ;;=N52.34^^45^428^43
 ;;^UTILITY(U,$J,358.3,8827,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8827,1,3,0)
 ;;=3^Erectile Dysfunction Following Simple Prostatectomy
 ;;^UTILITY(U,$J,358.3,8827,1,4,0)
 ;;=4^N52.34
 ;;^UTILITY(U,$J,358.3,8827,2)
 ;;=^5015760
 ;;^UTILITY(U,$J,358.3,8828,0)
 ;;=N52.39^^45^428^45
 ;;^UTILITY(U,$J,358.3,8828,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8828,1,3,0)
 ;;=3^Erectile Dysfunction Post-Surgical,Other & Unspec
 ;;^UTILITY(U,$J,358.3,8828,1,4,0)
 ;;=4^N52.39
 ;;^UTILITY(U,$J,358.3,8828,2)
 ;;=^5015761
 ;;^UTILITY(U,$J,358.3,8829,0)
 ;;=N52.33^^45^428^44
 ;;^UTILITY(U,$J,358.3,8829,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8829,1,3,0)
 ;;=3^Erectile Dysfunction Following Urethral Surgery
 ;;^UTILITY(U,$J,358.3,8829,1,4,0)
 ;;=4^N52.33
 ;;^UTILITY(U,$J,358.3,8829,2)
 ;;=^5015759
 ;;^UTILITY(U,$J,358.3,8830,0)
 ;;=N52.32^^45^428^41
 ;;^UTILITY(U,$J,358.3,8830,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8830,1,3,0)
 ;;=3^Erectile Dysfunction Following Radical Cystectomy
 ;;^UTILITY(U,$J,358.3,8830,1,4,0)
 ;;=4^N52.32
 ;;^UTILITY(U,$J,358.3,8830,2)
 ;;=^5015758
 ;;^UTILITY(U,$J,358.3,8831,0)
 ;;=N52.31^^45^428^42
 ;;^UTILITY(U,$J,358.3,8831,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8831,1,3,0)
 ;;=3^Erectile Dysfunction Following Radical Prostatectomy
 ;;^UTILITY(U,$J,358.3,8831,1,4,0)
 ;;=4^N52.31
 ;;^UTILITY(U,$J,358.3,8831,2)
 ;;=^5015757
 ;;^UTILITY(U,$J,358.3,8832,0)
 ;;=N52.2^^45^428^48
 ;;^UTILITY(U,$J,358.3,8832,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8832,1,3,0)
 ;;=3^Erectile Dysfunction,Drug-Induced
 ;;^UTILITY(U,$J,358.3,8832,1,4,0)
 ;;=4^N52.2
 ;;^UTILITY(U,$J,358.3,8832,2)
 ;;=^5015756
 ;;^UTILITY(U,$J,358.3,8833,0)
 ;;=N52.03^^45^428^39
 ;;^UTILITY(U,$J,358.3,8833,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8833,1,3,0)
 ;;=3^Erectile Dysfunction Comb Artrl Insuff & Corporo-Venous Occlusv
 ;;^UTILITY(U,$J,358.3,8833,1,4,0)
 ;;=4^N52.03
 ;;^UTILITY(U,$J,358.3,8833,2)
 ;;=^5015754
 ;;^UTILITY(U,$J,358.3,8834,0)
 ;;=N52.02^^45^428^40
 ;;^UTILITY(U,$J,358.3,8834,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8834,1,3,0)
 ;;=3^Erectile Dysfunction Corporo-Venous Occlusive
 ;;^UTILITY(U,$J,358.3,8834,1,4,0)
 ;;=4^N52.02
 ;;^UTILITY(U,$J,358.3,8834,2)
 ;;=^5015753
 ;;^UTILITY(U,$J,358.3,8835,0)
 ;;=N52.1^^45^428^47
 ;;^UTILITY(U,$J,358.3,8835,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8835,1,3,0)
 ;;=3^Erectile Dysfunction d/t Diseases Classified Elsewhere
 ;;^UTILITY(U,$J,358.3,8835,1,4,0)
 ;;=4^N52.1
 ;;^UTILITY(U,$J,358.3,8835,2)
 ;;=^5015755
 ;;^UTILITY(U,$J,358.3,8836,0)
 ;;=N52.01^^45^428^46
 ;;^UTILITY(U,$J,358.3,8836,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8836,1,3,0)
 ;;=3^Erectile Dysfunction d/t Arterial Insufficiency
 ;;^UTILITY(U,$J,358.3,8836,1,4,0)
 ;;=4^N52.01
 ;;^UTILITY(U,$J,358.3,8836,2)
 ;;=^5015752
 ;;^UTILITY(U,$J,358.3,8837,0)
 ;;=N95.2^^45^428^90
 ;;^UTILITY(U,$J,358.3,8837,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8837,1,3,0)
 ;;=3^Postmenopausal Atrophic Vaginitis
 ;;^UTILITY(U,$J,358.3,8837,1,4,0)
 ;;=4^N95.2
 ;;^UTILITY(U,$J,358.3,8837,2)
 ;;=^270577
 ;;^UTILITY(U,$J,358.3,8838,0)
 ;;=R30.9^^45^428^71
 ;;^UTILITY(U,$J,358.3,8838,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8838,1,3,0)
 ;;=3^Micturition Painful,Unspec
 ;;^UTILITY(U,$J,358.3,8838,1,4,0)
 ;;=4^R30.9
 ;;^UTILITY(U,$J,358.3,8838,2)
 ;;=^5019324
 ;;^UTILITY(U,$J,358.3,8839,0)
 ;;=R30.0^^45^428^30
 ;;^UTILITY(U,$J,358.3,8839,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8839,1,3,0)
 ;;=3^Dysuria
 ;;^UTILITY(U,$J,358.3,8839,1,4,0)
 ;;=4^R30.0
 ;;^UTILITY(U,$J,358.3,8839,2)
 ;;=^5019322
 ;;^UTILITY(U,$J,358.3,8840,0)
 ;;=R33.9^^45^428^121
 ;;^UTILITY(U,$J,358.3,8840,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8840,1,3,0)
 ;;=3^Urine Retention,Unspec
 ;;^UTILITY(U,$J,358.3,8840,1,4,0)
 ;;=4^R33.9
 ;;^UTILITY(U,$J,358.3,8840,2)
 ;;=^5019332
 ;;^UTILITY(U,$J,358.3,8841,0)
 ;;=R32.^^45^428^119
 ;;^UTILITY(U,$J,358.3,8841,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8841,1,3,0)
 ;;=3^Urinary Incontinence,Unspec
 ;;^UTILITY(U,$J,358.3,8841,1,4,0)
 ;;=4^R32.
 ;;^UTILITY(U,$J,358.3,8841,2)
 ;;=^5019329
 ;;^UTILITY(U,$J,358.3,8842,0)
 ;;=N39.41^^45^428^117
 ;;^UTILITY(U,$J,358.3,8842,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8842,1,3,0)
 ;;=3^Urge Incontinence
 ;;^UTILITY(U,$J,358.3,8842,1,4,0)
 ;;=4^N39.41
 ;;^UTILITY(U,$J,358.3,8842,2)
 ;;=^5015680
 ;;^UTILITY(U,$J,358.3,8843,0)
 ;;=R35.0^^45^428^69
 ;;^UTILITY(U,$J,358.3,8843,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8843,1,3,0)
 ;;=3^Micturition Frequency
 ;;^UTILITY(U,$J,358.3,8843,1,4,0)
 ;;=4^R35.0
 ;;^UTILITY(U,$J,358.3,8843,2)
 ;;=^5019334
 ;;^UTILITY(U,$J,358.3,8844,0)
 ;;=R35.1^^45^428^82
 ;;^UTILITY(U,$J,358.3,8844,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8844,1,3,0)
 ;;=3^Nocturia
 ;;^UTILITY(U,$J,358.3,8844,1,4,0)
 ;;=4^R35.1
 ;;^UTILITY(U,$J,358.3,8844,2)
 ;;=^5019335
 ;;^UTILITY(U,$J,358.3,8845,0)
 ;;=R39.11^^45^428^70
 ;;^UTILITY(U,$J,358.3,8845,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8845,1,3,0)
 ;;=3^Micturition Hesitancy
 ;;^UTILITY(U,$J,358.3,8845,1,4,0)
 ;;=4^R39.11
 ;;^UTILITY(U,$J,358.3,8845,2)
 ;;=^5019341
 ;;^UTILITY(U,$J,358.3,8846,0)
 ;;=R39.16^^45^428^107
 ;;^UTILITY(U,$J,358.3,8846,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8846,1,3,0)
 ;;=3^Straining to Void
 ;;^UTILITY(U,$J,358.3,8846,1,4,0)
 ;;=4^R39.16
 ;;^UTILITY(U,$J,358.3,8846,2)
 ;;=^5019346
 ;;^UTILITY(U,$J,358.3,8847,0)
 ;;=R36.0^^45^428^111
 ;;^UTILITY(U,$J,358.3,8847,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8847,1,3,0)
 ;;=3^Urethral Discharge w/o Blood
 ;;^UTILITY(U,$J,358.3,8847,1,4,0)
 ;;=4^R36.0
 ;;^UTILITY(U,$J,358.3,8847,2)
 ;;=^5019337
 ;;^UTILITY(U,$J,358.3,8848,0)
 ;;=R36.9^^45^428^112
 ;;^UTILITY(U,$J,358.3,8848,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8848,1,3,0)
 ;;=3^Urethral Discharge,Unspec
 ;;^UTILITY(U,$J,358.3,8848,1,4,0)
 ;;=4^R36.9
 ;;^UTILITY(U,$J,358.3,8848,2)
 ;;=^5019338
 ;;^UTILITY(U,$J,358.3,8849,0)
 ;;=R80.1^^45^428^96
 ;;^UTILITY(U,$J,358.3,8849,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8849,1,3,0)
 ;;=3^Proteinuria Persistent,Unspec
 ;;^UTILITY(U,$J,358.3,8849,1,4,0)
 ;;=4^R80.1
 ;;^UTILITY(U,$J,358.3,8849,2)
 ;;=^5019596
 ;;^UTILITY(U,$J,358.3,8850,0)
 ;;=R80.0^^45^428^94
 ;;^UTILITY(U,$J,358.3,8850,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8850,1,3,0)
 ;;=3^Proteinuria Isolated
 ;;^UTILITY(U,$J,358.3,8850,1,4,0)
 ;;=4^R80.0
 ;;^UTILITY(U,$J,358.3,8850,2)
 ;;=^5019595
 ;;^UTILITY(U,$J,358.3,8851,0)
 ;;=R80.8^^45^428^97
 ;;^UTILITY(U,$J,358.3,8851,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8851,1,3,0)
 ;;=3^Proteinuria,Other
 ;;^UTILITY(U,$J,358.3,8851,1,4,0)
 ;;=4^R80.8
 ;;^UTILITY(U,$J,358.3,8851,2)
 ;;=^5019598
 ;;^UTILITY(U,$J,358.3,8852,0)
 ;;=R80.3^^45^428^93
 ;;^UTILITY(U,$J,358.3,8852,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8852,1,3,0)
 ;;=3^Proteinuria Bence Jones
 ;;^UTILITY(U,$J,358.3,8852,1,4,0)
 ;;=4^R80.3
 ;;^UTILITY(U,$J,358.3,8852,2)
 ;;=^13272
 ;;^UTILITY(U,$J,358.3,8853,0)
 ;;=R80.9^^45^428^98
 ;;^UTILITY(U,$J,358.3,8853,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8853,1,3,0)
 ;;=3^Proteinuria,Unspec
 ;;^UTILITY(U,$J,358.3,8853,1,4,0)
 ;;=4^R80.9
 ;;^UTILITY(U,$J,358.3,8853,2)
 ;;=^5019599
 ;;^UTILITY(U,$J,358.3,8854,0)
 ;;=Z87.442^^45^428^86
 ;;^UTILITY(U,$J,358.3,8854,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8854,1,3,0)
 ;;=3^Personal Hx of Urinary Calculi
 ;;^UTILITY(U,$J,358.3,8854,1,4,0)
 ;;=4^Z87.442
 ;;^UTILITY(U,$J,358.3,8854,2)
 ;;=^5063497
 ;;^UTILITY(U,$J,358.3,8855,0)
 ;;=N18.1^^45^428^15
 ;;^UTILITY(U,$J,358.3,8855,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8855,1,3,0)
 ;;=3^Chronic Kidney Disease,Stage 1
 ;;^UTILITY(U,$J,358.3,8855,1,4,0)
 ;;=4^N18.1
 ;;^UTILITY(U,$J,358.3,8855,2)
 ;;=^5015602
 ;;^UTILITY(U,$J,358.3,8856,0)
 ;;=N18.2^^45^428^16
 ;;^UTILITY(U,$J,358.3,8856,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8856,1,3,0)
 ;;=3^Chronic Kidney Disease,Stage 2
 ;;^UTILITY(U,$J,358.3,8856,1,4,0)
 ;;=4^N18.2
 ;;^UTILITY(U,$J,358.3,8856,2)
 ;;=^5015603
 ;;^UTILITY(U,$J,358.3,8857,0)
 ;;=N18.4^^45^428^20
 ;;^UTILITY(U,$J,358.3,8857,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8857,1,3,0)
 ;;=3^Chronic Kidney Disease,Stage 4
 ;;^UTILITY(U,$J,358.3,8857,1,4,0)
 ;;=4^N18.4
 ;;^UTILITY(U,$J,358.3,8857,2)
 ;;=^5015605
 ;;^UTILITY(U,$J,358.3,8858,0)
 ;;=N18.5^^45^428^21
 ;;^UTILITY(U,$J,358.3,8858,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8858,1,3,0)
 ;;=3^Chronic Kidney Disease,Stage 5
 ;;^UTILITY(U,$J,358.3,8858,1,4,0)
 ;;=4^N18.5
 ;;^UTILITY(U,$J,358.3,8858,2)
 ;;=^5015606
 ;;^UTILITY(U,$J,358.3,8859,0)
 ;;=Q61.3^^45^428^89
 ;;^UTILITY(U,$J,358.3,8859,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8859,1,3,0)
 ;;=3^Polycystic Kidney,Unspec
 ;;^UTILITY(U,$J,358.3,8859,1,4,0)
 ;;=4^Q61.3
 ;;^UTILITY(U,$J,358.3,8859,2)
 ;;=^5018797
 ;;^UTILITY(U,$J,358.3,8860,0)
 ;;=N20.1^^45^428^11
 ;;^UTILITY(U,$J,358.3,8860,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8860,1,3,0)
 ;;=3^Calculus Ureter
 ;;^UTILITY(U,$J,358.3,8860,1,4,0)
 ;;=4^N20.1
 ;;^UTILITY(U,$J,358.3,8860,2)
 ;;=^5015608
 ;;^UTILITY(U,$J,358.3,8861,0)
 ;;=N18.9^^45^428^22
 ;;^UTILITY(U,$J,358.3,8861,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8861,1,3,0)
 ;;=3^Chronic Kidney Failure,Unspec
 ;;^UTILITY(U,$J,358.3,8861,1,4,0)
 ;;=4^N18.9
 ;;^UTILITY(U,$J,358.3,8861,2)
 ;;=^332812
 ;;^UTILITY(U,$J,358.3,8862,0)
 ;;=N18.6^^45^428^32
 ;;^UTILITY(U,$J,358.3,8862,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8862,1,3,0)
 ;;=3^End Stage Renal Disease (ESRD)
 ;;^UTILITY(U,$J,358.3,8862,1,4,0)
 ;;=4^N18.6
 ;;^UTILITY(U,$J,358.3,8862,2)
 ;;=^303986
 ;;^UTILITY(U,$J,358.3,8863,0)
 ;;=N52.9^^45^428^49
 ;;^UTILITY(U,$J,358.3,8863,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8863,1,3,0)
 ;;=3^Erectile Dysfunction,Unspec
 ;;^UTILITY(U,$J,358.3,8863,1,4,0)
 ;;=4^N52.9
 ;;^UTILITY(U,$J,358.3,8863,2)
 ;;=^5015763
 ;;^UTILITY(U,$J,358.3,8864,0)
 ;;=N32.81^^45^428^84
 ;;^UTILITY(U,$J,358.3,8864,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8864,1,3,0)
 ;;=3^Overactive Bladder
 ;;^UTILITY(U,$J,358.3,8864,1,4,0)
 ;;=4^N32.81
 ;;^UTILITY(U,$J,358.3,8864,2)
 ;;=^5015652
 ;;^UTILITY(U,$J,358.3,8865,0)
 ;;=Q61.2^^45^428^88
 ;;^UTILITY(U,$J,358.3,8865,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8865,1,3,0)
 ;;=3^Polycystic Kidney,Adult Type
 ;;^UTILITY(U,$J,358.3,8865,1,4,0)
 ;;=4^Q61.2
 ;;^UTILITY(U,$J,358.3,8865,2)
 ;;=^5018796
 ;;^UTILITY(U,$J,358.3,8866,0)
 ;;=N41.1^^45^428^92
 ;;^UTILITY(U,$J,358.3,8866,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8866,1,3,0)
 ;;=3^Prostatitis,Chronic
 ;;^UTILITY(U,$J,358.3,8866,1,4,0)
 ;;=4^N41.1
 ;;^UTILITY(U,$J,358.3,8866,2)
 ;;=^186931
 ;;^UTILITY(U,$J,358.3,8867,0)
 ;;=N11.9^^45^428^100
 ;;^UTILITY(U,$J,358.3,8867,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8867,1,3,0)
 ;;=3^Pyelonephritis,Chronic,Unspec
 ;;^UTILITY(U,$J,358.3,8867,1,4,0)
 ;;=4^N11.9
 ;;^UTILITY(U,$J,358.3,8867,2)
 ;;=^5015574
 ;;^UTILITY(U,$J,358.3,8868,0)
 ;;=N20.9^^45^428^118
 ;;^UTILITY(U,$J,358.3,8868,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8868,1,3,0)
 ;;=3^Urinary Calculus,Unspec
 ;;^UTILITY(U,$J,358.3,8868,1,4,0)
 ;;=4^N20.9
 ;;^UTILITY(U,$J,358.3,8868,2)
 ;;=^5015610
 ;;^UTILITY(U,$J,358.3,8869,0)
 ;;=R97.20^^45^428^31
 ;;^UTILITY(U,$J,358.3,8869,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8869,1,3,0)
 ;;=3^Elevated PSA
 ;;^UTILITY(U,$J,358.3,8869,1,4,0)
 ;;=4^R97.20
 ;;^UTILITY(U,$J,358.3,8869,2)
 ;;=^334262
 ;;^UTILITY(U,$J,358.3,8870,0)
 ;;=N52.36^^45^428^36
 ;;^UTILITY(U,$J,358.3,8870,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8870,1,3,0)
 ;;=3^Erectile Dysfunction After Interstitial Seed Therapy
 ;;^UTILITY(U,$J,358.3,8870,1,4,0)
 ;;=4^N52.36
 ;;^UTILITY(U,$J,358.3,8870,2)
 ;;=^5138933
 ;;^UTILITY(U,$J,358.3,8871,0)
 ;;=N52.37^^45^428^37
 ;;^UTILITY(U,$J,358.3,8871,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8871,1,3,0)
 ;;=3^Erectile Dysfunction After Prostate Ablative Therapy
 ;;^UTILITY(U,$J,358.3,8871,1,4,0)
 ;;=4^N52.37
 ;;^UTILITY(U,$J,358.3,8871,2)
 ;;=^5138934
 ;;^UTILITY(U,$J,358.3,8872,0)
 ;;=N52.35^^45^428^38
 ;;^UTILITY(U,$J,358.3,8872,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,8872,1,3,0)
 ;;=3^Erectile Dysfunction After Radiation Therapy
 ;;^UTILITY(U,$J,358.3,8872,1,4,0)
 ;;=4^N52.35
 ;;^UTILITY(U,$J,358.3,8872,2)
 ;;=^5138932
 ;;^UTILITY(U,$J,358.3,8873,0)
 ;;=R31.21^^45^428^58
 ;;^UTILITY(U,$J,358.3,8873,1,0)
 ;;=^358.31IA^4^2