BGPMUPP ; IHS/MSC/MGH - Meaningful Use Print Jul 2009 6:26 AM ;31-Jan-2011 16:06;MGH
Source file <BGPMUPP.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
XML | ;create XML output files
|
|
PRINT1 | ;EP
|
|
PRINT2 | ;
|
|
ISED(BGPMUYF,BGPIC) | ; Determine if measure is an ED measure (for special headings)
|
|
COVERPG | ;
|
|
EXIT | ;
|
|
PRINTSUM | ; Print summary page of all measure calculations
|
|
ALLDEV() | ;
|
|
WPS | ;
|
|
DEL | ;create delimited output file
|
|
C(X,X2,X3) | ;
|
|
SETEXCEL | ;EP
|
|
WP | ;
|
|
;
|
||
PRINTN(BGPNODE,TXT,SLF,XLF) | ;Print out a node - SLF = print on same line as header, XLF = Xtra line feed after header
|
|
ANYDEV() | ;
|
|
ENDTIME | ;
|
|
W(V,C,F,M,P,T) | ;EP
|
|
WTITLE(I) | ;EP - write title line
|
|
CALC |
Name | Field # of Occurrence |
---|---|
COMMA^%DTC | C+1 |
^%ZISC | DEL+1, XML+1 |
$$DATE^BGP0UTL | SETEXCEL+6, SETEXCEL+7, SETEXCEL+8, SETEXCEL+9, SETEXCEL+10, SETEXCEL+11 |
PRINT1^BGPMUDEL | DEL+12 |
SAVEDEL^BGPMUDEL | DEL+13 |
$$LOC^BGPMUEH | COVERPG+23 |
HEADER^BGPMUPH | COVERPG+28, COVERPG+34, COVERPG+38, COVERPG+43, COVERPG+48, COVERPG+53, COVERPG+62, COVERPG+70, COVERPG+78, WPS+2 , PRINTN+5 |
HEADER1^BGPMUPH | PRINT2+2 |
W^BGPMUPP | WTITLE+8, WTITLE+9, WPS+3, CALC, CALC+1, PRINTN+2, PRINTN+3, PRINTN+6 |
^BGPMUPPS | PRINTSUM+3 |
PRINT1^BGPMUXML | XML+7 |
SAVEXML^BGPMUXML | XML+8 |
$$GET1^DIQ | COVERPG+23 |
^DIR | EXIT+2 |
^DIWP | WP+5 |
$$FMTE^XLFDT | COVERPG+5, COVERPG+8, COVERPG+9, COVERPG+10 |
$$CJ^XLFSTR | W+9 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUTTLOC - [#9999999.06] | SETEXCEL+5 |
^AUTTLOC("C" | SETEXCEL+5 |
^BGPGPDCT - [#90377.03] | SETEXCEL+3 |
^BGPMUIND( | WTITLE+2, PRINT1+4, PRINT1+5, WP+3, WP+5, CALC, CALC+1, PRINTN+1, PRINTN+4, PRINTN+6 , ISED+2 |
^BGPNPLT - [#90377.06] | ANYDEV+3, ALLDEV+3 |
^DIC(4 - [#4] | COVERPG+6, SETEXCEL+5 |
^TMP($J | PRINT+1!, PRINT+5*, PRINT+16!, DEL+6!, DEL+7*, DEL+15!, XML+2!, XML+3*, XML+10!, W+15 , W+16*, W+17*, W+18*, W+19* |
^UTILITY($J | WP+1!, WPS+1, WPS+3, WPS+5! |
^VA(200 - [#200] | COVERPG+7, COVERPG+19 |
Name | Line Occurrences |
---|---|
COVERPG | PRINT1+2 |
DEL | PRINT+9 |
ENDTIME | COVERPG+25 |
EXIT | PRINT+17 |
PRINT1 | PRINT+15 |
PRINT2 | PRINT1+6 |
PRINTN | PRINT2+8, PRINT2+10, PRINT2+14, PRINT2+18, PRINT2+20, PRINT2+23, PRINT2+25, PRINT2+27, PRINT2+29 |
SETEXCEL | PRINT+6 |
W | DEL+3, DEL+4, DEL+5, WTITLE+3, WTITLE+4, COVERPG+1, COVERPG+2, COVERPG+3, COVERPG+4, COVERPG+5 , COVERPG+6, COVERPG+7, COVERPG+8, COVERPG+9, COVERPG+10, COVERPG+11, COVERPG+13, COVERPG+14, COVERPG+17, COVERPG+19 , COVERPG+22, COVERPG+24, COVERPG+29, COVERPG+30, COVERPG+31, COVERPG+35, COVERPG+36, COVERPG+39, COVERPG+40, COVERPG+44 , COVERPG+45, COVERPG+46, COVERPG+49, COVERPG+50, COVERPG+51, COVERPG+54, COVERPG+55, COVERPG+56, COVERPG+57, COVERPG+58 , COVERPG+59, COVERPG+60, COVERPG+63, COVERPG+64, COVERPG+65, COVERPG+66, COVERPG+67, COVERPG+68, COVERPG+71, COVERPG+72 , COVERPG+73, COVERPG+74, COVERPG+75, COVERPG+76, COVERPG+79, COVERPG+80, COVERPG+81, ENDTIME+2 |
WTITLE | PRINT2+4 |
XML | PRINT+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | W+13~, W+15*, W+16*, W+17, W+18, W+19 |
>> BGPAREAA | PRINT+6, SETEXCEL+1 |
>> BGPBBD | COVERPG+10 |
>> BGPBD | COVERPG+8 |
>> BGPBED | COVERPG+10 |
>> BGPBEN | COVERPG+17, COVERPG+21 |
>> BGPBT | ENDTIME+1 |
>> BGPDELF | DEL+3, COVERPG+79 |
BGPDELIM | PRINT+2! |
>> BGPDELT | DEL+2, COVERPG+77 |
BGPDEVOR | PRINT1+1~, PRINT1+4*, PRINT1+5 |
>> BGPED | COVERPG+8 |
>> BGPEI( | SETEXCEL+6* |
>> BGPEI2( | SETEXCEL+7* |
>> BGPEIDV1( | SETEXCEL+8* |
>> BGPEIDV2( | SETEXCEL+9* |
>> BGPET | ENDTIME+1 |
BGPGDEV | PRINT1+1~, PRINT1+3*, PRINT1+8! |
>> BGPGPG | PRINT+13*, DEL+10* |
>> BGPGUI | PRINT+3, DEL+1, XML+1 |
>> BGPHR | ENDTIME+1*, ENDTIME+2 |
BGPIC | PRINT1+1~, PRINT1+5*, PRINT1+6, WP+3, WP+5, PRINT2+4, CALC, CALC+1, PRINTN+1, PRINTN+4 , PRINTN+6, ISED~, ISED+2 |
>> BGPIFTR | PRINT+7*, DEL+14*, XML+9* |
>> BGPIND( | PRINT1+6 |
>> BGPINDL( | ANYDEV+3, ALLDEV+3 |
>> BGPINDT | COVERPG+11, COVERPG+35 |
>> BGPIOSL | PRINT+3*, COVERPG+28, COVERPG+34, COVERPG+38, COVERPG+43, COVERPG+48, COVERPG+53, COVERPG+62, COVERPG+70, COVERPG+78 , WPS+2, PRINTN+5 |
>> BGPLCNT | WP+2*, WP+4*, WP+5 |
>> BGPM | ENDTIME+2* |
>> BGPMUT | COVERPG+3, COVERPG+11, COVERPG+12, COVERPG+17, COVERPG+18, COVERPG+20, COVERPG+27, COVERPG+33, COVERPG+37, COVERPG+42 , COVERPG+47, COVERPG+61, COVERPG+69, PRINT2+16, PRINT2+21 |
BGPMUYF | WTITLE+2, PRINT1+4, PRINT1+5, WP+3, WP+5, CALC, CALC+1, PRINTN+1, PRINTN+4, PRINTN+6 , ISED~, ISED+2 |
BGPNODE | WP+3, WP+5, PRINT2+8*, PRINT2+10*, PRINT2+14*, PRINT2+18*, PRINT2+20*, PRINT2+23*, PRINT2+25*, PRINT2+27* , PRINT2+29*, PRINTN~, PRINTN+1, PRINTN+4, PRINTN+6 |
>> BGPONN1( | SETEXCEL+10* |
>> BGPONN2( | SETEXCEL+11* |
>> BGPPBD | COVERPG+9 |
>> BGPPED | COVERPG+9 |
>> BGPPROV | COVERPG+19 |
BGPPSUM | PRINTSUM+1~, PRINTSUM+2* |
>> BGPPTYPE | PRINT+10*, DEL+9*, XML+5*, WTITLE+3, WTITLE+4, WTITLE+8, WTITLE+9, COVERPG+1, COVERPG+2, COVERPG+3 , COVERPG+4, COVERPG+5, COVERPG+6, COVERPG+7, COVERPG+8, COVERPG+9, COVERPG+10, COVERPG+11, COVERPG+13, COVERPG+14 , COVERPG+17, COVERPG+19, COVERPG+22, COVERPG+24, COVERPG+28, COVERPG+29, COVERPG+30, COVERPG+31, COVERPG+34, COVERPG+35 , COVERPG+36, COVERPG+38, COVERPG+39, COVERPG+40, COVERPG+43, COVERPG+44, COVERPG+45, COVERPG+46, COVERPG+48, COVERPG+49 , COVERPG+50, COVERPG+51, COVERPG+53, COVERPG+54, COVERPG+55, COVERPG+56, COVERPG+57, COVERPG+58, COVERPG+59, COVERPG+60 , COVERPG+62, COVERPG+63, COVERPG+64, COVERPG+65, COVERPG+66, COVERPG+67, COVERPG+68, COVERPG+70, COVERPG+71, COVERPG+72 , COVERPG+73, COVERPG+74, COVERPG+75, COVERPG+76, COVERPG+78, COVERPG+79, COVERPG+80, COVERPG+81, ENDTIME+2, WPS+2 , WPS+3, CALC, CALC+1, PRINTN+2, PRINTN+3, PRINTN+5, PRINTN+6, EXIT+1 |
>> BGPQHDR | PRINT+11*, DEL+8*, XML+4* |
>> BGPQUIT | PRINT+4*, PRINT+14*, DEL+11*, XML+6*, PRINT1+4, PRINT1+7, PRINT1+9, COVERPG+27, COVERPG+28, COVERPG+33 , COVERPG+34, COVERPG+37, COVERPG+38, COVERPG+42, COVERPG+43, COVERPG+47, COVERPG+48, COVERPG+53, COVERPG+61, COVERPG+62 , COVERPG+69, COVERPG+70, COVERPG+77, COVERPG+78, WPS+2, PRINTN+4, PRINTN+5 |
>> BGPROT | PRINT+8, PRINT+9 |
>> BGPS | ENDTIME+2* |
>> BGPSUL( | SETEXCEL+2 |
BGPTITLE | ISED+1~, ISED+2*, ISED+3 |
>> BGPTS | ENDTIME+1*, ENDTIME+2* |
>> BGPY | WP+3, WP+5, PRINTN+4*, PRINTN+6 |
>> BGPZ | WP+2*, WP+3*, WP+5 |
C | W~, W+2*, W+9, W+10 |
>> D | SETEXCEL+4*, SETEXCEL+5*, SETEXCEL+6, SETEXCEL+7, SETEXCEL+8, SETEXCEL+9, SETEXCEL+10, SETEXCEL+11 |
DIR | EXIT+2! |
DIR("A" | EXIT+2* |
DIR(0 | EXIT+2* |
>> DIRUT | EXIT+2* |
DIWF | WP+3*, WPS+4! |
DIWL | WP+3*, WPS+1, WPS+3, WPS+4! |
DIWR | WP+3*, WPS+4! |
DT | COVERPG+5 |
>> DUOUT | EXIT+2 |
DUZ | COVERPG+7 |
DUZ(2 | COVERPG+6, COVERPG+23 |
F | W~, W+1*, W+8, W+12*, W+16 |
G | ANYDEV+1~, ANYDEV+2*, ANYDEV+3*, ANYDEV+4, ALLDEV+1~, ALLDEV+2*, ALLDEV+3*, ALLDEV+4 |
I | WTITLE~, WTITLE+2, WTITLE+7* |
IO | EXIT+2 |
IO(0 | EXIT+2 |
IOSL | PRINT+3 |
IOST | EXIT+2 |
>> L | SETEXCEL+4*, SETEXCEL+5*, SETEXCEL+6, SETEXCEL+7, SETEXCEL+8, SETEXCEL+9, SETEXCEL+10, SETEXCEL+11 |
M | W~, W+5 |
>> N | SETEXCEL+3*, SETEXCEL+5, SETEXCEL+6, SETEXCEL+7, SETEXCEL+8, SETEXCEL+9, SETEXCEL+10, SETEXCEL+11 |
P | W~, W+3*, W+19, SETEXCEL+6*, SETEXCEL+7*, SETEXCEL+8*, SETEXCEL+9*, SETEXCEL+10*, SETEXCEL+11* |
S | WTITLE+1~, WTITLE+6*, WTITLE+7*, WTITLE+8, WTITLE+9 |
SLF | PRINTN~, PRINTN+5, PRINTN+6 |
T | W~, W+4*, W+10, WTITLE+1~, WTITLE+2*, WTITLE+3, WTITLE+4, WTITLE+5, WTITLE+8, WTITLE+9 |
TXT | PRINTN~, PRINTN+2 |
U | W+15, W+17, W+19, WTITLE+2, ANYDEV+3, ALLDEV+3, COVERPG+6, COVERPG+7, COVERPG+19, SETEXCEL+5 , SETEXCEL+6, SETEXCEL+7, SETEXCEL+8, SETEXCEL+9, SETEXCEL+10, SETEXCEL+11, ISED+2 |
V | W~, W+9, W+10, W+19 |
X | W+7~, W+8*, WTITLE+1~, WTITLE+5*, WTITLE+7, ANYDEV+1~, ANYDEV+3*, ALLDEV+1~, ALLDEV+3*, ENDTIME+2* , WP+5*, WPS+5!, PRINTN+3*, SETEXCEL+2*, SETEXCEL+3, SETEXCEL+6, SETEXCEL+7, SETEXCEL+8, SETEXCEL+9, SETEXCEL+10 , SETEXCEL+11, C~, C+2 |
X2 | C~ |
X3 | C~ |
XLF | PRINTN~, PRINTN+3 |
Y | DEL+3*, DEL+4*, DEL+5*, WTITLE+1~, WTITLE+7*, ANYDEV+1~, ANYDEV+3*, ALLDEV+1~, ALLDEV+3*, COVERPG+1* , COVERPG+2*, COVERPG+3*, COVERPG+4*, COVERPG+5*, COVERPG+6*, COVERPG+7*, COVERPG+8*, COVERPG+9*, COVERPG+10*, COVERPG+11* , COVERPG+13*, COVERPG+14*, COVERPG+17*, COVERPG+19*, COVERPG+21*, COVERPG+22, COVERPG+23*, COVERPG+24, COVERPG+29*, COVERPG+30* , COVERPG+31*, COVERPG+35*, COVERPG+36*, COVERPG+39*, COVERPG+40*, COVERPG+44*, COVERPG+45*, COVERPG+46*, COVERPG+49*, COVERPG+50* , COVERPG+51*, COVERPG+54*, COVERPG+55*, COVERPG+56*, COVERPG+57*, COVERPG+58*, COVERPG+59*, COVERPG+60*, COVERPG+63*, COVERPG+64* , COVERPG+65*, COVERPG+66*, COVERPG+67*, COVERPG+68*, COVERPG+71*, COVERPG+72*, COVERPG+73*, COVERPG+74*, COVERPG+75*, COVERPG+76* , COVERPG+79*, COVERPG+80*, COVERPG+81*, SETEXCEL+6*, SETEXCEL+7*, SETEXCEL+8*, SETEXCEL+9*, SETEXCEL+10*, SETEXCEL+11* |
Z | W+13~, W+14*, W+16*, WPS+1*, WPS+3, WPS+4! |
>> ZTQUEUED | EXIT+2 |