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

IBDEI067.m

Go to the documentation of this file.
IBDEI067 ; ; 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,15028,1,3,0)
 ;;=3^Inguinal Hernia,Bilat w/o Obst or Gangrene
 ;;^UTILITY(U,$J,358.3,15028,1,4,0)
 ;;=4^K40.20
 ;;^UTILITY(U,$J,358.3,15028,2)
 ;;=^5008585
 ;;^UTILITY(U,$J,358.3,15029,0)
 ;;=K44.9^^56^640^36
 ;;^UTILITY(U,$J,358.3,15029,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15029,1,3,0)
 ;;=3^Diaphragmatic Hernia w/o Obst or Gangrene
 ;;^UTILITY(U,$J,358.3,15029,1,4,0)
 ;;=4^K44.9
 ;;^UTILITY(U,$J,358.3,15029,2)
 ;;=^5008617
 ;;^UTILITY(U,$J,358.3,15030,0)
 ;;=K46.9^^56^640^1
 ;;^UTILITY(U,$J,358.3,15030,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15030,1,3,0)
 ;;=3^Abdominal Hernia w/o Obst or Gangrene,Unspec
 ;;^UTILITY(U,$J,358.3,15030,1,4,0)
 ;;=4^K46.9
 ;;^UTILITY(U,$J,358.3,15030,2)
 ;;=^5008623
 ;;^UTILITY(U,$J,358.3,15031,0)
 ;;=K50.90^^56^640^31
 ;;^UTILITY(U,$J,358.3,15031,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15031,1,3,0)
 ;;=3^Crohn's Disease w/o Complications,Unspec
 ;;^UTILITY(U,$J,358.3,15031,1,4,0)
 ;;=4^K50.90
 ;;^UTILITY(U,$J,358.3,15031,2)
 ;;=^5008645
 ;;^UTILITY(U,$J,358.3,15032,0)
 ;;=K50.911^^56^640^29
 ;;^UTILITY(U,$J,358.3,15032,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15032,1,3,0)
 ;;=3^Crohn's Disease w/ Rectal Bleeding,Unspec
 ;;^UTILITY(U,$J,358.3,15032,1,4,0)
 ;;=4^K50.911
 ;;^UTILITY(U,$J,358.3,15032,2)
 ;;=^5008646
 ;;^UTILITY(U,$J,358.3,15033,0)
 ;;=K50.912^^56^640^27
 ;;^UTILITY(U,$J,358.3,15033,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15033,1,3,0)
 ;;=3^Crohn's Disease w/ Intestinal Obstruction,Unspec
 ;;^UTILITY(U,$J,358.3,15033,1,4,0)
 ;;=4^K50.912
 ;;^UTILITY(U,$J,358.3,15033,2)
 ;;=^5008647
 ;;^UTILITY(U,$J,358.3,15034,0)
 ;;=K50.919^^56^640^30
 ;;^UTILITY(U,$J,358.3,15034,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15034,1,3,0)
 ;;=3^Crohn's Disease w/ Unspec Complications,Unspec
 ;;^UTILITY(U,$J,358.3,15034,1,4,0)
 ;;=4^K50.919
 ;;^UTILITY(U,$J,358.3,15034,2)
 ;;=^5008651
 ;;^UTILITY(U,$J,358.3,15035,0)
 ;;=K50.914^^56^640^25
 ;;^UTILITY(U,$J,358.3,15035,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15035,1,3,0)
 ;;=3^Crohn's Disease w/ Abscess,Unspec
 ;;^UTILITY(U,$J,358.3,15035,1,4,0)
 ;;=4^K50.914
 ;;^UTILITY(U,$J,358.3,15035,2)
 ;;=^5008649
 ;;^UTILITY(U,$J,358.3,15036,0)
 ;;=K50.913^^56^640^26
 ;;^UTILITY(U,$J,358.3,15036,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15036,1,3,0)
 ;;=3^Crohn's Disease w/ Fistula,Unspec
 ;;^UTILITY(U,$J,358.3,15036,1,4,0)
 ;;=4^K50.913
 ;;^UTILITY(U,$J,358.3,15036,2)
 ;;=^5008648
 ;;^UTILITY(U,$J,358.3,15037,0)
 ;;=K50.918^^56^640^28
 ;;^UTILITY(U,$J,358.3,15037,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15037,1,3,0)
 ;;=3^Crohn's Disease w/ Oth Complication,Unspec
 ;;^UTILITY(U,$J,358.3,15037,1,4,0)
 ;;=4^K50.918
 ;;^UTILITY(U,$J,358.3,15037,2)
 ;;=^5008650
 ;;^UTILITY(U,$J,358.3,15038,0)
 ;;=K51.90^^56^640^91
 ;;^UTILITY(U,$J,358.3,15038,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15038,1,3,0)
 ;;=3^Ulcerative Colitis w/o Complications,Unspec
 ;;^UTILITY(U,$J,358.3,15038,1,4,0)
 ;;=4^K51.90
 ;;^UTILITY(U,$J,358.3,15038,2)
 ;;=^5008694
 ;;^UTILITY(U,$J,358.3,15039,0)
 ;;=K51.919^^56^640^90
 ;;^UTILITY(U,$J,358.3,15039,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15039,1,3,0)
 ;;=3^Ulcerative Colitis w/ Unspec Complications,Unspec
 ;;^UTILITY(U,$J,358.3,15039,1,4,0)
 ;;=4^K51.919
 ;;^UTILITY(U,$J,358.3,15039,2)
 ;;=^5008700
 ;;^UTILITY(U,$J,358.3,15040,0)
 ;;=K51.918^^56^640^88
 ;;^UTILITY(U,$J,358.3,15040,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15040,1,3,0)
 ;;=3^Ulcerative Colitis w/ Oth Complication,Unspec
 ;;^UTILITY(U,$J,358.3,15040,1,4,0)
 ;;=4^K51.918
 ;;^UTILITY(U,$J,358.3,15040,2)
 ;;=^5008699
 ;;^UTILITY(U,$J,358.3,15041,0)
 ;;=K51.914^^56^640^85
 ;;^UTILITY(U,$J,358.3,15041,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15041,1,3,0)
 ;;=3^Ulcerative Colitis w/ Abscess,Unspec
 ;;^UTILITY(U,$J,358.3,15041,1,4,0)
 ;;=4^K51.914
 ;;^UTILITY(U,$J,358.3,15041,2)
 ;;=^5008698
 ;;^UTILITY(U,$J,358.3,15042,0)
 ;;=K51.913^^56^640^86
 ;;^UTILITY(U,$J,358.3,15042,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15042,1,3,0)
 ;;=3^Ulcerative Colitis w/ Fistula,Unspec
 ;;^UTILITY(U,$J,358.3,15042,1,4,0)
 ;;=4^K51.913
 ;;^UTILITY(U,$J,358.3,15042,2)
 ;;=^5008697
 ;;^UTILITY(U,$J,358.3,15043,0)
 ;;=K51.912^^56^640^87
 ;;^UTILITY(U,$J,358.3,15043,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15043,1,3,0)
 ;;=3^Ulcerative Colitis w/ Intestinal Obstruction,Unspec
 ;;^UTILITY(U,$J,358.3,15043,1,4,0)
 ;;=4^K51.912
 ;;^UTILITY(U,$J,358.3,15043,2)
 ;;=^5008696
 ;;^UTILITY(U,$J,358.3,15044,0)
 ;;=K51.911^^56^640^89
 ;;^UTILITY(U,$J,358.3,15044,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15044,1,3,0)
 ;;=3^Ulcerative Colitis w/ Rectal Bleeding,Unspec
 ;;^UTILITY(U,$J,358.3,15044,1,4,0)
 ;;=4^K51.911
 ;;^UTILITY(U,$J,358.3,15044,2)
 ;;=^5008695
 ;;^UTILITY(U,$J,358.3,15045,0)
 ;;=K52.89^^56^640^62
 ;;^UTILITY(U,$J,358.3,15045,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15045,1,3,0)
 ;;=3^Gastroenteritis & Colitis,Oth Spec Noninfective
 ;;^UTILITY(U,$J,358.3,15045,1,4,0)
 ;;=4^K52.89
 ;;^UTILITY(U,$J,358.3,15045,2)
 ;;=^5008703
 ;;^UTILITY(U,$J,358.3,15046,0)
 ;;=K52.9^^56^640^61
 ;;^UTILITY(U,$J,358.3,15046,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15046,1,3,0)
 ;;=3^Gastroenteritis & Colitis,Noninfective Unspec
 ;;^UTILITY(U,$J,358.3,15046,1,4,0)
 ;;=4^K52.9
 ;;^UTILITY(U,$J,358.3,15046,2)
 ;;=^5008704
 ;;^UTILITY(U,$J,358.3,15047,0)
 ;;=K57.30^^56^640^47
 ;;^UTILITY(U,$J,358.3,15047,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15047,1,3,0)
 ;;=3^Diverticulosis of Lg Intestine w/o Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,15047,1,4,0)
 ;;=4^K57.30
 ;;^UTILITY(U,$J,358.3,15047,2)
 ;;=^5008723
 ;;^UTILITY(U,$J,358.3,15048,0)
 ;;=K57.50^^56^640^48
 ;;^UTILITY(U,$J,358.3,15048,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15048,1,3,0)
 ;;=3^Diverticulosis of Sm & Lg Intestine w/o Performation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,15048,1,4,0)
 ;;=4^K57.50
 ;;^UTILITY(U,$J,358.3,15048,2)
 ;;=^5008729
 ;;^UTILITY(U,$J,358.3,15049,0)
 ;;=K57.90^^56^640^46
 ;;^UTILITY(U,$J,358.3,15049,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15049,1,3,0)
 ;;=3^Diverticulosis of Intestine,Unspec w/o Performation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,15049,1,4,0)
 ;;=4^K57.90
 ;;^UTILITY(U,$J,358.3,15049,2)
 ;;=^5008735
 ;;^UTILITY(U,$J,358.3,15050,0)
 ;;=K57.20^^56^640^42
 ;;^UTILITY(U,$J,358.3,15050,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15050,1,3,0)
 ;;=3^Diverticulitis of Lg Intestine w/ Performation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,15050,1,4,0)
 ;;=4^K57.20
 ;;^UTILITY(U,$J,358.3,15050,2)
 ;;=^5008721
 ;;^UTILITY(U,$J,358.3,15051,0)
 ;;=K57.92^^56^640^41
 ;;^UTILITY(U,$J,358.3,15051,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15051,1,3,0)
 ;;=3^Diverticulitis of Intestine,Unspec w/o Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,15051,1,4,0)
 ;;=4^K57.92
 ;;^UTILITY(U,$J,358.3,15051,2)
 ;;=^5008737
 ;;^UTILITY(U,$J,358.3,15052,0)
 ;;=K57.80^^56^640^40
 ;;^UTILITY(U,$J,358.3,15052,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15052,1,3,0)
 ;;=3^Diverticulitis of Intestine,Unspec w/ Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,15052,1,4,0)
 ;;=4^K57.80
 ;;^UTILITY(U,$J,358.3,15052,2)
 ;;=^5008733
 ;;^UTILITY(U,$J,358.3,15053,0)
 ;;=K57.52^^56^640^45
 ;;^UTILITY(U,$J,358.3,15053,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15053,1,3,0)
 ;;=3^Diverticulitis of Sm & Lg Intestine w/o Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,15053,1,4,0)
 ;;=4^K57.52
 ;;^UTILITY(U,$J,358.3,15053,2)
 ;;=^5008731
 ;;^UTILITY(U,$J,358.3,15054,0)
 ;;=K57.40^^56^640^44
 ;;^UTILITY(U,$J,358.3,15054,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15054,1,3,0)
 ;;=3^Diverticulitis of Sm & Lg Intestine w/ Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,15054,1,4,0)
 ;;=4^K57.40
 ;;^UTILITY(U,$J,358.3,15054,2)
 ;;=^5008727
 ;;^UTILITY(U,$J,358.3,15055,0)
 ;;=K57.32^^56^640^43
 ;;^UTILITY(U,$J,358.3,15055,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15055,1,3,0)
 ;;=3^Diverticulitis of Lg Intestine w/o Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,15055,1,4,0)
 ;;=4^K57.32
 ;;^UTILITY(U,$J,358.3,15055,2)
 ;;=^5008725
 ;;^UTILITY(U,$J,358.3,15056,0)
 ;;=K59.00^^56^640^22
 ;;^UTILITY(U,$J,358.3,15056,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15056,1,3,0)
 ;;=3^Constipation,Unspec
 ;;^UTILITY(U,$J,358.3,15056,1,4,0)
 ;;=4^K59.00
 ;;^UTILITY(U,$J,358.3,15056,2)
 ;;=^323537
 ;;^UTILITY(U,$J,358.3,15057,0)
 ;;=K58.9^^56^640^79
 ;;^UTILITY(U,$J,358.3,15057,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15057,1,3,0)
 ;;=3^Irritable Bowel Syndrome w/o Diarrhea
 ;;^UTILITY(U,$J,358.3,15057,1,4,0)
 ;;=4^K58.9
 ;;^UTILITY(U,$J,358.3,15057,2)
 ;;=^5008740
 ;;^UTILITY(U,$J,358.3,15058,0)
 ;;=K58.0^^56^640^78
 ;;^UTILITY(U,$J,358.3,15058,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15058,1,3,0)
 ;;=3^Irritable Bowel Syndrome w/ Diarrhea
 ;;^UTILITY(U,$J,358.3,15058,1,4,0)
 ;;=4^K58.0
 ;;^UTILITY(U,$J,358.3,15058,2)
 ;;=^5008739
 ;;^UTILITY(U,$J,358.3,15059,0)
 ;;=K59.1^^56^640^37
 ;;^UTILITY(U,$J,358.3,15059,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15059,1,3,0)
 ;;=3^Diarrhea,Functional
 ;;^UTILITY(U,$J,358.3,15059,1,4,0)
 ;;=4^K59.1
 ;;^UTILITY(U,$J,358.3,15059,2)
 ;;=^270281
 ;;^UTILITY(U,$J,358.3,15060,0)
 ;;=K61.4^^56^640^4
 ;;^UTILITY(U,$J,358.3,15060,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15060,1,3,0)
 ;;=3^Abscess,Intrasphincteric
 ;;^UTILITY(U,$J,358.3,15060,1,4,0)
 ;;=4^K61.4
 ;;^UTILITY(U,$J,358.3,15060,2)
 ;;=^5008752
 ;;^UTILITY(U,$J,358.3,15061,0)
 ;;=K61.0^^56^640^2
 ;;^UTILITY(U,$J,358.3,15061,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15061,1,3,0)
 ;;=3^Abscess,Anal
 ;;^UTILITY(U,$J,358.3,15061,1,4,0)
 ;;=4^K61.0
 ;;^UTILITY(U,$J,358.3,15061,2)
 ;;=^5008749
 ;;^UTILITY(U,$J,358.3,15062,0)
 ;;=K61.1^^56^640^6
 ;;^UTILITY(U,$J,358.3,15062,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15062,1,3,0)
 ;;=3^Abscess,Rectal
 ;;^UTILITY(U,$J,358.3,15062,1,4,0)
 ;;=4^K61.1
 ;;^UTILITY(U,$J,358.3,15062,2)
 ;;=^259588
 ;;^UTILITY(U,$J,358.3,15063,0)
 ;;=K61.2^^56^640^3
 ;;^UTILITY(U,$J,358.3,15063,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15063,1,3,0)
 ;;=3^Abscess,Anorectal
 ;;^UTILITY(U,$J,358.3,15063,1,4,0)
 ;;=4^K61.2
 ;;^UTILITY(U,$J,358.3,15063,2)
 ;;=^5008750
 ;;^UTILITY(U,$J,358.3,15064,0)
 ;;=K50.014^^56^640^24
 ;;^UTILITY(U,$J,358.3,15064,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15064,1,3,0)
 ;;=3^Crohn's Disease of Small Intestine w/ Abscess
 ;;^UTILITY(U,$J,358.3,15064,1,4,0)
 ;;=4^K50.014
 ;;^UTILITY(U,$J,358.3,15064,2)
 ;;=^5008628
 ;;^UTILITY(U,$J,358.3,15065,0)
 ;;=K50.114^^56^640^23
 ;;^UTILITY(U,$J,358.3,15065,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15065,1,3,0)
 ;;=3^Crohn's Disease of Large Intestine w/ Abscess
 ;;^UTILITY(U,$J,358.3,15065,1,4,0)
 ;;=4^K50.114
 ;;^UTILITY(U,$J,358.3,15065,2)
 ;;=^5008635
 ;;^UTILITY(U,$J,358.3,15066,0)
 ;;=D12.6^^56^640^7
 ;;^UTILITY(U,$J,358.3,15066,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15066,1,3,0)
 ;;=3^Adenomatous Polyp of Colon
 ;;^UTILITY(U,$J,358.3,15066,1,4,0)
 ;;=4^D12.6
 ;;^UTILITY(U,$J,358.3,15066,2)
 ;;=^5001969
 ;;^UTILITY(U,$J,358.3,15067,0)
 ;;=K64.9^^56^640^65
 ;;^UTILITY(U,$J,358.3,15067,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15067,1,3,0)
 ;;=3^Hemorrhoids w/o Complication
 ;;^UTILITY(U,$J,358.3,15067,1,4,0)
 ;;=4^K64.9
 ;;^UTILITY(U,$J,358.3,15067,2)
 ;;=^5008775
 ;;^UTILITY(U,$J,358.3,15068,0)
 ;;=K50.814^^56^640^32
 ;;^UTILITY(U,$J,358.3,15068,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15068,1,3,0)
 ;;=3^Crohn's Disease,Small/Large Intestine w/ Abscess
 ;;^UTILITY(U,$J,358.3,15068,1,4,0)
 ;;=4^K50.814
 ;;^UTILITY(U,$J,358.3,15068,2)
 ;;=^5008642
 ;;^UTILITY(U,$J,358.3,15069,0)
 ;;=D12.9^^56^640^9
 ;;^UTILITY(U,$J,358.3,15069,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15069,1,3,0)
 ;;=3^Benign Neop of Anus
 ;;^UTILITY(U,$J,358.3,15069,1,4,0)
 ;;=4^D12.9
 ;;^UTILITY(U,$J,358.3,15069,2)
 ;;=^5001972
 ;;^UTILITY(U,$J,358.3,15070,0)
 ;;=D12.8^^56^640^15
 ;;^UTILITY(U,$J,358.3,15070,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15070,1,3,0)
 ;;=3^Benign Neop of Rectum
 ;;^UTILITY(U,$J,358.3,15070,1,4,0)
 ;;=4^D12.8
 ;;^UTILITY(U,$J,358.3,15070,2)
 ;;=^5001971
 ;;^UTILITY(U,$J,358.3,15071,0)
 ;;=K92.2^^56^640^57
 ;;^UTILITY(U,$J,358.3,15071,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15071,1,3,0)
 ;;=3^GI Bleed,Unspec
 ;;^UTILITY(U,$J,358.3,15071,1,4,0)
 ;;=4^K92.2
 ;;^UTILITY(U,$J,358.3,15071,2)
 ;;=^5008915
 ;;^UTILITY(U,$J,358.3,15072,0)
 ;;=K62.5^^56^640^8
 ;;^UTILITY(U,$J,358.3,15072,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15072,1,3,0)
 ;;=3^BRBPR
 ;;^UTILITY(U,$J,358.3,15072,1,4,0)
 ;;=4^K62.5
 ;;^UTILITY(U,$J,358.3,15072,2)
 ;;=^5008755
 ;;^UTILITY(U,$J,358.3,15073,0)
 ;;=K92.1^^56^640^82
 ;;^UTILITY(U,$J,358.3,15073,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15073,1,3,0)
 ;;=3^Melena/Hematochezia
 ;;^UTILITY(U,$J,358.3,15073,1,4,0)
 ;;=4^K92.1
 ;;^UTILITY(U,$J,358.3,15073,2)
 ;;=^5008914
 ;;^UTILITY(U,$J,358.3,15074,0)
 ;;=R19.5^^56^640^56
 ;;^UTILITY(U,$J,358.3,15074,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15074,1,3,0)
 ;;=3^Fecal Abnormalities NEC
 ;;^UTILITY(U,$J,358.3,15074,1,4,0)
 ;;=4^R19.5
 ;;^UTILITY(U,$J,358.3,15074,2)
 ;;=^5019274
 ;;^UTILITY(U,$J,358.3,15075,0)
 ;;=E53.8^^56^640^92
 ;;^UTILITY(U,$J,358.3,15075,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15075,1,3,0)
 ;;=3^Vitamin B12 Deficiency
 ;;^UTILITY(U,$J,358.3,15075,1,4,0)
 ;;=4^E53.8
 ;;^UTILITY(U,$J,358.3,15075,2)
 ;;=^5002797
 ;;^UTILITY(U,$J,358.3,15076,0)
 ;;=K59.04^^56^640^20
 ;;^UTILITY(U,$J,358.3,15076,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15076,1,3,0)
 ;;=3^Constipation,Chronic Idiopathic
 ;;^UTILITY(U,$J,358.3,15076,1,4,0)
 ;;=4^K59.04
 ;;^UTILITY(U,$J,358.3,15076,2)
 ;;=^7148177
 ;;^UTILITY(U,$J,358.3,15077,0)
 ;;=K59.03^^56^640^21
 ;;^UTILITY(U,$J,358.3,15077,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15077,1,3,0)
 ;;=3^Constipation,Drug Induced
 ;;^UTILITY(U,$J,358.3,15077,1,4,0)
 ;;=4^K59.03
 ;;^UTILITY(U,$J,358.3,15077,2)
 ;;=^5138744
 ;;^UTILITY(U,$J,358.3,15078,0)
 ;;=K52.21^^56^640^51
 ;;^UTILITY(U,$J,358.3,15078,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15078,1,3,0)
 ;;=3^Enterocolitis Synd Induced by Food Protein
 ;;^UTILITY(U,$J,358.3,15078,1,4,0)
 ;;=4^K52.21
 ;;^UTILITY(U,$J,358.3,15078,2)
 ;;=^5138713
 ;;^UTILITY(U,$J,358.3,15079,0)
 ;;=K52.22^^56^640^52
 ;;^UTILITY(U,$J,358.3,15079,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15079,1,3,0)
 ;;=3^Enterocolopathy Induced by Food Protein
 ;;^UTILITY(U,$J,358.3,15079,1,4,0)
 ;;=4^K52.22
 ;;^UTILITY(U,$J,358.3,15079,2)
 ;;=^5138714
 ;;^UTILITY(U,$J,358.3,15080,0)
 ;;=K58.2^^56^640^80
 ;;^UTILITY(U,$J,358.3,15080,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15080,1,3,0)
 ;;=3^Irritable Bowel Syndrome,Mixed
 ;;^UTILITY(U,$J,358.3,15080,1,4,0)
 ;;=4^K58.2
 ;;^UTILITY(U,$J,358.3,15080,2)
 ;;=^5138742
 ;;^UTILITY(U,$J,358.3,15081,0)
 ;;=K58.8^^56^640^81
 ;;^UTILITY(U,$J,358.3,15081,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15081,1,3,0)
 ;;=3^Irritable Bowel Syndrome,Other
 ;;^UTILITY(U,$J,358.3,15081,1,4,0)
 ;;=4^K58.8
 ;;^UTILITY(U,$J,358.3,15081,2)
 ;;=^5138743
 ;;^UTILITY(U,$J,358.3,15082,0)
 ;;=K58.1^^56^640^77
 ;;^UTILITY(U,$J,358.3,15082,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15082,1,3,0)
 ;;=3^Irritable Bowel Syndrome w/ Constipation
 ;;^UTILITY(U,$J,358.3,15082,1,4,0)
 ;;=4^K58.1
 ;;^UTILITY(U,$J,358.3,15082,2)
 ;;=^5138741
 ;;^UTILITY(U,$J,358.3,15083,0)
 ;;=K61.39^^56^640^5
 ;;^UTILITY(U,$J,358.3,15083,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15083,1,3,0)
 ;;=3^Abscess,Ischiorectal NOS
 ;;^UTILITY(U,$J,358.3,15083,1,4,0)
 ;;=4^K61.39
 ;;^UTILITY(U,$J,358.3,15083,2)
 ;;=^5157385
 ;;^UTILITY(U,$J,358.3,15084,0)
 ;;=G43.A1^^56^640^34
 ;;^UTILITY(U,$J,358.3,15084,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15084,1,3,0)
 ;;=3^Cyclical Vomiting,In Migraine,Intractable
 ;;^UTILITY(U,$J,358.3,15084,1,4,0)
 ;;=4^G43.A1
 ;;^UTILITY(U,$J,358.3,15084,2)
 ;;=^5003913
 ;;^UTILITY(U,$J,358.3,15085,0)
 ;;=G43.A0^^56^640^35
 ;;^UTILITY(U,$J,358.3,15085,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15085,1,3,0)
 ;;=3^Cyclical Vomiting,In Migraine,Not intractable
 ;;^UTILITY(U,$J,358.3,15085,1,4,0)
 ;;=4^G43.A0
 ;;^UTILITY(U,$J,358.3,15085,2)
 ;;=^5003912
 ;;^UTILITY(U,$J,358.3,15086,0)
 ;;=R11.15^^56^640^33
 ;;^UTILITY(U,$J,358.3,15086,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15086,1,3,0)
 ;;=3^Cyclical Vomiting Syndrome,Unrelated to Migraine
 ;;^UTILITY(U,$J,358.3,15086,1,4,0)
 ;;=4^R11.15
 ;;^UTILITY(U,$J,358.3,15086,2)
 ;;=^5158141
 ;;^UTILITY(U,$J,358.3,15087,0)
 ;;=K20.90^^56^640^55
 ;;^UTILITY(U,$J,358.3,15087,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15087,1,3,0)
 ;;=3^Esophagitis w/o Bleeding,Unspec
 ;;^UTILITY(U,$J,358.3,15087,1,4,0)
 ;;=4^K20.90
 ;;^UTILITY(U,$J,358.3,15087,2)
 ;;=^5159212
 ;;^UTILITY(U,$J,358.3,15088,0)
 ;;=K20.91^^56^640^54
 ;;^UTILITY(U,$J,358.3,15088,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15088,1,3,0)
 ;;=3^Esophagitis w/ Bleeding,Unspec
 ;;^UTILITY(U,$J,358.3,15088,1,4,0)
 ;;=4^K20.91
 ;;^UTILITY(U,$J,358.3,15088,2)
 ;;=^5159213
 ;;^UTILITY(U,$J,358.3,15089,0)
 ;;=A54.00^^56^641^52
 ;;^UTILITY(U,$J,358.3,15089,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15089,1,3,0)
 ;;=3^Gonococcal Infection Lower Genitourinary Tract,Unspec
 ;;^UTILITY(U,$J,358.3,15089,1,4,0)
 ;;=4^A54.00
 ;;^UTILITY(U,$J,358.3,15089,2)
 ;;=^5000311
 ;;^UTILITY(U,$J,358.3,15090,0)
 ;;=A54.09^^56^641^53
 ;;^UTILITY(U,$J,358.3,15090,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15090,1,3,0)
 ;;=3^Gonococcal Infection Lower Genitourinary Tract,Other
 ;;^UTILITY(U,$J,358.3,15090,1,4,0)
 ;;=4^A54.09
 ;;^UTILITY(U,$J,358.3,15090,2)
 ;;=^5000315
 ;;^UTILITY(U,$J,358.3,15091,0)
 ;;=A54.02^^56^641^54
 ;;^UTILITY(U,$J,358.3,15091,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15091,1,3,0)
 ;;=3^Gonococcal Vulvovaginitis,Unspec
 ;;^UTILITY(U,$J,358.3,15091,1,4,0)
 ;;=4^A54.02
 ;;^UTILITY(U,$J,358.3,15091,2)
 ;;=^5000313
 ;;^UTILITY(U,$J,358.3,15092,0)
 ;;=A54.1^^56^641^51
 ;;^UTILITY(U,$J,358.3,15092,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15092,1,3,0)
 ;;=3^Gonococcal Infection Lower GU Tract w/ Periureth & Acc Gland Abscess
 ;;^UTILITY(U,$J,358.3,15092,1,4,0)
 ;;=4^A54.1
 ;;^UTILITY(U,$J,358.3,15092,2)
 ;;=^5000316
 ;;^UTILITY(U,$J,358.3,15093,0)
 ;;=A54.01^^56^641^50
 ;;^UTILITY(U,$J,358.3,15093,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15093,1,3,0)
 ;;=3^Gonococcal Cystitis & Urethritis,Unspec
 ;;^UTILITY(U,$J,358.3,15093,1,4,0)
 ;;=4^A54.01
 ;;^UTILITY(U,$J,358.3,15093,2)
 ;;=^5000312
 ;;^UTILITY(U,$J,358.3,15094,0)
 ;;=B37.49^^56^641^14
 ;;^UTILITY(U,$J,358.3,15094,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,15094,1,3,0)
 ;;=3^Candidiasis Urogenital,Other
 ;;^UTILITY(U,$J,358.3,15094,1,4,0)
 ;;=4^B37.49
 ;;^UTILITY(U,$J,358.3,15094,2)
 ;;=^5000618
 ;;^UTILITY(U,$J,358.3,15095,0)
 ;;=B37.41^^56^641^13