Index: qrda/C0Q/trunk/kids/C0Q-1_SEQ-003_PAT-004.TXT
===================================================================
--- qrda/C0Q/trunk/kids/C0Q-1_SEQ-003_PAT-004.TXT	(revision 1521)
+++ qrda/C0Q/trunk/kids/C0Q-1_SEQ-003_PAT-004.TXT	(revision 1529)
@@ -264,9 +264,7 @@
             No overlap found
 
-
    Checking C0Q*1.0*4 for overlap with VOE 1.1 .... OK
             No overlap found
 
-
    Checking C0Q*1.0*4 for overlap with NO HOME 1.0 .... OK
             No overlap found
@@ -277,10 +275,8 @@
 
 Incoming Files:
-
 
    1130580001.101C0Q QUALITY MEASURE  (including data)
 Note:  You already have the 'C0Q QUALITY MEASURE' File.
 I will OVERWRITE your data with mine.
-
 
    1130580001.201C0Q MEASUREMENT SET  (including data)
@@ -289,10 +285,8 @@
 I will OVERWRITE your data with mine.
 
-
    1130580001.401C0Q PARAMETER  (Partial Definition)
 Note:  You already have the 'C0Q PARAMETER' File.
 
 Want KIDS to Rebuild Menu Trees Upon Completion of Install? YES// 
-
 
 Want KIDS to INHIBIT LOGONs during the install? NO// 
@@ -408,6 +402,4 @@
 ...Set-up complete
 
-
-
 This program collects patients from the denominators of the measures
 STK, VTE, and ED and outputs modified CCR files to the kernel default
@@ -415,6 +407,4 @@
 
 This will take some time to execute.
-
-
 
 Which measure set would you like to produce QRDA documents for?
@@ -441,6 +431,4 @@
 
 This will take some time to execute.
-
-
 
 Which measure set would you like to produce QRDA documents for?
Index: qrda/C0Q/trunk/kids/C0Q_1.0_4
===================================================================
--- qrda/C0Q/trunk/kids/C0Q_1.0_4	(revision 1521)
+++ 	(revision )
@@ -1,2070 +1,0 @@
-KIDS Distribution saved on Aug 02, 2012@02:46:22
-fghjkl;
-**KIDS**:C0Q*1.0*4^
-
-**INSTALL NAME**
-C0Q*1.0*4
-"BLD",7936,0)
-C0Q*1.0*4^QUALITY MEASURES^0^3120802^y
-"BLD",7936,1,0)
-^^1^1^3120802^^
-"BLD",7936,1,1,0)
-QRDA Support.
-"BLD",7936,4,0)
-^9.64PA^1130580001.401^3
-"BLD",7936,4,1130580001.101,0)
-1130580001.101
-"BLD",7936,4,1130580001.101,222)
-y^y^f^^y^C0Q 1P0*4 QM TRANSPORT LIST^y^o^n
-"BLD",7936,4,1130580001.101,224)
-
-"BLD",7936,4,1130580001.201,0)
-1130580001.201
-"BLD",7936,4,1130580001.201,222)
-y^y^f^^y^C0Q 1P0*4 MS^y^o^n
-"BLD",7936,4,1130580001.401,0)
-1130580001.401
-"BLD",7936,4,1130580001.401,2,0)
-^9.641^1130580001.401^1
-"BLD",7936,4,1130580001.401,2,1130580001.401,0)
-C0Q PARAMETER  (File-top level)
-"BLD",7936,4,1130580001.401,2,1130580001.401,1,0)
-^9.6411^5.3^3
-"BLD",7936,4,1130580001.401,2,1130580001.401,1,5.1,0)
-VTE CMS MEASUREMENT SET
-"BLD",7936,4,1130580001.401,2,1130580001.401,1,5.2,0)
-STK CMS MEASUREMENT SET
-"BLD",7936,4,1130580001.401,2,1130580001.401,1,5.3,0)
-ED CMS MEASUREMENT SET
-"BLD",7936,4,1130580001.401,222)
-y^y^p^^^^n^^n
-"BLD",7936,4,1130580001.401,224)
-
-"BLD",7936,4,"APDD",1130580001.401,1130580001.401)
-
-"BLD",7936,4,"APDD",1130580001.401,1130580001.401,5.1)
-
-"BLD",7936,4,"APDD",1130580001.401,1130580001.401,5.2)
-
-"BLD",7936,4,"APDD",1130580001.401,1130580001.401,5.3)
-
-"BLD",7936,4,"B",1130580001.101,1130580001.101)
-
-"BLD",7936,4,"B",1130580001.201,1130580001.201)
-
-"BLD",7936,4,"B",1130580001.401,1130580001.401)
-
-"BLD",7936,6.3)
-23
-"BLD",7936,"KRN",0)
-^9.67PA^779.2^20
-"BLD",7936,"KRN",.4,0)
-.4
-"BLD",7936,"KRN",.401,0)
-.401
-"BLD",7936,"KRN",.402,0)
-.402
-"BLD",7936,"KRN",.402,"NM",0)
-^9.68A^2^2
-"BLD",7936,"KRN",.402,"NM",1,0)
-C0Q EDIT INPATIENT PARMS    FILE #1130580001.401^1130580001.401^0
-"BLD",7936,"KRN",.402,"NM",2,0)
-C0Q EDIT MEASURE SET    FILE #1130580001.201^1130580001.201^0
-"BLD",7936,"KRN",.402,"NM","B","C0Q EDIT INPATIENT PARMS    FILE #1130580001.401",1)
-
-"BLD",7936,"KRN",.402,"NM","B","C0Q EDIT MEASURE SET    FILE #1130580001.201",2)
-
-"BLD",7936,"KRN",.403,0)
-.403
-"BLD",7936,"KRN",.5,0)
-.5
-"BLD",7936,"KRN",.84,0)
-.84
-"BLD",7936,"KRN",3.6,0)
-3.6
-"BLD",7936,"KRN",3.8,0)
-3.8
-"BLD",7936,"KRN",9.2,0)
-9.2
-"BLD",7936,"KRN",9.8,0)
-9.8
-"BLD",7936,"KRN",9.8,"NM",0)
-^9.68A^1^1
-"BLD",7936,"KRN",9.8,"NM",1,0)
-C0QQRDA^^0^B59175834
-"BLD",7936,"KRN",9.8,"NM","B","C0QQRDA",1)
-
-"BLD",7936,"KRN",19,0)
-19
-"BLD",7936,"KRN",19,"NM",0)
-^9.68A^3^3
-"BLD",7936,"KRN",19,"NM",1,0)
-C0Q QRDA MENU^^0
-"BLD",7936,"KRN",19,"NM",2,0)
-C0Q EXPORT INPATIENT QRDA CCRS^^0
-"BLD",7936,"KRN",19,"NM",3,0)
-C0Q QUALITY MEASUREMENT MENU^^2
-"BLD",7936,"KRN",19,"NM","B","C0Q EXPORT INPATIENT QRDA CCRS",2)
-
-"BLD",7936,"KRN",19,"NM","B","C0Q QRDA MENU",1)
-
-"BLD",7936,"KRN",19,"NM","B","C0Q QUALITY MEASUREMENT MENU",3)
-
-"BLD",7936,"KRN",19.1,0)
-19.1
-"BLD",7936,"KRN",101,0)
-101
-"BLD",7936,"KRN",409.61,0)
-409.61
-"BLD",7936,"KRN",771,0)
-771
-"BLD",7936,"KRN",779.2,0)
-779.2
-"BLD",7936,"KRN",870,0)
-870
-"BLD",7936,"KRN",8989.51,0)
-8989.51
-"BLD",7936,"KRN",8989.52,0)
-8989.52
-"BLD",7936,"KRN",8994,0)
-8994
-"BLD",7936,"KRN","B",.4,.4)
-
-"BLD",7936,"KRN","B",.401,.401)
-
-"BLD",7936,"KRN","B",.402,.402)
-
-"BLD",7936,"KRN","B",.403,.403)
-
-"BLD",7936,"KRN","B",.5,.5)
-
-"BLD",7936,"KRN","B",.84,.84)
-
-"BLD",7936,"KRN","B",3.6,3.6)
-
-"BLD",7936,"KRN","B",3.8,3.8)
-
-"BLD",7936,"KRN","B",9.2,9.2)
-
-"BLD",7936,"KRN","B",9.8,9.8)
-
-"BLD",7936,"KRN","B",19,19)
-
-"BLD",7936,"KRN","B",19.1,19.1)
-
-"BLD",7936,"KRN","B",101,101)
-
-"BLD",7936,"KRN","B",409.61,409.61)
-
-"BLD",7936,"KRN","B",771,771)
-
-"BLD",7936,"KRN","B",779.2,779.2)
-
-"BLD",7936,"KRN","B",870,870)
-
-"BLD",7936,"KRN","B",8989.51,8989.51)
-
-"BLD",7936,"KRN","B",8989.52,8989.52)
-
-"BLD",7936,"KRN","B",8994,8994)
-
-"BLD",7936,"PRET")
-TRAN^C0Q1P4
-"BLD",7936,"QDEF")
-^^^^NO^^^^YES^^NO
-"BLD",7936,"QUES",0)
-^9.62^^
-"BLD",7936,"REQB",0)
-^9.611^2^2
-"BLD",7936,"REQB",1,0)
-CCD/CCR GENERATION UTILITIES 1.2^2
-"BLD",7936,"REQB",2,0)
-QUALITY MEASURES 1.0^2
-"BLD",7936,"REQB","B","CCD/CCR GENERATION UTILITIES 1.2",1)
-
-"BLD",7936,"REQB","B","QUALITY MEASURES 1.0",2)
-
-"DATA",1130580001.101,23,0)
-MU HOS NQF 0495^^^2.16.840.1.113883.3.249.11.14.2.1.2.2
-"DATA",1130580001.101,23,1)
-ED THROUGHPUT ARRIVAL TO DEPARTURE
-"DATA",1130580001.101,23,5)
-ED THROUGHPUT ARRIVAL TO DEPARTURE
-"DATA",1130580001.101,23,6,0)
-^1130580001.111^3^3^3110430^^^^
-"DATA",1130580001.101,23,6,1,0)
-Median time from emergency department arrival to time of departure from 
-"DATA",1130580001.101,23,6,2,0)
-the emergency room for patients admitted to the facility from the
-"DATA",1130580001.101,23,6,3,0)
-emergency department
-"DATA",1130580001.101,23,7)
-NQF0495^^^^^^88^165
-"DATA",1130580001.101,24,0)
-MU HOS NQF 0497^^^2.16.840.1.113883.3.249.11.14.3.1.2.2
-"DATA",1130580001.101,24,1)
-ED THROUGHPUT ADMITTING DECISION TO DEPARTURE
-"DATA",1130580001.101,24,5)
-ED THROUGHPUT ADMITTING DECISION TO DEPARTURE
-"DATA",1130580001.101,24,6,0)
-^^3^3^3110430^
-"DATA",1130580001.101,24,6,1,0)
-Median time from admit decision time to time of departure from the 
-"DATA",1130580001.101,24,6,2,0)
-emergency department of emergency department patients admitted to 
-"DATA",1130580001.101,24,6,3,0)
-inpatient status
-"DATA",1130580001.101,24,7)
-NQF0497^^^^^^90^168
-"DATA",1130580001.101,25,0)
-MU HOS NQF 0435^^^1.3.6.1.4.1.33895.1.2.16001.1.2.2
-"DATA",1130580001.101,25,1)
-Ischemic stroke.Discharge on anti-thrombotics  
-"DATA",1130580001.101,25,5)
- Ischemic stroke.Discharge on anti-thrombotic
-"DATA",1130580001.101,25,6,0)
-^^2^2^3110430^
-"DATA",1130580001.101,25,6,1,0)
-Ischemic stroke patients prescribed antithrombotic therapy at hospital 
-"DATA",1130580001.101,25,6,2,0)
-discharge
-"DATA",1130580001.101,25,7)
-NQF0435^^^^^^114^115
-"DATA",1130580001.101,26,0)
-MU HOS NQF 0436^^^1.3.6.1.4.1.33895.1.2.16002.1.2.2
-"DATA",1130580001.101,26,1)
- Ischemic stroke.Anticoagulation for A-fib/flutter
-"DATA",1130580001.101,26,5)
-Ischemic stroke.Anticoagulation for A-fib/flutter
-"DATA",1130580001.101,26,6,0)
-^1130580001.111^2^2^3110430^^^
-"DATA",1130580001.101,26,6,1,0)
- Ischemic stroke patients with atrial fibrillation/flutter who are 
-"DATA",1130580001.101,26,6,2,0)
-prescribed anticoagulation therapy at hospital discharge
-"DATA",1130580001.101,26,7)
-NQF0436^^^^^^116^117
-"DATA",1130580001.101,27,0)
-MU HOS NQF 0437^^^1.3.6.1.4.1.33895.1.2.16003.1.2.2
-"DATA",1130580001.101,27,1)
- Ischemic stroke.Thrombolytic therapy for patients arriving within 2 hours of symptom onset
-"DATA",1130580001.101,27,5)
-Ischemic stroke.Thrombolytic therapy for patients arriving within 2 hours of symptom onset
-"DATA",1130580001.101,27,6,0)
-^^3^3^3110430^
-"DATA",1130580001.101,27,6,1,0)
-Acute ischemic stroke patients who arrive at this hospital within 2 
-"DATA",1130580001.101,27,6,2,0)
-hours of time last known well and for whom IV t-PA was initiated at this 
-"DATA",1130580001.101,27,6,3,0)
-hospital within 3 hours of time last known well.
-"DATA",1130580001.101,27,7)
-NQF0437^^^^^^119^118
-"DATA",1130580001.101,28,0)
-MU HOS NQF 0438^^^1.3.6.1.4.1.33895.1.2.16004.1.2.2
-"DATA",1130580001.101,28,1)
-Ischemic or hemorrhagic stroke.Antithrombotic therapy by day 2
-"DATA",1130580001.101,28,5)
-Ischemic or hemorrhagic stroke.Antithrombotic therapy by day 2
-"DATA",1130580001.101,28,6,0)
-^^2^2^3110430^
-"DATA",1130580001.101,28,6,1,0)
-Ischemic stroke patients administered antithrombotic therapy by the 
-"DATA",1130580001.101,28,6,2,0)
-end of hospital day 2.
-"DATA",1130580001.101,28,7)
-NQF0438^^^^^^120^121
-"DATA",1130580001.101,29,0)
-MU HOS NQF 0439^^^1.3.6.1.4.1.33895.1.2.16005.1.2.2
-"DATA",1130580001.101,29,1)
-Ischemic stroke.Discharge on statins
-"DATA",1130580001.101,29,5)
-Ischemic stroke.Discharge on statins
-"DATA",1130580001.101,29,6,0)
-^^3^3^3110430^
-"DATA",1130580001.101,29,6,1,0)
-Ischemic stroke patients with LDL > 100 mg/dL, or LDL not measured, or, 
-"DATA",1130580001.101,29,6,2,0)
-who were on a lipid-lowering medication prior to hospital arrival are
-"DATA",1130580001.101,29,6,3,0)
-prescribed statin medication at hospital discharge
-"DATA",1130580001.101,29,7)
-NQF0439^^^^^^122^123
-"DATA",1130580001.101,30,0)
-MU HOS NQF 0440^^^1.3.6.1.4.1.33895.1.2.16007.1.2.2
-"DATA",1130580001.101,30,1)
-Ischemic or hemorrhagic stroke.Stroke education
-"DATA",1130580001.101,30,5)
-Ischemic or hemorrhagic stroke.Stroke education
-"DATA",1130580001.101,30,6,0)
-^^5^5^3110430^
-"DATA",1130580001.101,30,6,1,0)
-Ischemic or hemorrhagic stroke patients or their caregivers who were 
-"DATA",1130580001.101,30,6,2,0)
-given educational materials during the hospital stay addressing all of the
-"DATA",1130580001.101,30,6,3,0)
-following: activation of emergency medical system, need for follow-up
-"DATA",1130580001.101,30,6,4,0)
-after discharge, medications prescribed at discharge, risk factors for
-"DATA",1130580001.101,30,6,5,0)
-stroke, and warning signs and symptoms of stroke.
-"DATA",1130580001.101,30,7)
-NQF0440^^^^^^124^125
-"DATA",1130580001.101,31,0)
-MU HOS NQF 0441^^^1.3.6.1.4.1.33895.1.2.16008.1.2.2
-"DATA",1130580001.101,31,1)
-Ischemic or hemorrhagic stroke.Rehabilitation assessment
-"DATA",1130580001.101,31,5)
-Ischemic or hemorrhagic stroke.Rehabilitation assessment
-"DATA",1130580001.101,31,6,0)
-^^2^2^3110430^
-"DATA",1130580001.101,31,6,1,0)
-Ischemic or hemorrhagic stroke patients who were assessed for 
-"DATA",1130580001.101,31,6,2,0)
-rehabilitation services.
-"DATA",1130580001.101,31,7)
-NQF0441^^^^^^126^127
-"DATA",1130580001.101,32,0)
-MU HOS NQF 0371^^^1.3.6.1.4.1.33895.1.2.15971.1.2.2
-"DATA",1130580001.101,32,1)
-VTE prophylaxis within 24 hours of arrival  
-"DATA",1130580001.101,32,5)
-VTE prophylaxis within 24 hours of arrival  
-"DATA",1130580001.101,32,6,0)
-^^4^4^3110430^
-"DATA",1130580001.101,32,6,1,0)
-This measure assesses the number of patients who received VTE prophylaxis 
-"DATA",1130580001.101,32,6,2,0)
-or have documentation why no VTE prophylaxis was given the day of or the 
-"DATA",1130580001.101,32,6,3,0)
-day after hospital admission or surgery end date for surgeries that start
-"DATA",1130580001.101,32,6,4,0)
-the day of or the day after hospital admission.
-"DATA",1130580001.101,32,7)
-NQF0371^^^^^^69^67
-"DATA",1130580001.101,33,0)
-MU HOS NQF 0372^^^1.3.6.1.4.1.33895.1.2.15972.1.2.2
-"DATA",1130580001.101,33,1)
-ICU VTE prophylaxis  
-"DATA",1130580001.101,33,5)
-ICU VTE prophylaxis
-"DATA",1130580001.101,33,6,0)
-^^5^5^3110430^
-"DATA",1130580001.101,33,6,1,0)
-This measure assesses the number of patients who received VTE prophylaxis 
-"DATA",1130580001.101,33,6,2,0)
-or have documentation why no VTE prophylaxis was given the day of or the 
-"DATA",1130580001.101,33,6,3,0)
-day after the initial admission (or transfer) to the Intensive Care Unit
-"DATA",1130580001.101,33,6,4,0)
-(ICU) or surgery end date for surgeries that start the day of or the day
-"DATA",1130580001.101,33,6,5,0)
-after ICU admission (or transfer).
-"DATA",1130580001.101,33,7)
-NQF0372^^^^^^128^71
-"DATA",1130580001.101,34,0)
-MU HOS NQF 0373^^^1.3.6.1.4.1.33895.1.2.15973.1.2.2
-"DATA",1130580001.101,34,1)
-Anticoagulation overlap therapy  
-"DATA",1130580001.101,34,5)
-Anticoagulation overlap therapy
-"DATA",1130580001.101,34,6,0)
-^^8^8^3110430^
-"DATA",1130580001.101,34,6,1,0)
-This measure assesses the number of patients diagnosed with confirmed VTE 
-"DATA",1130580001.101,34,6,2,0)
-who received an overlap of parenteral (intravenous [IV] or subcutaneous 
-"DATA",1130580001.101,34,6,3,0)
-[subcu]) anticoagulation and warfarin therapy. For patients who received
-"DATA",1130580001.101,34,6,4,0)
-less than five days of overlap therapy, they must be discharged on both
-"DATA",1130580001.101,34,6,5,0)
-medications. Overlap therapy must be administered for at least five days
-"DATA",1130580001.101,34,6,6,0)
-with an international normalized ratio (INR) . 2 prior to discontinuation
-"DATA",1130580001.101,34,6,7,0)
-of the parenteral anticoagulation therapy or the patient must be
-"DATA",1130580001.101,34,6,8,0)
-discharged on both medications.
-"DATA",1130580001.101,34,7)
-NQF0373^^^^^^129^144
-"DATA",1130580001.101,35,0)
-MU HOS NQF 0374^^^1.3.6.1.4.1.33895.1.2.15974.1.2.2
-"DATA",1130580001.101,35,1)
-Platelet monitoring on unfractionated heparin
-"DATA",1130580001.101,35,5)
-Platelet monitoring on unfractionated heparin
-"DATA",1130580001.101,35,6,0)
-^^10^10^3110430^
-"DATA",1130580001.101,35,6,1,0)
-This measure assesses the number of patients diagnosed with confirmed VTE 
-"DATA",1130580001.101,35,6,2,0)
-who received intravenous (IV) UFH therapy dosages AND had their platelet 
-"DATA",1130580001.101,35,6,3,0)
-counts monitored using defined parameters such as a nomogram or
-"DATA",1130580001.101,35,6,4,0)
-protocol This measure assesses the number of patients diagnosed with
-"DATA",1130580001.101,35,6,5,0)
-confirmed VTE who received intravenous (IV) UFH therapy dosages AND had
-"DATA",1130580001.101,35,6,6,0)
-their platelet counts monitored using defined parameters such as a
-"DATA",1130580001.101,35,6,7,0)
-nomogram or protocol This measure assesses the number of patients
-"DATA",1130580001.101,35,6,8,0)
-diagnosed with confirmed VTE who received intravenous (IV) UFH therapy
-"DATA",1130580001.101,35,6,9,0)
-dosages AND had their platelet counts monitored using defined parameters
-"DATA",1130580001.101,35,6,10,0)
-such as a nomogram or protocol
-"DATA",1130580001.101,35,7)
-NQF0374^^^^^^145^146
-"DATA",1130580001.101,36,0)
-MU HOS NQF 0375^^^1.3.6.1.4.1.33895.1.2.15975.1.2.2
-"DATA",1130580001.101,36,1)
-VTE discharge instructions
-"DATA",1130580001.101,36,5)
-VTE discharge instructions
-"DATA",1130580001.101,36,6,0)
-^^11^11^3110430^
-"DATA",1130580001.101,36,6,1,0)
-This measure assesses the number of patients diagnosed with confirmed VTE 
-"DATA",1130580001.101,36,6,2,0)
-that are discharged to home, to home with home health, home hospice or 
-"DATA",1130580001.101,36,6,3,0)
-discharged/transferred to court/law enforcement on warfarin with written 
-"DATA",1130580001.101,36,6,4,0)
-discharge instructions that address all four criteria: compliance issues,
-"DATA",1130580001.101,36,6,5,0)
-dietary advice, follow-up This measure assesses the number of patients
-"DATA",1130580001.101,36,6,6,0)
-diagnosed with confirmed VTE that are discharged to home, to home with
-"DATA",1130580001.101,36,6,7,0)
-home health, home hospice or discharged/transferred to court/law
-"DATA",1130580001.101,36,6,8,0)
-enforcement on warfarin with written discharge instructions that address
-"DATA",1130580001.101,36,6,9,0)
-all four criteria: compliance issues, dietary advice, follow-up
-"DATA",1130580001.101,36,6,10,0)
-monitoring, and information about the potential for adverse drug 
-"DATA",1130580001.101,36,6,11,0)
-reactions/interactions.
-"DATA",1130580001.101,36,7)
-NQF0375^^^^^^147^156
-"DATA",1130580001.101,37,0)
-MU HOS NQF 0376^^^1.3.6.1.4.1.33895.1.2.15976.1.2.2
-"DATA",1130580001.101,37,1)
-Incidence of potentially preventable VTE
-"DATA",1130580001.101,37,5)
-Incidence of potentially preventable VTE
-"DATA",1130580001.101,37,6,0)
-^^4^4^3110430^
-"DATA",1130580001.101,37,6,1,0)
-This measure assesses the number of patients diagnosed with confirmed VTE 
-"DATA",1130580001.101,37,6,2,0)
-during hospitalization (not present on arrival) who did not receive VTE 
-"DATA",1130580001.101,37,6,3,0)
-prophylaxis between hospital admission and the day before the VTE
-"DATA",1130580001.101,37,6,4,0)
-diagnostic testing order date.
-"DATA",1130580001.101,37,7)
-NQF0376^^^^^^158^162
-"DATA",1130580001.201,10,0)
-VTE CMS REPORTING MEASURES^1.3.6.1.4.1.33895.1.1.32.1.2.1
-"DATA",1130580001.201,10,4)
-^^3120101^3121231
-"DATA",1130580001.201,10,5,0)
-^1130580001.2011P^6^6
-"DATA",1130580001.201,10,5,1,0)
-32
-"DATA",1130580001.201,10,5,2,0)
-33
-"DATA",1130580001.201,10,5,3,0)
-34
-"DATA",1130580001.201,10,5,4,0)
-35
-"DATA",1130580001.201,10,5,5,0)
-36
-"DATA",1130580001.201,10,5,6,0)
-37
-"DATA",1130580001.201,10,6)
-^
-"DATA",1130580001.201,10,7)
-MU12
-"DATA",1130580001.201,11,0)
-STK CMS REPORTING MEASURES^1.3.6.1.4.1.33895.1.1.31.1.2.1
-"DATA",1130580001.201,11,4)
-^^3120101^3121231
-"DATA",1130580001.201,11,5,0)
-^1130580001.2011P^7^7
-"DATA",1130580001.201,11,5,1,0)
-25
-"DATA",1130580001.201,11,5,2,0)
-26
-"DATA",1130580001.201,11,5,3,0)
-27
-"DATA",1130580001.201,11,5,4,0)
-28
-"DATA",1130580001.201,11,5,5,0)
-29
-"DATA",1130580001.201,11,5,6,0)
-30
-"DATA",1130580001.201,11,5,7,0)
-31
-"DATA",1130580001.201,11,6)
-^
-"DATA",1130580001.201,11,7)
-MU12
-"DATA",1130580001.201,12,0)
-ED CMS REPORTING MEASURES^2.16.840.1.113883.3.249.11.14.1.1.1
-"DATA",1130580001.201,12,4)
-^^3120101^3121213
-"DATA",1130580001.201,12,5,0)
-^1130580001.2011P^2^2
-"DATA",1130580001.201,12,5,1,0)
-23
-"DATA",1130580001.201,12,5,2,0)
-24
-"DATA",1130580001.201,12,6)
-^
-"DATA",1130580001.201,12,7)
-MU12
-"FIA",1130580001.101)
-C0Q QUALITY MEASURE
-"FIA",1130580001.101,0)
-^C0Q(101,
-"FIA",1130580001.101,0,0)
-1130580001.101I
-"FIA",1130580001.101,0,1)
-y^y^f^^y^C0Q 1P0*4 QM TRANSPORT LIST^y^o^n
-"FIA",1130580001.101,0,10)
-
-"FIA",1130580001.101,0,11)
-
-"FIA",1130580001.101,0,"RLRO")
-^DIBT(920,1)
-"FIA",1130580001.101,0,"VR")
-1.0^C0Q
-"FIA",1130580001.101,1130580001.101)
-0
-"FIA",1130580001.101,1130580001.111)
-0
-"FIA",1130580001.201)
-C0Q MEASUREMENT SET
-"FIA",1130580001.201,0)
-^C0Q(201,
-"FIA",1130580001.201,0,0)
-1130580001.201
-"FIA",1130580001.201,0,1)
-y^y^f^^y^C0Q 1P0*4 MS^y^o^n
-"FIA",1130580001.201,0,10)
-
-"FIA",1130580001.201,0,11)
-
-"FIA",1130580001.201,0,"RLRO")
-^DIBT(921,1)
-"FIA",1130580001.201,0,"VR")
-1.0^C0Q
-"FIA",1130580001.201,1130580001.201)
-0
-"FIA",1130580001.201,1130580001.2011)
-0
-"FIA",1130580001.201,1130580001.20111)
-0
-"FIA",1130580001.201,1130580001.20112)
-0
-"FIA",1130580001.401)
-C0Q PARAMETER
-"FIA",1130580001.401,0)
-^C0Q(401,
-"FIA",1130580001.401,0,0)
-1130580001.401
-"FIA",1130580001.401,0,1)
-y^y^p^^^^n^^n
-"FIA",1130580001.401,0,10)
-
-"FIA",1130580001.401,0,11)
-
-"FIA",1130580001.401,0,"RLRO")
-
-"FIA",1130580001.401,0,"VR")
-1.0^C0Q
-"FIA",1130580001.401,1130580001.401)
-1
-"FIA",1130580001.401,1130580001.401,5.1)
-
-"FIA",1130580001.401,1130580001.401,5.2)
-
-"FIA",1130580001.401,1130580001.401,5.3)
-
-"FRV1",1130580001.101,"23,7",7)
-MU ED-1 NUMER RS
-"FRV1",1130580001.101,"23,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"23,7",8)
-MU ED-1 DENOM RS
-"FRV1",1130580001.101,"23,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"24,7",7)
-MU ED-2 NUMER RS
-"FRV1",1130580001.101,"24,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"24,7",8)
-MU ED-2 DENOM RS
-"FRV1",1130580001.101,"24,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"25,7",7)
-MU STK-2 NUMER RS
-"FRV1",1130580001.101,"25,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"25,7",8)
-MU STK-2 DENOM RS
-"FRV1",1130580001.101,"25,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"26,7",7)
-MU STK-3 NUMER RS
-"FRV1",1130580001.101,"26,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"26,7",8)
-MU STK-3 DENOM RS
-"FRV1",1130580001.101,"26,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"27,7",7)
-MU STK-4 NUMER RS
-"FRV1",1130580001.101,"27,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"27,7",8)
-MU STK-4 DENOM RS
-"FRV1",1130580001.101,"27,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"28,7",7)
-MU STK-5 NUMER RS
-"FRV1",1130580001.101,"28,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"28,7",8)
-MU STK-5 DENOM RS
-"FRV1",1130580001.101,"28,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"29,7",7)
-MU STK-6 NUMER RS
-"FRV1",1130580001.101,"29,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"29,7",8)
-MU STK-6 DENOM RS
-"FRV1",1130580001.101,"29,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"30,7",7)
-MU STK-8 NUMER RS
-"FRV1",1130580001.101,"30,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"30,7",8)
-MU STK-8 DENOM RS
-"FRV1",1130580001.101,"30,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"31,7",7)
-MU STK-10 NUMER RS
-"FRV1",1130580001.101,"31,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"31,7",8)
-MU STK-10 DENOM RS
-"FRV1",1130580001.101,"31,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"32,7",7)
-MU VTE-1 NUMER RS
-"FRV1",1130580001.101,"32,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"32,7",8)
-MU VTE-1 DENOM RS
-"FRV1",1130580001.101,"32,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"33,7",7)
-MU VTE-2 NUMER RS
-"FRV1",1130580001.101,"33,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"33,7",8)
-MU VTE-2 DENOM RS
-"FRV1",1130580001.101,"33,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"34,7",7)
-MU VTE-3 NUMER RS
-"FRV1",1130580001.101,"34,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"34,7",8)
-MU VTE-3 DENOM RS
-"FRV1",1130580001.101,"34,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"35,7",7)
-MU VTE-4 NUMER RS
-"FRV1",1130580001.101,"35,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"35,7",8)
-MU VTE-4 DENOM RS
-"FRV1",1130580001.101,"35,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"36,7",7)
-MU VTE-5 NUMER RS
-"FRV1",1130580001.101,"36,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"36,7",8)
-MU VTE-5 DENOM RS
-"FRV1",1130580001.101,"36,7",8,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"37,7",7)
-MU VTE-6 NUMER RS
-"FRV1",1130580001.101,"37,7",7,"F")
-;PXRM(810.4,
-"FRV1",1130580001.101,"37,7",8)
-MU VTE-6 DENOM RS
-"FRV1",1130580001.101,"37,7",8,"F")
-;PXRM(810.4,
-"FRV1K",1130580001.101,"23,7",7)
-B
-"FRV1K",1130580001.101,"23,7",7,1)
-MU ED-1 NUMER RS
-"FRV1K",1130580001.101,"23,7",8)
-B
-"FRV1K",1130580001.101,"23,7",8,1)
-MU ED-1 DENOM RS
-"FRV1K",1130580001.101,"24,7",7)
-B
-"FRV1K",1130580001.101,"24,7",7,1)
-MU ED-2 NUMER RS
-"FRV1K",1130580001.101,"24,7",8)
-B
-"FRV1K",1130580001.101,"24,7",8,1)
-MU ED-2 DENOM RS
-"FRV1K",1130580001.101,"25,7",7)
-B
-"FRV1K",1130580001.101,"25,7",7,1)
-MU STK-2 NUMER RS
-"FRV1K",1130580001.101,"25,7",8)
-B
-"FRV1K",1130580001.101,"25,7",8,1)
-MU STK-2 DENOM RS
-"FRV1K",1130580001.101,"26,7",7)
-B
-"FRV1K",1130580001.101,"26,7",7,1)
-MU STK-3 NUMER RS
-"FRV1K",1130580001.101,"26,7",8)
-B
-"FRV1K",1130580001.101,"26,7",8,1)
-MU STK-3 DENOM RS
-"FRV1K",1130580001.101,"27,7",7)
-B
-"FRV1K",1130580001.101,"27,7",7,1)
-MU STK-4 NUMER RS
-"FRV1K",1130580001.101,"27,7",8)
-B
-"FRV1K",1130580001.101,"27,7",8,1)
-MU STK-4 DENOM RS
-"FRV1K",1130580001.101,"28,7",7)
-B
-"FRV1K",1130580001.101,"28,7",7,1)
-MU STK-5 NUMER RS
-"FRV1K",1130580001.101,"28,7",8)
-B
-"FRV1K",1130580001.101,"28,7",8,1)
-MU STK-5 DENOM RS
-"FRV1K",1130580001.101,"29,7",7)
-B
-"FRV1K",1130580001.101,"29,7",7,1)
-MU STK-6 NUMER RS
-"FRV1K",1130580001.101,"29,7",8)
-B
-"FRV1K",1130580001.101,"29,7",8,1)
-MU STK-6 DENOM RS
-"FRV1K",1130580001.101,"30,7",7)
-B
-"FRV1K",1130580001.101,"30,7",7,1)
-MU STK-8 NUMER RS
-"FRV1K",1130580001.101,"30,7",8)
-B
-"FRV1K",1130580001.101,"30,7",8,1)
-MU STK-8 DENOM RS
-"FRV1K",1130580001.101,"31,7",7)
-B
-"FRV1K",1130580001.101,"31,7",7,1)
-MU STK-10 NUMER RS
-"FRV1K",1130580001.101,"31,7",8)
-B
-"FRV1K",1130580001.101,"31,7",8,1)
-MU STK-10 DENOM RS
-"FRV1K",1130580001.101,"32,7",7)
-B
-"FRV1K",1130580001.101,"32,7",7,1)
-MU VTE-1 NUMER RS
-"FRV1K",1130580001.101,"32,7",8)
-B
-"FRV1K",1130580001.101,"32,7",8,1)
-MU VTE-1 DENOM RS
-"FRV1K",1130580001.101,"33,7",7)
-B
-"FRV1K",1130580001.101,"33,7",7,1)
-MU VTE-2 NUMER RS
-"FRV1K",1130580001.101,"33,7",8)
-B
-"FRV1K",1130580001.101,"33,7",8,1)
-MU VTE-2 DENOM RS
-"FRV1K",1130580001.101,"34,7",7)
-B
-"FRV1K",1130580001.101,"34,7",7,1)
-MU VTE-3 NUMER RS
-"FRV1K",1130580001.101,"34,7",8)
-B
-"FRV1K",1130580001.101,"34,7",8,1)
-MU VTE-3 DENOM RS
-"FRV1K",1130580001.101,"35,7",7)
-B
-"FRV1K",1130580001.101,"35,7",7,1)
-MU VTE-4 NUMER RS
-"FRV1K",1130580001.101,"35,7",8)
-B
-"FRV1K",1130580001.101,"35,7",8,1)
-MU VTE-4 DENOM RS
-"FRV1K",1130580001.101,"36,7",7)
-B
-"FRV1K",1130580001.101,"36,7",7,1)
-MU VTE-5 NUMER RS
-"FRV1K",1130580001.101,"36,7",8)
-B
-"FRV1K",1130580001.101,"36,7",8,1)
-MU VTE-5 DENOM RS
-"FRV1K",1130580001.101,"37,7",7)
-B
-"FRV1K",1130580001.101,"37,7",7,1)
-MU VTE-6 NUMER RS
-"FRV1K",1130580001.101,"37,7",8)
-B
-"FRV1K",1130580001.101,"37,7",8,1)
-MU VTE-6 DENOM RS
-"IX",1130580001.101,1130580001.101,"B",0)
-1130580001.101^B^New-Style B Index. Will be used as part of the key.^R^^F^IR^I^1130580001.101^^^^^LS
-"IX",1130580001.101,1130580001.101,"B",1)
-S ^C0Q(101,"B",$E(X,1,30),DA)=""
-"IX",1130580001.101,1130580001.101,"B",2)
-K ^C0Q(101,"B",$E(X,1,30),DA)
-"IX",1130580001.101,1130580001.101,"B",2.5)
-K ^C0Q(101,"B")
-"IX",1130580001.101,1130580001.101,"B",11.1,0)
-^.114IA^1^1
-"IX",1130580001.101,1130580001.101,"B",11.1,1,0)
-1^F^1130580001.101^.01^30^1^F
-"IX",1130580001.101,1130580001.101,"MU",0)
-1130580001.101^MU^MEANINGFUL USE YEAR KEY^R^^F^IR^I^1130580001.101^^^^^LS
-"IX",1130580001.101,1130580001.101,"MU",1)
-S ^C0Q(101,"MU",$E(X,1,30),DA)=""
-"IX",1130580001.101,1130580001.101,"MU",2)
-K ^C0Q(101,"MU",$E(X,1,30),DA)
-"IX",1130580001.101,1130580001.101,"MU",2.5)
-K ^C0Q(101,"MU")
-"IX",1130580001.101,1130580001.101,"MU",11.1,0)
-^.114IA^1^1
-"IX",1130580001.101,1130580001.101,"MU",11.1,1,0)
-1^F^1130580001.101^.3^30^1^F
-"IX",1130580001.201,1130580001.201,"MU",0)
-1130580001.201^MU^MEANINGFUL USE YEAR KEY INDEX^R^^F^IR^I^1130580001.201^^^^^LS
-"IX",1130580001.201,1130580001.201,"MU",1)
-S ^C0Q(201,"MU",$E(X,1,30),DA)=""
-"IX",1130580001.201,1130580001.201,"MU",2)
-K ^C0Q(201,"MU",$E(X,1,30),DA)
-"IX",1130580001.201,1130580001.201,"MU",2.5)
-K ^C0Q(201,"MU")
-"IX",1130580001.201,1130580001.201,"MU",11.1,0)
-^.114IA^1^1
-"IX",1130580001.201,1130580001.201,"MU",11.1,1,0)
-1^F^1130580001.201^.3^30^1^F
-"KEY",1130580001.101,1130580001.101,"A",0)
-1130580001.101^A^P^733
-"KEY",1130580001.101,1130580001.101,"A",2,0)
-^.312IA^1^1
-"KEY",1130580001.101,1130580001.101,"A",2,1,0)
-.01^1130580001.101^1
-"KEYPTR",1130580001.101,1130580001.101,"A")
-1130580001.101^B
-"KRN",.402,1742,-1)
-0^1
-"KRN",.402,1742,0)
-C0Q EDIT INPATIENT PARMS^3120801.1733^@^1130580001.401^^@^3120801
-"KRN",.402,1742,"DIAB",1,1,1130580001.4013,0)
-ALL
-"KRN",.402,1742,"DR",1,1130580001.401)
-.01;.02;.03;1;1.1;5.1;5.2;5.3;3;
-"KRN",.402,1742,"DR",2,1130580001.4013)
-.01:.02
-"KRN",.402,1747,-1)
-0^2
-"KRN",.402,1747,0)
-C0Q EDIT MEASURE SET^3120801.0011^@^1130580001.201^^@^3120801
-"KRN",.402,1747,"DR",1,1130580001.201)
-.01;.02;.03;.05;.3;.4;1;
-"KRN",.402,1747,"DR",2,1130580001.2011)
-.01;1.2;2.2;
-"KRN",19,11027,-1)
-2^3
-"KRN",19,11027,0)
-C0Q QUALITY MEASUREMENT MENU^QUALITY MEASUREMENT MENU^^M^8^^^^^^^^y
-"KRN",19,11027,10,0)
-^19.01IP^20^20
-"KRN",19,11027,10,20,0)
-11070
-"KRN",19,11027,10,20,"^")
-C0Q QRDA MENU
-"KRN",19,11027,"U")
-QUALITY MEASUREMENT MENU
-"KRN",19,11070,-1)
-0^1
-"KRN",19,11070,0)
-C0Q QRDA MENU^QRDA MENU^^M^^^^^^^^QUALITY MEASURES^y
-"KRN",19,11070,1,0)
-^^1^1^3120801^
-"KRN",19,11070,1,1,0)
-Contains QRDA generation releated menu options.
-"KRN",19,11070,10,0)
-^19.01IP^1^1
-"KRN",19,11070,10,1,0)
-11071
-"KRN",19,11070,10,1,"^")
-C0Q EXPORT INPATIENT QRDA CCRS
-"KRN",19,11070,99)
-62670,75392
-"KRN",19,11070,"U")
-QRDA MENU
-"KRN",19,11071,-1)
-0^2
-"KRN",19,11071,0)
-C0Q EXPORT INPATIENT QRDA CCRS^EXPORT INPATIENT QRDA MEASURES AS CCRS^^R^^^^^^^^QUALITY MEASURES^y
-"KRN",19,11071,1,0)
-^^2^2^3120801^
-"KRN",19,11071,1,1,0)
-This option updates the CMS Inpatient Reporting measures and then creates 
-"KRN",19,11071,1,2,0)
-a CCR for each patient in these measures' denominators.
-"KRN",19,11071,25)
-EN^C0QQRDA
-"KRN",19,11071,"U")
-EXPORT INPATIENT QRDA MEASURES
-"MBREQ")
-0
-"ORD",7,.402)
-.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,"",%)
-"ORD",7,.402,0)
-INPUT TEMPLATE
-"ORD",18,19)
-19;18;;;OPT^XPDTA;OPTF1^XPDIA;OPTE1^XPDIA;OPTF2^XPDIA;;OPTDEL^XPDIA
-"ORD",18,19,0)
-OPTION
-"PGL",1130580001.101,0,2,1)
-NUMERATOR PATIENT LIST^P810.5'^PXRMXP(810.5,^0;2^Q
-"PGL",1130580001.101,0,3,2)
-DENOMINATOR PATIENT LIST^P810.5'^PXRMXP(810.5,^0;3^Q
-"PGL",1130580001.101,7,2,1.1)
-ALTERNATIVE NUMERATOR LIST^P1130580001.301'^C0Q(301,^7;2^Q
-"PGL",1130580001.101,7,3,2.1)
-ALTERNATIVE DENOMINATOR LIST^P1130580001.301'^C0Q(301,^7;3^Q
-"PGL",1130580001.101,7,4,1.5)
-NEGATIVE NUMERATOR LIST^P810.5'^PXRMXP(810.5,^7;4^Q
-"PGL",1130580001.101,7,5,1.51)
-ALTERNATE NEGATIVE NUM LIST^P1130580001.301'^C0Q(301,^7;5^Q
-"PGL",1130580001.101,7,7,1.2)
-NUMERATOR RULE SET^*P810.4'^PXRM(810.4,^7;7^S DIC("S")="I $P(^(0),U,3)=3" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
-"PGL",1130580001.101,7,8,2.2)
-DENOMINATOR RULE SET^*P810.4'^PXRM(810.4,^7;8^S DIC("S")="I $P(^(0),U,3)=3" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
-"PGL",1130580001.101,7,9,2.5)
-EXTRACT DEFINITION^P810.2'^PXRM(810.2,^7;9^Q
-"PGL",1130580001.2011,4,3,1.2)
-NUMERATOR FILTER LIST^P1130580001.301'^C0Q(301,^4;3^Q
-"PGL",1130580001.2011,4,4,2.2)
-DENOMINATOR FILTER LIST^P1130580001.301'^C0Q(301,^4;4^Q
-"PKG",212,-1)
-1^1
-"PKG",212,0)
-QUALITY MEASURES^C0Q^Tracks and Prints Quality Measures
-"PKG",212,20,0)
-^9.402P^^
-"PKG",212,22,0)
-^9.49I^1^1
-"PKG",212,22,1,0)
-1.0^3120731
-"PKG",212,22,1,"PAH",1,0)
-4^3120802
-"PKG",212,22,1,"PAH",1,1,0)
-^^1^1^3120802
-"PKG",212,22,1,"PAH",1,1,1,0)
-QRDA Support.
-"QUES","XPF1",0)
-Y
-"QUES","XPF1","??")
-^D REP^XPDH
-"QUES","XPF1","A")
-Shall I write over your |FLAG| File
-"QUES","XPF1","B")
-YES
-"QUES","XPF1","M")
-D XPF1^XPDIQ
-"QUES","XPF2",0)
-Y
-"QUES","XPF2","??")
-^D DTA^XPDH
-"QUES","XPF2","A")
-Want my data |FLAG| yours
-"QUES","XPF2","B")
-YES
-"QUES","XPF2","M")
-D XPF2^XPDIQ
-"QUES","XPI1",0)
-YO
-"QUES","XPI1","??")
-^D INHIBIT^XPDH
-"QUES","XPI1","A")
-Want KIDS to INHIBIT LOGONs during the install
-"QUES","XPI1","B")
-NO
-"QUES","XPI1","M")
-D XPI1^XPDIQ
-"QUES","XPM1",0)
-PO^VA(200,:EM
-"QUES","XPM1","??")
-^D MG^XPDH
-"QUES","XPM1","A")
-Enter the Coordinator for Mail Group '|FLAG|'
-"QUES","XPM1","B")
-
-"QUES","XPM1","M")
-D XPM1^XPDIQ
-"QUES","XPO1",0)
-Y
-"QUES","XPO1","??")
-^D MENU^XPDH
-"QUES","XPO1","A")
-Want KIDS to Rebuild Menu Trees Upon Completion of Install
-"QUES","XPO1","B")
-YES
-"QUES","XPO1","M")
-D XPO1^XPDIQ
-"QUES","XPZ1",0)
-Y
-"QUES","XPZ1","??")
-^D OPT^XPDH
-"QUES","XPZ1","A")
-Want to DISABLE Scheduled Options, Menu Options, and Protocols
-"QUES","XPZ1","B")
-NO
-"QUES","XPZ1","M")
-D XPZ1^XPDIQ
-"QUES","XPZ2",0)
-Y
-"QUES","XPZ2","??")
-^D RTN^XPDH
-"QUES","XPZ2","A")
-Want to MOVE routines to other CPUs
-"QUES","XPZ2","B")
-NO
-"QUES","XPZ2","M")
-D XPZ2^XPDIQ
-"RTN")
-1
-"RTN","C0QQRDA")
-0^1^B59175834
-"RTN","C0QQRDA",1,0)
-C0QQRDA ; GPL - Quality Reporting QRDA Processing ; 8/2/12 12:42am
-"RTN","C0QQRDA",2,0)
- ;;1.0;QUALITY MEASURES;**4**;May 21, 2012;Build 23
-"RTN","C0QQRDA",3,0)
- ;Copyright 2012 George Lilly.  Licensed under the terms of the GNU
-"RTN","C0QQRDA",4,0)
- ;General Public License See attached copy of the License.
-"RTN","C0QQRDA",5,0)
- ;
-"RTN","C0QQRDA",6,0)
- ;This program is free software; you can redistribute it and/or modify
-"RTN","C0QQRDA",7,0)
- ;it under the terms of the GNU General Public License as published by
-"RTN","C0QQRDA",8,0)
- ;the Free Software Foundation; either version 2 of the License, or
-"RTN","C0QQRDA",9,0)
- ;(at your option) any later version.
-"RTN","C0QQRDA",10,0)
- ;
-"RTN","C0QQRDA",11,0)
- ;This program is distributed in the hope that it will be useful,
-"RTN","C0QQRDA",12,0)
- ;but WITHOUT ANY WARRANTY; without even the implied warranty of
-"RTN","C0QQRDA",13,0)
- ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-"RTN","C0QQRDA",14,0)
- ;GNU General Public License for more details.
-"RTN","C0QQRDA",15,0)
- ;
-"RTN","C0QQRDA",16,0)
- ;You should have received a copy of the GNU General Public License along
-"RTN","C0QQRDA",17,0)
- ;with this program; if not, write to the Free Software Foundation, Inc.,
-"RTN","C0QQRDA",18,0)
- ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
-"RTN","C0QQRDA",19,0)
- ;
-"RTN","C0QQRDA",20,0)
-EN  ; Private to this Package; Main Entry Point for this routine
-"RTN","C0QQRDA",21,0)
- ; This EP is interactive or silent depending on params
-"RTN","C0QQRDA",22,0)
- ;
-"RTN","C0QQRDA",23,0)
- ; Check for config errors first
-"RTN","C0QQRDA",24,0)
- N % S %=$$CHECKERR()
-"RTN","C0QQRDA",25,0)
- I % D EN^DDIOL($P(%,U,2)) QUIT
-"RTN","C0QQRDA",26,0)
- ;
-"RTN","C0QQRDA",27,0)
- ; Print Intro
-"RTN","C0QQRDA",28,0)
- N %
-"RTN","C0QQRDA",29,0)
- S %(1)="This program collects patients from the denominators of the measures"
-"RTN","C0QQRDA",30,0)
- S %(2)="STK, VTE, and ED and outputs modified CCR files to the kernel default"
-"RTN","C0QQRDA",31,0)
- S %(3)="directory (probably /tmp/)."
-"RTN","C0QQRDA",32,0)
- S %(4)=""
-"RTN","C0QQRDA",33,0)
- S %(5)="This will take some time to execute."
-"RTN","C0QQRDA",34,0)
- S %(6)=""
-"RTN","C0QQRDA",35,0)
- S %(6,"F")="!!!"
-"RTN","C0QQRDA",36,0)
- ;
-"RTN","C0QQRDA",37,0)
- D EN^DDIOL(.%)
-"RTN","C0QQRDA",38,0)
- ;
-"RTN","C0QQRDA",39,0)
- ; Ask user which measure set to run
-"RTN","C0QQRDA",40,0)
- N DIR,DTOUT,DUOUT,X,Y,DIRUT,DIROUT,DA ; DIR variables
-"RTN","C0QQRDA",41,0)
- S DIR(0)="SB^V:VTE;S:STK;E:ED"
-"RTN","C0QQRDA",42,0)
- S DIR("A")="Measure to calculate"
-"RTN","C0QQRDA",43,0)
- S DIR("A",1)="Which measure set would you like to produce QRDA documents for?"
-"RTN","C0QQRDA",44,0)
- S DIR("A",2)="Choose to Run [V]TE Measure Set, [S]TK Measure Set, or "
-"RTN","C0QQRDA",45,0)
- S DIR("A",3)="[E]D Measure Set"
-"RTN","C0QQRDA",46,0)
- D ^DIR
-"RTN","C0QQRDA",47,0)
- ;
-"RTN","C0QQRDA",48,0)
- I $G(DTOUT)!$G(DUOUT) QUIT  ; Did user hit '^' or time out?
-"RTN","C0QQRDA",49,0)
- ;
-"RTN","C0QQRDA",50,0)
- ; Get the Measure Set IEN which the user has seleted.
-"RTN","C0QQRDA",51,0)
- ; NB: field names start with VTE, STK, or ED; so I can use the output
-"RTN","C0QQRDA",52,0)
- ; of DIR directly.
-"RTN","C0QQRDA",53,0)
- ;
-"RTN","C0QQRDA",54,0)
- N FLD S FLD=Y(0)
-"RTN","C0QQRDA",55,0)
- N C0QMSIEN S C0QMSIEN=$$GET1^DIQ(1130580001.401,$$INPPARM(),FLD,"I")
-"RTN","C0QQRDA",56,0)
- ;
-"RTN","C0QQRDA",57,0)
- S:'C0QMSIEN $EC=",U1,"  ; Debug.Assert that MSIEN is numeric.
-"RTN","C0QQRDA",58,0)
- ;
-"RTN","C0QQRDA",59,0)
- ; Do the work
-"RTN","C0QQRDA",60,0)
- N REF S REF=$NAME(^TMP("C0QQRDA",$J)) ; Global for data collection
-"RTN","C0QQRDA",61,0)
- K @REF  ; Clear global
-"RTN","C0QQRDA",62,0)
- D WORK(REF,C0QMSIEN) ; Process Measure Set, collect data in global
-"RTN","C0QQRDA",63,0)
- D PRINTXML(REF,FLD) ; Generate XML; output to File. 
-"RTN","C0QQRDA",64,0)
- K @REF  ; Clear global
-"RTN","C0QQRDA",65,0)
- QUIT
-"RTN","C0QQRDA",66,0)
- ;
-"RTN","C0QQRDA",67,0)
- ;SILENTEN(RETURN) ; For future RPC calls...; needs to be reworked.
-"RTN","C0QQRDA",68,0)
- ; N % S %=$$CHECKERR() 
-"RTN","C0QQRDA",69,0)
- ; I % S RETURN(0)=% Q
-"RTN","C0QQRDA",70,0)
- ;
-"RTN","C0QQRDA",71,0)
- ; N DIQUIET S DIQUIET=1
-"RTN","C0QQRDA",72,0)
- ; D EN 
-"RTN","C0QQRDA",73,0)
- ; S RETURN(0)=0
-"RTN","C0QQRDA",74,0)
- ; QUIT
-"RTN","C0QQRDA",75,0)
- ;
-"RTN","C0QQRDA",76,0)
-CHECKERR() ; Private Proc; Check if environment is okay.
-"RTN","C0QQRDA",77,0)
- ; Output: 0 -> Okay; +ve^message for error
-"RTN","C0QQRDA",78,0)
- N INPPARM S INPPARM=$$INPPARM() ; Inpatient Parameters IEN
-"RTN","C0QQRDA",79,0)
- I 'INPPARM Q 1_U_"No Inpatient Parameters found"
-"RTN","C0QQRDA",80,0)
- ;
-"RTN","C0QQRDA",81,0)
- ; Pointer fields to Measurement Set file, we grab the IENs
-"RTN","C0QQRDA",82,0)
- N C0QED S C0QED=$$GET1^DIQ(1130580001.401,INPPARM,"ED","I")
-"RTN","C0QQRDA",83,0)
- N C0QSTK S C0QSTK=$$GET1^DIQ(1130580001.401,INPPARM,"STK","I")
-"RTN","C0QQRDA",84,0)
- N C0QVTE S C0QVTE=$$GET1^DIQ(1130580001.401,INPPARM,"VTE","I")
-"RTN","C0QQRDA",85,0)
- ;
-"RTN","C0QQRDA",86,0)
- N TXT S TXT="" ; Error text
-"RTN","C0QQRDA",87,0)
- I 'C0QED S TXT=TXT_"ED,"
-"RTN","C0QQRDA",88,0)
- I 'C0QSTK S TXT=TXT_"STK,"
-"RTN","C0QQRDA",89,0)
- I 'C0QVTE S TXT=TXT_"VTE"
-"RTN","C0QQRDA",90,0)
- I $E(TXT,$L(TXT)=",") S TXT=$E(TXT,1,$L(TXT)-1)
-"RTN","C0QQRDA",91,0)
- I $L(TXT) Q 2_U_"Measure Sets missing from parameters: "_TXT
-"RTN","C0QQRDA",92,0)
- ;
-"RTN","C0QQRDA",93,0)
- QUIT 0 ; All okay
-"RTN","C0QQRDA",94,0)
- ;
-"RTN","C0QQRDA",95,0)
-WORK(C0QREF,C0QMSIEN) ; Private Proc; Process Measure Sets; Collect the data.
-"RTN","C0QQRDA",96,0)
- ; Input/Output: C0QREF -> Global for Output passed by Name
-"RTN","C0QQRDA",97,0)
- ;               C0QMSIEN -> (Input): Measurement Set IEN to calculate
-"RTN","C0QQRDA",98,0)
- ;
-"RTN","C0QQRDA",99,0)
- ; Print
-"RTN","C0QQRDA",100,0)
- D EN^DDIOL(C0QMSIEN_": "_^C0Q(201,C0QMSIEN,0))
-"RTN","C0QQRDA",101,0)
- D EN^DDIOL("")
-"RTN","C0QQRDA",102,0)
- ;
-"RTN","C0QQRDA",103,0)
- ; Calculate totals and move patients over from individual measures
-"RTN","C0QQRDA",104,0)
- D UPDATE^C0QUPDT(.A,C0QMSIEN) ; FYI: A isn't used.
-"RTN","C0QQRDA",105,0)
- ;
-"RTN","C0QQRDA",106,0)
- ; Get QRDA code for Measure Set.
-"RTN","C0QQRDA",107,0)
- N C0QMSQRDA S C0QMSQRDA=$$GET1^DIQ($$C0QMFN^C0QUPDT(),C0QMSIEN_",","QRDA TEMPLATE ROOT")
-"RTN","C0QQRDA",108,0)
- ;
-"RTN","C0QQRDA",109,0)
- N C0QI S C0QI=0 ; Fileman IEN looper
-"RTN","C0QQRDA",110,0)
- F  S C0QI=$O(^C0Q(201,C0QMSIEN,5,C0QI)) Q:'C0QI  D  ; For each measure in Measure Set
-"RTN","C0QQRDA",111,0)
- . ;
-"RTN","C0QQRDA",112,0)
- . ; Get QRDA code using relational jump
-"RTN","C0QQRDA",113,0)
- . N C0QMEASUREQRDA S C0QMEASUREQRDA=$$GET1^DIQ($$C0QMMFN^C0QUPDT(),C0QI_","_C0QMSIEN_",",".01:QRDA TEMPLATE ROOT")
-"RTN","C0QQRDA",114,0)
- . ;
-"RTN","C0QQRDA",115,0)
- . ; Then collect patients in the denominator, and store in output global
-"RTN","C0QQRDA",116,0)
- . N C0QP S C0QP=0
-"RTN","C0QQRDA",117,0)
- . F  S C0QP=$O(^C0Q(201,C0QMSIEN,5,C0QI,3,C0QP)) Q:'C0QP  D  ; For each patient in denominator
-"RTN","C0QQRDA",118,0)
- . . N C0QDFN S C0QDFN=+^(C0QP,0)
-"RTN","C0QQRDA",119,0)
- . . S @C0QREF@(C0QDFN,C0QMSQRDA,C0QMEASUREQRDA)=""
-"RTN","C0QQRDA",120,0)
- QUIT
-"RTN","C0QQRDA",121,0)
- ;
-"RTN","C0QQRDA",122,0)
-INPPARM() ; $$ Private; Get Inpatient Parameters IEN
-"RTN","C0QQRDA",123,0)
- ; Output: IEN of Inpatient Parameter in C0Q PARAMETER file
-"RTN","C0QQRDA",124,0)
- ;
-"RTN","C0QQRDA",125,0)
- ; Browse this tree of xrefs to get the IEN of INP type (last line here).
-"RTN","C0QQRDA",126,0)
- ; ^C0Q(401,"B","INPATIENT",2)=""
-"RTN","C0QQRDA",127,0)
- ; ^C0Q(401,"B","OUTPATIENT",1)=""
-"RTN","C0QQRDA",128,0)
- ; ^C0Q(401,"MU","MU12",1)=""
-"RTN","C0QQRDA",129,0)
- ; ^C0Q(401,"MU","MU12",2)=""
-"RTN","C0QQRDA",130,0)
- ; ^C0Q(401,"MUTYP","MU12","EP",1)=""
-"RTN","C0QQRDA",131,0)
- ; ^C0Q(401,"MUTYP","MU12","INP",2)=""
-"RTN","C0QQRDA",132,0)
- ;
-"RTN","C0QQRDA",133,0)
- N MUID S MUID="" ; Looper for MU Year ID
-"RTN","C0QQRDA",134,0)
- N FOUND S FOUND=0 ; Found flag to get out of loop
-"RTN","C0QQRDA",135,0)
- N IEN ; Output variable
-"RTN","C0QQRDA",136,0)
- F  S MUID=$O(^C0Q(401,"MUTYP",MUID),-1) Q:MUID=""  Q:FOUND  D  ; Loop backwards
-"RTN","C0QQRDA",137,0)
- . N TYP S TYP=""  ; Type ("EP" or "INP")
-"RTN","C0QQRDA",138,0)
- . F  S TYP=$O(^C0Q(401,"MUTYP",MUID,TYP)) Q:TYP=""  Q:FOUND  D
-"RTN","C0QQRDA",139,0)
- . . I TYP="INP" S IEN=$O(^(TYP,"")),FOUND=1 Q  ; If found, get IEN, quit out of loops
-"RTN","C0QQRDA",140,0)
- QUIT +$G(IEN)
-"RTN","C0QQRDA",141,0)
- ;
-"RTN","C0QQRDA",142,0)
-PRINTXML(C0QREF,C0QMNM) ; Print the XML; Private Proc
-"RTN","C0QQRDA",143,0)
- ; Input: C0QREF -> Global By Name
-"RTN","C0QQRDA",144,0)
- ;        C0QMNM -> Measure Name -> Either VTE, STK, ED. For use in filenames.
-"RTN","C0QQRDA",145,0)
- ; Output: modified CCRs are saved in /tmp/
-"RTN","C0QQRDA",146,0)
- N C0QDFN,C0QMS,C0QM S (C0QDFN,C0QMS,C0QM)="" ; DFN, Measure Set, Measure loopers
-"RTN","C0QQRDA",147,0)
- F  S C0QDFN=$O(@C0QREF@(C0QDFN)) Q:C0QDFN=""  D  ; For each patient
-"RTN","C0QQRDA",148,0)
- . ;
-"RTN","C0QQRDA",149,0)
- . N GREEN S GREEN=$C(27)_"[1;37;42m"
-"RTN","C0QQRDA",150,0)
- . N RESET S RESET=$C(27)_"[0m"
-"RTN","C0QQRDA",151,0)
- . D EN^DDIOL(GREEN_"Prosessing DFN "_C0QDFN_RESET,"","!!!")
-"RTN","C0QQRDA",152,0)
- . D EN^DDIOL("","","!")
-"RTN","C0QQRDA",153,0)
- . ;
-"RTN","C0QQRDA",154,0)
- . ; CCR Generatation is next; protected against crashes.
-"RTN","C0QQRDA",155,0)
- . ; ET set to new value then restored.
-"RTN","C0QQRDA",156,0)
- . N C0QCCRXML ; CCR XML
-"RTN","C0QQRDA",157,0)
- . N OLDTRAP S OLDTRAP=$ET
-"RTN","C0QQRDA",158,0)
- . ; ET: Rollback to this level, write the error in red , clear it, then quit
-"RTN","C0QQRDA",159,0)
- . N ETTEXT S ETTEXT=$C(27)_"[1;37;41m"_$$EC^%ZOSV_$C(27)_RESET
-"RTN","C0QQRDA",160,0)
- . N $ES,$ET
-"RTN","C0QQRDA",161,0)
- . S $ET="W ETTEXT D ^%ZTER G ROLLDOWN^C0QQRDA"
-"RTN","C0QQRDA",162,0)
- . D CCRRPC^C0CCCR(.C0QCCRXML,C0QDFN) ; Run CCR RPC.
-"RTN","C0QQRDA",163,0)
- . S $ET=OLDTRAP
-"RTN","C0QQRDA",164,0)
- . ;
-"RTN","C0QQRDA",165,0)
- . ;
-"RTN","C0QQRDA",166,0)
- . ; Quality XML Section generated by hand next...
-"RTN","C0QQRDA",167,0)
- . N C0QXML ; Generated Quality XML
-"RTN","C0QQRDA",168,0)
- . D XMLSTORE(.C0QXML,$$OT("QUALITY")) ; Open Tag
-"RTN","C0QQRDA",169,0)
- . F  S C0QMS=$O(@C0QREF@(C0QDFN,C0QMS)) Q:C0QMS=""  D  ; For each measure set
-"RTN","C0QQRDA",170,0)
- . . D XMLSTORE(.C0QXML,$$OT("MEASURE_SET")) ; Open tag
-"RTN","C0QQRDA",171,0)
- . . D XMLSTORE(.C0QXML,$$TAG("ID",C0QMS)) ; Write out set QRDA code
-"RTN","C0QQRDA",172,0)
- . . D XMLSTORE(.C0QXML,$$OT("MEASURES")) ; Open tag
-"RTN","C0QQRDA",173,0)
- . . F  S C0QM=$O(@C0QREF@(C0QDFN,C0QMS,C0QM)) Q:C0QM=""  D  ; for each measure
-"RTN","C0QQRDA",174,0)
- . . . D XMLSTORE(.C0QXML,$$TAG("MEASURE",C0QM)) ; Write <measure> and qrda code
-"RTN","C0QQRDA",175,0)
- . . D XMLSTORE(.C0QXML,$$CT("MEASURES")) ; Close tag
-"RTN","C0QQRDA",176,0)
- . . D XMLSTORE(.C0QXML,$$CT("MEASURE_SET")) ; Close tag
-"RTN","C0QQRDA",177,0)
- . D XMLSTORE(.C0QXML,$$CT("QUALITY")) ; Close tag
-"RTN","C0QQRDA",178,0)
- . ;
-"RTN","C0QQRDA",179,0)
- . ;
-"RTN","C0QQRDA",180,0)
- . ; Insert Quality XML under the root of the CCR document
-"RTN","C0QQRDA",181,0)
- . D INSERT^C0CXPATH($NA(C0QCCRXML),$NA(C0QXML),"//ContinuityOfCareRecord")
-"RTN","C0QQRDA",182,0)
- . ;
-"RTN","C0QQRDA",183,0)
- . ; 
-"RTN","C0QQRDA",184,0)
- . ; Get Kernel Default Directory
-"RTN","C0QQRDA",185,0)
- . N DEFDIR S DEFDIR=$$DEFDIR^%ZISH()
-"RTN","C0QQRDA",186,0)
- . ;
-"RTN","C0QQRDA",187,0)
- . ; 
-"RTN","C0QQRDA",188,0)
- . ; Write out to a file.
-"RTN","C0QQRDA",189,0)
- . N FN S FN=C0QMNM_"_QRDA_CCR_DFN"_$$RJ^XLFSTR(C0QDFN,10,"0")_".XML" ; File Name
-"RTN","C0QQRDA",190,0)
- . K C0QCCRXML(0) ; remove zero node; API doesn't support it.
-"RTN","C0QQRDA",191,0)
- . D EN^DDIOL($$OUTPUT^C0CXPATH($NA(C0QCCRXML(1)),FN,DEFDIR))
-"RTN","C0QQRDA",192,0)
- QUIT
-"RTN","C0QQRDA",193,0)
- ;
-"RTN","C0QQRDA",194,0)
- ; Quick XML stuff ; All Private
-"RTN","C0QQRDA",195,0)
-OT(STR) Q "<"_STR_">"  ; $$ Open Tag
-"RTN","C0QQRDA",196,0)
-CT(STR) Q "</"_STR_">"  ; $$ Close Tag
-"RTN","C0QQRDA",197,0)
-TAG(NM,CONTENT) Q "<"_NM_">"_CONTENT_"</"_NM_">"  ; $$ Whole tag
-"RTN","C0QQRDA",198,0)
- ;
-"RTN","C0QQRDA",199,0)
-XMLSTORE(REF,STR) ; Priv Proc - Store XML
-"RTN","C0QQRDA",200,0)
- ; REF -> Save Array. Pass by Reference.
-"RTN","C0QQRDA",201,0)
- ; STR -> What to store. Pass by Value.
-"RTN","C0QQRDA",202,0)
- ; Use like this: D XMLSTORE(.STORE,"<tag>")
-"RTN","C0QQRDA",203,0)
- ; Output: STORE(1)="<tag>"
-"RTN","C0QQRDA",204,0)
- N L ; Number Subscript to use
-"RTN","C0QQRDA",205,0)
- S L=$O(REF(" "),-1) S L=L+1 ; Get last number and increment
-"RTN","C0QQRDA",206,0)
- S REF(L)=STR,REF(0)=L ; Store string in numbered sub, store last number in 0 node (not used here)
-"RTN","C0QQRDA",207,0)
- QUIT
-"RTN","C0QQRDA",208,0)
- ;
-"RTN","C0QQRDA",209,0)
- ; Following is for formatting printed XML. L passed in Symbol Table and starts at 0.
-"RTN","C0QQRDA",210,0)
-L1 D WS S L=L+1 Q  ; Write space and increment
-"RTN","C0QQRDA",211,0)
-L2 S L=L-1 D WS Q  ; Decrement and Write space
-"RTN","C0QQRDA",212,0)
-WS X "F I=1:1:L W "" """ Q  ; Write Space
-"RTN","C0QQRDA",213,0)
- ; This is for rolling down the stack to the $ES level
-"RTN","C0QQRDA",214,0)
-ROLLDOWN S $ET="Q:$ES  S $EC=""""",$EC=",U99," QUIT
-"SEC","^DD",1130580001.101,1130580001.101,3.1,9)
-
-"SEC","^DIC",1130580001.101,1130580001.101,0,"AUDIT")
-@
-"SEC","^DIC",1130580001.101,1130580001.101,0,"DD")
-@
-"SEC","^DIC",1130580001.101,1130580001.101,0,"DEL")
-@
-"SEC","^DIC",1130580001.101,1130580001.101,0,"LAYGO")
-@
-"SEC","^DIC",1130580001.101,1130580001.101,0,"RD")
-@
-"SEC","^DIC",1130580001.101,1130580001.101,0,"WR")
-@
-"SEC","^DIC",1130580001.201,1130580001.201,0,"AUDIT")
-@
-"SEC","^DIC",1130580001.201,1130580001.201,0,"DD")
-@
-"SEC","^DIC",1130580001.201,1130580001.201,0,"DEL")
-@
-"SEC","^DIC",1130580001.201,1130580001.201,0,"LAYGO")
-@
-"SEC","^DIC",1130580001.201,1130580001.201,0,"RD")
-@
-"SEC","^DIC",1130580001.201,1130580001.201,0,"WR")
-@
-"VER")
-8.0^22.0
-"^DD",1130580001.101,1130580001.101,0)
-FIELD^^.3^18
-"^DD",1130580001.101,1130580001.101,0,"DDA")
-N
-"^DD",1130580001.101,1130580001.101,0,"DT")
-3120731
-"^DD",1130580001.101,1130580001.101,0,"ID",.7)
-W:$D(^(5)) "   ",$P(^(5),U,1)
-"^DD",1130580001.101,1130580001.101,0,"IX","B",1130580001.101,.01)
-
-"^DD",1130580001.101,1130580001.101,0,"NM","C0Q QUALITY MEASURE")
-
-"^DD",1130580001.101,1130580001.101,0,"PT",1130580001.2011,.01)
-
-"^DD",1130580001.101,1130580001.101,0,"VRPK")
-C0Q
-"^DD",1130580001.101,1130580001.101,.01,0)
-NAME^RF^^0;1^K:$L(X)>30!($L(X)<1)!'(X'?1P.E) X
-"^DD",1130580001.101,1130580001.101,.01,.1)
-MEASURE NAME
-"^DD",1130580001.101,1130580001.101,.01,1,0)
-^.1
-"^DD",1130580001.101,1130580001.101,.01,1,1,0)
-1130580001.101^B
-"^DD",1130580001.101,1130580001.101,.01,1,1,1)
-S ^C0Q(101,"B",$E(X,1,30),DA)=""
-"^DD",1130580001.101,1130580001.101,.01,1,1,2)
-K ^C0Q(101,"B",$E(X,1,30),DA)
-"^DD",1130580001.101,1130580001.101,.01,3)
-Answer must be 1-30 characters in length
-"^DD",1130580001.101,1130580001.101,.01,"DT")
-3101012
-"^DD",1130580001.101,1130580001.101,.3,0)
-MU YEAR KEY^F^^7;6^K:$L(X)>30!($L(X)<1) X
-"^DD",1130580001.101,1130580001.101,.3,.1)
-MEANINGFUL USE YEAR KEY
-"^DD",1130580001.101,1130580001.101,.3,3)
-Answer must be 1-30 characters in length.
-"^DD",1130580001.101,1130580001.101,.3,"DT")
-3111201
-"^DD",1130580001.101,1130580001.101,.5,0)
-TITLE^F^^1;1^K:$L(X)>240!($L(X)<3) X
-"^DD",1130580001.101,1130580001.101,.5,.1)
-MEASURE TITLE
-"^DD",1130580001.101,1130580001.101,.5,3)
-Answer must be 3-240 characters in length
-"^DD",1130580001.101,1130580001.101,.5,"DT")
-3110430
-"^DD",1130580001.101,1130580001.101,.61,0)
-VERY LONG DESCRIPTION^1130580001.111^^6;0
-"^DD",1130580001.101,1130580001.101,.7,0)
-DISPLAY NAME^F^^5;1^K:$L(X)>240!($L(X)<3) X
-"^DD",1130580001.101,1130580001.101,.7,.1)
-QRDA DISPLAY NAME
-"^DD",1130580001.101,1130580001.101,.7,3)
-Answer must be 3-240 characters in length
-"^DD",1130580001.101,1130580001.101,.7,"DT")
-3101012
-"^DD",1130580001.101,1130580001.101,.8,0)
-REPORTING NAME^F^^7;1^K:$L(X)>30!($L(X)<3) X
-"^DD",1130580001.101,1130580001.101,.8,.1)
-REPORTING MEASURE NAME
-"^DD",1130580001.101,1130580001.101,.8,3)
-Answer must be 3-30 characters in length
-"^DD",1130580001.101,1130580001.101,.8,"DT")
-3110615
-"^DD",1130580001.101,1130580001.101,1,0)
-NUMERATOR PATIENT LIST^P810.5'^PXRMXP(810.5,^0;2^Q
-"^DD",1130580001.101,1130580001.101,1,.1)
-MEASURE NUMERATOR PATIENT LIST
-"^DD",1130580001.101,1130580001.101,1,"DT")
-3101012
-"^DD",1130580001.101,1130580001.101,1.1,0)
-ALTERNATIVE NUMERATOR LIST^P1130580001.301'^C0Q(301,^7;2^Q
-"^DD",1130580001.101,1130580001.101,1.1,"DT")
-3110805
-"^DD",1130580001.101,1130580001.101,1.2,0)
-NUMERATOR RULE SET^*P810.4'^PXRM(810.4,^7;7^S DIC("S")="I $P(^(0),U,3)=3" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
-"^DD",1130580001.101,1130580001.101,1.2,3)
-Enter the reminder rule set to use for this measure.
-"^DD",1130580001.101,1130580001.101,1.2,12)
-If the type of the reminder list rule is a Rule Set.
-"^DD",1130580001.101,1130580001.101,1.2,12.1)
-S DIC("S")="I $P(^(0),U,3)=3"
-"^DD",1130580001.101,1130580001.101,1.2,21,0)
-^^5^5^3120716^
-"^DD",1130580001.101,1130580001.101,1.2,21,1,0)
-This is the numerator reminder rule set to use for the quality measure.
-"^DD",1130580001.101,1130580001.101,1.2,21,2,0)
- 
-"^DD",1130580001.101,1130580001.101,1.2,21,3,0)
-The rule set is used to generate a patient list, which this package 
-"^DD",1130580001.101,1130580001.101,1.2,21,4,0)
-referneces. The contents of the patient list will produce the count for 
-"^DD",1130580001.101,1130580001.101,1.2,21,5,0)
-the measure. This count is for the numerator.
-"^DD",1130580001.101,1130580001.101,1.2,"DT")
-3120716
-"^DD",1130580001.101,1130580001.101,1.5,0)
-NEGATIVE NUMERATOR LIST^P810.5'^PXRMXP(810.5,^7;4^Q
-"^DD",1130580001.101,1130580001.101,1.5,.1)
-LIST OF PATIENTS THAT DO NOT MEET THE REQUIREMENTS
-"^DD",1130580001.101,1130580001.101,1.5,"DT")
-3110809
-"^DD",1130580001.101,1130580001.101,1.51,0)
-ALTERNATE NEGATIVE NUM LIST^P1130580001.301'^C0Q(301,^7;5^Q
-"^DD",1130580001.101,1130580001.101,1.51,.1)
-NEGATIVE NUMERATOR LIST IN C0Q PATIENT LIST FILE
-"^DD",1130580001.101,1130580001.101,1.51,"DT")
-3110809
-"^DD",1130580001.101,1130580001.101,2,0)
-DENOMINATOR PATIENT LIST^P810.5'^PXRMXP(810.5,^0;3^Q
-"^DD",1130580001.101,1130580001.101,2,.1)
-MEASURE DENOMINATOR PATIENT LIST
-"^DD",1130580001.101,1130580001.101,2,"DT")
-3101012
-"^DD",1130580001.101,1130580001.101,2.1,0)
-ALTERNATIVE DENOMINATOR LIST^P1130580001.301'^C0Q(301,^7;3^Q
-"^DD",1130580001.101,1130580001.101,2.1,"DT")
-3110805
-"^DD",1130580001.101,1130580001.101,2.2,0)
-DENOMINATOR RULE SET^*P810.4'^PXRM(810.4,^7;8^S DIC("S")="I $P(^(0),U,3)=3" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
-"^DD",1130580001.101,1130580001.101,2.2,3)
-Enter the reminder rule set to use for this measure.
-"^DD",1130580001.101,1130580001.101,2.2,12)
-If the type of the reminder list rule is a Rule Set.
-"^DD",1130580001.101,1130580001.101,2.2,12.1)
-S DIC("S")="I $P(^(0),U,3)=3"
-"^DD",1130580001.101,1130580001.101,2.2,21,0)
-^^5^5^3120716^
-"^DD",1130580001.101,1130580001.101,2.2,21,1,0)
-This is the denominator reminder rule set to use for the quality measure.
-"^DD",1130580001.101,1130580001.101,2.2,21,2,0)
- 
-"^DD",1130580001.101,1130580001.101,2.2,21,3,0)
-The rule set is used to generate a patient list, which this package
-"^DD",1130580001.101,1130580001.101,2.2,21,4,0)
-referneces. The contents of the patient list will produce the count for
-"^DD",1130580001.101,1130580001.101,2.2,21,5,0)
-the measure. This count is for the denominator.
-"^DD",1130580001.101,1130580001.101,2.2,"DT")
-3120716
-"^DD",1130580001.101,1130580001.101,2.5,0)
-EXTRACT DEFINITION^P810.2'^PXRM(810.2,^7;9^Q
-"^DD",1130580001.101,1130580001.101,2.5,3)
-Select a Reminder Extract Definition for this measure
-"^DD",1130580001.101,1130580001.101,2.5,21,0)
-^^4^4^3120726^
-"^DD",1130580001.101,1130580001.101,2.5,21,1,0)
-If this measure depends upon a reminder extract definition, you can add 
-"^DD",1130580001.101,1130580001.101,2.5,21,2,0)
-this extract definition here. This will alter how the Quality Measures 
-"^DD",1130580001.101,1130580001.101,2.5,21,3,0)
-package computes the measure to use the extract in addition and prior to
-"^DD",1130580001.101,1130580001.101,2.5,21,4,0)
-the rule sets.
-"^DD",1130580001.101,1130580001.101,2.5,"DT")
-3120726
-"^DD",1130580001.101,1130580001.101,3,0)
-QRDA TEMPLATE ROOT^F^^0;4^K:$L(X)>120!($L(X)<3) X
-"^DD",1130580001.101,1130580001.101,3,.1)
-
-"^DD",1130580001.101,1130580001.101,3,3)
-Answer must be 3-120 characters in length
-"^DD",1130580001.101,1130580001.101,3,21,0)
-^^2^2^3120731^^
-"^DD",1130580001.101,1130580001.101,3,21,1,0)
-Measure template root for the QRDA Document. A series of . delimited 
-"^DD",1130580001.101,1130580001.101,3,21,2,0)
-numbers. E.g. 2.16.840.1.113883.3.249.11.14.1.1.1
-"^DD",1130580001.101,1130580001.101,3,"DT")
-3120731
-"^DD",1130580001.101,1130580001.101,3.1,0)
-QRDA MEASURE SYSTEM OID^CJ^^ ; ^S X="2.16.840.1.113883.3.249.12"
-"^DD",1130580001.101,1130580001.101,3.1,.1)
-QRDA SYSTEM OID (FIXED)
-"^DD",1130580001.101,1130580001.101,3.1,9.01)
-
-"^DD",1130580001.101,1130580001.101,3.1,9.1)
-S X="2.16.840.1.113883.3.249.12"
-"^DD",1130580001.101,1130580001.101,3.1,"DT")
-3101012
-"^DD",1130580001.101,1130580001.101,3.2,0)
-QRDA CODE^F^^4;1^K:$L(X)>80!($L(X)<1) X
-"^DD",1130580001.101,1130580001.101,3.2,.1)
-QRDA MEASURE CODE
-"^DD",1130580001.101,1130580001.101,3.2,3)
-Answer must be 1-80 characters in length
-"^DD",1130580001.101,1130580001.101,3.2,"DT")
-3101012
-"^DD",1130580001.101,1130580001.111,0)
-VERY LONG DESCRIPTION SUB-FIELD^^.01^1
-"^DD",1130580001.101,1130580001.111,0,"DT")
-3101013
-"^DD",1130580001.101,1130580001.111,0,"NM","VERY LONG DESCRIPTION")
-
-"^DD",1130580001.101,1130580001.111,0,"UP")
-1130580001.101
-"^DD",1130580001.101,1130580001.111,.01,0)
-VERY LONG DESCRIPTION^Wx^^0;1
-"^DD",1130580001.101,1130580001.111,.01,.1)
-LONGER DESCRIPTION - IF IT DOESN'T FIT IN .6
-"^DD",1130580001.101,1130580001.111,.01,3)
-LONGER DESCRIPTION - INSTEAD OF LONG DESCRIPTION
-"^DD",1130580001.101,1130580001.111,.01,"DT")
-3101013
-"^DD",1130580001.201,1130580001.201,0)
-FIELD^^.4^9
-"^DD",1130580001.201,1130580001.201,0,"DDA")
-N
-"^DD",1130580001.201,1130580001.201,0,"DT")
-3120801
-"^DD",1130580001.201,1130580001.201,0,"IX","ADBYP",1130580001.20112,.01)
-
-"^DD",1130580001.201,1130580001.201,0,"IX","ANBYP",1130580001.20111,.01)
-
-"^DD",1130580001.201,1130580001.201,0,"IX","B",1130580001.201,.01)
-
-"^DD",1130580001.201,1130580001.201,0,"NM","C0Q MEASUREMENT SET")
-
-"^DD",1130580001.201,1130580001.201,0,"PT",1130580001.401,1)
-
-"^DD",1130580001.201,1130580001.201,0,"PT",1130580001.401,1.1)
-
-"^DD",1130580001.201,1130580001.201,0,"PT",1130580001.401,2)
-
-"^DD",1130580001.201,1130580001.201,0,"PT",1130580001.401,2.1)
-
-"^DD",1130580001.201,1130580001.201,0,"PT",1130580001.401,5.1)
-
-"^DD",1130580001.201,1130580001.201,0,"PT",1130580001.401,5.2)
-
-"^DD",1130580001.201,1130580001.201,0,"PT",1130580001.401,5.3)
-
-"^DD",1130580001.201,1130580001.201,.01,0)
-NAME^RFJ30^^0;1^K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
-"^DD",1130580001.201,1130580001.201,.01,.1)
-
-"^DD",1130580001.201,1130580001.201,.01,1,0)
-^.1
-"^DD",1130580001.201,1130580001.201,.01,1,1,0)
-1130580001.201^B
-"^DD",1130580001.201,1130580001.201,.01,1,1,1)
-S ^C0Q(201,"B",$E(X,1,30),DA)=""
-"^DD",1130580001.201,1130580001.201,.01,1,1,2)
-K ^C0Q(201,"B",$E(X,1,30),DA)
-"^DD",1130580001.201,1130580001.201,.01,3)
-Answer must be 3-30 characters in length.
-"^DD",1130580001.201,1130580001.201,.01,21,0)
-^^1^1^3120731^
-"^DD",1130580001.201,1130580001.201,.01,21,1,0)
-Measurement Set Name.
-"^DD",1130580001.201,1130580001.201,.01,"DT")
-3120731
-"^DD",1130580001.201,1130580001.201,.02,0)
-BEGIN DATE^D^^4;3^S %DT="E" D ^%DT S X=Y K:X<1 X
-"^DD",1130580001.201,1130580001.201,.02,.1)
-MEASUREMENT BEGIN DATE
-"^DD",1130580001.201,1130580001.201,.02,3)
-MEASUREMENT BEGIN DATE
-"^DD",1130580001.201,1130580001.201,.02,"DT")
-3101012
-"^DD",1130580001.201,1130580001.201,.03,0)
-END DATE^D^^4;4^S %DT="E" D ^%DT S X=Y K:X<1 X
-"^DD",1130580001.201,1130580001.201,.03,.1)
-MEASUREMENT END DATE
-"^DD",1130580001.201,1130580001.201,.03,3)
-MEASUREMENT END DATE
-"^DD",1130580001.201,1130580001.201,.03,"DT")
-3101012
-"^DD",1130580001.201,1130580001.201,.04,0)
-DATE LAST CALCULATED^D^^6;1^S %DT="E" D ^%DT S X=Y K:X<1 X
-"^DD",1130580001.201,1130580001.201,.04,.1)
-DATE LAST PROCESSED
-"^DD",1130580001.201,1130580001.201,.04,3)
-DATE LAST PROCESSED
-"^DD",1130580001.201,1130580001.201,.04,"DT")
-3101012
-"^DD",1130580001.201,1130580001.201,.05,0)
-LOCKED^S^Y:YES;N:NO;^6;2^Q
-"^DD",1130580001.201,1130580001.201,.05,.1)
-Y/N IS THIS RECORD SET LOCKED
-"^DD",1130580001.201,1130580001.201,.05,3)
-Y/N IS THIS RECORD SET LOCKED
-"^DD",1130580001.201,1130580001.201,.05,"DT")
-3101012
-"^DD",1130580001.201,1130580001.201,.2,0)
-USE ALL MEASURES^S^Y:YES;N:NO;^6;3^Q
-"^DD",1130580001.201,1130580001.201,.2,.1)
-INCLUDE ALL MEASURES IN THIS SET?
-"^DD",1130580001.201,1130580001.201,.2,3)
-INCLUDE ALL MEASURES IN THIS SET?
-"^DD",1130580001.201,1130580001.201,.2,"DT")
-3101012
-"^DD",1130580001.201,1130580001.201,.3,0)
-MU YEAR KEY^F^^7;1^K:$L(X)>240!($L(X)<1) X
-"^DD",1130580001.201,1130580001.201,.3,.1)
-MEANINGFUL USE YEAR KEY
-"^DD",1130580001.201,1130580001.201,.3,3)
-Answer must be 1-240 characters in length.
-"^DD",1130580001.201,1130580001.201,.3,"DT")
-3111129
-"^DD",1130580001.201,1130580001.201,.4,0)
-QRDA TEMPLATE ROOT^FJ120^^0;2^K:$L(X)>120!($L(X)<3) X
-"^DD",1130580001.201,1130580001.201,.4,3)
-Answer must be 3-120 characters in length.
-"^DD",1130580001.201,1130580001.201,.4,21,0)
-^^6^6^3120731^
-"^DD",1130580001.201,1130580001.201,.4,21,1,0)
-Measure template root for the Measurement Set. A series of . delimited
-"^DD",1130580001.201,1130580001.201,.4,21,2,0)
-numbers. E.g. 2.16.840.1.113883.3.249.11.14.1.1.1
-"^DD",1130580001.201,1130580001.201,.4,21,3,0)
- 
-"^DD",1130580001.201,1130580001.201,.4,21,4,0)
-Most measurement sets don't have that. Only measurement sets reporable as 
-"^DD",1130580001.201,1130580001.201,.4,21,5,0)
-a group (e.g. Inpatient ED, VTE, Stroke measures) will have this filled 
-"^DD",1130580001.201,1130580001.201,.4,21,6,0)
-out as it is reported in the QRDA document.
-"^DD",1130580001.201,1130580001.201,.4,"DT")
-3120731
-"^DD",1130580001.201,1130580001.201,1,0)
-MEASURE^1130580001.2011P^^5;0
-"^DD",1130580001.201,1130580001.2011,0)
-MEASURE SUB-FIELD^^2.2^8
-"^DD",1130580001.201,1130580001.2011,0,"DT")
-3120801
-"^DD",1130580001.201,1130580001.2011,0,"IX","B",1130580001.2011,.01)
-
-"^DD",1130580001.201,1130580001.2011,0,"NM","MEASURE")
-
-"^DD",1130580001.201,1130580001.2011,0,"UP")
-1130580001.201
-"^DD",1130580001.201,1130580001.2011,.01,0)
-MEASURE^MP1130580001.101'^C0Q(101,^0;1^Q
-"^DD",1130580001.201,1130580001.2011,.01,.1)
-
-"^DD",1130580001.201,1130580001.2011,.01,1,0)
-^.1
-"^DD",1130580001.201,1130580001.2011,.01,1,1,0)
-1130580001.2011^B
-"^DD",1130580001.201,1130580001.2011,.01,1,1,1)
-S ^C0Q(201,DA(1),5,"B",$E(X,1,30),DA)=""
-"^DD",1130580001.201,1130580001.2011,.01,1,1,2)
-K ^C0Q(201,DA(1),5,"B",$E(X,1,30),DA)
-"^DD",1130580001.201,1130580001.2011,.01,3)
-Included Quality Measures
-"^DD",1130580001.201,1130580001.2011,.01,"DT")
-3120801
-"^DD",1130580001.201,1130580001.2011,1,0)
-NUMERATOR^1130580001.20111P^^1;0
-"^DD",1130580001.201,1130580001.2011,1.1,0)
-NUMERATOR COUNT^NJ10,0^^2;1^K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1.N) X
-"^DD",1130580001.201,1130580001.2011,1.1,.1)
-NUMBER OF PATIENTS IN NUMERATOR
-"^DD",1130580001.201,1130580001.2011,1.1,3)
-NUMBER OF PATIENTS IN NUMERATOR
-"^DD",1130580001.201,1130580001.2011,1.1,"DT")
-3101012
-"^DD",1130580001.201,1130580001.2011,1.2,0)
-NUMERATOR FILTER LIST^P1130580001.301'^C0Q(301,^4;3^Q
-"^DD",1130580001.201,1130580001.2011,1.2,.1)
-FILTER LIST FOR NUMERATOR
-"^DD",1130580001.201,1130580001.2011,1.2,"DT")
-3111129
-"^DD",1130580001.201,1130580001.2011,2,0)
-DENOMINATOR^1130580001.20112P^^3;0
-"^DD",1130580001.201,1130580001.2011,2.1,0)
-DENOMINATOR COUNT^NJ9,0^^4;1^K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1.N) X
-"^DD",1130580001.201,1130580001.2011,2.1,.1)
-NUMBER OF PATIENTS IN DENOMINATOR
-"^DD",1130580001.201,1130580001.2011,2.1,3)
-NUMBER OF PATIENTS IN DENOMINATOR
-"^DD",1130580001.201,1130580001.2011,2.1,"DT")
-3101012
-"^DD",1130580001.201,1130580001.2011,2.2,0)
-DENOMINATOR FILTER LIST^P1130580001.301'^C0Q(301,^4;4^Q
-"^DD",1130580001.201,1130580001.2011,2.2,.1)
-FILTER LIST FOR DENOMINATOR
-"^DD",1130580001.201,1130580001.2011,2.2,"DT")
-3111129
-"^DD",1130580001.201,1130580001.2011,3,0)
-PERCENTAGE^NJ6,2^^4;2^K:+X'=X!(X>100)!(X<0)!(X?.E1"."3.N) X
-"^DD",1130580001.201,1130580001.2011,3,.1)
-MEASURE PERCENTAGE
-"^DD",1130580001.201,1130580001.2011,3,3)
-Type a number between 0 and 100, 2 Decimal Digits
-"^DD",1130580001.201,1130580001.2011,3,"DT")
-3110621
-"^DD",1130580001.201,1130580001.20111,0)
-NUMERATOR SUB-FIELD^^.01^1
-"^DD",1130580001.201,1130580001.20111,0,"DT")
-3101012
-"^DD",1130580001.201,1130580001.20111,0,"IX","B",1130580001.20111,.01)
-
-"^DD",1130580001.201,1130580001.20111,0,"NM","NUMERATOR")
-
-"^DD",1130580001.201,1130580001.20111,0,"UP")
-1130580001.2011
-"^DD",1130580001.201,1130580001.20111,.01,0)
-NUMERATOR^MP2'^DPT(^0;1^Q
-"^DD",1130580001.201,1130580001.20111,.01,.1)
-NUMERATOR PATIENTS
-"^DD",1130580001.201,1130580001.20111,.01,1,0)
-^.1
-"^DD",1130580001.201,1130580001.20111,.01,1,1,0)
-1130580001.20111^B
-"^DD",1130580001.201,1130580001.20111,.01,1,1,1)
-S ^C0Q(201,DA(2),5,DA(1),1,"B",$E(X,1,30),DA)=""
-"^DD",1130580001.201,1130580001.20111,.01,1,1,2)
-K ^C0Q(201,DA(2),5,DA(1),1,"B",$E(X,1,30),DA)
-"^DD",1130580001.201,1130580001.20111,.01,1,2,0)
-1130580001.201^ANBYP
-"^DD",1130580001.201,1130580001.20111,.01,1,2,1)
-S ^C0Q(201,"ANBYP",$E(X,1,30),DA(2),DA(1),DA)=""
-"^DD",1130580001.201,1130580001.20111,.01,1,2,2)
-K ^C0Q(201,"ANBYP",$E(X,1,30),DA(2),DA(1),DA)
-"^DD",1130580001.201,1130580001.20111,.01,1,2,"DT")
-3101014
-"^DD",1130580001.201,1130580001.20111,.01,3)
-NUMERATOR PATIENTS
-"^DD",1130580001.201,1130580001.20111,.01,"DT")
-3101014
-"^DD",1130580001.201,1130580001.20112,0)
-DENOMINATOR SUB-FIELD^^.01^1
-"^DD",1130580001.201,1130580001.20112,0,"DT")
-3101012
-"^DD",1130580001.201,1130580001.20112,0,"IX","B",1130580001.20112,.01)
-
-"^DD",1130580001.201,1130580001.20112,0,"NM","DENOMINATOR")
-
-"^DD",1130580001.201,1130580001.20112,0,"UP")
-1130580001.2011
-"^DD",1130580001.201,1130580001.20112,.01,0)
-DENOMINATOR^MP2'^DPT(^0;1^Q
-"^DD",1130580001.201,1130580001.20112,.01,.1)
-DENOMINATOR PATIENTS
-"^DD",1130580001.201,1130580001.20112,.01,1,0)
-^.1
-"^DD",1130580001.201,1130580001.20112,.01,1,1,0)
-1130580001.20112^B
-"^DD",1130580001.201,1130580001.20112,.01,1,1,1)
-S ^C0Q(201,DA(2),5,DA(1),3,"B",$E(X,1,30),DA)=""
-"^DD",1130580001.201,1130580001.20112,.01,1,1,2)
-K ^C0Q(201,DA(2),5,DA(1),3,"B",$E(X,1,30),DA)
-"^DD",1130580001.201,1130580001.20112,.01,1,2,0)
-1130580001.201^ADBYP
-"^DD",1130580001.201,1130580001.20112,.01,1,2,1)
-S ^C0Q(201,"ADBYP",$E(X,1,30),DA(2),DA(1),DA)=""
-"^DD",1130580001.201,1130580001.20112,.01,1,2,2)
-K ^C0Q(201,"ADBYP",$E(X,1,30),DA(2),DA(1),DA)
-"^DD",1130580001.201,1130580001.20112,.01,1,2,"DT")
-3101014
-"^DD",1130580001.201,1130580001.20112,.01,3)
-DENOMINATOR PATIENTS
-"^DD",1130580001.201,1130580001.20112,.01,"DT")
-3101014
-"^DD",1130580001.401,1130580001.401,5.1,0)
-VTE CMS MEASUREMENT SET^P1130580001.201'^C0Q(201,^5;1^Q
-"^DD",1130580001.401,1130580001.401,5.1,3)
-Enter VTE Measure Set to use for Inpatient CMS QRDA Reporting
-"^DD",1130580001.401,1130580001.401,5.1,21,0)
-^^3^3^3120801^^^
-"^DD",1130580001.401,1130580001.401,5.1,21,1,0)
-This field holds the VTE measure set for reporting information to the
-"^DD",1130580001.401,1130580001.401,5.1,21,2,0)
-Centers for Medicare & Medicaid Services (CMS) Hospital Reporting (HR)
-"^DD",1130580001.401,1130580001.401,5.1,21,3,0)
-2012 EHR incentive pilot.
-"^DD",1130580001.401,1130580001.401,5.1,23,0)
-^^3^3^3120801^
-"^DD",1130580001.401,1130580001.401,5.1,23,1,0)
-See 
-"^DD",1130580001.401,1130580001.401,5.1,23,2,0)
-http://qualitynet.org/dcs/ContentServer?c=Page&pagename=QnetPublic%2FPage%
-"^DD",1130580001.401,1130580001.401,5.1,23,3,0)
-2FQnetTier3&cid=1228772217179
-"^DD",1130580001.401,1130580001.401,5.1,"DT")
-3120801
-"^DD",1130580001.401,1130580001.401,5.2,0)
-STK CMS MEASUREMENT SET^P1130580001.201'^C0Q(201,^5;2^Q
-"^DD",1130580001.401,1130580001.401,5.2,3)
-Enter STK Measure Set to use for Inpatient CMS QRDA Reporting
-"^DD",1130580001.401,1130580001.401,5.2,21,0)
-^^3^3^3120801^
-"^DD",1130580001.401,1130580001.401,5.2,21,1,0)
-This field holds the STK measure set for reporting information to the
-"^DD",1130580001.401,1130580001.401,5.2,21,2,0)
-Centers for Medicare & Medicaid Services (CMS) Hospital Reporting (HR)
-"^DD",1130580001.401,1130580001.401,5.2,21,3,0)
-2012 EHR incentive pilot.  
-"^DD",1130580001.401,1130580001.401,5.2,23,0)
-^^3^3^3120801^
-"^DD",1130580001.401,1130580001.401,5.2,23,1,0)
-See 
-"^DD",1130580001.401,1130580001.401,5.2,23,2,0)
-http://qualitynet.org/dcs/ContentServer?c=Page&pagename=QnetPublic%2FPage%
-"^DD",1130580001.401,1130580001.401,5.2,23,3,0)
-2FQnetTier3&cid=1228772217179
-"^DD",1130580001.401,1130580001.401,5.2,"DT")
-3120801
-"^DD",1130580001.401,1130580001.401,5.3,0)
-ED CMS MEASUREMENT SET^P1130580001.201'^C0Q(201,^5;3^Q
-"^DD",1130580001.401,1130580001.401,5.3,3)
-Enter ED Measure Set to use for Inpatient CMS QRDA Reporting
-"^DD",1130580001.401,1130580001.401,5.3,21,0)
-^^3^3^3120801^
-"^DD",1130580001.401,1130580001.401,5.3,21,1,0)
-This field holds the ED measure set for reporting information to the
-"^DD",1130580001.401,1130580001.401,5.3,21,2,0)
-Centers for Medicare & Medicaid Services (CMS) Hospital Reporting (HR)
-"^DD",1130580001.401,1130580001.401,5.3,21,3,0)
-2012 EHR incentive pilot.
-"^DD",1130580001.401,1130580001.401,5.3,23,0)
-^^3^3^3120801^
-"^DD",1130580001.401,1130580001.401,5.3,23,1,0)
-See 
-"^DD",1130580001.401,1130580001.401,5.3,23,2,0)
-http://qualitynet.org/dcs/ContentServer?c=Page&pagename=QnetPublic%2FPage%
-"^DD",1130580001.401,1130580001.401,5.3,23,3,0)
-2FQnetTier3&cid=1228772217179
-"^DD",1130580001.401,1130580001.401,5.3,"DT")
-3120801
-"^DIC",1130580001.101,1130580001.101,0)
-C0Q QUALITY MEASURE^1130580001.101
-"^DIC",1130580001.101,1130580001.101,0,"GL")
-^C0Q(101,
-"^DIC",1130580001.101,"B","C0Q QUALITY MEASURE",1130580001.101)
-
-"^DIC",1130580001.201,1130580001.201,0)
-C0Q MEASUREMENT SET^1130580001.201
-"^DIC",1130580001.201,1130580001.201,0,"GL")
-^C0Q(201,
-"^DIC",1130580001.201,1130580001.201,"%",0)
-^1.005^^
-"^DIC",1130580001.201,1130580001.201,"%D",0)
-^^3^3^3120731^
-"^DIC",1130580001.201,1130580001.201,"%D",1,0)
-This file contains the groupings of Measurements found in the Quality 
-"^DIC",1130580001.201,1130580001.201,"%D",2,0)
-Measures file. It is tied to the parameters file as the set of 
-"^DIC",1130580001.201,1130580001.201,"%D",3,0)
-measurements to report for a site.
-"^DIC",1130580001.201,"B","C0Q MEASUREMENT SET",1130580001.201)
-
-**END**
-**END**