| 1 | KIDS Distribution saved on Nov 19, 2010@17:04:10
|
|---|
| 2 | initial build of C0Q Quality Reporting Package
|
|---|
| 3 | **KIDS**:C0Q*1.0*0^
|
|---|
| 4 |
|
|---|
| 5 | **INSTALL NAME**
|
|---|
| 6 | C0Q*1.0*0
|
|---|
| 7 | "BLD",7338,0)
|
|---|
| 8 | C0Q*1.0*0^^0^3101119^n
|
|---|
| 9 | "BLD",7338,4,0)
|
|---|
| 10 | ^9.64PA^1130580001.101^2
|
|---|
| 11 | "BLD",7338,4,1130580001.101,0)
|
|---|
| 12 | 1130580001.101
|
|---|
| 13 | "BLD",7338,4,1130580001.101,222)
|
|---|
| 14 | y^y^f^^n^^y^o^n
|
|---|
| 15 | "BLD",7338,4,1130580001.201,0)
|
|---|
| 16 | 1130580001.201
|
|---|
| 17 | "BLD",7338,4,1130580001.201,222)
|
|---|
| 18 | y^y^f^^^^n
|
|---|
| 19 | "BLD",7338,4,"B",1130580001.101,1130580001.101)
|
|---|
| 20 |
|
|---|
| 21 | "BLD",7338,4,"B",1130580001.201,1130580001.201)
|
|---|
| 22 |
|
|---|
| 23 | "BLD",7338,6.3)
|
|---|
| 24 | 1
|
|---|
| 25 | "BLD",7338,"KRN",0)
|
|---|
| 26 | ^9.67PA^779.2^20
|
|---|
| 27 | "BLD",7338,"KRN",.4,0)
|
|---|
| 28 | .4
|
|---|
| 29 | "BLD",7338,"KRN",.4,"NM",0)
|
|---|
| 30 | ^9.68A^3^3
|
|---|
| 31 | "BLD",7338,"KRN",.4,"NM",1,0)
|
|---|
| 32 | C0Q PRINT BY PATIENT FILE #1130580001.201^1130580001.201^0
|
|---|
| 33 | "BLD",7338,"KRN",.4,"NM",2,0)
|
|---|
| 34 | C0Q PRINT MEASUREMENT SET FILE #1130580001.201^1130580001.201^0
|
|---|
| 35 | "BLD",7338,"KRN",.4,"NM",3,0)
|
|---|
| 36 | C0Q PRINT QUALITY MEASURES FILE #1130580001.101^1130580001.101^0
|
|---|
| 37 | "BLD",7338,"KRN",.4,"NM","B","C0Q PRINT BY PATIENT FILE #1130580001.201",1)
|
|---|
| 38 |
|
|---|
| 39 | "BLD",7338,"KRN",.4,"NM","B","C0Q PRINT MEASUREMENT SET FILE #1130580001.201",2)
|
|---|
| 40 |
|
|---|
| 41 | "BLD",7338,"KRN",.4,"NM","B","C0Q PRINT QUALITY MEASURES FILE #1130580001.101",3)
|
|---|
| 42 |
|
|---|
| 43 | "BLD",7338,"KRN",.401,0)
|
|---|
| 44 | .401
|
|---|
| 45 | "BLD",7338,"KRN",.402,0)
|
|---|
| 46 | .402
|
|---|
| 47 | "BLD",7338,"KRN",.402,"NM",0)
|
|---|
| 48 | ^9.68A^2^2
|
|---|
| 49 | "BLD",7338,"KRN",.402,"NM",1,0)
|
|---|
| 50 | C0Q MEASUREMENT SET DEFINE FILE #1130580001.201^1130580001.201^0
|
|---|
| 51 | "BLD",7338,"KRN",.402,"NM",2,0)
|
|---|
| 52 | C0Q QUALITY MEASURE DEFINITION FILE #1130580001.101^1130580001.101^0
|
|---|
| 53 | "BLD",7338,"KRN",.402,"NM","B","C0Q MEASUREMENT SET DEFINE FILE #1130580001.201",1)
|
|---|
| 54 |
|
|---|
| 55 | "BLD",7338,"KRN",.402,"NM","B","C0Q QUALITY MEASURE DEFINITION FILE #1130580001.101",2)
|
|---|
| 56 |
|
|---|
| 57 | "BLD",7338,"KRN",.403,0)
|
|---|
| 58 | .403
|
|---|
| 59 | "BLD",7338,"KRN",.5,0)
|
|---|
| 60 | .5
|
|---|
| 61 | "BLD",7338,"KRN",.84,0)
|
|---|
| 62 | .84
|
|---|
| 63 | "BLD",7338,"KRN",3.6,0)
|
|---|
| 64 | 3.6
|
|---|
| 65 | "BLD",7338,"KRN",3.8,0)
|
|---|
| 66 | 3.8
|
|---|
| 67 | "BLD",7338,"KRN",9.2,0)
|
|---|
| 68 | 9.2
|
|---|
| 69 | "BLD",7338,"KRN",9.8,0)
|
|---|
| 70 | 9.8
|
|---|
| 71 | "BLD",7338,"KRN",9.8,"NM",0)
|
|---|
| 72 | ^9.68A^1^1
|
|---|
| 73 | "BLD",7338,"KRN",9.8,"NM",1,0)
|
|---|
| 74 | C0QMAIN^^0^B69544556
|
|---|
| 75 | "BLD",7338,"KRN",9.8,"NM","B","C0QMAIN",1)
|
|---|
| 76 |
|
|---|
| 77 | "BLD",7338,"KRN",19,0)
|
|---|
| 78 | 19
|
|---|
| 79 | "BLD",7338,"KRN",19,"NM",0)
|
|---|
| 80 | ^9.68A^11^11
|
|---|
| 81 | "BLD",7338,"KRN",19,"NM",1,0)
|
|---|
| 82 | C0Q BY PATIENT NUMERATOR^^0
|
|---|
| 83 | "BLD",7338,"KRN",19,"NM",2,0)
|
|---|
| 84 | C0Q DENOMINATOR PATIENT LIST^^0
|
|---|
| 85 | "BLD",7338,"KRN",19,"NM",3,0)
|
|---|
| 86 | C0Q DISPLAY MEASURE SET^^0
|
|---|
| 87 | "BLD",7338,"KRN",19,"NM",4,0)
|
|---|
| 88 | C0Q DISPLAY QUALITY MEASURES^^0
|
|---|
| 89 | "BLD",7338,"KRN",19,"NM",5,0)
|
|---|
| 90 | C0Q EXPORT CCR BY MEASURE^^0
|
|---|
| 91 | "BLD",7338,"KRN",19,"NM",6,0)
|
|---|
| 92 | C0Q EXPORT MEASURE SET^^0
|
|---|
| 93 | "BLD",7338,"KRN",19,"NM",7,0)
|
|---|
| 94 | C0Q LIST MEASURE SET^^0
|
|---|
| 95 | "BLD",7338,"KRN",19,"NM",8,0)
|
|---|
| 96 | C0Q MEASURE SET DEFINITION^^0
|
|---|
| 97 | "BLD",7338,"KRN",19,"NM",9,0)
|
|---|
| 98 | C0Q QUALITY MEASURE DEFINITION^^0
|
|---|
| 99 | "BLD",7338,"KRN",19,"NM",10,0)
|
|---|
| 100 | C0Q QUALITY MEASUREMENT MENU^^0
|
|---|
| 101 | "BLD",7338,"KRN",19,"NM",11,0)
|
|---|
| 102 | C0Q SUMMARY QUALITY MEASURES^^0
|
|---|
| 103 | "BLD",7338,"KRN",19,"NM","B","C0Q BY PATIENT NUMERATOR",1)
|
|---|
| 104 |
|
|---|
| 105 | "BLD",7338,"KRN",19,"NM","B","C0Q DENOMINATOR PATIENT LIST",2)
|
|---|
| 106 |
|
|---|
| 107 | "BLD",7338,"KRN",19,"NM","B","C0Q DISPLAY MEASURE SET",3)
|
|---|
| 108 |
|
|---|
| 109 | "BLD",7338,"KRN",19,"NM","B","C0Q DISPLAY QUALITY MEASURES",4)
|
|---|
| 110 |
|
|---|
| 111 | "BLD",7338,"KRN",19,"NM","B","C0Q EXPORT CCR BY MEASURE",5)
|
|---|
| 112 |
|
|---|
| 113 | "BLD",7338,"KRN",19,"NM","B","C0Q EXPORT MEASURE SET",6)
|
|---|
| 114 |
|
|---|
| 115 | "BLD",7338,"KRN",19,"NM","B","C0Q LIST MEASURE SET",7)
|
|---|
| 116 |
|
|---|
| 117 | "BLD",7338,"KRN",19,"NM","B","C0Q MEASURE SET DEFINITION",8)
|
|---|
| 118 |
|
|---|
| 119 | "BLD",7338,"KRN",19,"NM","B","C0Q QUALITY MEASURE DEFINITION",9)
|
|---|
| 120 |
|
|---|
| 121 | "BLD",7338,"KRN",19,"NM","B","C0Q QUALITY MEASUREMENT MENU",10)
|
|---|
| 122 |
|
|---|
| 123 | "BLD",7338,"KRN",19,"NM","B","C0Q SUMMARY QUALITY MEASURES",11)
|
|---|
| 124 |
|
|---|
| 125 | "BLD",7338,"KRN",19.1,0)
|
|---|
| 126 | 19.1
|
|---|
| 127 | "BLD",7338,"KRN",101,0)
|
|---|
| 128 | 101
|
|---|
| 129 | "BLD",7338,"KRN",409.61,0)
|
|---|
| 130 | 409.61
|
|---|
| 131 | "BLD",7338,"KRN",771,0)
|
|---|
| 132 | 771
|
|---|
| 133 | "BLD",7338,"KRN",779.2,0)
|
|---|
| 134 | 779.2
|
|---|
| 135 | "BLD",7338,"KRN",870,0)
|
|---|
| 136 | 870
|
|---|
| 137 | "BLD",7338,"KRN",8989.51,0)
|
|---|
| 138 | 8989.51
|
|---|
| 139 | "BLD",7338,"KRN",8989.52,0)
|
|---|
| 140 | 8989.52
|
|---|
| 141 | "BLD",7338,"KRN",8994,0)
|
|---|
| 142 | 8994
|
|---|
| 143 | "BLD",7338,"KRN","B",.4,.4)
|
|---|
| 144 |
|
|---|
| 145 | "BLD",7338,"KRN","B",.401,.401)
|
|---|
| 146 |
|
|---|
| 147 | "BLD",7338,"KRN","B",.402,.402)
|
|---|
| 148 |
|
|---|
| 149 | "BLD",7338,"KRN","B",.403,.403)
|
|---|
| 150 |
|
|---|
| 151 | "BLD",7338,"KRN","B",.5,.5)
|
|---|
| 152 |
|
|---|
| 153 | "BLD",7338,"KRN","B",.84,.84)
|
|---|
| 154 |
|
|---|
| 155 | "BLD",7338,"KRN","B",3.6,3.6)
|
|---|
| 156 |
|
|---|
| 157 | "BLD",7338,"KRN","B",3.8,3.8)
|
|---|
| 158 |
|
|---|
| 159 | "BLD",7338,"KRN","B",9.2,9.2)
|
|---|
| 160 |
|
|---|
| 161 | "BLD",7338,"KRN","B",9.8,9.8)
|
|---|
| 162 |
|
|---|
| 163 | "BLD",7338,"KRN","B",19,19)
|
|---|
| 164 |
|
|---|
| 165 | "BLD",7338,"KRN","B",19.1,19.1)
|
|---|
| 166 |
|
|---|
| 167 | "BLD",7338,"KRN","B",101,101)
|
|---|
| 168 |
|
|---|
| 169 | "BLD",7338,"KRN","B",409.61,409.61)
|
|---|
| 170 |
|
|---|
| 171 | "BLD",7338,"KRN","B",771,771)
|
|---|
| 172 |
|
|---|
| 173 | "BLD",7338,"KRN","B",779.2,779.2)
|
|---|
| 174 |
|
|---|
| 175 | "BLD",7338,"KRN","B",870,870)
|
|---|
| 176 |
|
|---|
| 177 | "BLD",7338,"KRN","B",8989.51,8989.51)
|
|---|
| 178 |
|
|---|
| 179 | "BLD",7338,"KRN","B",8989.52,8989.52)
|
|---|
| 180 |
|
|---|
| 181 | "BLD",7338,"KRN","B",8994,8994)
|
|---|
| 182 |
|
|---|
| 183 | "DATA",1130580001.101,1,0)
|
|---|
| 184 | M1^41^40^2.16.840.1.113883.3.249.11.2
|
|---|
| 185 | "DATA",1130580001.101,1,1)
|
|---|
| 186 | CMS Measure #1: Diabetes Mellitus: Hemoglobin A1c Poor Control in Diabetes Mellitus
|
|---|
| 187 | "DATA",1130580001.101,1,4)
|
|---|
| 188 | PQRI-1
|
|---|
| 189 | "DATA",1130580001.101,1,5)
|
|---|
| 190 | Hemoglobin A1c Poor Control in Diabetes Mellitus
|
|---|
| 191 | "DATA",1130580001.101,1,6,0)
|
|---|
| 192 | ^^2^2^3101013^
|
|---|
| 193 | "DATA",1130580001.101,1,6,1,0)
|
|---|
| 194 | Percentage of patients 18 through 75 years with diabetes melli
|
|---|
| 195 | "DATA",1130580001.101,1,6,2,0)
|
|---|
| 196 | tus who had most recent hemoglobin A1C greater than 9.0%
|
|---|
| 197 | "DATA",1130580001.101,2,0)
|
|---|
| 198 | M5^47^46^2.16.840.1.113883.3.249.11.5
|
|---|
| 199 | "DATA",1130580001.101,2,1)
|
|---|
| 200 | CMS Measure #5: Heart Failure: Angiotensin-Converting Enzyme (ACE) Inhibitor or Angiotensin Receptor Blocker (ARB) Therapy for Left Ventricular Systolic Dysfunction (LVSD)
|
|---|
| 201 | "DATA",1130580001.101,2,4)
|
|---|
| 202 | PQRI-5
|
|---|
| 203 | "DATA",1130580001.101,2,5)
|
|---|
| 204 | Angiotensin-Converting Enzyme (ACE) Inhibitor or Angiotensin Receptor Blocker (ARB) Therapy for Left Ventricular Systolic Dysfunction (LVSD)
|
|---|
| 205 | "DATA",1130580001.101,2,6,0)
|
|---|
| 206 | ^^2^2^3101013^
|
|---|
| 207 | "DATA",1130580001.101,2,6,1,0)
|
|---|
| 208 | Percentage of patients 18 years and older with a diagnosis of
|
|---|
| 209 | "DATA",1130580001.101,2,6,2,0)
|
|---|
| 210 | heart failure and LVSD who were prescribed an ACE inhbitor or ARB therapy
|
|---|
| 211 | "DATA",1130580001.101,3,0)
|
|---|
| 212 | M112^26^25^2.16.840.1.113883.3.249.11.9
|
|---|
| 213 | "DATA",1130580001.101,3,1)
|
|---|
| 214 | Measure #112: Preventive Care and Screening: Screening Mammography
|
|---|
| 215 | "DATA",1130580001.101,3,4)
|
|---|
| 216 | PQRI-112
|
|---|
| 217 | "DATA",1130580001.101,3,5)
|
|---|
| 218 | Screening Mammography
|
|---|
| 219 | "DATA",1130580001.101,3,6,0)
|
|---|
| 220 | ^1130580001.111^2^2^3101014^^
|
|---|
| 221 | "DATA",1130580001.101,3,6,1,0)
|
|---|
| 222 | Percentage of womaen aged 40 through 69 years who had a mammog
|
|---|
| 223 | "DATA",1130580001.101,3,6,2,0)
|
|---|
| 224 | ram to screen for breast cancer within 24 months
|
|---|
| 225 | "DATA",1130580001.101,4,0)
|
|---|
| 226 | M124^33^33^2.16.840.1.113883.3.249.11.11
|
|---|
| 227 | "DATA",1130580001.101,4,1)
|
|---|
| 228 | Measure #124: Health Information Technology (HIT): Adoption/Use of Electronic Health Records
|
|---|
| 229 | "DATA",1130580001.101,4,4)
|
|---|
| 230 | PQRI-124
|
|---|
| 231 | "DATA",1130580001.101,4,5)
|
|---|
| 232 | Adoption/Use of Electronic Health Records (EHR)
|
|---|
| 233 | "DATA",1130580001.101,4,6,0)
|
|---|
| 234 | ^^3^3^3101013^
|
|---|
| 235 | "DATA",1130580001.101,4,6,1,0)
|
|---|
| 236 | Documents whether provider has adopted and is using health inf
|
|---|
| 237 | "DATA",1130580001.101,4,6,2,0)
|
|---|
| 238 | ormation technology. To qualify, the provider must havea adopted and be
|
|---|
| 239 | "DATA",1130580001.101,4,6,3,0)
|
|---|
| 240 | using a certified/qualified electronic health record (EHR)
|
|---|
| 241 | "DATA",1130580001.101,5,0)
|
|---|
| 242 | M128^58^31^2.16.840.1.113883.3.249.11.54
|
|---|
| 243 | "DATA",1130580001.101,5,1)
|
|---|
| 244 | Measure #128: Preventive Care and Screening: Body Mass Index (BMI) Screening and Follow-Up
|
|---|
| 245 | "DATA",1130580001.101,5,4)
|
|---|
| 246 | PQRI-128
|
|---|
| 247 | "DATA",1130580001.101,5,5)
|
|---|
| 248 | Body Mass Index (BMI) Screening and Follow-Up
|
|---|
| 249 | "DATA",1130580001.101,5,6,0)
|
|---|
| 250 | ^1130580001.111^5^5^3101014^^
|
|---|
| 251 | "DATA",1130580001.101,5,6,1,0)
|
|---|
| 252 | Percentage of patients aged 18 yesrs and older with a calculate BMI in
|
|---|
| 253 | "DATA",1130580001.101,5,6,2,0)
|
|---|
| 254 | the past 6 months or during the current visit documented in the medical
|
|---|
| 255 | "DATA",1130580001.101,5,6,3,0)
|
|---|
| 256 | record and if the most recent BMI is ourtide parameters, a follow-up plan
|
|---|
| 257 | "DATA",1130580001.101,5,6,4,0)
|
|---|
| 258 | is documented. Ages 65 and older BMI equal to or greater than 30 or less
|
|---|
| 259 | "DATA",1130580001.101,5,6,5,0)
|
|---|
| 260 | than 22 and ages 18-64, BMI greater than or equal to 25 or less than 18.5
|
|---|
| 261 | "DATA",1130580001.101,6,0)
|
|---|
| 262 | M47^20^48^2.16.840.1.113883.3.249.11.52
|
|---|
| 263 | "DATA",1130580001.101,6,1)
|
|---|
| 264 | Measure #47: Advance Care Plan
|
|---|
| 265 | "DATA",1130580001.101,6,4)
|
|---|
| 266 | PQRI-47
|
|---|
| 267 | "DATA",1130580001.101,6,5)
|
|---|
| 268 | Advance Care Plan
|
|---|
| 269 | "DATA",1130580001.101,6,6,0)
|
|---|
| 270 | ^1130580001.111^5^5^3101014^^^
|
|---|
| 271 | "DATA",1130580001.101,6,6,1,0)
|
|---|
| 272 | Percentage of patients age 65 and older who have an advanced care plan or
|
|---|
| 273 | "DATA",1130580001.101,6,6,2,0)
|
|---|
| 274 | surrogate decision maker documented in the medical record or documented
|
|---|
| 275 | "DATA",1130580001.101,6,6,3,0)
|
|---|
| 276 | in the medical record that an advance care plan was discussed but the
|
|---|
| 277 | "DATA",1130580001.101,6,6,4,0)
|
|---|
| 278 | patient did not wish or was not able to name a surrogate decision maker
|
|---|
| 279 | "DATA",1130580001.101,6,6,5,0)
|
|---|
| 280 | or provide an advance care plan.
|
|---|
| 281 | "DATA",1130580001.101,7,0)
|
|---|
| 282 | M48^24^23^2.16.840.1.113883.3.249.11.53
|
|---|
| 283 | "DATA",1130580001.101,7,1)
|
|---|
| 284 | Measure #48: Urinary Incontinence: Assessment of Presence or Absence of Urinary Incontinence in Women Aged 65 Years and Older
|
|---|
| 285 | "DATA",1130580001.101,7,4)
|
|---|
| 286 | PQRI-48
|
|---|
| 287 | "DATA",1130580001.101,7,5)
|
|---|
| 288 | Assessment of Presence or Absence of Urinary Incontinence in Women Aged 65 Years and Older
|
|---|
| 289 | "DATA",1130580001.101,7,6,0)
|
|---|
| 290 | ^^3^3^3101013^
|
|---|
| 291 | "DATA",1130580001.101,7,6,1,0)
|
|---|
| 292 | Percentage of patients equal to or older than 65 years of age at the
|
|---|
| 293 | "DATA",1130580001.101,7,6,2,0)
|
|---|
| 294 | beginning of the measurement perion who were assesed for the presence or
|
|---|
| 295 | "DATA",1130580001.101,7,6,3,0)
|
|---|
| 296 | absence of urinary incontinence within 12 months
|
|---|
| 297 | "DATA",1130580001.101,8,0)
|
|---|
| 298 | M2^43^42^2.16.840.1.113883.3.249.11.3
|
|---|
| 299 | "DATA",1130580001.101,8,1)
|
|---|
| 300 | Measure #2: Diabetes Mellitus: Low Density Lipoprotein (LDL-C) Control in Diabetes Mellitus
|
|---|
| 301 | "DATA",1130580001.101,8,4)
|
|---|
| 302 | PQRI-2
|
|---|
| 303 | "DATA",1130580001.101,8,5)
|
|---|
| 304 | Low Density Lipoprotein (LDL-C) Control in Diabetes Mellitus
|
|---|
| 305 | "DATA",1130580001.101,8,6,0)
|
|---|
| 306 | ^^2^2^3101013^
|
|---|
| 307 | "DATA",1130580001.101,8,6,1,0)
|
|---|
| 308 | Percentage of patients 18 through 75 years with diabetes melli
|
|---|
| 309 | "DATA",1130580001.101,8,6,2,0)
|
|---|
| 310 | tus who had most recent LDL-C level in control (less than 100 mg./dL)
|
|---|
| 311 | "DATA",1130580001.101,9,0)
|
|---|
| 312 | M3^45^44^2.16.840.1.113883.3.249.11.4
|
|---|
| 313 | "DATA",1130580001.101,9,1)
|
|---|
| 314 | CMS Measure #3: Diabetes Mellitus: High Blood Pressure Control in Diabetes Mellitus - QRDA Cat I template
|
|---|
| 315 | "DATA",1130580001.101,9,4)
|
|---|
| 316 | PQRI-3
|
|---|
| 317 | "DATA",1130580001.101,9,5)
|
|---|
| 318 | High Blood Pressure Control in Diabetes Mellitus
|
|---|
| 319 | "DATA",1130580001.101,9,6,0)
|
|---|
| 320 | ^^2^2^3101013^
|
|---|
| 321 | "DATA",1130580001.101,9,6,1,0)
|
|---|
| 322 | Percentage of patients 18 through 75 years with diabetes melli
|
|---|
| 323 | "DATA",1130580001.101,9,6,2,0)
|
|---|
| 324 | tus who had most recent blood pressure in control (less than 140/80 mmHg)
|
|---|
| 325 | "DATA",1130580001.101,10,0)
|
|---|
| 326 | M7^35^34^2.16.840.1.113883.3.249.11.6
|
|---|
| 327 | "DATA",1130580001.101,10,1)
|
|---|
| 328 | CMS Measure #7: Coronary Artery Disease (CAD): Beta-Blocker Therapy for CAD Patients with Prior Myocardial Infarction (MI)
|
|---|
| 329 | "DATA",1130580001.101,10,4)
|
|---|
| 330 | PQRI-7
|
|---|
| 331 | "DATA",1130580001.101,10,5)
|
|---|
| 332 | Percentage of patients 18 aged 18 years and older wit a diagnosis of CAD and prior MI who were prescribed beta-blocker therapy
|
|---|
| 333 | "DATA",1130580001.101,10,6,0)
|
|---|
| 334 | ^^3^3^3101013^
|
|---|
| 335 | "DATA",1130580001.101,10,6,1,0)
|
|---|
| 336 | Percentage of patients aged 18 years and older with a diagnosis of
|
|---|
| 337 | "DATA",1130580001.101,10,6,2,0)
|
|---|
| 338 | coronary artery disease and a prior MI who where prescribed beta-blocker
|
|---|
| 339 | "DATA",1130580001.101,10,6,3,0)
|
|---|
| 340 | therapy
|
|---|
| 341 | "DATA",1130580001.101,11,0)
|
|---|
| 342 | M110^81^80^2.16.840.1.113883.3.249.11.7
|
|---|
| 343 | "DATA",1130580001.101,11,1)
|
|---|
| 344 | Measure #110: Preventive Care and Screening: Influenza Immunization for Patients >= 50 Years
|
|---|
| 345 | "DATA",1130580001.101,11,4)
|
|---|
| 346 | PQRI-110
|
|---|
| 347 | "DATA",1130580001.101,11,5)
|
|---|
| 348 | Influenza Immunization for Patients >= 50 Years
|
|---|
| 349 | "DATA",1130580001.101,11,6,0)
|
|---|
| 350 | ^1130580001.111^2^2^3101014^^
|
|---|
| 351 | "DATA",1130580001.101,11,6,1,0)
|
|---|
| 352 | Percentage of patients aged 50 years and older who received an
|
|---|
| 353 | "DATA",1130580001.101,11,6,2,0)
|
|---|
| 354 | influenza immunization during the flu season (September through February)
|
|---|
| 355 | "DATA",1130580001.101,12,0)
|
|---|
| 356 | M111^71^68^2.16.840.1.113883.3.249.11.8
|
|---|
| 357 | "DATA",1130580001.101,12,1)
|
|---|
| 358 | Measure #111: Preventive Care and Screening: Pneumonia Vaccination for Patients 65 Years and Older
|
|---|
| 359 | "DATA",1130580001.101,12,4)
|
|---|
| 360 | PQRI-111
|
|---|
| 361 | "DATA",1130580001.101,12,5)
|
|---|
| 362 | Pneumonia Vaccination for Patients 65 Years and Older
|
|---|
| 363 | "DATA",1130580001.101,12,6,0)
|
|---|
| 364 | ^^2^2^3101013^
|
|---|
| 365 | "DATA",1130580001.101,12,6,1,0)
|
|---|
| 366 | Percentage of patients afed 65 years and older who have ever r
|
|---|
| 367 | "DATA",1130580001.101,12,6,2,0)
|
|---|
| 368 | eceived a pneumoccal vaccine
|
|---|
| 369 | "DATA",1130580001.101,13,0)
|
|---|
| 370 | M113^67^66^2.16.840.1.113883.3.249.11.10
|
|---|
| 371 | "DATA",1130580001.101,13,1)
|
|---|
| 372 | Measure #113: Preventive Care and Screening: Colorectal Cancer Screening
|
|---|
| 373 | "DATA",1130580001.101,13,4)
|
|---|
| 374 | PQRI-113
|
|---|
| 375 | "DATA",1130580001.101,13,5)
|
|---|
| 376 | Colorectal Cancer Screening
|
|---|
| 377 | "DATA",1130580001.101,13,6,0)
|
|---|
| 378 | ^^2^2^3101013^
|
|---|
| 379 | "DATA",1130580001.101,13,6,1,0)
|
|---|
| 380 | Percentage of patients aged 50 through 80 who received the app
|
|---|
| 381 | "DATA",1130580001.101,13,6,2,0)
|
|---|
| 382 | ropriate colorectal cancer screening
|
|---|
| 383 | "DATA",1130580001.101,14,0)
|
|---|
| 384 | M39^65^64^2.16.840.1.113883.3.249.11.51
|
|---|
| 385 | "DATA",1130580001.101,14,1)
|
|---|
| 386 | Measure #39: Screening or Therapy for Osteoporosis for Women Aged 65 Years and Older
|
|---|
| 387 | "DATA",1130580001.101,14,4)
|
|---|
| 388 | PQRI-39
|
|---|
| 389 | "DATA",1130580001.101,14,5)
|
|---|
| 390 | Screening or Therapy for Osteoporosis for Women Aged 65 Years and Older
|
|---|
| 391 | "DATA",1130580001.101,14,6,0)
|
|---|
| 392 | ^^3^3^3101013^
|
|---|
| 393 | "DATA",1130580001.101,14,6,1,0)
|
|---|
| 394 | Percentage of patients who had a DXA measurement ordered or pe
|
|---|
| 395 | "DATA",1130580001.101,14,6,2,0)
|
|---|
| 396 | rformed at least once since age 60 or pharmacologic therapy prescribed
|
|---|
| 397 | "DATA",1130580001.101,14,6,3,0)
|
|---|
| 398 | within 12 months before the end of the measurement period
|
|---|
| 399 | "DATA",1130580001.101,16,0)
|
|---|
| 400 | M173^50^49^2.16.840.1.113883.3.249.11.55
|
|---|
| 401 | "DATA",1130580001.101,16,1)
|
|---|
| 402 | Measure #173: Preventive Care and Screening: Unhealthy Alcohol Use - Screening
|
|---|
| 403 | "DATA",1130580001.101,16,4)
|
|---|
| 404 | PQRI-173
|
|---|
| 405 | "DATA",1130580001.101,16,5)
|
|---|
| 406 | Preventive Care and Screening: Unhealthy Alcohol Use - Screening
|
|---|
| 407 | "DATA",1130580001.101,16,6,0)
|
|---|
| 408 | ^^2^2^3101013^
|
|---|
| 409 | "DATA",1130580001.101,16,6,1,0)
|
|---|
| 410 | Percentage of patients aged 18 years and older who were screen
|
|---|
| 411 | "DATA",1130580001.101,16,6,2,0)
|
|---|
| 412 | ed for unhealthy alcohol use using a systematic method within 24 months
|
|---|
| 413 | "DATA",1130580001.101,17,0)
|
|---|
| 414 | M0013^52^77^2.16.840.1.113883.3.249.11.56
|
|---|
| 415 | "DATA",1130580001.101,17,1)
|
|---|
| 416 | Measure #0013: Hypertension (HTN): Blood Pressure Measurement - QRDA Cat I template
|
|---|
| 417 | "DATA",1130580001.101,17,4)
|
|---|
| 418 | PQRI-13
|
|---|
| 419 | "DATA",1130580001.101,17,5)
|
|---|
| 420 | Hypertension (HTN): Blood Pressure Measurement
|
|---|
| 421 | "DATA",1130580001.101,17,6,0)
|
|---|
| 422 | ^^3^3^3101013^
|
|---|
| 423 | "DATA",1130580001.101,17,6,1,0)
|
|---|
| 424 | Percentage of patients aged 18 years and older with a diagnosi
|
|---|
| 425 | "DATA",1130580001.101,17,6,2,0)
|
|---|
| 426 | s of hypertension in the beginning of the measurement period with a blood
|
|---|
| 427 | "DATA",1130580001.101,17,6,3,0)
|
|---|
| 428 | pressure recorded
|
|---|
| 429 | "DATA",1130580001.101,18,0)
|
|---|
| 430 | M0022^73^61^2.16.840.1.113883.3.249.11.57
|
|---|
| 431 | "DATA",1130580001.101,18,1)
|
|---|
| 432 | Measure #0022: Drugs to be avoided in the Elderly
|
|---|
| 433 | "DATA",1130580001.101,18,4)
|
|---|
| 434 | PQRI-22
|
|---|
| 435 | "DATA",1130580001.101,18,5)
|
|---|
| 436 | Drugs to be avoided in the elderly
|
|---|
| 437 | "DATA",1130580001.101,18,6,0)
|
|---|
| 438 | ^^2^2^3101013^
|
|---|
| 439 | "DATA",1130580001.101,18,6,1,0)
|
|---|
| 440 | Percentage of patients aged 65 years and older who received at least one
|
|---|
| 441 | "DATA",1130580001.101,18,6,2,0)
|
|---|
| 442 | drug to be avoided in the elderly in the measurement period
|
|---|
| 443 | "DATA",1130580001.101,19,0)
|
|---|
| 444 | M0028^79^78^2.16.840.1.113883.3.249.11.59
|
|---|
| 445 | "DATA",1130580001.101,19,1)
|
|---|
| 446 | Measure #0028: Preventive Care and Screening: Tobacco Use: Screening and Cessation Intervention
|
|---|
| 447 | "DATA",1130580001.101,19,4)
|
|---|
| 448 | PQRI-28
|
|---|
| 449 | "DATA",1130580001.101,19,5)
|
|---|
| 450 | Preventive care and Screening: Tobacco Use: Screening and Cessation Intervention
|
|---|
| 451 | "DATA",1130580001.101,19,6,0)
|
|---|
| 452 | ^^4^4^3101013^
|
|---|
| 453 | "DATA",1130580001.101,19,6,1,0)
|
|---|
| 454 | Percentage of patients aged 18 years of older who were screene
|
|---|
| 455 | "DATA",1130580001.101,19,6,2,0)
|
|---|
| 456 | d about tobacco use at least once during the two year measurement period
|
|---|
| 457 | "DATA",1130580001.101,19,6,3,0)
|
|---|
| 458 | AND who received smoking cessation counseling if identified as a tobacco
|
|---|
| 459 | "DATA",1130580001.101,19,6,4,0)
|
|---|
| 460 | user
|
|---|
| 461 | "DATA",1130580001.101,20,0)
|
|---|
| 462 | M0038^85^84^2.16.840.1.113883.3.249.11.60
|
|---|
| 463 | "DATA",1130580001.101,20,1)
|
|---|
| 464 | Measure #0038: Childhood Immunization Status
|
|---|
| 465 | "DATA",1130580001.101,20,4)
|
|---|
| 466 | PQRI-38
|
|---|
| 467 | "DATA",1130580001.101,20,5)
|
|---|
| 468 | Childhood immumnization status
|
|---|
| 469 | "DATA",1130580001.101,20,6,0)
|
|---|
| 470 | ^^4^4^3101013^
|
|---|
| 471 | "DATA",1130580001.101,20,6,1,0)
|
|---|
| 472 | Percentage of children who turn two years of age during the me
|
|---|
| 473 | "DATA",1130580001.101,20,6,2,0)
|
|---|
| 474 | asurement period who have had 4 DTaP/DT, 3 IPV, 1 MMR and 3 H influenza
|
|---|
| 475 | "DATA",1130580001.101,20,6,3,0)
|
|---|
| 476 | type B, 3 hepatitis B, 1 chicken pox vaccine (VZV) and 4 pneumoccal
|
|---|
| 477 | "DATA",1130580001.101,20,6,4,0)
|
|---|
| 478 | conjugate vaccines by their second birthday
|
|---|
| 479 | "DATA",1130580001.101,21,0)
|
|---|
| 480 | M0024^72^70
|
|---|
| 481 | "FIA",1130580001.101)
|
|---|
| 482 | C0Q QUAILITY MEASURE
|
|---|
| 483 | "FIA",1130580001.101,0)
|
|---|
| 484 | ^C0Q(101,
|
|---|
| 485 | "FIA",1130580001.101,0,0)
|
|---|
| 486 | 1130580001.101
|
|---|
| 487 | "FIA",1130580001.101,0,1)
|
|---|
| 488 | y^y^f^^n^^y^o^n
|
|---|
| 489 | "FIA",1130580001.101,0,10)
|
|---|
| 490 |
|
|---|
| 491 | "FIA",1130580001.101,0,11)
|
|---|
| 492 |
|
|---|
| 493 | "FIA",1130580001.101,0,"RLRO")
|
|---|
| 494 |
|
|---|
| 495 | "FIA",1130580001.101,1130580001.101)
|
|---|
| 496 | 0
|
|---|
| 497 | "FIA",1130580001.101,1130580001.111)
|
|---|
| 498 | 0
|
|---|
| 499 | "FIA",1130580001.201)
|
|---|
| 500 | C0Q MEASUREMENTS
|
|---|
| 501 | "FIA",1130580001.201,0)
|
|---|
| 502 | ^C0Q(201,
|
|---|
| 503 | "FIA",1130580001.201,0,0)
|
|---|
| 504 | 1130580001.201
|
|---|
| 505 | "FIA",1130580001.201,0,1)
|
|---|
| 506 | y^y^f^^^^n
|
|---|
| 507 | "FIA",1130580001.201,0,10)
|
|---|
| 508 |
|
|---|
| 509 | "FIA",1130580001.201,0,11)
|
|---|
| 510 |
|
|---|
| 511 | "FIA",1130580001.201,0,"RLRO")
|
|---|
| 512 |
|
|---|
| 513 | "FIA",1130580001.201,1130580001.201)
|
|---|
| 514 | 0
|
|---|
| 515 | "FIA",1130580001.201,1130580001.2011)
|
|---|
| 516 | 0
|
|---|
| 517 | "FIA",1130580001.201,1130580001.20111)
|
|---|
| 518 | 0
|
|---|
| 519 | "FIA",1130580001.201,1130580001.20112)
|
|---|
| 520 | 0
|
|---|
| 521 | "KRN",.4,2540,-1)
|
|---|
| 522 | 0^3
|
|---|
| 523 | "KRN",.4,2540,0)
|
|---|
| 524 | C0Q PRINT QUALITY MEASURES^3101012.2017^@^1130580001.101^^@^3101015
|
|---|
| 525 | "KRN",.4,2540,"F",2)
|
|---|
| 526 | .01~.5~1~2~
|
|---|
| 527 | "KRN",.4,2540,"H")
|
|---|
| 528 | C0Q QUAILITY MEASURE LIST
|
|---|
| 529 | "KRN",.4,2541,-1)
|
|---|
| 530 | 0^2
|
|---|
| 531 | "KRN",.4,2541,0)
|
|---|
| 532 | C0Q PRINT MEASUREMENT SET^3101012.2337^@^1130580001.201^^@^3101102
|
|---|
| 533 | "KRN",.4,2541,"F",2)
|
|---|
| 534 | .01~.02~.03~.05~.2~1,.01~1,1,.01~1,1.1~1,2,.01~1,2.1~1,3~
|
|---|
| 535 | "KRN",.4,2541,"H")
|
|---|
| 536 | C0Q MEASUREMENTS LIST
|
|---|
| 537 | "KRN",.4,2542,-1)
|
|---|
| 538 | 0^1
|
|---|
| 539 | "KRN",.4,2542,0)
|
|---|
| 540 | C0Q PRINT BY PATIENT^3101014.2342^@^1130580001.201^^@^3101014
|
|---|
| 541 | "KRN",.4,2542,"F",2)
|
|---|
| 542 | .01~1,.01~1,2,.01~
|
|---|
| 543 | "KRN",.4,2542,"H")
|
|---|
| 544 | C0Q MEASUREMENTS LIST
|
|---|
| 545 | "KRN",.402,2236,-1)
|
|---|
| 546 | 0^2
|
|---|
| 547 | "KRN",.402,2236,0)
|
|---|
| 548 | C0Q QUALITY MEASURE DEFINITION^3101012.1927^@^1130580001.101^^@^3101108
|
|---|
| 549 | "KRN",.402,2236,"DR",1,1130580001.101)
|
|---|
| 550 | .01;.5;1;2;
|
|---|
| 551 | "KRN",.402,2237,-1)
|
|---|
| 552 | 0^1
|
|---|
| 553 | "KRN",.402,2237,0)
|
|---|
| 554 | C0Q MEASUREMENT SET DEFINE^3101012.1929^@^1130580001.201^^@^3101108
|
|---|
| 555 | "KRN",.402,2237,"DR",1,1130580001.201)
|
|---|
| 556 | .01;1;
|
|---|
| 557 | "KRN",.402,2237,"DR",2,1130580001.2011)
|
|---|
| 558 | .01;
|
|---|
| 559 | "KRN",19,13695,-1)
|
|---|
| 560 | 0^9
|
|---|
| 561 | "KRN",19,13695,0)
|
|---|
| 562 | C0Q QUALITY MEASURE DEFINITION^QUALITY MEASURE DEFINITION^^E^^^^^^^^
|
|---|
| 563 | "KRN",19,13695,30)
|
|---|
| 564 | C0Q(101,
|
|---|
| 565 | "KRN",19,13695,31)
|
|---|
| 566 | AEMQL
|
|---|
| 567 | "KRN",19,13695,50)
|
|---|
| 568 | C0Q(101,
|
|---|
| 569 | "KRN",19,13695,51)
|
|---|
| 570 | [C0Q QUALITY MEASURE DEFINITION]
|
|---|
| 571 | "KRN",19,13695,"U")
|
|---|
| 572 | QUALITY MEASURE DEFINITION
|
|---|
| 573 | "KRN",19,13696,-1)
|
|---|
| 574 | 0^8
|
|---|
| 575 | "KRN",19,13696,0)
|
|---|
| 576 | C0Q MEASURE SET DEFINITION^MEASURE SET DEFINITION^^E^^^^^^^^
|
|---|
| 577 | "KRN",19,13696,30)
|
|---|
| 578 | C0Q(201,
|
|---|
| 579 | "KRN",19,13696,31)
|
|---|
| 580 | AEMQL
|
|---|
| 581 | "KRN",19,13696,50)
|
|---|
| 582 | C0Q(201,
|
|---|
| 583 | "KRN",19,13696,51)
|
|---|
| 584 | [C0Q MEASUREMENT SET DEFINE]
|
|---|
| 585 | "KRN",19,13696,"U")
|
|---|
| 586 | MEASURE SET DEFINITION
|
|---|
| 587 | "KRN",19,13697,-1)
|
|---|
| 588 | 0^10
|
|---|
| 589 | "KRN",19,13697,0)
|
|---|
| 590 | C0Q QUALITY MEASUREMENT MENU^QUALITY MEASUREMENT MENU^^M^^^^^^^^
|
|---|
| 591 | "KRN",19,13697,10,0)
|
|---|
| 592 | ^19.01IP^10^8
|
|---|
| 593 | "KRN",19,13697,10,1,0)
|
|---|
| 594 | 13696
|
|---|
| 595 | "KRN",19,13697,10,1,"^")
|
|---|
| 596 | C0Q MEASURE SET DEFINITION
|
|---|
| 597 | "KRN",19,13697,10,2,0)
|
|---|
| 598 | 13695
|
|---|
| 599 | "KRN",19,13697,10,2,"^")
|
|---|
| 600 | C0Q QUALITY MEASURE DEFINITION
|
|---|
| 601 | "KRN",19,13697,10,5,0)
|
|---|
| 602 | 13700
|
|---|
| 603 | "KRN",19,13697,10,5,"^")
|
|---|
| 604 | C0Q LIST MEASURE SET
|
|---|
| 605 | "KRN",19,13697,10,6,0)
|
|---|
| 606 | 13701
|
|---|
| 607 | "KRN",19,13697,10,6,"^")
|
|---|
| 608 | C0Q BY PATIENT NUMERATOR
|
|---|
| 609 | "KRN",19,13697,10,7,0)
|
|---|
| 610 | 13702
|
|---|
| 611 | "KRN",19,13697,10,7,"^")
|
|---|
| 612 | C0Q DENOMINATOR PATIENT LIST
|
|---|
| 613 | "KRN",19,13697,10,8,0)
|
|---|
| 614 | 13703
|
|---|
| 615 | "KRN",19,13697,10,8,"^")
|
|---|
| 616 | C0Q EXPORT CCR BY MEASURE
|
|---|
| 617 | "KRN",19,13697,10,9,0)
|
|---|
| 618 | 13704
|
|---|
| 619 | "KRN",19,13697,10,9,"^")
|
|---|
| 620 | C0Q SUMMARY QUALITY MEASURES
|
|---|
| 621 | "KRN",19,13697,10,10,0)
|
|---|
| 622 | 13705
|
|---|
| 623 | "KRN",19,13697,10,10,"^")
|
|---|
| 624 | C0Q EXPORT MEASURE SET
|
|---|
| 625 | "KRN",19,13697,99)
|
|---|
| 626 | 62039,71770
|
|---|
| 627 | "KRN",19,13697,"U")
|
|---|
| 628 | QUALITY MEASUREMENT MENU
|
|---|
| 629 | "KRN",19,13698,-1)
|
|---|
| 630 | 0^4
|
|---|
| 631 | "KRN",19,13698,0)
|
|---|
| 632 | C0Q DISPLAY QUALITY MEASURES^DISPLAY QUALITY MEASURES^^P^^^^^^^^
|
|---|
| 633 | "KRN",19,13698,60)
|
|---|
| 634 | C0Q(101,
|
|---|
| 635 | "KRN",19,13698,62)
|
|---|
| 636 | 0
|
|---|
| 637 | "KRN",19,13698,63)
|
|---|
| 638 | [C0Q PRINT QUALITY MEASURES]
|
|---|
| 639 | "KRN",19,13698,64)
|
|---|
| 640 |
|
|---|
| 641 | "KRN",19,13698,65)
|
|---|
| 642 |
|
|---|
| 643 | "KRN",19,13698,66)
|
|---|
| 644 |
|
|---|
| 645 | "KRN",19,13698,"U")
|
|---|
| 646 | DISPLAY QUALITY MEASURES
|
|---|
| 647 | "KRN",19,13699,-1)
|
|---|
| 648 | 0^3
|
|---|
| 649 | "KRN",19,13699,0)
|
|---|
| 650 | C0Q DISPLAY MEASURE SET^DISPLAY MEASURE SET^^P^^^^^^^^
|
|---|
| 651 | "KRN",19,13699,60)
|
|---|
| 652 | C0Q(201,
|
|---|
| 653 | "KRN",19,13699,62)
|
|---|
| 654 | 0
|
|---|
| 655 | "KRN",19,13699,63)
|
|---|
| 656 | [C0Q PRINT MEASUREMENT SET]
|
|---|
| 657 | "KRN",19,13699,64)
|
|---|
| 658 |
|
|---|
| 659 | "KRN",19,13699,65)
|
|---|
| 660 |
|
|---|
| 661 | "KRN",19,13699,66)
|
|---|
| 662 |
|
|---|
| 663 | "KRN",19,13699,"U")
|
|---|
| 664 | DISPLAY MEASURE SET
|
|---|
| 665 | "KRN",19,13700,-1)
|
|---|
| 666 | 0^7
|
|---|
| 667 | "KRN",19,13700,0)
|
|---|
| 668 | C0Q LIST MEASURE SET^LIST MEASURE SET^^R^^^^^^^^
|
|---|
| 669 | "KRN",19,13700,25)
|
|---|
| 670 | EN^C0QMAIN
|
|---|
| 671 | "KRN",19,13700,"U")
|
|---|
| 672 | LIST MEASURE SET
|
|---|
| 673 | "KRN",19,13701,-1)
|
|---|
| 674 | 0^1
|
|---|
| 675 | "KRN",19,13701,0)
|
|---|
| 676 | C0Q BY PATIENT NUMERATOR^BY PATIENT NUMERATOR^^R^^^^^^^^
|
|---|
| 677 | "KRN",19,13701,25)
|
|---|
| 678 | NBYP^C0QMAIN
|
|---|
| 679 | "KRN",19,13701,"U")
|
|---|
| 680 | BY PATIENT NUMERATOR
|
|---|
| 681 | "KRN",19,13702,-1)
|
|---|
| 682 | 0^2
|
|---|
| 683 | "KRN",19,13702,0)
|
|---|
| 684 | C0Q DENOMINATOR PATIENT LIST^DENOMINATOR PATIENT LIST^^R^^^^^^^^
|
|---|
| 685 | "KRN",19,13702,25)
|
|---|
| 686 | DBYP^C0QMAIN
|
|---|
| 687 | "KRN",19,13702,"U")
|
|---|
| 688 | DENOMINATOR PATIENT LIST
|
|---|
| 689 | "KRN",19,13703,-1)
|
|---|
| 690 | 0^5
|
|---|
| 691 | "KRN",19,13703,0)
|
|---|
| 692 | C0Q EXPORT CCR BY MEASURE^EXPORT CCR BY MEASURE^^R^^^^^^^^
|
|---|
| 693 | "KRN",19,13703,25)
|
|---|
| 694 | EXPORT^C0QMAIN
|
|---|
| 695 | "KRN",19,13703,"U")
|
|---|
| 696 | EXPORT CCR BY MEASURE
|
|---|
| 697 | "KRN",19,13704,-1)
|
|---|
| 698 | 0^11
|
|---|
| 699 | "KRN",19,13704,0)
|
|---|
| 700 | C0Q SUMMARY QUALITY MEASURES^SUMMARY QUALITY MEASURES^^R^^^^^^^^
|
|---|
| 701 | "KRN",19,13704,25)
|
|---|
| 702 | EN2^C0QMAIN
|
|---|
| 703 | "KRN",19,13704,"U")
|
|---|
| 704 | SUMMARY QUALITY MEASURES
|
|---|
| 705 | "KRN",19,13705,-1)
|
|---|
| 706 | 0^6
|
|---|
| 707 | "KRN",19,13705,0)
|
|---|
| 708 | C0Q EXPORT MEASURE SET^ALL MEASURES EXPORT^^R^^^^^^^^
|
|---|
| 709 | "KRN",19,13705,25)
|
|---|
| 710 | ENEXP^C0QMAIN
|
|---|
| 711 | "KRN",19,13705,"U")
|
|---|
| 712 | ALL MEASURES EXPORT
|
|---|
| 713 | "MBREQ")
|
|---|
| 714 | 0
|
|---|
| 715 | "ORD",5,.4)
|
|---|
| 716 | .4;5;;;EDEOUT^DIFROMSO(.4,DA,"",XPDA);FPRE^DIFROMSI(.4,"",XPDA);EPRE^DIFROMSI(.4,DA,$E("N",$G(XPDNEW)),XPDA,"",OLDA);;EPOST^DIFROMSI(.4,DA,"",XPDA);DEL^DIFROMSK(.4,"",%)
|
|---|
| 717 | "ORD",5,.4,0)
|
|---|
| 718 | PRINT TEMPLATE
|
|---|
| 719 | "ORD",7,.402)
|
|---|
| 720 | .402;7;;;EDEOUT^DIFROMSO(.402,DA,"",XPDA);FPRE^DIFROMSI(.402,"",XPDA);EPRE^DIFROMSI(.402,DA,$E("N",$G(XPDNEW)),XPDA,"",OLDA);;EPOST^DIFROMSI(.402,DA,"",XPDA);DEL^DIFROMSK(.402,"",%)
|
|---|
| 721 | "ORD",7,.402,0)
|
|---|
| 722 | INPUT TEMPLATE
|
|---|
| 723 | "ORD",18,19)
|
|---|
| 724 | 19;18;;;OPT^XPDTA;OPTF1^XPDIA;OPTE1^XPDIA;OPTF2^XPDIA;;OPTDEL^XPDIA
|
|---|
| 725 | "ORD",18,19,0)
|
|---|
| 726 | OPTION
|
|---|
| 727 | "QUES","XPF1",0)
|
|---|
| 728 | Y
|
|---|
| 729 | "QUES","XPF1","??")
|
|---|
| 730 | ^D REP^XPDH
|
|---|
| 731 | "QUES","XPF1","A")
|
|---|
| 732 | Shall I write over your |FLAG| File
|
|---|
| 733 | "QUES","XPF1","B")
|
|---|
| 734 | YES
|
|---|
| 735 | "QUES","XPF1","M")
|
|---|
| 736 | D XPF1^XPDIQ
|
|---|
| 737 | "QUES","XPF2",0)
|
|---|
| 738 | Y
|
|---|
| 739 | "QUES","XPF2","??")
|
|---|
| 740 | ^D DTA^XPDH
|
|---|
| 741 | "QUES","XPF2","A")
|
|---|
| 742 | Want my data |FLAG| yours
|
|---|
| 743 | "QUES","XPF2","B")
|
|---|
| 744 | YES
|
|---|
| 745 | "QUES","XPF2","M")
|
|---|
| 746 | D XPF2^XPDIQ
|
|---|
| 747 | "QUES","XPI1",0)
|
|---|
| 748 | YO
|
|---|
| 749 | "QUES","XPI1","??")
|
|---|
| 750 | ^D INHIBIT^XPDH
|
|---|
| 751 | "QUES","XPI1","A")
|
|---|
| 752 | Want KIDS to INHIBIT LOGONs during the install
|
|---|
| 753 | "QUES","XPI1","B")
|
|---|
| 754 | NO
|
|---|
| 755 | "QUES","XPI1","M")
|
|---|
| 756 | D XPI1^XPDIQ
|
|---|
| 757 | "QUES","XPM1",0)
|
|---|
| 758 | PO^VA(200,:EM
|
|---|
| 759 | "QUES","XPM1","??")
|
|---|
| 760 | ^D MG^XPDH
|
|---|
| 761 | "QUES","XPM1","A")
|
|---|
| 762 | Enter the Coordinator for Mail Group '|FLAG|'
|
|---|
| 763 | "QUES","XPM1","B")
|
|---|
| 764 |
|
|---|
| 765 | "QUES","XPM1","M")
|
|---|
| 766 | D XPM1^XPDIQ
|
|---|
| 767 | "QUES","XPO1",0)
|
|---|
| 768 | Y
|
|---|
| 769 | "QUES","XPO1","??")
|
|---|
| 770 | ^D MENU^XPDH
|
|---|
| 771 | "QUES","XPO1","A")
|
|---|
| 772 | Want KIDS to Rebuild Menu Trees Upon Completion of Install
|
|---|
| 773 | "QUES","XPO1","B")
|
|---|
| 774 | NO
|
|---|
| 775 | "QUES","XPO1","M")
|
|---|
| 776 | D XPO1^XPDIQ
|
|---|
| 777 | "QUES","XPZ1",0)
|
|---|
| 778 | Y
|
|---|
| 779 | "QUES","XPZ1","??")
|
|---|
| 780 | ^D OPT^XPDH
|
|---|
| 781 | "QUES","XPZ1","A")
|
|---|
| 782 | Want to DISABLE Scheduled Options, Menu Options, and Protocols
|
|---|
| 783 | "QUES","XPZ1","B")
|
|---|
| 784 | NO
|
|---|
| 785 | "QUES","XPZ1","M")
|
|---|
| 786 | D XPZ1^XPDIQ
|
|---|
| 787 | "QUES","XPZ2",0)
|
|---|
| 788 | Y
|
|---|
| 789 | "QUES","XPZ2","??")
|
|---|
| 790 | ^D RTN^XPDH
|
|---|
| 791 | "QUES","XPZ2","A")
|
|---|
| 792 | Want to MOVE routines to other CPUs
|
|---|
| 793 | "QUES","XPZ2","B")
|
|---|
| 794 | NO
|
|---|
| 795 | "QUES","XPZ2","M")
|
|---|
| 796 | D XPZ2^XPDIQ
|
|---|
| 797 | "RTN")
|
|---|
| 798 | 1
|
|---|
| 799 | "RTN","C0QMAIN")
|
|---|
| 800 | 0^1^B69544556
|
|---|
| 801 | "RTN","C0QMAIN",1,0)
|
|---|
| 802 | C0QMAIN ; GPL - Quality Reporting Main Processing ;10/13/10 17:05
|
|---|
| 803 | "RTN","C0QMAIN",2,0)
|
|---|
| 804 | ;;0.1;C0Q;nopatch;noreleasedate;Build 1
|
|---|
| 805 | "RTN","C0QMAIN",3,0)
|
|---|
| 806 | ;Copyright 2009 George Lilly. Licensed under the terms of the GNU
|
|---|
| 807 | "RTN","C0QMAIN",4,0)
|
|---|
| 808 | ;General Public License See attached copy of the License.
|
|---|
| 809 | "RTN","C0QMAIN",5,0)
|
|---|
| 810 | ;
|
|---|
| 811 | "RTN","C0QMAIN",6,0)
|
|---|
| 812 | ;This program is free software; you can redistribute it and/or modify
|
|---|
| 813 | "RTN","C0QMAIN",7,0)
|
|---|
| 814 | ;it under the terms of the GNU General Public License as published by
|
|---|
| 815 | "RTN","C0QMAIN",8,0)
|
|---|
| 816 | ;the Free Software Foundation; either version 2 of the License, or
|
|---|
| 817 | "RTN","C0QMAIN",9,0)
|
|---|
| 818 | ;(at your option) any later version.
|
|---|
| 819 | "RTN","C0QMAIN",10,0)
|
|---|
| 820 | ;
|
|---|
| 821 | "RTN","C0QMAIN",11,0)
|
|---|
| 822 | ;This program is distributed in the hope that it will be useful,
|
|---|
| 823 | "RTN","C0QMAIN",12,0)
|
|---|
| 824 | ;but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|---|
| 825 | "RTN","C0QMAIN",13,0)
|
|---|
| 826 | ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|---|
| 827 | "RTN","C0QMAIN",14,0)
|
|---|
| 828 | ;GNU General Public License for more details.
|
|---|
| 829 | "RTN","C0QMAIN",15,0)
|
|---|
| 830 | ;
|
|---|
| 831 | "RTN","C0QMAIN",16,0)
|
|---|
| 832 | ;You should have received a copy of the GNU General Public License along
|
|---|
| 833 | "RTN","C0QMAIN",17,0)
|
|---|
| 834 | ;with this program; if not, write to the Free Software Foundation, Inc.,
|
|---|
| 835 | "RTN","C0QMAIN",18,0)
|
|---|
| 836 | ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|---|
| 837 | "RTN","C0QMAIN",19,0)
|
|---|
| 838 | ;
|
|---|
| 839 | "RTN","C0QMAIN",20,0)
|
|---|
| 840 | Q
|
|---|
| 841 | "RTN","C0QMAIN",21,0)
|
|---|
| 842 | ;
|
|---|
| 843 | "RTN","C0QMAIN",22,0)
|
|---|
| 844 | C0QQFN() Q 1130580001.101 ; FILE NUMBER FOR C0Q QUALITY MEASURE FILE
|
|---|
| 845 | "RTN","C0QMAIN",23,0)
|
|---|
| 846 | C0QMFN() Q 1130580001.201 ; FILE NUMBER FOR C0Q MEASUREMENT FILE
|
|---|
| 847 | "RTN","C0QMAIN",24,0)
|
|---|
| 848 | C0QMMFN() Q 1130580001.2011 ; FN FOR MEASURE SUBFILE
|
|---|
| 849 | "RTN","C0QMAIN",25,0)
|
|---|
| 850 | C0QMMNFN() Q 1130580001.20111 ; FN FOR NUMERATOR SUBFILE
|
|---|
| 851 | "RTN","C0QMAIN",26,0)
|
|---|
| 852 | C0QMMDFN() Q 1130580001.20112 ; FN FOR DENOMINATOR SUBFILE
|
|---|
| 853 | "RTN","C0QMAIN",27,0)
|
|---|
| 854 | RLSTFN() Q 810.5 ; FN FOR REMINDER PATIENT LIST FILE
|
|---|
| 855 | "RTN","C0QMAIN",28,0)
|
|---|
| 856 | RLSTPFN() Q 810.53 ; FN FOR REMINDER PATIENT LIST PATIENT SUBFILE
|
|---|
| 857 | "RTN","C0QMAIN",29,0)
|
|---|
| 858 | ;
|
|---|
| 859 | "RTN","C0QMAIN",30,0)
|
|---|
| 860 | EXPORT ; EXPORT ENTRY POINT FOR CCR
|
|---|
| 861 | "RTN","C0QMAIN",31,0)
|
|---|
| 862 | ; Select a patient.
|
|---|
| 863 | "RTN","C0QMAIN",32,0)
|
|---|
| 864 | N C0QMS,C0QM,C0QMIEN,C0QNA,C0QNORD
|
|---|
| 865 | "RTN","C0QMAIN",33,0)
|
|---|
| 866 | S C0QNORD=3 ; WE WANT DENOMINATORS USE 1 FOR NUMERATORS
|
|---|
| 867 | "RTN","C0QMAIN",34,0)
|
|---|
| 868 | S DIC=$$C0QMFN,DIC(0)="AEMQ" D ^DIC
|
|---|
| 869 | "RTN","C0QMAIN",35,0)
|
|---|
| 870 | I Y<1 Q ; EXIT
|
|---|
| 871 | "RTN","C0QMAIN",36,0)
|
|---|
| 872 | S C0QMS=$P(Y,U,1) ; SET THE MEASURE SET
|
|---|
| 873 | "RTN","C0QMAIN",37,0)
|
|---|
| 874 | S DIC=$$C0QQFN,DIC(0)="AEMQ" D ^DIC
|
|---|
| 875 | "RTN","C0QMAIN",38,0)
|
|---|
| 876 | I Y<1 Q ; EXIT
|
|---|
| 877 | "RTN","C0QMAIN",39,0)
|
|---|
| 878 | S C0QM=$P(Y,U,1) ; SET THE MEASURE IEN
|
|---|
| 879 | "RTN","C0QMAIN",40,0)
|
|---|
| 880 | N C0QMN S C0QMN=$P(Y,U,2) ; SET THE MEASURE NAME
|
|---|
| 881 | "RTN","C0QMAIN",41,0)
|
|---|
| 882 | S C0QMIEN=$O(^C0Q(201,C0QMS,5,"B",C0QM,""))
|
|---|
| 883 | "RTN","C0QMAIN",42,0)
|
|---|
| 884 | S C0QNA=$NA(^C0Q(201,C0QMS,5,C0QMIEN,C0QNORD,"B"))
|
|---|
| 885 | "RTN","C0QMAIN",43,0)
|
|---|
| 886 | N ZI S ZI=""
|
|---|
| 887 | "RTN","C0QMAIN",44,0)
|
|---|
| 888 | F S ZI=$O(@C0QNA@(ZI)) Q:ZI="" D ;
|
|---|
| 889 | "RTN","C0QMAIN",45,0)
|
|---|
| 890 | . W !,ZI
|
|---|
| 891 | "RTN","C0QMAIN",46,0)
|
|---|
| 892 | . N ONAME S ONAME=C0QMN_"_"_ZI_"_CCR_V1_0_0.xml"
|
|---|
| 893 | "RTN","C0QMAIN",47,0)
|
|---|
| 894 | . D XPAT^C0CCCR(ZI,,,ONAME) ; EXPORT TO A FILE
|
|---|
| 895 | "RTN","C0QMAIN",48,0)
|
|---|
| 896 | Q
|
|---|
| 897 | "RTN","C0QMAIN",49,0)
|
|---|
| 898 | ;
|
|---|
| 899 | "RTN","C0QMAIN",50,0)
|
|---|
| 900 | NBYP ; ENTRY POINT FOR COMMAND LINE BY PATIENT MEASURE LISTING
|
|---|
| 901 | "RTN","C0QMAIN",51,0)
|
|---|
| 902 | ;
|
|---|
| 903 | "RTN","C0QMAIN",52,0)
|
|---|
| 904 | S DIC=$$C0QMFN,DIC(0)="AEMQ" D ^DIC
|
|---|
| 905 | "RTN","C0QMAIN",53,0)
|
|---|
| 906 | I Y<1 Q ; EXIT
|
|---|
| 907 | "RTN","C0QMAIN",54,0)
|
|---|
| 908 | N MSIEN S MSIEN=+Y
|
|---|
| 909 | "RTN","C0QMAIN",55,0)
|
|---|
| 910 | W !,"NUMERATOR PATIENT LIST",!
|
|---|
| 911 | "RTN","C0QMAIN",56,0)
|
|---|
| 912 | N C0QPAT
|
|---|
| 913 | "RTN","C0QMAIN",57,0)
|
|---|
| 914 | D PATS(.C0QPAT,MSIEN,"N") ; GET THE NUMERATOR PATIENT LIST
|
|---|
| 915 | "RTN","C0QMAIN",58,0)
|
|---|
| 916 | I $D(C0QPAT) D ; LIST RETURNED
|
|---|
| 917 | "RTN","C0QMAIN",59,0)
|
|---|
| 918 | . ;
|
|---|
| 919 | "RTN","C0QMAIN",60,0)
|
|---|
| 920 | Q
|
|---|
| 921 | "RTN","C0QMAIN",61,0)
|
|---|
| 922 | ;
|
|---|
| 923 | "RTN","C0QMAIN",62,0)
|
|---|
| 924 | DBYP ; ENTRY POINT FOR COMMAND LINE BY PATIENT MEASURE LISTING
|
|---|
| 925 | "RTN","C0QMAIN",63,0)
|
|---|
| 926 | ;
|
|---|
| 927 | "RTN","C0QMAIN",64,0)
|
|---|
| 928 | S DIC=$$C0QMFN,DIC(0)="AEMQ" D ^DIC
|
|---|
| 929 | "RTN","C0QMAIN",65,0)
|
|---|
| 930 | I Y<1 Q ; EXIT
|
|---|
| 931 | "RTN","C0QMAIN",66,0)
|
|---|
| 932 | N MSIEN S MSIEN=+Y
|
|---|
| 933 | "RTN","C0QMAIN",67,0)
|
|---|
| 934 | N C0QPAT
|
|---|
| 935 | "RTN","C0QMAIN",68,0)
|
|---|
| 936 | W !,"DENOMINATOR PATIENT LIST",!
|
|---|
| 937 | "RTN","C0QMAIN",69,0)
|
|---|
| 938 | D PATS(.C0QPAT,MSIEN,"D") ; GET THE NUMERATOR PATIENT LIST
|
|---|
| 939 | "RTN","C0QMAIN",70,0)
|
|---|
| 940 | I $D(C0QPAT) D ; LIST RETURNED
|
|---|
| 941 | "RTN","C0QMAIN",71,0)
|
|---|
| 942 | . ;
|
|---|
| 943 | "RTN","C0QMAIN",72,0)
|
|---|
| 944 | . ;
|
|---|
| 945 | "RTN","C0QMAIN",73,0)
|
|---|
| 946 | Q
|
|---|
| 947 | "RTN","C0QMAIN",74,0)
|
|---|
| 948 | ;
|
|---|
| 949 | "RTN","C0QMAIN",75,0)
|
|---|
| 950 | ENEXP ; EXTERNAL MENU ENTRY POINT FOR EXP
|
|---|
| 951 | "RTN","C0QMAIN",76,0)
|
|---|
| 952 | ;
|
|---|
| 953 | "RTN","C0QMAIN",77,0)
|
|---|
| 954 | S DIC=$$C0QMFN,DIC(0)="AEMQ" D ^DIC
|
|---|
| 955 | "RTN","C0QMAIN",78,0)
|
|---|
| 956 | I Y<1 Q ; EXIT
|
|---|
| 957 | "RTN","C0QMAIN",79,0)
|
|---|
| 958 | N MSIEN S MSIEN=+Y
|
|---|
| 959 | "RTN","C0QMAIN",80,0)
|
|---|
| 960 | D EXP(MSIEN)
|
|---|
| 961 | "RTN","C0QMAIN",81,0)
|
|---|
| 962 | Q
|
|---|
| 963 | "RTN","C0QMAIN",82,0)
|
|---|
| 964 | ;
|
|---|
| 965 | "RTN","C0QMAIN",83,0)
|
|---|
| 966 | EXP(MSET,NOEX) ; EXPORT ALL PATIENTS FOR MEASURE SET IEN MSET
|
|---|
| 967 | "RTN","C0QMAIN",84,0)
|
|---|
| 968 | ; ALSO, WRITE OUT THE BY PATIENT MEASURE TEXT FILE
|
|---|
| 969 | "RTN","C0QMAIN",85,0)
|
|---|
| 970 | ; IF NOEX=1, THEN ONLY THE MEASURE TEXT FILE GETS WRITTEN, NO EXPORTS ARE
|
|---|
| 971 | "RTN","C0QMAIN",86,0)
|
|---|
| 972 | ; DONE
|
|---|
| 973 | "RTN","C0QMAIN",87,0)
|
|---|
| 974 | I '$D(NOEX) S NOEX=0
|
|---|
| 975 | "RTN","C0QMAIN",88,0)
|
|---|
| 976 | N ZQI,ZARY,ZFN,ODIR
|
|---|
| 977 | "RTN","C0QMAIN",89,0)
|
|---|
| 978 | S ZQI=""
|
|---|
| 979 | "RTN","C0QMAIN",90,0)
|
|---|
| 980 | D PATS(.ZARY,MSET,"D",1)
|
|---|
| 981 | "RTN","C0QMAIN",91,0)
|
|---|
| 982 | S ZFN="MEASURES-BY-PATIENT.txt"
|
|---|
| 983 | "RTN","C0QMAIN",92,0)
|
|---|
| 984 | S ODIR=^TMP("C0CCCR","ODIR") ; OUTPUT DIRECTORY
|
|---|
| 985 | "RTN","C0QMAIN",93,0)
|
|---|
| 986 | S GARY=$NA(^TMP("C0Q",$J))
|
|---|
| 987 | "RTN","C0QMAIN",94,0)
|
|---|
| 988 | K @GARY
|
|---|
| 989 | "RTN","C0QMAIN",95,0)
|
|---|
| 990 | M @GARY=ZARY
|
|---|
| 991 | "RTN","C0QMAIN",96,0)
|
|---|
| 992 | S GARY1=$NA(@GARY@(1))
|
|---|
| 993 | "RTN","C0QMAIN",97,0)
|
|---|
| 994 | N ZY
|
|---|
| 995 | "RTN","C0QMAIN",98,0)
|
|---|
| 996 | S ZY=$$OUTPUT^C0CXPATH(GARY1,ZFN,ODIR)
|
|---|
| 997 | "RTN","C0QMAIN",99,0)
|
|---|
| 998 | W !,ZY
|
|---|
| 999 | "RTN","C0QMAIN",100,0)
|
|---|
| 1000 | I NOEX=1 Q ; DO NOT EXPORT
|
|---|
| 1001 | "RTN","C0QMAIN",101,0)
|
|---|
| 1002 | F S ZQI=$O(ZARY(ZQI)) Q:ZQI="" D ; FOR EACH PATIENT
|
|---|
| 1003 | "RTN","C0QMAIN",102,0)
|
|---|
| 1004 | . D XPAT^C0CCCR(+ZARY(ZQI)) ;
|
|---|
| 1005 | "RTN","C0QMAIN",103,0)
|
|---|
| 1006 | Q
|
|---|
| 1007 | "RTN","C0QMAIN",104,0)
|
|---|
| 1008 | ;
|
|---|
| 1009 | "RTN","C0QMAIN",105,0)
|
|---|
| 1010 | PATS(ZRTN,MSIEN,NORD,QT) ; BUILDS A LIST OF PATIENTS AND THEIR MEASURES
|
|---|
| 1011 | "RTN","C0QMAIN",106,0)
|
|---|
| 1012 | ; FOR MEASURE SET MSET. NORD="N" (DEFAULT) MEANS NUMERATOR PATIENTS
|
|---|
| 1013 | "RTN","C0QMAIN",107,0)
|
|---|
| 1014 | ; NORD="D" MEANS DENOMINATOR PATIENTS
|
|---|
| 1015 | "RTN","C0QMAIN",108,0)
|
|---|
| 1016 | ; QT=1 MEANS QUIET
|
|---|
| 1017 | "RTN","C0QMAIN",109,0)
|
|---|
| 1018 | I $G(QT)'=1 S QT=0
|
|---|
| 1019 | "RTN","C0QMAIN",110,0)
|
|---|
| 1020 | N ZI,ZJ,ZK,ZIDX,ZN,ZM
|
|---|
| 1021 | "RTN","C0QMAIN",111,0)
|
|---|
| 1022 | S ZN=0 ; COUNT OF PATIENTS
|
|---|
| 1023 | "RTN","C0QMAIN",112,0)
|
|---|
| 1024 | S ZI=""
|
|---|
| 1025 | "RTN","C0QMAIN",113,0)
|
|---|
| 1026 | ; GOING TO USE THE NUMERATOR BY PATIENT INDEX
|
|---|
| 1027 | "RTN","C0QMAIN",114,0)
|
|---|
| 1028 | I '$D(NORD) S NORD="N"
|
|---|
| 1029 | "RTN","C0QMAIN",115,0)
|
|---|
| 1030 | I '((NORD="N")!(NORD="D")) S NORD="N"
|
|---|
| 1031 | "RTN","C0QMAIN",116,0)
|
|---|
| 1032 | I NORD="N" S ZIDX=$NA(^C0Q(201,"ANBYP"))
|
|---|
| 1033 | "RTN","C0QMAIN",117,0)
|
|---|
| 1034 | E S ZIDX=$NA(^C0Q(201,"ADBYP"))
|
|---|
| 1035 | "RTN","C0QMAIN",118,0)
|
|---|
| 1036 | F S ZI=$O(@ZIDX@(ZI)) Q:ZI="" D ; FOR EACH PATIENT
|
|---|
| 1037 | "RTN","C0QMAIN",119,0)
|
|---|
| 1038 | . I $O(@ZIDX@(ZI,MSIEN,""))'="" D ; IF PATIENT IS IN THIS SET
|
|---|
| 1039 | "RTN","C0QMAIN",120,0)
|
|---|
| 1040 | . . I 'QT W !,$$GET1^DIQ(2,ZI_",",.01) ;PATIENT NAME
|
|---|
| 1041 | "RTN","C0QMAIN",121,0)
|
|---|
| 1042 | . . S ZN=ZN+1 ; INCREMENT PATIENT COUNT
|
|---|
| 1043 | "RTN","C0QMAIN",122,0)
|
|---|
| 1044 | . . S ZRTN(ZN)=ZI
|
|---|
| 1045 | "RTN","C0QMAIN",123,0)
|
|---|
| 1046 | . E Q ; NEXT PATIENT
|
|---|
| 1047 | "RTN","C0QMAIN",124,0)
|
|---|
| 1048 | . S (ZJ,ZK)=""
|
|---|
| 1049 | "RTN","C0QMAIN",125,0)
|
|---|
| 1050 | . F S ZJ=$O(@ZIDX@(ZI,MSIEN,ZJ)) Q:ZJ="" D ; FOR EACH MEASURE
|
|---|
| 1051 | "RTN","C0QMAIN",126,0)
|
|---|
| 1052 | . . ;S ZL=$O(@ZIDX@(ZI,MSIEN,ZJ,"")) ; MEASURE IS FOURTH
|
|---|
| 1053 | "RTN","C0QMAIN",127,0)
|
|---|
| 1054 | . . S ZK=""
|
|---|
| 1055 | "RTN","C0QMAIN",128,0)
|
|---|
| 1056 | . . S ZK=$$GET1^DIQ($$C0QMMFN,ZJ_","_MSIEN_",",.01,"I")
|
|---|
| 1057 | "RTN","C0QMAIN",129,0)
|
|---|
| 1058 | . . ;W !,"ZK:",ZK," ZJ:",ZJ," ZI",ZI,!
|
|---|
| 1059 | "RTN","C0QMAIN",130,0)
|
|---|
| 1060 | . . S ZM=$$GET1^DIQ($$C0QQFN,ZK_",",.01) ; MEASURE NAME
|
|---|
| 1061 | "RTN","C0QMAIN",131,0)
|
|---|
| 1062 | . . I 'QT W " ",ZM
|
|---|
| 1063 | "RTN","C0QMAIN",132,0)
|
|---|
| 1064 | . . S ZRTN(ZN)=ZRTN(ZN)_" "_ZM
|
|---|
| 1065 | "RTN","C0QMAIN",133,0)
|
|---|
| 1066 | Q
|
|---|
| 1067 | "RTN","C0QMAIN",134,0)
|
|---|
| 1068 | ;
|
|---|
| 1069 | "RTN","C0QMAIN",135,0)
|
|---|
| 1070 | EN ; ENTRY POINT FOR COMMAND LINE AND MENU ACCESS TO C0QRPC
|
|---|
| 1071 | "RTN","C0QMAIN",136,0)
|
|---|
| 1072 | ;
|
|---|
| 1073 | "RTN","C0QMAIN",137,0)
|
|---|
| 1074 | S DIC=$$C0QMFN,DIC(0)="AEMQ" D ^DIC
|
|---|
| 1075 | "RTN","C0QMAIN",138,0)
|
|---|
| 1076 | I Y<1 Q ; EXIT
|
|---|
| 1077 | "RTN","C0QMAIN",139,0)
|
|---|
| 1078 | N MSIEN S MSIEN=+Y
|
|---|
| 1079 | "RTN","C0QMAIN",140,0)
|
|---|
| 1080 | D C0QRPC(.G,MSIEN)
|
|---|
| 1081 | "RTN","C0QMAIN",141,0)
|
|---|
| 1082 | Q
|
|---|
| 1083 | "RTN","C0QMAIN",142,0)
|
|---|
| 1084 | ;
|
|---|
| 1085 | "RTN","C0QMAIN",143,0)
|
|---|
| 1086 | EN2 ; SUMMARY ENTRY POINT FOR COMMAND LINE AND MENU ACCESS TO C0QRPC
|
|---|
| 1087 | "RTN","C0QMAIN",144,0)
|
|---|
| 1088 | ;
|
|---|
| 1089 | "RTN","C0QMAIN",145,0)
|
|---|
| 1090 | S DIC=$$C0QMFN,DIC(0)="AEMQ" D ^DIC
|
|---|
| 1091 | "RTN","C0QMAIN",146,0)
|
|---|
| 1092 | I Y<1 Q ; EXIT
|
|---|
| 1093 | "RTN","C0QMAIN",147,0)
|
|---|
| 1094 | N MSIEN S MSIEN=+Y
|
|---|
| 1095 | "RTN","C0QMAIN",148,0)
|
|---|
| 1096 | S C0QSUM=1
|
|---|
| 1097 | "RTN","C0QMAIN",149,0)
|
|---|
| 1098 | D C0QRPC(.G,MSIEN)
|
|---|
| 1099 | "RTN","C0QMAIN",150,0)
|
|---|
| 1100 | Q
|
|---|
| 1101 | "RTN","C0QMAIN",151,0)
|
|---|
| 1102 | ;
|
|---|
| 1103 | "RTN","C0QMAIN",152,0)
|
|---|
| 1104 | C0QRPC(RTN,MSET,FMT,NOPURGE) ; RPC FORMAT
|
|---|
| 1105 | "RTN","C0QMAIN",153,0)
|
|---|
| 1106 | ; MSET IS THE NAME OR IEN OF THE MEASURE SET
|
|---|
| 1107 | "RTN","C0QMAIN",154,0)
|
|---|
| 1108 | ; RTN IS THE RETURN ARRAY OF THE RESULTS PASSED BY REFERENCE
|
|---|
| 1109 | "RTN","C0QMAIN",155,0)
|
|---|
| 1110 | ; FMT IS THE FORMAT OF THE OUTPUT - "ARRAY" OR "HTML" OR "XML"
|
|---|
| 1111 | "RTN","C0QMAIN",156,0)
|
|---|
| 1112 | ; NOTE: ARRAY IS DEFAULT AND THE OTHERS ARE NOT IMPLEMENTED YET
|
|---|
| 1113 | "RTN","C0QMAIN",157,0)
|
|---|
| 1114 | ; IF NOPURGE IS 1, PATIENT LISTS WILL NOT BE DELETED BEFORE ADDING
|
|---|
| 1115 | "RTN","C0QMAIN",158,0)
|
|---|
| 1116 | ; IF NOPURGE IS 0 OR OMITTED, PATIENT LISTS WILL BE DELETED THEN ADDED
|
|---|
| 1117 | "RTN","C0QMAIN",159,0)
|
|---|
| 1118 | W !,"LOOKING FOR MEASURE SET ",MSET,!
|
|---|
| 1119 | "RTN","C0QMAIN",160,0)
|
|---|
| 1120 | N ZI S ZI=""
|
|---|
| 1121 | "RTN","C0QMAIN",161,0)
|
|---|
| 1122 | N C0QM ; FOR HOLDING THE MEASURES IN THE SET
|
|---|
| 1123 | "RTN","C0QMAIN",162,0)
|
|---|
| 1124 | D LIST^DIC($$C0QMMFN,","_MSET_",",".01I") ; GET ALL THE MEASURES
|
|---|
| 1125 | "RTN","C0QMAIN",163,0)
|
|---|
| 1126 | D DELIST("C0QM")
|
|---|
| 1127 | "RTN","C0QMAIN",164,0)
|
|---|
| 1128 | N ZII S ZII=""
|
|---|
| 1129 | "RTN","C0QMAIN",165,0)
|
|---|
| 1130 | F S ZII=$O(C0QM(ZII)) Q:ZII="" D ; FOR EACH MEASURE
|
|---|
| 1131 | "RTN","C0QMAIN",166,0)
|
|---|
| 1132 | . D CLEARMEA(MSET,ZII) ; FIRST CLEAR OUT THE MEASURE
|
|---|
| 1133 | "RTN","C0QMAIN",167,0)
|
|---|
| 1134 | K C0QM
|
|---|
| 1135 | "RTN","C0QMAIN",168,0)
|
|---|
| 1136 | D CLEAN^DILF
|
|---|
| 1137 | "RTN","C0QMAIN",169,0)
|
|---|
| 1138 | D LIST^DIC($$C0QMMFN,","_MSET_",",".01I") ; GET ALL THE MEASURES AGAIN
|
|---|
| 1139 | "RTN","C0QMAIN",170,0)
|
|---|
| 1140 | D DELIST("C0QM")
|
|---|
| 1141 | "RTN","C0QMAIN",171,0)
|
|---|
| 1142 | F S ZII=$O(C0QM(ZII)) Q:ZII="" D ; FOR EACH MEASURE
|
|---|
| 1143 | "RTN","C0QMAIN",172,0)
|
|---|
| 1144 | . S ZI=$P(C0QM(ZII),U,1) ; IEN OF THE MEASURE IN THE C0Q QUALITY MEAS FILE
|
|---|
| 1145 | "RTN","C0QMAIN",173,0)
|
|---|
| 1146 | . ;W $$GET1^DIQ($$C0QQFN,ZI_",","DISPLAY NAME"),!
|
|---|
| 1147 | "RTN","C0QMAIN",174,0)
|
|---|
| 1148 | . ;N C0QNL,C0QDL ;NUMERATOR AND DENOMINATOR LIST POINTERS
|
|---|
| 1149 | "RTN","C0QMAIN",175,0)
|
|---|
| 1150 | . W !,"MEASURE: ",$$GET1^DIQ($$C0QQFN,ZI_",",.01),! ; PRINT THE MEASURE NAME
|
|---|
| 1151 | "RTN","C0QMAIN",176,0)
|
|---|
| 1152 | . ; FOLLOW THE POINTERS TO THE C0Q QUALITYM MEASURE FILE AND GET LIST PTRS
|
|---|
| 1153 | "RTN","C0QMAIN",177,0)
|
|---|
| 1154 | . S C0QNL=$$GET1^DIQ($$C0QQFN,ZI_",",1,"I") ; NUMERATOR POINTER
|
|---|
| 1155 | "RTN","C0QMAIN",178,0)
|
|---|
| 1156 | . S C0QDL=$$GET1^DIQ($$C0QQFN,ZI_",",2,"I") ; DENOMINATOR POINTER
|
|---|
| 1157 | "RTN","C0QMAIN",179,0)
|
|---|
| 1158 | . ; NOW FOLLOW THE LIST POINTERS TO THE REMINDER PATIENT LIST FILE
|
|---|
| 1159 | "RTN","C0QMAIN",180,0)
|
|---|
| 1160 | . W "NUMERATOR: ",$$GET1^DIQ($$RLSTFN,C0QNL_",","NAME"),!
|
|---|
| 1161 | "RTN","C0QMAIN",181,0)
|
|---|
| 1162 | . ; FIRST PROCESS THE NUMERATOR
|
|---|
| 1163 | "RTN","C0QMAIN",182,0)
|
|---|
| 1164 | . K ^TMP("DILIST",$J)
|
|---|
| 1165 | "RTN","C0QMAIN",183,0)
|
|---|
| 1166 | . D LIST^DIC($$RLSTPFN,","_C0QNL_",",".01I") ; GET THE LIST OF PATIENTS
|
|---|
| 1167 | "RTN","C0QMAIN",184,0)
|
|---|
| 1168 | . ;D DELIST("G") ;
|
|---|
| 1169 | "RTN","C0QMAIN",185,0)
|
|---|
| 1170 | . ;I $D(G) ZWR G
|
|---|
| 1171 | "RTN","C0QMAIN",186,0)
|
|---|
| 1172 | . K C0QNUMP
|
|---|
| 1173 | "RTN","C0QMAIN",187,0)
|
|---|
| 1174 | . S NCNT=$O(^TMP("DILIST",$J,"ID",""),-1) ; NUMERATOR COUNT
|
|---|
| 1175 | "RTN","C0QMAIN",188,0)
|
|---|
| 1176 | . N ZJ S ZJ=""
|
|---|
| 1177 | "RTN","C0QMAIN",189,0)
|
|---|
| 1178 | . F S ZJ=$O(^TMP("DILIST",$J,"ID",ZJ)) Q:ZJ="" D ;
|
|---|
| 1179 | "RTN","C0QMAIN",190,0)
|
|---|
| 1180 | . . S ZDFN=^TMP("DILIST",$J,"ID",ZJ,.01)
|
|---|
| 1181 | "RTN","C0QMAIN",191,0)
|
|---|
| 1182 | . . S C0QNUMP("N",ZJ,ZDFN)=""
|
|---|
| 1183 | "RTN","C0QMAIN",192,0)
|
|---|
| 1184 | . I '$G(C0QSUM) ZWR ^TMP("DILIST",$J,1,*) ; LIST THE PATIENT NAMES
|
|---|
| 1185 | "RTN","C0QMAIN",193,0)
|
|---|
| 1186 | . D ADDPATS(MSET,ZII,"C0QNUMP")
|
|---|
| 1187 | "RTN","C0QMAIN",194,0)
|
|---|
| 1188 | . ; NEXT PROCESS THE DENOMINATOR
|
|---|
| 1189 | "RTN","C0QMAIN",195,0)
|
|---|
| 1190 | . W "DENOMINATOR: ",$$GET1^DIQ($$RLSTFN,C0QDL_",","NAME"),!
|
|---|
| 1191 | "RTN","C0QMAIN",196,0)
|
|---|
| 1192 | . K ^TMP("DILIST",$J)
|
|---|
| 1193 | "RTN","C0QMAIN",197,0)
|
|---|
| 1194 | . D LIST^DIC($$RLSTPFN,","_C0QDL_",",".01I") ; GET THE LIST OF PATIENTS
|
|---|
| 1195 | "RTN","C0QMAIN",198,0)
|
|---|
| 1196 | . ;D DELIST("G")
|
|---|
| 1197 | "RTN","C0QMAIN",199,0)
|
|---|
| 1198 | . ;I $D(G) ZWR G
|
|---|
| 1199 | "RTN","C0QMAIN",200,0)
|
|---|
| 1200 | . ;S ZJ=""
|
|---|
| 1201 | "RTN","C0QMAIN",201,0)
|
|---|
| 1202 | . S DCNT=$O(^TMP("DILIST",$J,"ID",""),-1) ; DENOMONIATOR COUNT
|
|---|
| 1203 | "RTN","C0QMAIN",202,0)
|
|---|
| 1204 | . K C0QDEMP
|
|---|
| 1205 | "RTN","C0QMAIN",203,0)
|
|---|
| 1206 | . F S ZJ=$O(^TMP("DILIST",$J,"ID",ZJ)) Q:ZJ="" D ;
|
|---|
| 1207 | "RTN","C0QMAIN",204,0)
|
|---|
| 1208 | . . S ZDFN=^TMP("DILIST",$J,"ID",ZJ,.01)
|
|---|
| 1209 | "RTN","C0QMAIN",205,0)
|
|---|
| 1210 | . . S C0QDEMP("D",ZJ,ZDFN)=""
|
|---|
| 1211 | "RTN","C0QMAIN",206,0)
|
|---|
| 1212 | . D ADDPATS(MSET,ZII,"C0QDEMP")
|
|---|
| 1213 | "RTN","C0QMAIN",207,0)
|
|---|
| 1214 | . I $G(C0QSUM)'=1 ZWR ^TMP("DILIST",$J,1,*) ; LIST THE PATIENT NAMES
|
|---|
| 1215 | "RTN","C0QMAIN",208,0)
|
|---|
| 1216 | . E D ;
|
|---|
| 1217 | "RTN","C0QMAIN",209,0)
|
|---|
| 1218 | . . W "NUM CNT: ",NCNT
|
|---|
| 1219 | "RTN","C0QMAIN",210,0)
|
|---|
| 1220 | . . W " DEN CNT: ",DCNT,!
|
|---|
| 1221 | "RTN","C0QMAIN",211,0)
|
|---|
| 1222 | Q
|
|---|
| 1223 | "RTN","C0QMAIN",212,0)
|
|---|
| 1224 | ;
|
|---|
| 1225 | "RTN","C0QMAIN",213,0)
|
|---|
| 1226 | CLEARMEA(MSET,MEAS) ; DELETE AND THEN RECREATE AS EMPTY THE
|
|---|
| 1227 | "RTN","C0QMAIN",214,0)
|
|---|
| 1228 | ; MEASURE MEAS IN MEASURE SET IEN MSET
|
|---|
| 1229 | "RTN","C0QMAIN",215,0)
|
|---|
| 1230 | ;
|
|---|
| 1231 | "RTN","C0QMAIN",216,0)
|
|---|
| 1232 | N C0QFDA,MFN,MEASURE
|
|---|
| 1233 | "RTN","C0QMAIN",217,0)
|
|---|
| 1234 | S MFN=$$C0QMMFN() ; FILE NUMBER FOR MEASURE SUBFILE
|
|---|
| 1235 | "RTN","C0QMAIN",218,0)
|
|---|
| 1236 | D CLEAN^DILF
|
|---|
| 1237 | "RTN","C0QMAIN",219,0)
|
|---|
| 1238 | S MEASURE=$$GET1^DIQ(MFN,MEAS_","_MSET_",",.01,"I") ; MEASURE POINTER
|
|---|
| 1239 | "RTN","C0QMAIN",220,0)
|
|---|
| 1240 | D CLEAN^DILF
|
|---|
| 1241 | "RTN","C0QMAIN",221,0)
|
|---|
| 1242 | K ZERR
|
|---|
| 1243 | "RTN","C0QMAIN",222,0)
|
|---|
| 1244 | S C0QFDA(MFN,MEAS_","_MSET_",",.01)="@" ; GET READY TO DELETE THE MEASURE
|
|---|
| 1245 | "RTN","C0QMAIN",223,0)
|
|---|
| 1246 | D FILE^DIE(,"C0QFDA","ZERR") ; KILL THE SUBFILE
|
|---|
| 1247 | "RTN","C0QMAIN",224,0)
|
|---|
| 1248 | I $D(ZERR) D ;
|
|---|
| 1249 | "RTN","C0QMAIN",225,0)
|
|---|
| 1250 | . W "ERROR",!
|
|---|
| 1251 | "RTN","C0QMAIN",226,0)
|
|---|
| 1252 | . ZWR ZERR
|
|---|
| 1253 | "RTN","C0QMAIN",227,0)
|
|---|
| 1254 | . B
|
|---|
| 1255 | "RTN","C0QMAIN",228,0)
|
|---|
| 1256 | K C0QFDA
|
|---|
| 1257 | "RTN","C0QMAIN",229,0)
|
|---|
| 1258 | S C0QFDA(MFN,"+1,"_MSET_",",.01)=MEASURE ; GET READY TO RECREATE THE SUBFILE
|
|---|
| 1259 | "RTN","C0QMAIN",230,0)
|
|---|
| 1260 | D UPDIE ; CREATE THE SUBFILE
|
|---|
| 1261 | "RTN","C0QMAIN",231,0)
|
|---|
| 1262 | Q
|
|---|
| 1263 | "RTN","C0QMAIN",232,0)
|
|---|
| 1264 | ;
|
|---|
| 1265 | "RTN","C0QMAIN",233,0)
|
|---|
| 1266 | ADDPATS(MSET,MEAS,PATS) ;ADD PATIENTS TO NUMERATOR AND DENOMINATOR
|
|---|
| 1267 | "RTN","C0QMAIN",234,0)
|
|---|
| 1268 | ; OF MEASURE SET IEN MSET MEASURE IEN MEAS
|
|---|
| 1269 | "RTN","C0QMAIN",235,0)
|
|---|
| 1270 | ; PATS IS OF THE FORM @PATS@("N",X,DFN)="" AND @PATS@("D",X,DFN)=""
|
|---|
| 1271 | "RTN","C0QMAIN",236,0)
|
|---|
| 1272 | ; WHERE N IS FOR NUMERATOR AND D IS FOR DENOMINATOR AND X 1..N
|
|---|
| 1273 | "RTN","C0QMAIN",237,0)
|
|---|
| 1274 | ; IF PATIENTS ARE ALREADY THERE, THEY WILL NOT BE ADDED AGAIN
|
|---|
| 1275 | "RTN","C0QMAIN",238,0)
|
|---|
| 1276 | N C0QI,C0QJ
|
|---|
| 1277 | "RTN","C0QMAIN",239,0)
|
|---|
| 1278 | N C0QFDA
|
|---|
| 1279 | "RTN","C0QMAIN",240,0)
|
|---|
| 1280 | S C0QI=""
|
|---|
| 1281 | "RTN","C0QMAIN",241,0)
|
|---|
| 1282 | F S C0QI=$O(@PATS@("N",C0QI)) Q:C0QI="" D ; FOR EACH NUMERATOR PATIENT
|
|---|
| 1283 | "RTN","C0QMAIN",242,0)
|
|---|
| 1284 | . S C0QFDA($$C0QMMNFN,"?+"_C0QI_","_MEAS_","_MSET_",",.01)=$O(@PATS@("N",C0QI,""))
|
|---|
| 1285 | "RTN","C0QMAIN",243,0)
|
|---|
| 1286 | ;W "ADDING NUMERATOR",!
|
|---|
| 1287 | "RTN","C0QMAIN",244,0)
|
|---|
| 1288 | ;I $D(C0QFDA) ZWR C0QFDA
|
|---|
| 1289 | "RTN","C0QMAIN",245,0)
|
|---|
| 1290 | I $D(C0QFDA) D UPDIE
|
|---|
| 1291 | "RTN","C0QMAIN",246,0)
|
|---|
| 1292 | K C0QFDA
|
|---|
| 1293 | "RTN","C0QMAIN",247,0)
|
|---|
| 1294 | S C0QI=""
|
|---|
| 1295 | "RTN","C0QMAIN",248,0)
|
|---|
| 1296 | F S C0QI=$O(@PATS@("D",C0QI)) Q:C0QI="" D ; FOR EACH NUMERATOR PATIENT
|
|---|
| 1297 | "RTN","C0QMAIN",249,0)
|
|---|
| 1298 | . S C0QFDA($$C0QMMDFN,"?+"_C0QI_","_MEAS_","_MSET_",",.01)=$O(@PATS@("D",C0QI,""))
|
|---|
| 1299 | "RTN","C0QMAIN",250,0)
|
|---|
| 1300 | ;W "ADDING DENOMINATOR",!
|
|---|
| 1301 | "RTN","C0QMAIN",251,0)
|
|---|
| 1302 | ;I $D(C0QFDA) ZWR C0QFDA
|
|---|
| 1303 | "RTN","C0QMAIN",252,0)
|
|---|
| 1304 | I $D(C0QFDA) D UPDIE
|
|---|
| 1305 | "RTN","C0QMAIN",253,0)
|
|---|
| 1306 | Q
|
|---|
| 1307 | "RTN","C0QMAIN",254,0)
|
|---|
| 1308 | ;
|
|---|
| 1309 | "RTN","C0QMAIN",255,0)
|
|---|
| 1310 | DELIST(RTN) ; DECODES ^TMP("DILIST",$J) INTO
|
|---|
| 1311 | "RTN","C0QMAIN",256,0)
|
|---|
| 1312 | ; @RTN@(IEN)=INTERNAL VALUE^EXTERNAL VALUE
|
|---|
| 1313 | "RTN","C0QMAIN",257,0)
|
|---|
| 1314 | N ZI,IV,EV,ZDI,ZIEN
|
|---|
| 1315 | "RTN","C0QMAIN",258,0)
|
|---|
| 1316 | S ZI=""
|
|---|
| 1317 | "RTN","C0QMAIN",259,0)
|
|---|
| 1318 | S ZDI=$NA(^TMP("DILIST",$J))
|
|---|
| 1319 | "RTN","C0QMAIN",260,0)
|
|---|
| 1320 | K @RTN
|
|---|
| 1321 | "RTN","C0QMAIN",261,0)
|
|---|
| 1322 | F S ZI=$O(@ZDI@(1,ZI)) Q:ZI="" D ;
|
|---|
| 1323 | "RTN","C0QMAIN",262,0)
|
|---|
| 1324 | . S EV=@ZDI@(1,ZI) ;EXTERNAL VALUE
|
|---|
| 1325 | "RTN","C0QMAIN",263,0)
|
|---|
| 1326 | . S IV=$G(@ZDI@("ID",ZI,.01)) ; INTERNAL VALUE
|
|---|
| 1327 | "RTN","C0QMAIN",264,0)
|
|---|
| 1328 | . S ZIEN=@ZDI@(2,ZI) ; IEN
|
|---|
| 1329 | "RTN","C0QMAIN",265,0)
|
|---|
| 1330 | . S @RTN@(ZIEN)=IV_"^"_EV
|
|---|
| 1331 | "RTN","C0QMAIN",266,0)
|
|---|
| 1332 | Q
|
|---|
| 1333 | "RTN","C0QMAIN",267,0)
|
|---|
| 1334 | ;
|
|---|
| 1335 | "RTN","C0QMAIN",268,0)
|
|---|
| 1336 | DELPATS(MSET,MEAS,NDEL) ; DELETE PATIENTS FROM NUMERATOR AND DENOMINATOR
|
|---|
| 1337 | "RTN","C0QMAIN",269,0)
|
|---|
| 1338 | ; FOR A MEASURE (ONLY AFFECTS THE C0Q MEASURES FILE)
|
|---|
| 1339 | "RTN","C0QMAIN",270,0)
|
|---|
| 1340 | ; MSET IS THE IEN OF THE MEASURE SET
|
|---|
| 1341 | "RTN","C0QMAIN",271,0)
|
|---|
| 1342 | ; MEAS IS THE IEN OF THE MEASURE
|
|---|
| 1343 | "RTN","C0QMAIN",272,0)
|
|---|
| 1344 | ; NDEL IS A LIST OF PATIENTS TO NOT DELETE (NOT IMPLEMENTED YET)
|
|---|
| 1345 | "RTN","C0QMAIN",273,0)
|
|---|
| 1346 | ; IN THE FORM @NDEL@("N",IEN,DFN)="" FOR NUMERATOR PATIENTS
|
|---|
| 1347 | "RTN","C0QMAIN",274,0)
|
|---|
| 1348 | ; AND @NDEL@("D",IEN,DFN)="" FOR DENOMINATOR PATIENTS WHERE IEN IS
|
|---|
| 1349 | "RTN","C0QMAIN",275,0)
|
|---|
| 1350 | ; THE IEN OF THE PATIENT RECORD IN THE SUBFILE
|
|---|
| 1351 | "RTN","C0QMAIN",276,0)
|
|---|
| 1352 | ; THIS FEATURE WILL ALLOW EFFICIENCIES FOR LONG PATIENT LISTS
|
|---|
| 1353 | "RTN","C0QMAIN",277,0)
|
|---|
| 1354 | ; IN THAT PATIENTS THAT ARE GOING TO BE ADDED ARE NOT FIRST DELETED
|
|---|
| 1355 | "RTN","C0QMAIN",278,0)
|
|---|
| 1356 | N C0QI,C0QJ
|
|---|
| 1357 | "RTN","C0QMAIN",279,0)
|
|---|
| 1358 | D LIST^DIC($$C0QMMFN,","_MSET_",")
|
|---|
| 1359 | "RTN","C0QMAIN",280,0)
|
|---|
| 1360 | K C0QFDA
|
|---|
| 1361 | "RTN","C0QMAIN",281,0)
|
|---|
| 1362 | ZWR ^TMP("DILIST",$J,*)
|
|---|
| 1363 | "RTN","C0QMAIN",282,0)
|
|---|
| 1364 | ZWR ^TMP("DIERR",$J,*)
|
|---|
| 1365 | "RTN","C0QMAIN",283,0)
|
|---|
| 1366 | D
|
|---|
| 1367 | "RTN","C0QMAIN",284,0)
|
|---|
| 1368 | Q
|
|---|
| 1369 | "RTN","C0QMAIN",285,0)
|
|---|
| 1370 | ;
|
|---|
| 1371 | "RTN","C0QMAIN",286,0)
|
|---|
| 1372 | UPDIE ; INTERNAL ROUTINE TO CALL UPDATE^DIE AND CHECK FOR ERRORS
|
|---|
| 1373 | "RTN","C0QMAIN",287,0)
|
|---|
| 1374 | K ZERR
|
|---|
| 1375 | "RTN","C0QMAIN",288,0)
|
|---|
| 1376 | D CLEAN^DILF
|
|---|
| 1377 | "RTN","C0QMAIN",289,0)
|
|---|
| 1378 | D UPDATE^DIE("","C0QFDA","","ZERR")
|
|---|
| 1379 | "RTN","C0QMAIN",290,0)
|
|---|
| 1380 | I $D(ZERR) D ;
|
|---|
| 1381 | "RTN","C0QMAIN",291,0)
|
|---|
| 1382 | . W "ERROR",!
|
|---|
| 1383 | "RTN","C0QMAIN",292,0)
|
|---|
| 1384 | . ZWR ZERR
|
|---|
| 1385 | "RTN","C0QMAIN",293,0)
|
|---|
| 1386 | . B
|
|---|
| 1387 | "RTN","C0QMAIN",294,0)
|
|---|
| 1388 | K C0QFDA
|
|---|
| 1389 | "RTN","C0QMAIN",295,0)
|
|---|
| 1390 | Q
|
|---|
| 1391 | "RTN","C0QMAIN",296,0)
|
|---|
| 1392 | ;
|
|---|
| 1393 | "SEC","^DD",1130580001.101,1130580001.101,3.1,9)
|
|---|
| 1394 |
|
|---|
| 1395 | "SEC","^DIC",1130580001.101,1130580001.101,0,"AUDIT")
|
|---|
| 1396 | @
|
|---|
| 1397 | "SEC","^DIC",1130580001.101,1130580001.101,0,"DD")
|
|---|
| 1398 | @
|
|---|
| 1399 | "SEC","^DIC",1130580001.101,1130580001.101,0,"DEL")
|
|---|
| 1400 | @
|
|---|
| 1401 | "SEC","^DIC",1130580001.101,1130580001.101,0,"LAYGO")
|
|---|
| 1402 | @
|
|---|
| 1403 | "SEC","^DIC",1130580001.101,1130580001.101,0,"RD")
|
|---|
| 1404 | @
|
|---|
| 1405 | "SEC","^DIC",1130580001.101,1130580001.101,0,"WR")
|
|---|
| 1406 | @
|
|---|
| 1407 | "SEC","^DIC",1130580001.201,1130580001.201,0,"AUDIT")
|
|---|
| 1408 | @
|
|---|
| 1409 | "SEC","^DIC",1130580001.201,1130580001.201,0,"DD")
|
|---|
| 1410 | @
|
|---|
| 1411 | "SEC","^DIC",1130580001.201,1130580001.201,0,"DEL")
|
|---|
| 1412 | @
|
|---|
| 1413 | "SEC","^DIC",1130580001.201,1130580001.201,0,"LAYGO")
|
|---|
| 1414 | @
|
|---|
| 1415 | "SEC","^DIC",1130580001.201,1130580001.201,0,"RD")
|
|---|
| 1416 | @
|
|---|
| 1417 | "SEC","^DIC",1130580001.201,1130580001.201,0,"WR")
|
|---|
| 1418 | @
|
|---|
| 1419 | "VER")
|
|---|
| 1420 | 8.0^22.0
|
|---|
| 1421 | "^DD",1130580001.101,1130580001.101,0)
|
|---|
| 1422 | FIELD^^.61^9
|
|---|
| 1423 | "^DD",1130580001.101,1130580001.101,0,"DDA")
|
|---|
| 1424 | N
|
|---|
| 1425 | "^DD",1130580001.101,1130580001.101,0,"DT")
|
|---|
| 1426 | 3101013
|
|---|
| 1427 | "^DD",1130580001.101,1130580001.101,0,"IX","B",1130580001.101,.01)
|
|---|
| 1428 |
|
|---|
| 1429 | "^DD",1130580001.101,1130580001.101,0,"NM","C0Q QUAILITY MEASURE")
|
|---|
| 1430 |
|
|---|
| 1431 | "^DD",1130580001.101,1130580001.101,0,"PT",1130580001.2011,.01)
|
|---|
| 1432 |
|
|---|
| 1433 | "^DD",1130580001.101,1130580001.101,.01,0)
|
|---|
| 1434 | NAME^RF^^0;1^K:$L(X)>30!($L(X)<1)!'(X'?1P.E) X
|
|---|
| 1435 | "^DD",1130580001.101,1130580001.101,.01,.1)
|
|---|
| 1436 | MEASURE NAME
|
|---|
| 1437 | "^DD",1130580001.101,1130580001.101,.01,1,0)
|
|---|
| 1438 | ^.1
|
|---|
| 1439 | "^DD",1130580001.101,1130580001.101,.01,1,1,0)
|
|---|
| 1440 | 1130580001.101^B
|
|---|
| 1441 | "^DD",1130580001.101,1130580001.101,.01,1,1,1)
|
|---|
| 1442 | S ^C0Q(101,"B",$E(X,1,30),DA)=""
|
|---|
| 1443 | "^DD",1130580001.101,1130580001.101,.01,1,1,2)
|
|---|
| 1444 | K ^C0Q(101,"B",$E(X,1,30),DA)
|
|---|
| 1445 | "^DD",1130580001.101,1130580001.101,.01,3)
|
|---|
| 1446 | Answer must be 1-30 characters in length
|
|---|
| 1447 | "^DD",1130580001.101,1130580001.101,.01,"DT")
|
|---|
| 1448 | 3101012
|
|---|
| 1449 | "^DD",1130580001.101,1130580001.101,.5,0)
|
|---|
| 1450 | SHORT DESCRIPTION^F^^1;1^K:$L(X)>240!($L(X)<3) X
|
|---|
| 1451 | "^DD",1130580001.101,1130580001.101,.5,.1)
|
|---|
| 1452 | MEASURE SHORT DESCRIPTION
|
|---|
| 1453 | "^DD",1130580001.101,1130580001.101,.5,3)
|
|---|
| 1454 | Answer must be 3-240 characters in length
|
|---|
| 1455 | "^DD",1130580001.101,1130580001.101,.5,"DT")
|
|---|
| 1456 | 3101012
|
|---|
| 1457 | "^DD",1130580001.101,1130580001.101,.61,0)
|
|---|
| 1458 | VERY LONG DESCRIPTION^1130580001.111^^6;0
|
|---|
| 1459 | "^DD",1130580001.101,1130580001.101,.7,0)
|
|---|
| 1460 | DISPLAY NAME^F^^5;1^K:$L(X)>240!($L(X)<3) X
|
|---|
| 1461 | "^DD",1130580001.101,1130580001.101,.7,.1)
|
|---|
| 1462 | QRDA DISPLAY NAME
|
|---|
| 1463 | "^DD",1130580001.101,1130580001.101,.7,3)
|
|---|
| 1464 | Answer must be 3-240 characters in length
|
|---|
| 1465 | "^DD",1130580001.101,1130580001.101,.7,"DT")
|
|---|
| 1466 | 3101012
|
|---|
| 1467 | "^DD",1130580001.101,1130580001.101,1,0)
|
|---|
| 1468 | NUMERATOR PATIENT LIST^P810.5'^PXRMXP(810.5,^0;2^Q
|
|---|
| 1469 | "^DD",1130580001.101,1130580001.101,1,.1)
|
|---|
| 1470 | MEASURE NUMERATOR PATIENT LIST
|
|---|
| 1471 | "^DD",1130580001.101,1130580001.101,1,"DT")
|
|---|
| 1472 | 3101012
|
|---|
| 1473 | "^DD",1130580001.101,1130580001.101,2,0)
|
|---|
| 1474 | DENOMINATOR PATIENT LIST^P810.5'^PXRMXP(810.5,^0;3^Q
|
|---|
| 1475 | "^DD",1130580001.101,1130580001.101,2,.1)
|
|---|
| 1476 | MEASURE DENOMINATOR PATIENT LIST
|
|---|
| 1477 | "^DD",1130580001.101,1130580001.101,2,"DT")
|
|---|
| 1478 | 3101012
|
|---|
| 1479 | "^DD",1130580001.101,1130580001.101,3,0)
|
|---|
| 1480 | QRDA TEMPLATE ROOT^F^^0;4^K:$L(X)>120!($L(X)<3) X
|
|---|
| 1481 | "^DD",1130580001.101,1130580001.101,3,.1)
|
|---|
| 1482 | MEASURE TEMPLATE ROOT FOR QRDA DOCUMENT
|
|---|
| 1483 | "^DD",1130580001.101,1130580001.101,3,3)
|
|---|
| 1484 | Answer must be 3-120 characters in length
|
|---|
| 1485 | "^DD",1130580001.101,1130580001.101,3,"DT")
|
|---|
| 1486 | 3101012
|
|---|
| 1487 | "^DD",1130580001.101,1130580001.101,3.1,0)
|
|---|
| 1488 | QRDA MEASURE SYSTEM OID^CJ^^ ; ^S X="2.16.840.1.113883.3.249.12"
|
|---|
| 1489 | "^DD",1130580001.101,1130580001.101,3.1,.1)
|
|---|
| 1490 | QRDA SYSTEM OID (FIXED)
|
|---|
| 1491 | "^DD",1130580001.101,1130580001.101,3.1,9.01)
|
|---|
| 1492 |
|
|---|
| 1493 | "^DD",1130580001.101,1130580001.101,3.1,9.1)
|
|---|
| 1494 | S X="2.16.840.1.113883.3.249.12"
|
|---|
| 1495 | "^DD",1130580001.101,1130580001.101,3.1,"DT")
|
|---|
| 1496 | 3101012
|
|---|
| 1497 | "^DD",1130580001.101,1130580001.101,3.2,0)
|
|---|
| 1498 | QRDA CODE^F^^4;1^K:$L(X)>80!($L(X)<1) X
|
|---|
| 1499 | "^DD",1130580001.101,1130580001.101,3.2,.1)
|
|---|
| 1500 | QRDA MEASURE CODE
|
|---|
| 1501 | "^DD",1130580001.101,1130580001.101,3.2,3)
|
|---|
| 1502 | Answer must be 1-80 characters in length
|
|---|
| 1503 | "^DD",1130580001.101,1130580001.101,3.2,"DT")
|
|---|
| 1504 | 3101012
|
|---|
| 1505 | "^DD",1130580001.101,1130580001.111,0)
|
|---|
| 1506 | VERY LONG DESCRIPTION SUB-FIELD^^.01^1
|
|---|
| 1507 | "^DD",1130580001.101,1130580001.111,0,"DT")
|
|---|
| 1508 | 3101013
|
|---|
| 1509 | "^DD",1130580001.101,1130580001.111,0,"NM","VERY LONG DESCRIPTION")
|
|---|
| 1510 |
|
|---|
| 1511 | "^DD",1130580001.101,1130580001.111,0,"UP")
|
|---|
| 1512 | 1130580001.101
|
|---|
| 1513 | "^DD",1130580001.101,1130580001.111,.01,0)
|
|---|
| 1514 | VERY LONG DESCRIPTION^Wx^^0;1
|
|---|
| 1515 | "^DD",1130580001.101,1130580001.111,.01,.1)
|
|---|
| 1516 | LONGER DESCRIPTION - IF IT DOESN'T FIT IN .6
|
|---|
| 1517 | "^DD",1130580001.101,1130580001.111,.01,3)
|
|---|
| 1518 | LONGER DESCRIPTION - INSTEAD OF LONG DESCRIPTION
|
|---|
| 1519 | "^DD",1130580001.101,1130580001.111,.01,"DT")
|
|---|
| 1520 | 3101013
|
|---|
| 1521 | "^DD",1130580001.201,1130580001.201,0)
|
|---|
| 1522 | FIELD^^.2^9
|
|---|
| 1523 | "^DD",1130580001.201,1130580001.201,0,"DDA")
|
|---|
| 1524 | N
|
|---|
| 1525 | "^DD",1130580001.201,1130580001.201,0,"DT")
|
|---|
| 1526 | 3101012
|
|---|
| 1527 | "^DD",1130580001.201,1130580001.201,0,"IX","ADBYP",1130580001.20112,.01)
|
|---|
| 1528 |
|
|---|
| 1529 | "^DD",1130580001.201,1130580001.201,0,"IX","ANBYP",1130580001.20111,.01)
|
|---|
| 1530 |
|
|---|
| 1531 | "^DD",1130580001.201,1130580001.201,0,"IX","B",1130580001.201,.01)
|
|---|
| 1532 |
|
|---|
| 1533 | "^DD",1130580001.201,1130580001.201,0,"NM","C0Q MEASUREMENTS")
|
|---|
| 1534 |
|
|---|
| 1535 | "^DD",1130580001.201,1130580001.201,.01,0)
|
|---|
| 1536 | SET NAME^RF^^0;1^K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
|
|---|
| 1537 | "^DD",1130580001.201,1130580001.201,.01,.1)
|
|---|
| 1538 | MEASUREMENT SET NAME
|
|---|
| 1539 | "^DD",1130580001.201,1130580001.201,.01,1,0)
|
|---|
| 1540 | ^.1
|
|---|
| 1541 | "^DD",1130580001.201,1130580001.201,.01,1,1,0)
|
|---|
| 1542 | 1130580001.201^B
|
|---|
| 1543 | "^DD",1130580001.201,1130580001.201,.01,1,1,1)
|
|---|
| 1544 | S ^C0Q(201,"B",$E(X,1,30),DA)=""
|
|---|
| 1545 | "^DD",1130580001.201,1130580001.201,.01,1,1,2)
|
|---|
| 1546 | K ^C0Q(201,"B",$E(X,1,30),DA)
|
|---|
| 1547 | "^DD",1130580001.201,1130580001.201,.01,3)
|
|---|
| 1548 | NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
|
|---|
| 1549 | "^DD",1130580001.201,1130580001.201,.01,"DT")
|
|---|
| 1550 | 3101012
|
|---|
| 1551 | "^DD",1130580001.201,1130580001.201,.02,0)
|
|---|
| 1552 | BEGIN DATE^D^^4;3^S %DT="E" D ^%DT S X=Y K:X<1 X
|
|---|
| 1553 | "^DD",1130580001.201,1130580001.201,.02,.1)
|
|---|
| 1554 | MEASUREMENT BEGIN DATE
|
|---|
| 1555 | "^DD",1130580001.201,1130580001.201,.02,3)
|
|---|
| 1556 | MEASUREMENT BEGIN DATE
|
|---|
| 1557 | "^DD",1130580001.201,1130580001.201,.02,"DT")
|
|---|
| 1558 | 3101012
|
|---|
| 1559 | "^DD",1130580001.201,1130580001.201,.03,0)
|
|---|
| 1560 | END DATE^D^^4;4^S %DT="E" D ^%DT S X=Y K:X<1 X
|
|---|
| 1561 | "^DD",1130580001.201,1130580001.201,.03,.1)
|
|---|
| 1562 | MEASUREMENT END DATE
|
|---|
| 1563 | "^DD",1130580001.201,1130580001.201,.03,3)
|
|---|
| 1564 | MEASUREMENT END DATE
|
|---|
| 1565 | "^DD",1130580001.201,1130580001.201,.03,"DT")
|
|---|
| 1566 | 3101012
|
|---|
| 1567 | "^DD",1130580001.201,1130580001.201,.04,0)
|
|---|
| 1568 | DATE LAST CALCULATED^D^^6;1^S %DT="E" D ^%DT S X=Y K:X<1 X
|
|---|
| 1569 | "^DD",1130580001.201,1130580001.201,.04,.1)
|
|---|
| 1570 | DATE LAST PROCESSED
|
|---|
| 1571 | "^DD",1130580001.201,1130580001.201,.04,3)
|
|---|
| 1572 | DATE LAST PROCESSED
|
|---|
| 1573 | "^DD",1130580001.201,1130580001.201,.04,"DT")
|
|---|
| 1574 | 3101012
|
|---|
| 1575 | "^DD",1130580001.201,1130580001.201,.05,0)
|
|---|
| 1576 | LOCKED^S^Y:YES;N:NO;^6;2^Q
|
|---|
| 1577 | "^DD",1130580001.201,1130580001.201,.05,.1)
|
|---|
| 1578 | Y/N IS THIS RECORD SET LOCKED
|
|---|
| 1579 | "^DD",1130580001.201,1130580001.201,.05,3)
|
|---|
| 1580 | Y/N IS THIS RECORD SET LOCKED
|
|---|
| 1581 | "^DD",1130580001.201,1130580001.201,.05,"DT")
|
|---|
| 1582 | 3101012
|
|---|
| 1583 | "^DD",1130580001.201,1130580001.201,.2,0)
|
|---|
| 1584 | USE ALL MEASURES^S^Y:YES;N:NO;^6;3^Q
|
|---|
| 1585 | "^DD",1130580001.201,1130580001.201,.2,.1)
|
|---|
| 1586 | INCLUDE ALL MEASURES IN THIS SET?
|
|---|
| 1587 | "^DD",1130580001.201,1130580001.201,.2,3)
|
|---|
| 1588 | INCLUDE ALL MEASURES IN THIS SET?
|
|---|
| 1589 | "^DD",1130580001.201,1130580001.201,.2,"DT")
|
|---|
| 1590 | 3101012
|
|---|
| 1591 | "^DD",1130580001.201,1130580001.201,1,0)
|
|---|
| 1592 | MEASURE^1130580001.2011P^^5;0
|
|---|
| 1593 | "^DD",1130580001.201,1130580001.2011,0)
|
|---|
| 1594 | MEASURE SUB-FIELD^^3^6
|
|---|
| 1595 | "^DD",1130580001.201,1130580001.2011,0,"DT")
|
|---|
| 1596 | 3101012
|
|---|
| 1597 | "^DD",1130580001.201,1130580001.2011,0,"IX","B",1130580001.2011,.01)
|
|---|
| 1598 |
|
|---|
| 1599 | "^DD",1130580001.201,1130580001.2011,0,"NM","MEASURE")
|
|---|
| 1600 |
|
|---|
| 1601 | "^DD",1130580001.201,1130580001.2011,0,"UP")
|
|---|
| 1602 | 1130580001.201
|
|---|
| 1603 | "^DD",1130580001.201,1130580001.2011,.01,0)
|
|---|
| 1604 | MEASURE^MP1130580001.101^C0Q(101,^0;1^Q
|
|---|
| 1605 | "^DD",1130580001.201,1130580001.2011,.01,.1)
|
|---|
| 1606 | INCLUDED QUALITY MEASURES
|
|---|
| 1607 | "^DD",1130580001.201,1130580001.2011,.01,1,0)
|
|---|
| 1608 | ^.1
|
|---|
| 1609 | "^DD",1130580001.201,1130580001.2011,.01,1,1,0)
|
|---|
| 1610 | 1130580001.2011^B
|
|---|
| 1611 | "^DD",1130580001.201,1130580001.2011,.01,1,1,1)
|
|---|
| 1612 | S ^C0Q(201,DA(1),5,"B",$E(X,1,30),DA)=""
|
|---|
| 1613 | "^DD",1130580001.201,1130580001.2011,.01,1,1,2)
|
|---|
| 1614 | K ^C0Q(201,DA(1),5,"B",$E(X,1,30),DA)
|
|---|
| 1615 | "^DD",1130580001.201,1130580001.2011,.01,3)
|
|---|
| 1616 | INCLUDED QUALITY MEASURES
|
|---|
| 1617 | "^DD",1130580001.201,1130580001.2011,.01,"DT")
|
|---|
| 1618 | 3101012
|
|---|
| 1619 | "^DD",1130580001.201,1130580001.2011,1,0)
|
|---|
| 1620 | NUMERATOR^1130580001.20111P^^1;0
|
|---|
| 1621 | "^DD",1130580001.201,1130580001.2011,1.1,0)
|
|---|
| 1622 | NUMERATOR COUNT^NJ10,0^^2;1^K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1.N) X
|
|---|
| 1623 | "^DD",1130580001.201,1130580001.2011,1.1,.1)
|
|---|
| 1624 | NUMBER OF PATIENTS IN NUMERATOR
|
|---|
| 1625 | "^DD",1130580001.201,1130580001.2011,1.1,3)
|
|---|
| 1626 | NUMBER OF PATIENTS IN NUMERATOR
|
|---|
| 1627 | "^DD",1130580001.201,1130580001.2011,1.1,"DT")
|
|---|
| 1628 | 3101012
|
|---|
| 1629 | "^DD",1130580001.201,1130580001.2011,2,0)
|
|---|
| 1630 | DENOMINATOR^1130580001.20112P^^3;0
|
|---|
| 1631 | "^DD",1130580001.201,1130580001.2011,2.1,0)
|
|---|
| 1632 | DENOMINATOR COUNT^NJ9,0^^4;1^K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1.N) X
|
|---|
| 1633 | "^DD",1130580001.201,1130580001.2011,2.1,.1)
|
|---|
| 1634 | NUMBER OF PATIENTS IN DENOMINATOR
|
|---|
| 1635 | "^DD",1130580001.201,1130580001.2011,2.1,3)
|
|---|
| 1636 | NUMBER OF PATIENTS IN DENOMINATOR
|
|---|
| 1637 | "^DD",1130580001.201,1130580001.2011,2.1,"DT")
|
|---|
| 1638 | 3101012
|
|---|
| 1639 | "^DD",1130580001.201,1130580001.2011,3,0)
|
|---|
| 1640 | PERCENTAGE^NJ3,0^^4;2^K:+X'=X!(X>100)!(X<0)!(X?.E1"."1.N) X
|
|---|
| 1641 | "^DD",1130580001.201,1130580001.2011,3,.1)
|
|---|
| 1642 | MEASURE PERCENTAGE
|
|---|
| 1643 | "^DD",1130580001.201,1130580001.2011,3,3)
|
|---|
| 1644 | MEASURE PERCENTAGE
|
|---|
| 1645 | "^DD",1130580001.201,1130580001.2011,3,"DT")
|
|---|
| 1646 | 3101012
|
|---|
| 1647 | "^DD",1130580001.201,1130580001.20111,0)
|
|---|
| 1648 | NUMERATOR SUB-FIELD^^.01^1
|
|---|
| 1649 | "^DD",1130580001.201,1130580001.20111,0,"DT")
|
|---|
| 1650 | 3101012
|
|---|
| 1651 | "^DD",1130580001.201,1130580001.20111,0,"IX","B",1130580001.20111,.01)
|
|---|
| 1652 |
|
|---|
| 1653 | "^DD",1130580001.201,1130580001.20111,0,"NM","NUMERATOR")
|
|---|
| 1654 |
|
|---|
| 1655 | "^DD",1130580001.201,1130580001.20111,0,"UP")
|
|---|
| 1656 | 1130580001.2011
|
|---|
| 1657 | "^DD",1130580001.201,1130580001.20111,.01,0)
|
|---|
| 1658 | NUMERATOR^MP2'^DPT(^0;1^Q
|
|---|
| 1659 | "^DD",1130580001.201,1130580001.20111,.01,.1)
|
|---|
| 1660 | NUMERATOR PATIENTS
|
|---|
| 1661 | "^DD",1130580001.201,1130580001.20111,.01,1,0)
|
|---|
| 1662 | ^.1
|
|---|
| 1663 | "^DD",1130580001.201,1130580001.20111,.01,1,1,0)
|
|---|
| 1664 | 1130580001.20111^B
|
|---|
| 1665 | "^DD",1130580001.201,1130580001.20111,.01,1,1,1)
|
|---|
| 1666 | S ^C0Q(201,DA(2),5,DA(1),1,"B",$E(X,1,30),DA)=""
|
|---|
| 1667 | "^DD",1130580001.201,1130580001.20111,.01,1,1,2)
|
|---|
| 1668 | K ^C0Q(201,DA(2),5,DA(1),1,"B",$E(X,1,30),DA)
|
|---|
| 1669 | "^DD",1130580001.201,1130580001.20111,.01,1,2,0)
|
|---|
| 1670 | 1130580001.201^ANBYP
|
|---|
| 1671 | "^DD",1130580001.201,1130580001.20111,.01,1,2,1)
|
|---|
| 1672 | S ^C0Q(201,"ANBYP",$E(X,1,30),DA(2),DA(1),DA)=""
|
|---|
| 1673 | "^DD",1130580001.201,1130580001.20111,.01,1,2,2)
|
|---|
| 1674 | K ^C0Q(201,"ANBYP",$E(X,1,30),DA(2),DA(1),DA)
|
|---|
| 1675 | "^DD",1130580001.201,1130580001.20111,.01,1,2,"DT")
|
|---|
| 1676 | 3101014
|
|---|
| 1677 | "^DD",1130580001.201,1130580001.20111,.01,3)
|
|---|
| 1678 | NUMERATOR PATIENTS
|
|---|
| 1679 | "^DD",1130580001.201,1130580001.20111,.01,"DT")
|
|---|
| 1680 | 3101014
|
|---|
| 1681 | "^DD",1130580001.201,1130580001.20112,0)
|
|---|
| 1682 | DENOMINATOR SUB-FIELD^^.01^1
|
|---|
| 1683 | "^DD",1130580001.201,1130580001.20112,0,"DT")
|
|---|
| 1684 | 3101012
|
|---|
| 1685 | "^DD",1130580001.201,1130580001.20112,0,"IX","B",1130580001.20112,.01)
|
|---|
| 1686 |
|
|---|
| 1687 | "^DD",1130580001.201,1130580001.20112,0,"NM","DENOMINATOR")
|
|---|
| 1688 |
|
|---|
| 1689 | "^DD",1130580001.201,1130580001.20112,0,"UP")
|
|---|
| 1690 | 1130580001.2011
|
|---|
| 1691 | "^DD",1130580001.201,1130580001.20112,.01,0)
|
|---|
| 1692 | DENOMINATOR^MP2'^DPT(^0;1^Q
|
|---|
| 1693 | "^DD",1130580001.201,1130580001.20112,.01,.1)
|
|---|
| 1694 | DENOMINATOR PATIENTS
|
|---|
| 1695 | "^DD",1130580001.201,1130580001.20112,.01,1,0)
|
|---|
| 1696 | ^.1
|
|---|
| 1697 | "^DD",1130580001.201,1130580001.20112,.01,1,1,0)
|
|---|
| 1698 | 1130580001.20112^B
|
|---|
| 1699 | "^DD",1130580001.201,1130580001.20112,.01,1,1,1)
|
|---|
| 1700 | S ^C0Q(201,DA(2),5,DA(1),3,"B",$E(X,1,30),DA)=""
|
|---|
| 1701 | "^DD",1130580001.201,1130580001.20112,.01,1,1,2)
|
|---|
| 1702 | K ^C0Q(201,DA(2),5,DA(1),3,"B",$E(X,1,30),DA)
|
|---|
| 1703 | "^DD",1130580001.201,1130580001.20112,.01,1,2,0)
|
|---|
| 1704 | 1130580001.201^ADBYP
|
|---|
| 1705 | "^DD",1130580001.201,1130580001.20112,.01,1,2,1)
|
|---|
| 1706 | S ^C0Q(201,"ADBYP",$E(X,1,30),DA(2),DA(1),DA)=""
|
|---|
| 1707 | "^DD",1130580001.201,1130580001.20112,.01,1,2,2)
|
|---|
| 1708 | K ^C0Q(201,"ADBYP",$E(X,1,30),DA(2),DA(1),DA)
|
|---|
| 1709 | "^DD",1130580001.201,1130580001.20112,.01,1,2,"DT")
|
|---|
| 1710 | 3101014
|
|---|
| 1711 | "^DD",1130580001.201,1130580001.20112,.01,3)
|
|---|
| 1712 | DENOMINATOR PATIENTS
|
|---|
| 1713 | "^DD",1130580001.201,1130580001.20112,.01,"DT")
|
|---|
| 1714 | 3101014
|
|---|
| 1715 | "^DIC",1130580001.101,1130580001.101,0)
|
|---|
| 1716 | C0Q QUAILITY MEASURE^1130580001.101
|
|---|
| 1717 | "^DIC",1130580001.101,1130580001.101,0,"GL")
|
|---|
| 1718 | ^C0Q(101,
|
|---|
| 1719 | "^DIC",1130580001.101,"B","C0Q QUAILITY MEASURE",1130580001.101)
|
|---|
| 1720 |
|
|---|
| 1721 | "^DIC",1130580001.201,1130580001.201,0)
|
|---|
| 1722 | C0Q MEASUREMENTS^1130580001.201
|
|---|
| 1723 | "^DIC",1130580001.201,1130580001.201,0,"GL")
|
|---|
| 1724 | ^C0Q(201,
|
|---|
| 1725 | "^DIC",1130580001.201,"B","C0Q MEASUREMENTS",1130580001.201)
|
|---|
| 1726 |
|
|---|
| 1727 | **END**
|
|---|
| 1728 | **END**
|
|---|
