RORP019A ;ALB/KG - CCR COMMON TEMPLATE CODES (PART A) ;5/15/12
;;1.5;CLINICAL CASE REGISTRIES;**19**;Feb 17, 2006;Build 43
;
;******************************************************************************
;******************************************************************************
; --- ROUTINE MODIFICATION LOG ---
;
;PKG/PATCH DATE DEVELOPER MODIFICATION
;----------- ---------- ----------- ----------------------------------------
;ROR*1.5*19 MAY 2012 K GUPTA Support for ICD-10 Coding System
;******************************************************************************
;******************************************************************************
;
Q
TMPLCODE ;
;;1^AIDS Defining Illness (1993)
;;2^003.1,007.2,007.4
;;2^013.00,013.01,013.02,013.03,013.04,013.05,013.06,013.10,013.11,013.12,013.13,013.14,013.15,013.16
;;2^013.20,013.21,013.22,013.23,013.24,013.25,013.26,013.30,013.31,013.32,013.33,013.34,013.35,013.36
;;2^013.40,013.41,013.42,013.43,013.44,013.45,013.46,013.50,013.51,013.52,013.53,013.54,013.55,013.56
;;2^013.60,013.61,013.62,013.63,013.64,013.65,013.66,013.80,013.81,013.82,013.83,013.84,013.85,013.86
;;2^013.90,013.91,013.92,013.93,013.94,013.95,013.96
;;2^014.00,014.01,014.02,014.03,014.04,014.05,014.06,014.80,014.81,014.82,014.83,014.84,014.85,014.86
;;2^015.00,015.01,015.02,015.03,015.04,015.05,015.06,015.10,015.11,015.12,015.13,015.14,015.15,015.16
;;2^015.20,015.21,015.22,015.23,015.24,015.25,015.26,015.50,015.51,015.52,015.53,015.54,015.55,015.56
;;2^015.60,015.61,015.62,015.63,015.64,015.65,015.66,015.70,015.71,015.72,015.73,015.74,015.75,015.76
;;2^015.80,015.81,015.82,015.83,015.84,015.85,015.86,015.90,015.91,015.92,015.93,015.94,015.95,015.96
;;2^016.00,016.01,016.02,016.03,016.04,016.05,016.06,016.10,016.11,016.12,016.13,016.14,016.15,016.16
;;2^016.20,016.21,016.22,016.23,016.24,016.25,016.26,016.30,016.31,016.32,016.33,016.34,016.35,016.36
;;2^016.40,016.41,016.42,016.43,016.44,016.45,016.46,016.50,016.51,016.52,016.53,016.54,016.55,016.56
;;2^016.60,016.61,016.62,016.63,016.64,016.65,016.66,016.70,016.71,016.72,016.73,016.74,016.75,016.76
;;2^016.90,016.91,016.92,016.93,016.94,016.95,016.96
;;2^017.00,017.01,017.02,017.03,017.04,017.05,017.06,017.10,017.11,017.12,017.13,017.14,017.15,017.16
;;2^017.20,017.21,017.22,017.23,017.24,017.25,017.26,017.30,017.31,017.32,017.33,017.34,017.35,017.36
;;2^017.40,017.41,017.42,017.43,017.44,017.45,017.46,017.50,017.51,017.52,017.53,017.54,017.55,017.56
;;2^017.60,017.61,017.62,017.63,017.64,017.65,017.66,017.70,017.71,017.72,017.73,017.74,017.75,017.76
;;2^017.80,017.81,017.82,017.83,017.84,017.85,017.86,017.90,017.91,017.92,017.93,017.94,017.95,017.96
;;2^018.00,018.01,018.02,018.03,018.04,018.05,018.06,018.80,018.81,018.82,018.83,018.84,018.85,018.86
;;2^018.90,018.91,018.92,018.93,018.94,018.95,018.96
;;2^031.0,031.1,031.2,031.8,031.9,046.3,046.8,054.71,078.5,083.8,112.4,112.84,114.1,114.2,114.3
;;2^115.01,115.02,115.03,115.04,115.09,115.11,115.12,115.13,115.14,115.19,115.91,115.92,115.93,115.94,115.99
;;2^117.5,130.0,136.3,136.8
;;2^176.0,176.1,176.2,176.3,176.4,176.5,176.8,176.9
;;2^180.0,180.1,180.8,180.9
;;2^200.20,200.21,200.22,200.23,200.24,200.25,200.26,200.27,200.28
;;2^202.80,202.81,202.82,202.83,202.84,202.85,202.86,202.87,202.88
;;2^484.1
;;3^A02.1,A07.2,A07.3,A17.0,A17.1,A17.81,A17.82,A17.83,A17.89,A17.9,A18.01,A18.02,A18.03,A18.09,A18.10,A18.11,A18.12,A18.13
;;3^A18.14,A18.15,A18.16,A18.17,A18.18,A18.2,A18.31,A18.32,A18.39,A18.4,A18.50,A18.51,A18.52,A18.53,A18.54,A18.59,A18.6
;;3^A18.7,A18.81,A18.82,A18.83,A18.84,A18.85,A18.89,A19.0,A19.1,A19.2,A19.8,A19.9,A31.0,A31.1,A31.8,A31.9
;;3^A81.2,B00.3,B01.0,B02.1,B25.0,B25.1,B25.2,B25.8,B25.9,B27.10,B27.11,B27.12,B27.19
;;3^B37.1,B37.81,B38.0,B38.1,B38.2,B38.3,B38.4,B38.7,B38.81,B38.89,B38.9,B39.3,B45.1,B45.2,B45.3,B45.7,B58.2,B59.,B90.0
;;3^B90.1,B90.2,B90.8,B90.9,C46.0,C46.1,C46.2,C46.3,C46.4,C46.50,C46.51,C46.52,C46.7,C46.9,C53.0,C53.1,C53.8,C53.9,C81.00
;;3^C81.01,C81.02,C81.03,C81.04,C81.05,C81.06,C81.07,C81.08,C81.09,C81.10,C81.11,C81.12,C81.13,C81.14,C81.15,C81.16,C81.17
;;3^C81.18,C81.19,C81.20,C81.21,C81.22,C81.23,C81.24,C81.25,C81.26,C81.27,C81.28,C81.29,C81.30,C81.31,C81.32,C81.33,C81.34
;;3^C81.35,C81.36,C81.37,C81.38,C81.39,C81.40,C81.41,C81.42,C81.43,C81.44,C81.45,C81.46,C81.47,C81.48,C81.49,C81.70,C81.71
;;3^C81.72,C81.73,C81.74,C81.75,C81.76,C81.77,C81.78,C81.79,C81.90,C81.91,C81.92,C81.93,C81.94,C81.95,C81.96,C81.97,C81.98
;;3^C81.99,C82.00,C82.01,C82.02,C82.03,C82.04,C82.05,C82.06,C82.07,C82.08,C82.09,C82.10,C82.11,C82.12,C82.13,C82.14,C82.15
;;3^C82.16,C82.17,C82.18,C82.19,C82.20,C82.21,C82.22,C82.23,C82.24,C82.25,C82.26,C82.27,C82.28,C82.29,C82.30,C82.31,C82.32
;;3^C82.33,C82.34,C82.35,C82.36,C82.37,C82.38,C82.39,C82.40,C82.41,C82.42,C82.43,C82.44,C82.45,C82.46,C82.47,C82.48,C82.49
;;3^C82.50,C82.51,C82.52,C82.53,C82.54,C82.55,C82.56,C82.57,C82.58,C82.59,C82.60,C82.61,C82.62,C82.63,C82.64,C82.65,C82.66
;;3^C82.67,C82.68,C82.69,C82.80,C82.81,C82.82,C82.83,C82.84,C82.85,C82.86,C82.87,C82.88,C82.89,C82.90,C82.91,C82.92,C82.93
;;3^C82.94,C82.95,C82.96,C82.97,C82.98,C82.99,C83.00,C83.01,C83.02,C83.03,C83.04,C83.05,C83.06,C83.07,C83.08,C83.09,C83.10
;;3^C83.11,C83.12,C83.13,C83.14,C83.15,C83.16,C83.17,C83.18,C83.19,C83.30,C83.31,C83.32,C83.33,C83.34,C83.35,C83.36,C83.37
;;3^C83.38,C83.39,C83.50,C83.51,C83.52,C83.53,C83.54,C83.55,C83.56,C83.57,C83.58,C83.59,C83.70,C83.71,C83.72,C83.73,C83.74
;;3^C83.75,C83.76,C83.77,C83.78,C83.79,C83.80,C83.81,C83.82,C83.83,C83.84,C83.85,C83.86,C83.87,C83.88,C83.89,C83.90,C83.91
;;3^C83.92,C83.93,C83.94,C83.95,C83.96,C83.97,C83.98,C83.99,C84.40,C84.41,C84.42,C84.43,C84.44,C84.45,C84.46,C84.47,C84.48
;;3^C84.49,C84.60,C84.61,C84.62,C84.63,C84.64,C84.65,C84.66,C84.67,C84.68,C84.69,C84.70,C84.71,C84.72,C84.73,C84.74,C84.75
;;3^C84.76,C84.77,C84.78,C84.79,C84.90,C84.91,C84.92,C84.93,C84.94,C84.95,C84.96,C84.97,C84.98,C84.99,C84.A0,C84.A1,C84.A2
;;3^C84.A3,C84.A4,C84.A5,C84.A6,C84.A7,C84.A8,C84.A9,C84.Z0,C84.Z1,C84.Z2,C84.Z3,C84.Z4,C84.Z5,C84.Z6,C84.Z7,C84.Z8,C84.Z9
;;3^C85.10,C85.11,C85.12,C85.13,C85.14,C85.15,C85.16,C85.17,C85.18,C85.19,C85.20,C85.21,C85.22,C85.23,C85.24,C85.25,C85.26
;;3^C85.27,C85.28,C85.29,C85.80,C85.81,C85.82,C85.83,C85.84,C85.85,C85.86,C85.87,C85.88,C85.89,C85.90,C85.91,C85.92,C85.93
;;3^C85.94,C85.95,C85.96,C85.97,C85.98,C85.99,C86.0,C86.1,C86.2,C86.3,C86.4,C86.5,C88.4,C91.50,C91.51,C91.52,C91.A0,C91.A1
;;3^C91.A2,D06.0,D06.1,D06.7,D06.9,J65.,O98.011,O98.012,O98.013,O98.019,O98.02,O98.03
;;9
;;1^Acute or Chronic Renal Failure
;;2^584.5,584.6,584.7,584.8,584.9,585.
;;3^I13.0,I13.10,I13.11,I13.2,N17.0,N17.1,N17.2,N17.8,N17.9,N18.1,N18.2,N18.3,N18.4,N18.5,N18.6,N18.9,N19.,N99.0,O90.4
;;9
;;1^Alcohol
;;2^291.0,291.1,291.2,291.3,291.4,291.5,291.8,291.81,291.89,291.9,303.00,303.01,303.02,303.03,303.90,303.91,303.92
;;2^303.93,305.00,305.01,305.02,305.03,357.5,425.5,535.3,535.30,535.31,571.0,571.1,571.2,571.3
;;3^F10.10,F10.120,F10.121,F10.129,F10.14,F10.150,F10.151,F10.159,F10.180,F10.181,F10.182,F10.188,F10.19,F10.20,F10.21
;;3^F10.220,F10.221,F10.229,F10.230,F10.231,F10.232,F10.239,F10.24,F10.250,F10.251,F10.259,F10.26,F10.27,F10.280,F10.281
;;3^F10.282,F10.288,F10.29,F10.920,F10.921,F10.929,F10.94,F10.950,F10.951,F10.959,F10.96,F10.97,F10.980,F10.981,F10.982
;;3^F10.988,F10.99,G31.2,G62.1,G72.1,I42.6,K29.20,K29.21,K70.0,K70.10,K70.11,K70.2,K70.30,K70.31,K70.40,K70.41,K70.9,K85.2,K86.0
;;3^T51.8X1A,T51.8X1D,T51.8X1S,T51.8X2A,T51.8X2D,T51.8X2S,T51.8X3A,T51.8X3D,T51.8X3S,T51.8X4A,T51.8X4D,T51.8X4S,T51.91XA
;;3^T51.91XD,T51.91XS,T51.92XA,T51.92XD,T51.92XS,T51.93XA,T51.93XD,T51.93XS,T51.94XA,T51.94XD,T51.94XS,Z71.41
;;9
;;1^Bipolar - Mania
;;2^296.00,296.01,296.02,296.03,296.04,296.05,296.06,296.10,296.11,296.12,296.13,296.14,296.15,296.16,296.40,296.41
;;2^296.42,296.43,296.44,296.45,296.46,296.50,296.51,296.52,296.53,296.54,296.55,296.56,296.60,296.61,296.62,296.63
;;2^296.64,296.65,296.66,296.7,296.80,296.81,296.82,296.89
;;3^F25.0,F30.10,F30.11,F30.12,F30.13,F30.2,F30.3,F30.4,F30.8,F30.9,F31.0,F31.10,F31.11,F31.12,F31.13,F31.2,F31.30,F31.31
;;3^F31.32,F31.4,F31.5,F31.60,F31.61,F31.62,F31.63,F31.64,F31.70,F31.71,F31.72,F31.73,F31.74,F31.75,F31.76,F31.77,F31.78
;;3^F31.81,F31.89,F31.9
;;9
;;1^Cirrhosis
;;2^571.2,571.5
;;3^K70.30,K70.31,K71.7,K74.3,K74.4,K74.5,K74.60,K74.69
;;9
;;1^Diabetes Type I or II
;;2^250.00,250.01,250.02,250.03,250.10,250.11,250.12,250.13,250.20,250.21,250.22,250.23,250.30,250.31,250.32,250.33
;;2^250.40,250.41,250.42,250.43,250.50,250.51,250.52,250.53,250.60,250.61,250.62,250.63,250.70,250.71,250.72,250.73
;;2^250.80,250.81,250.82,250.83,250.90,250.91,250.92,250.93
;;3^E08.00,E08.01,E08.10,E08.11,E08.21,E08.22,E08.29,E08.311,E08.319,E08.321,E08.329,E08.331,E08.339,E08.341,E08.349
;;3^E08.351,E08.359,E08.36,E08.39,E08.40,E08.41,E08.42,E08.43,E08.44,E08.49,E08.51,E08.52,E08.59,E08.610,E08.618,E08.620
;;3^E08.621,E08.622,E08.628,E08.630,E08.638,E08.641,E08.649,E08.65,E08.69,E08.8,E08.9,E09.00,E09.01,E09.10,E09.11,E09.21
;;3^E09.22,E09.29,E09.311,E09.319,E09.321,E09.329,E09.331,E09.339,E09.341,E09.349,E09.351,E09.359,E09.36,E09.39,E09.40
;;3^E09.41,E09.42,E09.43,E09.44,E09.49,E09.51,E09.52,E09.59,E09.610,E09.618,E09.620,E09.621,E09.622,E09.628,E09.630,E09.638
;;3^E09.641,E09.649,E09.65,E09.69,E09.8,E09.9,E10.10,E10.11,E10.21,E10.22,E10.29,E10.311,E10.319,E10.321,E10.329,E10.331
;;3^E10.339,E10.341,E10.349,E10.351,E10.359,E10.36,E10.39,E10.40,E10.41,E10.42,E10.43,E10.44,E10.49,E10.51,E10.52,E10.59
;;3^E10.610,E10.618,E10.620,E10.621,E10.622,E10.628,E10.630,E10.638,E10.641,E10.649,E10.65,E10.69,E10.8,E10.9,E11.00,E11.01
;;3^E11.21,E11.22,E11.29,E11.311,E11.319,E11.321,E11.329,E11.331,E11.339,E11.341,E11.349,E11.351,E11.359,E11.36,E11.39,E11.40
;;3^E11.41,E11.42,E11.43,E11.44,E11.49,E11.51,E11.52,E11.59,E11.610,E11.618,E11.620,E11.621,E11.622,E11.628,E11.630,E11.638
;;3^E11.641,E11.649,E11.65,E11.69,E11.8,E11.9,E13.00,E13.01,E13.10,E13.11,E13.21,E13.22,E13.29,E13.311,E13.319,E13.321
;;3^E13.329,E13.331,E13.339,E13.341,E13.349,E13.351,E13.359,E13.36,E13.39,E13.40,E13.41,E13.42,E13.43,E13.44,E13.49,E13.51
;;3^E13.52,E13.59,E13.610,E13.618,E13.620,E13.621,E13.622,E13.628,E13.630,E13.638,E13.641,E13.649,E13.65,E13.69,E13.8,E13.9
;;9
;;
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HRORP019A 10530 printed Dec 13, 2024@01:42:28 Page 2
RORP019A ;ALB/KG - CCR COMMON TEMPLATE CODES (PART A) ;5/15/12
+1 ;;1.5;CLINICAL CASE REGISTRIES;**19**;Feb 17, 2006;Build 43
+2 ;
+3 ;******************************************************************************
+4 ;******************************************************************************
+5 ; --- ROUTINE MODIFICATION LOG ---
+6 ;
+7 ;PKG/PATCH DATE DEVELOPER MODIFICATION
+8 ;----------- ---------- ----------- ----------------------------------------
+9 ;ROR*1.5*19 MAY 2012 K GUPTA Support for ICD-10 Coding System
+10 ;******************************************************************************
+11 ;******************************************************************************
+12 ;
+13 QUIT
TMPLCODE ;
+1 ;;1^AIDS Defining Illness (1993)
+2 ;;2^003.1,007.2,007.4
+3 ;;2^013.00,013.01,013.02,013.03,013.04,013.05,013.06,013.10,013.11,013.12,013.13,013.14,013.15,013.16
+4 ;;2^013.20,013.21,013.22,013.23,013.24,013.25,013.26,013.30,013.31,013.32,013.33,013.34,013.35,013.36
+5 ;;2^013.40,013.41,013.42,013.43,013.44,013.45,013.46,013.50,013.51,013.52,013.53,013.54,013.55,013.56
+6 ;;2^013.60,013.61,013.62,013.63,013.64,013.65,013.66,013.80,013.81,013.82,013.83,013.84,013.85,013.86
+7 ;;2^013.90,013.91,013.92,013.93,013.94,013.95,013.96
+8 ;;2^014.00,014.01,014.02,014.03,014.04,014.05,014.06,014.80,014.81,014.82,014.83,014.84,014.85,014.86
+9 ;;2^015.00,015.01,015.02,015.03,015.04,015.05,015.06,015.10,015.11,015.12,015.13,015.14,015.15,015.16
+10 ;;2^015.20,015.21,015.22,015.23,015.24,015.25,015.26,015.50,015.51,015.52,015.53,015.54,015.55,015.56
+11 ;;2^015.60,015.61,015.62,015.63,015.64,015.65,015.66,015.70,015.71,015.72,015.73,015.74,015.75,015.76
+12 ;;2^015.80,015.81,015.82,015.83,015.84,015.85,015.86,015.90,015.91,015.92,015.93,015.94,015.95,015.96
+13 ;;2^016.00,016.01,016.02,016.03,016.04,016.05,016.06,016.10,016.11,016.12,016.13,016.14,016.15,016.16
+14 ;;2^016.20,016.21,016.22,016.23,016.24,016.25,016.26,016.30,016.31,016.32,016.33,016.34,016.35,016.36
+15 ;;2^016.40,016.41,016.42,016.43,016.44,016.45,016.46,016.50,016.51,016.52,016.53,016.54,016.55,016.56
+16 ;;2^016.60,016.61,016.62,016.63,016.64,016.65,016.66,016.70,016.71,016.72,016.73,016.74,016.75,016.76
+17 ;;2^016.90,016.91,016.92,016.93,016.94,016.95,016.96
+18 ;;2^017.00,017.01,017.02,017.03,017.04,017.05,017.06,017.10,017.11,017.12,017.13,017.14,017.15,017.16
+19 ;;2^017.20,017.21,017.22,017.23,017.24,017.25,017.26,017.30,017.31,017.32,017.33,017.34,017.35,017.36
+20 ;;2^017.40,017.41,017.42,017.43,017.44,017.45,017.46,017.50,017.51,017.52,017.53,017.54,017.55,017.56
+21 ;;2^017.60,017.61,017.62,017.63,017.64,017.65,017.66,017.70,017.71,017.72,017.73,017.74,017.75,017.76
+22 ;;2^017.80,017.81,017.82,017.83,017.84,017.85,017.86,017.90,017.91,017.92,017.93,017.94,017.95,017.96
+23 ;;2^018.00,018.01,018.02,018.03,018.04,018.05,018.06,018.80,018.81,018.82,018.83,018.84,018.85,018.86
+24 ;;2^018.90,018.91,018.92,018.93,018.94,018.95,018.96
+25 ;;2^031.0,031.1,031.2,031.8,031.9,046.3,046.8,054.71,078.5,083.8,112.4,112.84,114.1,114.2,114.3
+26 ;;2^115.01,115.02,115.03,115.04,115.09,115.11,115.12,115.13,115.14,115.19,115.91,115.92,115.93,115.94,115.99
+27 ;;2^117.5,130.0,136.3,136.8
+28 ;;2^176.0,176.1,176.2,176.3,176.4,176.5,176.8,176.9
+29 ;;2^180.0,180.1,180.8,180.9
+30 ;;2^200.20,200.21,200.22,200.23,200.24,200.25,200.26,200.27,200.28
+31 ;;2^202.80,202.81,202.82,202.83,202.84,202.85,202.86,202.87,202.88
+32 ;;2^484.1
+33 ;;3^A02.1,A07.2,A07.3,A17.0,A17.1,A17.81,A17.82,A17.83,A17.89,A17.9,A18.01,A18.02,A18.03,A18.09,A18.10,A18.11,A18.12,A18.13
+34 ;;3^A18.14,A18.15,A18.16,A18.17,A18.18,A18.2,A18.31,A18.32,A18.39,A18.4,A18.50,A18.51,A18.52,A18.53,A18.54,A18.59,A18.6
+35 ;;3^A18.7,A18.81,A18.82,A18.83,A18.84,A18.85,A18.89,A19.0,A19.1,A19.2,A19.8,A19.9,A31.0,A31.1,A31.8,A31.9
+36 ;;3^A81.2,B00.3,B01.0,B02.1,B25.0,B25.1,B25.2,B25.8,B25.9,B27.10,B27.11,B27.12,B27.19
+37 ;;3^B37.1,B37.81,B38.0,B38.1,B38.2,B38.3,B38.4,B38.7,B38.81,B38.89,B38.9,B39.3,B45.1,B45.2,B45.3,B45.7,B58.2,B59.,B90.0
+38 ;;3^B90.1,B90.2,B90.8,B90.9,C46.0,C46.1,C46.2,C46.3,C46.4,C46.50,C46.51,C46.52,C46.7,C46.9,C53.0,C53.1,C53.8,C53.9,C81.00
+39 ;;3^C81.01,C81.02,C81.03,C81.04,C81.05,C81.06,C81.07,C81.08,C81.09,C81.10,C81.11,C81.12,C81.13,C81.14,C81.15,C81.16,C81.17
+40 ;;3^C81.18,C81.19,C81.20,C81.21,C81.22,C81.23,C81.24,C81.25,C81.26,C81.27,C81.28,C81.29,C81.30,C81.31,C81.32,C81.33,C81.34
+41 ;;3^C81.35,C81.36,C81.37,C81.38,C81.39,C81.40,C81.41,C81.42,C81.43,C81.44,C81.45,C81.46,C81.47,C81.48,C81.49,C81.70,C81.71
+42 ;;3^C81.72,C81.73,C81.74,C81.75,C81.76,C81.77,C81.78,C81.79,C81.90,C81.91,C81.92,C81.93,C81.94,C81.95,C81.96,C81.97,C81.98
+43 ;;3^C81.99,C82.00,C82.01,C82.02,C82.03,C82.04,C82.05,C82.06,C82.07,C82.08,C82.09,C82.10,C82.11,C82.12,C82.13,C82.14,C82.15
+44 ;;3^C82.16,C82.17,C82.18,C82.19,C82.20,C82.21,C82.22,C82.23,C82.24,C82.25,C82.26,C82.27,C82.28,C82.29,C82.30,C82.31,C82.32
+45 ;;3^C82.33,C82.34,C82.35,C82.36,C82.37,C82.38,C82.39,C82.40,C82.41,C82.42,C82.43,C82.44,C82.45,C82.46,C82.47,C82.48,C82.49
+46 ;;3^C82.50,C82.51,C82.52,C82.53,C82.54,C82.55,C82.56,C82.57,C82.58,C82.59,C82.60,C82.61,C82.62,C82.63,C82.64,C82.65,C82.66
+47 ;;3^C82.67,C82.68,C82.69,C82.80,C82.81,C82.82,C82.83,C82.84,C82.85,C82.86,C82.87,C82.88,C82.89,C82.90,C82.91,C82.92,C82.93
+48 ;;3^C82.94,C82.95,C82.96,C82.97,C82.98,C82.99,C83.00,C83.01,C83.02,C83.03,C83.04,C83.05,C83.06,C83.07,C83.08,C83.09,C83.10
+49 ;;3^C83.11,C83.12,C83.13,C83.14,C83.15,C83.16,C83.17,C83.18,C83.19,C83.30,C83.31,C83.32,C83.33,C83.34,C83.35,C83.36,C83.37
+50 ;;3^C83.38,C83.39,C83.50,C83.51,C83.52,C83.53,C83.54,C83.55,C83.56,C83.57,C83.58,C83.59,C83.70,C83.71,C83.72,C83.73,C83.74
+51 ;;3^C83.75,C83.76,C83.77,C83.78,C83.79,C83.80,C83.81,C83.82,C83.83,C83.84,C83.85,C83.86,C83.87,C83.88,C83.89,C83.90,C83.91
+52 ;;3^C83.92,C83.93,C83.94,C83.95,C83.96,C83.97,C83.98,C83.99,C84.40,C84.41,C84.42,C84.43,C84.44,C84.45,C84.46,C84.47,C84.48
+53 ;;3^C84.49,C84.60,C84.61,C84.62,C84.63,C84.64,C84.65,C84.66,C84.67,C84.68,C84.69,C84.70,C84.71,C84.72,C84.73,C84.74,C84.75
+54 ;;3^C84.76,C84.77,C84.78,C84.79,C84.90,C84.91,C84.92,C84.93,C84.94,C84.95,C84.96,C84.97,C84.98,C84.99,C84.A0,C84.A1,C84.A2
+55 ;;3^C84.A3,C84.A4,C84.A5,C84.A6,C84.A7,C84.A8,C84.A9,C84.Z0,C84.Z1,C84.Z2,C84.Z3,C84.Z4,C84.Z5,C84.Z6,C84.Z7,C84.Z8,C84.Z9
+56 ;;3^C85.10,C85.11,C85.12,C85.13,C85.14,C85.15,C85.16,C85.17,C85.18,C85.19,C85.20,C85.21,C85.22,C85.23,C85.24,C85.25,C85.26
+57 ;;3^C85.27,C85.28,C85.29,C85.80,C85.81,C85.82,C85.83,C85.84,C85.85,C85.86,C85.87,C85.88,C85.89,C85.90,C85.91,C85.92,C85.93
+58 ;;3^C85.94,C85.95,C85.96,C85.97,C85.98,C85.99,C86.0,C86.1,C86.2,C86.3,C86.4,C86.5,C88.4,C91.50,C91.51,C91.52,C91.A0,C91.A1
+59 ;;3^C91.A2,D06.0,D06.1,D06.7,D06.9,J65.,O98.011,O98.012,O98.013,O98.019,O98.02,O98.03
+60 ;;9
+61 ;;1^Acute or Chronic Renal Failure
+62 ;;2^584.5,584.6,584.7,584.8,584.9,585.
+63 ;;3^I13.0,I13.10,I13.11,I13.2,N17.0,N17.1,N17.2,N17.8,N17.9,N18.1,N18.2,N18.3,N18.4,N18.5,N18.6,N18.9,N19.,N99.0,O90.4
+64 ;;9
+65 ;;1^Alcohol
+66 ;;2^291.0,291.1,291.2,291.3,291.4,291.5,291.8,291.81,291.89,291.9,303.00,303.01,303.02,303.03,303.90,303.91,303.92
+67 ;;2^303.93,305.00,305.01,305.02,305.03,357.5,425.5,535.3,535.30,535.31,571.0,571.1,571.2,571.3
+68 ;;3^F10.10,F10.120,F10.121,F10.129,F10.14,F10.150,F10.151,F10.159,F10.180,F10.181,F10.182,F10.188,F10.19,F10.20,F10.21
+69 ;;3^F10.220,F10.221,F10.229,F10.230,F10.231,F10.232,F10.239,F10.24,F10.250,F10.251,F10.259,F10.26,F10.27,F10.280,F10.281
+70 ;;3^F10.282,F10.288,F10.29,F10.920,F10.921,F10.929,F10.94,F10.950,F10.951,F10.959,F10.96,F10.97,F10.980,F10.981,F10.982
+71 ;;3^F10.988,F10.99,G31.2,G62.1,G72.1,I42.6,K29.20,K29.21,K70.0,K70.10,K70.11,K70.2,K70.30,K70.31,K70.40,K70.41,K70.9,K85.2,K86.0
+72 ;;3^T51.8X1A,T51.8X1D,T51.8X1S,T51.8X2A,T51.8X2D,T51.8X2S,T51.8X3A,T51.8X3D,T51.8X3S,T51.8X4A,T51.8X4D,T51.8X4S,T51.91XA
+73 ;;3^T51.91XD,T51.91XS,T51.92XA,T51.92XD,T51.92XS,T51.93XA,T51.93XD,T51.93XS,T51.94XA,T51.94XD,T51.94XS,Z71.41
+74 ;;9
+75 ;;1^Bipolar - Mania
+76 ;;2^296.00,296.01,296.02,296.03,296.04,296.05,296.06,296.10,296.11,296.12,296.13,296.14,296.15,296.16,296.40,296.41
+77 ;;2^296.42,296.43,296.44,296.45,296.46,296.50,296.51,296.52,296.53,296.54,296.55,296.56,296.60,296.61,296.62,296.63
+78 ;;2^296.64,296.65,296.66,296.7,296.80,296.81,296.82,296.89
+79 ;;3^F25.0,F30.10,F30.11,F30.12,F30.13,F30.2,F30.3,F30.4,F30.8,F30.9,F31.0,F31.10,F31.11,F31.12,F31.13,F31.2,F31.30,F31.31
+80 ;;3^F31.32,F31.4,F31.5,F31.60,F31.61,F31.62,F31.63,F31.64,F31.70,F31.71,F31.72,F31.73,F31.74,F31.75,F31.76,F31.77,F31.78
+81 ;;3^F31.81,F31.89,F31.9
+82 ;;9
+83 ;;1^Cirrhosis
+84 ;;2^571.2,571.5
+85 ;;3^K70.30,K70.31,K71.7,K74.3,K74.4,K74.5,K74.60,K74.69
+86 ;;9
+87 ;;1^Diabetes Type I or II
+88 ;;2^250.00,250.01,250.02,250.03,250.10,250.11,250.12,250.13,250.20,250.21,250.22,250.23,250.30,250.31,250.32,250.33
+89 ;;2^250.40,250.41,250.42,250.43,250.50,250.51,250.52,250.53,250.60,250.61,250.62,250.63,250.70,250.71,250.72,250.73
+90 ;;2^250.80,250.81,250.82,250.83,250.90,250.91,250.92,250.93
+91 ;;3^E08.00,E08.01,E08.10,E08.11,E08.21,E08.22,E08.29,E08.311,E08.319,E08.321,E08.329,E08.331,E08.339,E08.341,E08.349
+92 ;;3^E08.351,E08.359,E08.36,E08.39,E08.40,E08.41,E08.42,E08.43,E08.44,E08.49,E08.51,E08.52,E08.59,E08.610,E08.618,E08.620
+93 ;;3^E08.621,E08.622,E08.628,E08.630,E08.638,E08.641,E08.649,E08.65,E08.69,E08.8,E08.9,E09.00,E09.01,E09.10,E09.11,E09.21
+94 ;;3^E09.22,E09.29,E09.311,E09.319,E09.321,E09.329,E09.331,E09.339,E09.341,E09.349,E09.351,E09.359,E09.36,E09.39,E09.40
+95 ;;3^E09.41,E09.42,E09.43,E09.44,E09.49,E09.51,E09.52,E09.59,E09.610,E09.618,E09.620,E09.621,E09.622,E09.628,E09.630,E09.638
+96 ;;3^E09.641,E09.649,E09.65,E09.69,E09.8,E09.9,E10.10,E10.11,E10.21,E10.22,E10.29,E10.311,E10.319,E10.321,E10.329,E10.331
+97 ;;3^E10.339,E10.341,E10.349,E10.351,E10.359,E10.36,E10.39,E10.40,E10.41,E10.42,E10.43,E10.44,E10.49,E10.51,E10.52,E10.59
+98 ;;3^E10.610,E10.618,E10.620,E10.621,E10.622,E10.628,E10.630,E10.638,E10.641,E10.649,E10.65,E10.69,E10.8,E10.9,E11.00,E11.01
+99 ;;3^E11.21,E11.22,E11.29,E11.311,E11.319,E11.321,E11.329,E11.331,E11.339,E11.341,E11.349,E11.351,E11.359,E11.36,E11.39,E11.40
+100 ;;3^E11.41,E11.42,E11.43,E11.44,E11.49,E11.51,E11.52,E11.59,E11.610,E11.618,E11.620,E11.621,E11.622,E11.628,E11.630,E11.638
+101 ;;3^E11.641,E11.649,E11.65,E11.69,E11.8,E11.9,E13.00,E13.01,E13.10,E13.11,E13.21,E13.22,E13.29,E13.311,E13.319,E13.321
+102 ;;3^E13.329,E13.331,E13.339,E13.341,E13.349,E13.351,E13.359,E13.36,E13.39,E13.40,E13.41,E13.42,E13.43,E13.44,E13.49,E13.51
+103 ;;3^E13.52,E13.59,E13.610,E13.618,E13.620,E13.621,E13.622,E13.628,E13.630,E13.638,E13.641,E13.649,E13.65,E13.69,E13.8,E13.9
+104 ;;9
+105 ;;
