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

IBDEI03A.m

Go to the documentation of this file.
IBDEI03A ; ; 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,7810,1,4,0)
 ;;=4^K62.2
 ;;^UTILITY(U,$J,358.3,7810,2)
 ;;=^5008754
 ;;^UTILITY(U,$J,358.3,7811,0)
 ;;=K50.814^^42^396^1
 ;;^UTILITY(U,$J,358.3,7811,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7811,1,3,0)
 ;;=3^Crohn's,Sm & Lg Int w/ Abscess
 ;;^UTILITY(U,$J,358.3,7811,1,4,0)
 ;;=4^K50.814
 ;;^UTILITY(U,$J,358.3,7811,2)
 ;;=^5008642
 ;;^UTILITY(U,$J,358.3,7812,0)
 ;;=K50.811^^42^396^2
 ;;^UTILITY(U,$J,358.3,7812,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7812,1,3,0)
 ;;=3^Crohn's,Sm & Lg Int w/ Bleeding
 ;;^UTILITY(U,$J,358.3,7812,1,4,0)
 ;;=4^K50.811
 ;;^UTILITY(U,$J,358.3,7812,2)
 ;;=^5008639
 ;;^UTILITY(U,$J,358.3,7813,0)
 ;;=K50.813^^42^396^3
 ;;^UTILITY(U,$J,358.3,7813,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7813,1,3,0)
 ;;=3^Crohn's,Sm & Lg Int w/ Fistula
 ;;^UTILITY(U,$J,358.3,7813,1,4,0)
 ;;=4^K50.813
 ;;^UTILITY(U,$J,358.3,7813,2)
 ;;=^5008641
 ;;^UTILITY(U,$J,358.3,7814,0)
 ;;=K50.812^^42^396^4
 ;;^UTILITY(U,$J,358.3,7814,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7814,1,3,0)
 ;;=3^Crohn's,Sm & Lg Int w/ Obstruction
 ;;^UTILITY(U,$J,358.3,7814,1,4,0)
 ;;=4^K50.812
 ;;^UTILITY(U,$J,358.3,7814,2)
 ;;=^5008640
 ;;^UTILITY(U,$J,358.3,7815,0)
 ;;=K50.818^^42^396^5
 ;;^UTILITY(U,$J,358.3,7815,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7815,1,3,0)
 ;;=3^Crohn's,Sm & Lg Int w/ Other complications
 ;;^UTILITY(U,$J,358.3,7815,1,4,0)
 ;;=4^K50.818
 ;;^UTILITY(U,$J,358.3,7815,2)
 ;;=^5008643
 ;;^UTILITY(U,$J,358.3,7816,0)
 ;;=K50.80^^42^396^6
 ;;^UTILITY(U,$J,358.3,7816,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7816,1,3,0)
 ;;=3^Crohn's,Sm & Lg Int,Uncomplicated
 ;;^UTILITY(U,$J,358.3,7816,1,4,0)
 ;;=4^K50.80
 ;;^UTILITY(U,$J,358.3,7816,2)
 ;;=^5008638
 ;;^UTILITY(U,$J,358.3,7817,0)
 ;;=K50.014^^42^396^7
 ;;^UTILITY(U,$J,358.3,7817,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7817,1,3,0)
 ;;=3^Crohn's,Small intestine w/ Abscess
 ;;^UTILITY(U,$J,358.3,7817,1,4,0)
 ;;=4^K50.014
 ;;^UTILITY(U,$J,358.3,7817,2)
 ;;=^5008628
 ;;^UTILITY(U,$J,358.3,7818,0)
 ;;=K50.011^^42^396^8
 ;;^UTILITY(U,$J,358.3,7818,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7818,1,3,0)
 ;;=3^Crohn's,Small intestine w/ Bleeding
 ;;^UTILITY(U,$J,358.3,7818,1,4,0)
 ;;=4^K50.011
 ;;^UTILITY(U,$J,358.3,7818,2)
 ;;=^5008625
 ;;^UTILITY(U,$J,358.3,7819,0)
 ;;=K50.013^^42^396^9
 ;;^UTILITY(U,$J,358.3,7819,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7819,1,3,0)
 ;;=3^Crohn's,Small intestine w/ Fistula
 ;;^UTILITY(U,$J,358.3,7819,1,4,0)
 ;;=4^K50.013
 ;;^UTILITY(U,$J,358.3,7819,2)
 ;;=^5008627
 ;;^UTILITY(U,$J,358.3,7820,0)
 ;;=K50.012^^42^396^10
 ;;^UTILITY(U,$J,358.3,7820,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7820,1,3,0)
 ;;=3^Crohn's,Small intestine w/ Obstruction
 ;;^UTILITY(U,$J,358.3,7820,1,4,0)
 ;;=4^K50.012
 ;;^UTILITY(U,$J,358.3,7820,2)
 ;;=^5008626
 ;;^UTILITY(U,$J,358.3,7821,0)
 ;;=K50.018^^42^396^11
 ;;^UTILITY(U,$J,358.3,7821,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7821,1,3,0)
 ;;=3^Crohn's,Small intestine w/ Other complications
 ;;^UTILITY(U,$J,358.3,7821,1,4,0)
 ;;=4^K50.018
 ;;^UTILITY(U,$J,358.3,7821,2)
 ;;=^5008629
 ;;^UTILITY(U,$J,358.3,7822,0)
 ;;=K50.00^^42^396^12
 ;;^UTILITY(U,$J,358.3,7822,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7822,1,3,0)
 ;;=3^Crohn's,Small intestine w/ Crohn's,Small intestine,Uncomplicated
 ;;^UTILITY(U,$J,358.3,7822,1,4,0)
 ;;=4^K50.00
 ;;^UTILITY(U,$J,358.3,7822,2)
 ;;=^5008624
 ;;^UTILITY(U,$J,358.3,7823,0)
 ;;=K50.114^^42^396^13
 ;;^UTILITY(U,$J,358.3,7823,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7823,1,3,0)
 ;;=3^Crohn's,Large intestine w/ Abscess
 ;;^UTILITY(U,$J,358.3,7823,1,4,0)
 ;;=4^K50.114
 ;;^UTILITY(U,$J,358.3,7823,2)
 ;;=^5008635
 ;;^UTILITY(U,$J,358.3,7824,0)
 ;;=K50.113^^42^396^14
 ;;^UTILITY(U,$J,358.3,7824,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7824,1,3,0)
 ;;=3^Crohn's,Large intestine w/ Fistula
 ;;^UTILITY(U,$J,358.3,7824,1,4,0)
 ;;=4^K50.113
 ;;^UTILITY(U,$J,358.3,7824,2)
 ;;=^5008634
 ;;^UTILITY(U,$J,358.3,7825,0)
 ;;=K50.112^^42^396^15
 ;;^UTILITY(U,$J,358.3,7825,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7825,1,3,0)
 ;;=3^Crohn's,Large intestine w/ Obstruction
 ;;^UTILITY(U,$J,358.3,7825,1,4,0)
 ;;=4^K50.112
 ;;^UTILITY(U,$J,358.3,7825,2)
 ;;=^5008633
 ;;^UTILITY(U,$J,358.3,7826,0)
 ;;=K50.118^^42^396^16
 ;;^UTILITY(U,$J,358.3,7826,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7826,1,3,0)
 ;;=3^Crohn's,Large intestine w/ Other complication
 ;;^UTILITY(U,$J,358.3,7826,1,4,0)
 ;;=4^K50.118
 ;;^UTILITY(U,$J,358.3,7826,2)
 ;;=^5008636
 ;;^UTILITY(U,$J,358.3,7827,0)
 ;;=K50.10^^42^396^17
 ;;^UTILITY(U,$J,358.3,7827,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7827,1,3,0)
 ;;=3^Crohn's,Large intestine,Uncomplicated
 ;;^UTILITY(U,$J,358.3,7827,1,4,0)
 ;;=4^K50.10
 ;;^UTILITY(U,$J,358.3,7827,2)
 ;;=^5008631
 ;;^UTILITY(U,$J,358.3,7828,0)
 ;;=K52.3^^42^396^18
 ;;^UTILITY(U,$J,358.3,7828,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7828,1,3,0)
 ;;=3^Indeterminate Colitis
 ;;^UTILITY(U,$J,358.3,7828,1,4,0)
 ;;=4^K52.3
 ;;^UTILITY(U,$J,358.3,7828,2)
 ;;=^7357699
 ;;^UTILITY(U,$J,358.3,7829,0)
 ;;=K51.011^^42^396^19
 ;;^UTILITY(U,$J,358.3,7829,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7829,1,3,0)
 ;;=3^Ulcerative Pancolitis w/ Bleeding
 ;;^UTILITY(U,$J,358.3,7829,1,4,0)
 ;;=4^K51.011
 ;;^UTILITY(U,$J,358.3,7829,2)
 ;;=^5008653
 ;;^UTILITY(U,$J,358.3,7830,0)
 ;;=K51.018^^42^396^20
 ;;^UTILITY(U,$J,358.3,7830,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7830,1,3,0)
 ;;=3^Ulcerative Pancolitis w/ Other complication
 ;;^UTILITY(U,$J,358.3,7830,1,4,0)
 ;;=4^K51.018
 ;;^UTILITY(U,$J,358.3,7830,2)
 ;;=^5008657
 ;;^UTILITY(U,$J,358.3,7831,0)
 ;;=K51.00^^42^396^21
 ;;^UTILITY(U,$J,358.3,7831,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7831,1,3,0)
 ;;=3^Ulcerative Pancolitis,Uncomplicated
 ;;^UTILITY(U,$J,358.3,7831,1,4,0)
 ;;=4^K51.00
 ;;^UTILITY(U,$J,358.3,7831,2)
 ;;=^5008652
 ;;^UTILITY(U,$J,358.3,7832,0)
 ;;=K51.311^^42^396^22
 ;;^UTILITY(U,$J,358.3,7832,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7832,1,3,0)
 ;;=3^Ulcerative Rectosigmoiditis w/ Bleeding
 ;;^UTILITY(U,$J,358.3,7832,1,4,0)
 ;;=4^K51.311
 ;;^UTILITY(U,$J,358.3,7832,2)
 ;;=^5008667
 ;;^UTILITY(U,$J,358.3,7833,0)
 ;;=K51.318^^42^396^23
 ;;^UTILITY(U,$J,358.3,7833,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7833,1,3,0)
 ;;=3^Ulcerative Rectosigmoiditis w/ Other complication
 ;;^UTILITY(U,$J,358.3,7833,1,4,0)
 ;;=4^K51.318
 ;;^UTILITY(U,$J,358.3,7833,2)
 ;;=^5008671
 ;;^UTILITY(U,$J,358.3,7834,0)
 ;;=K51.30^^42^396^24
 ;;^UTILITY(U,$J,358.3,7834,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7834,1,3,0)
 ;;=3^Ulcerative Rectosigmoiditis,Uncomplicated
 ;;^UTILITY(U,$J,358.3,7834,1,4,0)
 ;;=4^K51.30
 ;;^UTILITY(U,$J,358.3,7834,2)
 ;;=^5008666
 ;;^UTILITY(U,$J,358.3,7835,0)
 ;;=K51.211^^42^396^25
 ;;^UTILITY(U,$J,358.3,7835,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7835,1,3,0)
 ;;=3^Ulcerative Proctitis w/ Bleeding
 ;;^UTILITY(U,$J,358.3,7835,1,4,0)
 ;;=4^K51.211
 ;;^UTILITY(U,$J,358.3,7835,2)
 ;;=^5008660
 ;;^UTILITY(U,$J,358.3,7836,0)
 ;;=K51.218^^42^396^26
 ;;^UTILITY(U,$J,358.3,7836,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7836,1,3,0)
 ;;=3^Ulcerative Proctitis w/ Other complication
 ;;^UTILITY(U,$J,358.3,7836,1,4,0)
 ;;=4^K51.218
 ;;^UTILITY(U,$J,358.3,7836,2)
 ;;=^5008664
 ;;^UTILITY(U,$J,358.3,7837,0)
 ;;=K51.20^^42^396^27
 ;;^UTILITY(U,$J,358.3,7837,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7837,1,3,0)
 ;;=3^Ulcerative Proctitis,Uncomplicated
 ;;^UTILITY(U,$J,358.3,7837,1,4,0)
 ;;=4^K51.20
 ;;^UTILITY(U,$J,358.3,7837,2)
 ;;=^5008659
 ;;^UTILITY(U,$J,358.3,7838,0)
 ;;=K51.811^^42^396^28
 ;;^UTILITY(U,$J,358.3,7838,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7838,1,3,0)
 ;;=3^Ulcerative Colitis,Other w/ Bleeding
 ;;^UTILITY(U,$J,358.3,7838,1,4,0)
 ;;=4^K51.811
 ;;^UTILITY(U,$J,358.3,7838,2)
 ;;=^5008688
 ;;^UTILITY(U,$J,358.3,7839,0)
 ;;=K51.818^^42^396^29
 ;;^UTILITY(U,$J,358.3,7839,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7839,1,3,0)
 ;;=3^Ulcerative Colitis,Other w/ Other complication
 ;;^UTILITY(U,$J,358.3,7839,1,4,0)
 ;;=4^K51.818
 ;;^UTILITY(U,$J,358.3,7839,2)
 ;;=^5008692
 ;;^UTILITY(U,$J,358.3,7840,0)
 ;;=K51.80^^42^396^30
 ;;^UTILITY(U,$J,358.3,7840,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7840,1,3,0)
 ;;=3^Ulcerative Colitis,Other,Uncomplicated
 ;;^UTILITY(U,$J,358.3,7840,1,4,0)
 ;;=4^K51.80
 ;;^UTILITY(U,$J,358.3,7840,2)
 ;;=^5008687
 ;;^UTILITY(U,$J,358.3,7841,0)
 ;;=B25.8^^42^396^31
 ;;^UTILITY(U,$J,358.3,7841,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7841,1,3,0)
 ;;=3^Cytomegaloviral colitis
 ;;^UTILITY(U,$J,358.3,7841,1,4,0)
 ;;=4^B25.8
 ;;^UTILITY(U,$J,358.3,7841,2)
 ;;=^5000559
 ;;^UTILITY(U,$J,358.3,7842,0)
 ;;=M07.69^^42^396^32
 ;;^UTILITY(U,$J,358.3,7842,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7842,1,3,0)
 ;;=3^Enteropathic arthropathies,Multiple sites
 ;;^UTILITY(U,$J,358.3,7842,1,4,0)
 ;;=4^M07.69
 ;;^UTILITY(U,$J,358.3,7842,2)
 ;;=^5010169
 ;;^UTILITY(U,$J,358.3,7843,0)
 ;;=M07.68^^42^396^33
 ;;^UTILITY(U,$J,358.3,7843,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7843,1,3,0)
 ;;=3^Enteropathic arthropathies,Vertebrae
 ;;^UTILITY(U,$J,358.3,7843,1,4,0)
 ;;=4^M07.68
 ;;^UTILITY(U,$J,358.3,7843,2)
 ;;=^5010168
 ;;^UTILITY(U,$J,358.3,7844,0)
 ;;=L52.^^42^396^34
 ;;^UTILITY(U,$J,358.3,7844,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7844,1,3,0)
 ;;=3^Erythema nodosum
 ;;^UTILITY(U,$J,358.3,7844,1,4,0)
 ;;=4^L52.
 ;;^UTILITY(U,$J,358.3,7844,2)
 ;;=^42065
 ;;^UTILITY(U,$J,358.3,7845,0)
 ;;=L88.^^42^396^35
 ;;^UTILITY(U,$J,358.3,7845,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7845,1,3,0)
 ;;=3^Pyoderma gangrenosum
 ;;^UTILITY(U,$J,358.3,7845,1,4,0)
 ;;=4^L88.
 ;;^UTILITY(U,$J,358.3,7845,2)
 ;;=^186812
 ;;^UTILITY(U,$J,358.3,7846,0)
 ;;=E85.4^^42^397^2
 ;;^UTILITY(U,$J,358.3,7846,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7846,1,3,0)
 ;;=3^Amyloidosis,Localized
 ;;^UTILITY(U,$J,358.3,7846,1,4,0)
 ;;=4^E85.4
 ;;^UTILITY(U,$J,358.3,7846,2)
 ;;=^5003017
 ;;^UTILITY(U,$J,358.3,7847,0)
 ;;=D3A.092^^42^397^16
 ;;^UTILITY(U,$J,358.3,7847,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7847,1,3,0)
 ;;=3^Carcinoid,Benign,Stomach
 ;;^UTILITY(U,$J,358.3,7847,1,4,0)
 ;;=4^D3A.092
 ;;^UTILITY(U,$J,358.3,7847,2)
 ;;=^5002201
 ;;^UTILITY(U,$J,358.3,7848,0)
 ;;=D3A.010^^42^397^11
 ;;^UTILITY(U,$J,358.3,7848,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7848,1,3,0)
 ;;=3^Carcinoid,Benign,Duodenum
 ;;^UTILITY(U,$J,358.3,7848,1,4,0)
 ;;=4^D3A.010
 ;;^UTILITY(U,$J,358.3,7848,2)
 ;;=^5002187
 ;;^UTILITY(U,$J,358.3,7849,0)
 ;;=D3A.011^^42^397^13
 ;;^UTILITY(U,$J,358.3,7849,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7849,1,3,0)
 ;;=3^Carcinoid,Benign,Jejunum
 ;;^UTILITY(U,$J,358.3,7849,1,4,0)
 ;;=4^D3A.011
 ;;^UTILITY(U,$J,358.3,7849,2)
 ;;=^5002188
 ;;^UTILITY(U,$J,358.3,7850,0)
 ;;=D3A.012^^42^397^12
 ;;^UTILITY(U,$J,358.3,7850,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7850,1,3,0)
 ;;=3^Carcinoid,Benign,Ileum
 ;;^UTILITY(U,$J,358.3,7850,1,4,0)
 ;;=4^D3A.012
 ;;^UTILITY(U,$J,358.3,7850,2)
 ;;=^5002189
 ;;^UTILITY(U,$J,358.3,7851,0)
 ;;=D3A.019^^42^397^18
 ;;^UTILITY(U,$J,358.3,7851,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7851,1,3,0)
 ;;=3^Carcinoid,Benign,Unspc Small Intestine
 ;;^UTILITY(U,$J,358.3,7851,1,4,0)
 ;;=4^D3A.019
 ;;^UTILITY(U,$J,358.3,7851,2)
 ;;=^5002190
 ;;^UTILITY(U,$J,358.3,7852,0)
 ;;=D3A.020^^42^397^7
 ;;^UTILITY(U,$J,358.3,7852,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7852,1,3,0)
 ;;=3^Carcinoid,Benign,Appendix
 ;;^UTILITY(U,$J,358.3,7852,1,4,0)
 ;;=4^D3A.020
 ;;^UTILITY(U,$J,358.3,7852,2)
 ;;=^5002191
 ;;^UTILITY(U,$J,358.3,7853,0)
 ;;=D3A.021^^42^397^9
 ;;^UTILITY(U,$J,358.3,7853,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7853,1,3,0)
 ;;=3^Carcinoid,Benign,Cecum
 ;;^UTILITY(U,$J,358.3,7853,1,4,0)
 ;;=4^D3A.021
 ;;^UTILITY(U,$J,358.3,7853,2)
 ;;=^5002192
 ;;^UTILITY(U,$J,358.3,7854,0)
 ;;=D3A.022^^42^397^8
 ;;^UTILITY(U,$J,358.3,7854,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7854,1,3,0)
 ;;=3^Carcinoid,Benign,Ascending
 ;;^UTILITY(U,$J,358.3,7854,1,4,0)
 ;;=4^D3A.022
 ;;^UTILITY(U,$J,358.3,7854,2)
 ;;=^5002193
 ;;^UTILITY(U,$J,358.3,7855,0)
 ;;=D3A.023^^42^397^17
 ;;^UTILITY(U,$J,358.3,7855,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7855,1,3,0)
 ;;=3^Carcinoid,Benign,Transverse
 ;;^UTILITY(U,$J,358.3,7855,1,4,0)
 ;;=4^D3A.023
 ;;^UTILITY(U,$J,358.3,7855,2)
 ;;=^5002194
 ;;^UTILITY(U,$J,358.3,7856,0)
 ;;=D3A.024^^42^397^10
 ;;^UTILITY(U,$J,358.3,7856,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7856,1,3,0)
 ;;=3^Carcinoid,Benign,Descending
 ;;^UTILITY(U,$J,358.3,7856,1,4,0)
 ;;=4^D3A.024
 ;;^UTILITY(U,$J,358.3,7856,2)
 ;;=^5002195
 ;;^UTILITY(U,$J,358.3,7857,0)
 ;;=D3A.025^^42^397^15
 ;;^UTILITY(U,$J,358.3,7857,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7857,1,3,0)
 ;;=3^Carcinoid,Benign,Sigmoid
 ;;^UTILITY(U,$J,358.3,7857,1,4,0)
 ;;=4^D3A.025
 ;;^UTILITY(U,$J,358.3,7857,2)
 ;;=^5002196
 ;;^UTILITY(U,$J,358.3,7858,0)
 ;;=D3A.026^^42^397^14
 ;;^UTILITY(U,$J,358.3,7858,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7858,1,3,0)
 ;;=3^Carcinoid,Benign,Rectum
 ;;^UTILITY(U,$J,358.3,7858,1,4,0)
 ;;=4^D3A.026
 ;;^UTILITY(U,$J,358.3,7858,2)
 ;;=^5002197
 ;;^UTILITY(U,$J,358.3,7859,0)
 ;;=D3A.029^^42^397^19
 ;;^UTILITY(U,$J,358.3,7859,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7859,1,3,0)
 ;;=3^Carcinoid,Benign,Unspec Colon
 ;;^UTILITY(U,$J,358.3,7859,1,4,0)
 ;;=4^D3A.029
 ;;^UTILITY(U,$J,358.3,7859,2)
 ;;=^5002198
 ;;^UTILITY(U,$J,358.3,7860,0)
 ;;=C7A.092^^42^397^29
 ;;^UTILITY(U,$J,358.3,7860,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7860,1,3,0)
 ;;=3^Carcinoid,Malignant,Stomach
 ;;^UTILITY(U,$J,358.3,7860,1,4,0)
 ;;=4^C7A.092
 ;;^UTILITY(U,$J,358.3,7860,2)
 ;;=^5001373
 ;;^UTILITY(U,$J,358.3,7861,0)
 ;;=C7A.010^^42^397^24
 ;;^UTILITY(U,$J,358.3,7861,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7861,1,3,0)
 ;;=3^Carcinoid,Malignant,Duodenum
 ;;^UTILITY(U,$J,358.3,7861,1,4,0)
 ;;=4^C7A.010
 ;;^UTILITY(U,$J,358.3,7861,2)
 ;;=^5001359
 ;;^UTILITY(U,$J,358.3,7862,0)
 ;;=C7A.011^^42^397^26
 ;;^UTILITY(U,$J,358.3,7862,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7862,1,3,0)
 ;;=3^Carcinoid,Malignant,Jejunum
 ;;^UTILITY(U,$J,358.3,7862,1,4,0)
 ;;=4^C7A.011
 ;;^UTILITY(U,$J,358.3,7862,2)
 ;;=^5001360
 ;;^UTILITY(U,$J,358.3,7863,0)
 ;;=C7A.012^^42^397^25
 ;;^UTILITY(U,$J,358.3,7863,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7863,1,3,0)
 ;;=3^Carcinoid,Malignant,Ileum
 ;;^UTILITY(U,$J,358.3,7863,1,4,0)
 ;;=4^C7A.012
 ;;^UTILITY(U,$J,358.3,7863,2)
 ;;=^5001361
 ;;^UTILITY(U,$J,358.3,7864,0)
 ;;=C7A.019^^42^397^32
 ;;^UTILITY(U,$J,358.3,7864,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7864,1,3,0)
 ;;=3^Carcinoid,Malignant,Unspec Small Intestine
 ;;^UTILITY(U,$J,358.3,7864,1,4,0)
 ;;=4^C7A.019
 ;;^UTILITY(U,$J,358.3,7864,2)
 ;;=^5001362
 ;;^UTILITY(U,$J,358.3,7865,0)
 ;;=C7A.020^^42^397^20
 ;;^UTILITY(U,$J,358.3,7865,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7865,1,3,0)
 ;;=3^Carcinoid,Malignant,Appendix
 ;;^UTILITY(U,$J,358.3,7865,1,4,0)
 ;;=4^C7A.020
 ;;^UTILITY(U,$J,358.3,7865,2)
 ;;=^5001363
 ;;^UTILITY(U,$J,358.3,7866,0)
 ;;=C7A.021^^42^397^22
 ;;^UTILITY(U,$J,358.3,7866,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7866,1,3,0)
 ;;=3^Carcinoid,Malignant,Cecum
 ;;^UTILITY(U,$J,358.3,7866,1,4,0)
 ;;=4^C7A.021
 ;;^UTILITY(U,$J,358.3,7866,2)
 ;;=^5001364
 ;;^UTILITY(U,$J,358.3,7867,0)
 ;;=C7A.022^^42^397^21
 ;;^UTILITY(U,$J,358.3,7867,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7867,1,3,0)
 ;;=3^Carcinoid,Malignant,Ascending
 ;;^UTILITY(U,$J,358.3,7867,1,4,0)
 ;;=4^C7A.022
 ;;^UTILITY(U,$J,358.3,7867,2)
 ;;=^5001365
 ;;^UTILITY(U,$J,358.3,7868,0)
 ;;=C7A.023^^42^397^30
 ;;^UTILITY(U,$J,358.3,7868,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7868,1,3,0)
 ;;=3^Carcinoid,Malignant,Transverse
 ;;^UTILITY(U,$J,358.3,7868,1,4,0)
 ;;=4^C7A.023
 ;;^UTILITY(U,$J,358.3,7868,2)
 ;;=^5001366
 ;;^UTILITY(U,$J,358.3,7869,0)
 ;;=C7A.024^^42^397^23
 ;;^UTILITY(U,$J,358.3,7869,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7869,1,3,0)
 ;;=3^Carcinoid,Malignant,Descending
 ;;^UTILITY(U,$J,358.3,7869,1,4,0)
 ;;=4^C7A.024
 ;;^UTILITY(U,$J,358.3,7869,2)
 ;;=^5001367
 ;;^UTILITY(U,$J,358.3,7870,0)
 ;;=C7A.025^^42^397^28
 ;;^UTILITY(U,$J,358.3,7870,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7870,1,3,0)
 ;;=3^Carcinoid,Malignant,Sigmoid
 ;;^UTILITY(U,$J,358.3,7870,1,4,0)
 ;;=4^C7A.025
 ;;^UTILITY(U,$J,358.3,7870,2)
 ;;=^5001368
 ;;^UTILITY(U,$J,358.3,7871,0)
 ;;=C7A.026^^42^397^27
 ;;^UTILITY(U,$J,358.3,7871,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7871,1,3,0)
 ;;=3^Carcinoid,Malignant,Rectum
 ;;^UTILITY(U,$J,358.3,7871,1,4,0)
 ;;=4^C7A.026
 ;;^UTILITY(U,$J,358.3,7871,2)
 ;;=^5001369
 ;;^UTILITY(U,$J,358.3,7872,0)
 ;;=C7A.029^^42^397^31
 ;;^UTILITY(U,$J,358.3,7872,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7872,1,3,0)
 ;;=3^Carcinoid,Malignant,Unspec Colon
 ;;^UTILITY(U,$J,358.3,7872,1,4,0)
 ;;=4^C7A.029
 ;;^UTILITY(U,$J,358.3,7872,2)
 ;;=^5001370
 ;;^UTILITY(U,$J,358.3,7873,0)
 ;;=C7B.02^^42^397^5
 ;;^UTILITY(U,$J,358.3,7873,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7873,1,3,0)
 ;;=3^Carcinoid of Liver
 ;;^UTILITY(U,$J,358.3,7873,1,4,0)
 ;;=4^C7B.02
 ;;^UTILITY(U,$J,358.3,7873,2)
 ;;=^5001383
 ;;^UTILITY(U,$J,358.3,7874,0)
 ;;=E34.0^^42^397^6
 ;;^UTILITY(U,$J,358.3,7874,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7874,1,3,0)
 ;;=3^Carcinoid syndrome
 ;;^UTILITY(U,$J,358.3,7874,1,4,0)
 ;;=4^E34.0
 ;;^UTILITY(U,$J,358.3,7874,2)
 ;;=^19261
 ;;^UTILITY(U,$J,358.3,7875,0)
 ;;=C83.79^^42^397^33
 ;;^UTILITY(U,$J,358.3,7875,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7875,1,3,0)
 ;;=3^Lymphoma,Burkitt,Extranodal
 ;;^UTILITY(U,$J,358.3,7875,1,4,0)
 ;;=4^C83.79
 ;;^UTILITY(U,$J,358.3,7875,2)
 ;;=^5001600
 ;;^UTILITY(U,$J,358.3,7876,0)
 ;;=C83.39^^42^397^34
 ;;^UTILITY(U,$J,358.3,7876,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7876,1,3,0)
 ;;=3^Lymphoma,Diffuse large B-Cell,Extranodal
 ;;^UTILITY(U,$J,358.3,7876,1,4,0)
 ;;=4^C83.39
 ;;^UTILITY(U,$J,358.3,7876,2)
 ;;=^5001580
 ;;^UTILITY(U,$J,358.3,7877,0)
 ;;=C86.2^^42^397^35
 ;;^UTILITY(U,$J,358.3,7877,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7877,1,3,0)
 ;;=3^Lymphoma,Enteropathy T-cell type
 ;;^UTILITY(U,$J,358.3,7877,1,4,0)
 ;;=4^C86.2
 ;;^UTILITY(U,$J,358.3,7877,2)
 ;;=^5001743
 ;;^UTILITY(U,$J,358.3,7878,0)
 ;;=C82.59^^42^397^36
 ;;^UTILITY(U,$J,358.3,7878,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7878,1,3,0)
 ;;=3^Lymphoma,Follicular Diffuse,Extranodal
 ;;^UTILITY(U,$J,358.3,7878,1,4,0)
 ;;=4^C82.59
 ;;^UTILITY(U,$J,358.3,7878,2)
 ;;=^5001520
 ;;^UTILITY(U,$J,358.3,7879,0)
 ;;=C88.4^^42^397^37
 ;;^UTILITY(U,$J,358.3,7879,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,7879,1,3,0)
 ;;=3^Lymphoma,MALT Type
 ;;^UTILITY(U,$J,358.3,7879,1,4,0)
 ;;=4^C88.4
 ;;^UTILITY(U,$J,358.3,7879,2)
 ;;=^5001749
 ;;^UTILITY(U,$J,358.3,7880,0)
 ;;=C83.19^^42^397^38